Digital PDFs

AH-T709B-MC

July 1984

166 pages

Original

8.5MB

view download

OCR Version

8.3MB

view download

Document:	CZKDLB0 KDJ11-A KDJ11 FPP DIAG JUL 1984 bw
Order Number:	AH-T709B-MC
Revision:	000
Pages:	166
Original Filename:	CZKDLB0__KDJ11-A__KDJ11_FPP_DIAG__AH-T709B-MC__JUL_1984_bw.pdf

OCR Text

RBJET-ERE DIAG
CZKOLEBO

e TR
FICHE 01 OF 01

E0EEEED

OCOO®-AGND
LN, pe

USER JOCUMENTATION
chg%l
KDJ1.1A
MAC
15-MAR 84 15:

30A(1052)

15 MAR-84

16:58

PAGE

5EQ 0001

REM &

TDENTIF ICATION

PRODUCT CODE:

AC-T7088-MC

PRODUCT NAME:

CZKDLBO KDJ11

PRODUCT

15-MAR-84

DATE:

FLOATING POINT

DIAGNOSTIC

MAINTAINER:

OIAGNOSTIC ENGINEERING

AUTHORS ;

HENRY ENMAN, JIM PITTMAN, BARRY IRRGANG
THE INFOPMATION IN THIS DOCUMENT IS
SUBJECT
TO
CMANGE WITHOUT
NOTICE
AND
SHOULD
NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO

RESPONSIBILITY

FOR ANY ERRORS

THAT

NO RESPONSIBILITY IS ASSUMED
FOR
SOF TWARE ON EQUIPMENT THAT IS NOT
AFFILIATED COMPANIES.

FOLLOWING ARE

OIGITAL
DEC

(C)

1983,

MAY

APPEAR

THE
USE
SUPPLIED

OR
B8Y

THIS DOCUMENT.

RELIABILITY
OIGITAL
OR

1984 By DIGITAL EQUIPMENT CORPORATION

TRADEMARKS OF

PDP
DECUS

DIGITAL

EQUIPMENT CORPORATION:

UNIBUS
DECTAPE

MASSBUS

OF
IT3

USER

KB
1A RRCE N AN

JOCUMENTATJON

e sa TECIH
M

30AC1052)

15 MAR

16:58
16:58

ClL
PA

PAGE 2

29
20

a1
a2
a3

aa
a5

a6
2>
a8
49

50
S1

HISTORY

OCT

FEB

REV,

REV.

A
B

>€Q 0002

REM &

FIRST RELEASE
CORRECTIONS MADE T0:
1. LORRECT VECTOR AREA

2.
3.
4.

MAINTENANCE PROBLEM
TURN CACME MEMORY SYSTEM OFF DURING NON-CACHE TESTS.
ENSURE THAT CPU ERROR REGISTER IS CLEARED AFTER
COMPLETION OF TEST THAT MIGMT CAUSE IT TO BE SET,
SAVE PC AND CONTENTS OF R6 ON UNEXPECTED INTERRUPTS

.L<1S S?IROSk? ~'AI§0NAR

Técgp

30A(1052)

15 MAR

16:58

PAGE

D1
3

52
S3

SEQ 0003

LREM &

55
.'5>§,

60
61
62
63

TABLE

CONTENTS

1.0
1.1
1.2
1.3

GENERAL INFORMATION
PROGRAM ABSTRACY
SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS

1.5

ASSUMPTIONS

1.4

DIAGNOSTIC HIERARCHY PREREQUISITES

65
66
g;

2.0

OPERATING

3.0

ERROR

INSTRUCTIONS

INFORMATION
&

USER DOCUMENTATION
MACY11
KOJ11A.MAC
15-MAR 84 15:51
71
72
73
74
75
76
77
78
79

80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95

98
93
100

101
102
103
104
105
106
107
108
109
110
111
112

113
114
115
116
117
118
119

120
121
122
123
124
125
126

30A{1052)

MAR 84

1¢:58

PAGE

SEQ 0004

.REM &

1.0

GENERAL

1.1

PROGRAM ABSTRACT

THIS

AN APT

INFORMATION

COMPATIBLE

VERSION OF

THE

KDJ11

FLOATING POINT

INSTRUCTION TESTS., IT FOCUSES ON TESTING THE KDJ11 FLOATING POINT
INSTRUCTION FUNCTIONALITY,

1.2

SYSTEM REQUIREMENTS

KDJ11-A PROCESSOR MODULE

ENSURE THAT HALT TRAP OPTION IS DISABLED (JUMPER W9 INSTALLED)
32KW MEMORY
Q-22 BACKPLANE (18 BIT QBUS MAY BE USED WITH REDUCED TEST COVERAGE)
SERIAL LINE UNIT AND CONSOLE TERMINAL (CONSOLE TERMINAL NOT REQUIRED FOR APT)

1.2

RELATED DOCUMENTS AND S1ANDARDS

KDJ11-A MODUWE SPECIFICATION REV
POP11 MAINDEC SYSMAC PACKAGE

2.2

J11 CONTROL CHIP SPECIFICATION 21-17679-00
J1l DATA CHIP SPECIFICATION 21-17677-00

1.4

DIAGNOSTIC MIERARCY PREREQUISITES

THE KDJ11 CPU AND MEMORY MANAGEMENT DIAGNOSTICS MUST
?ggr§UCCESSFULLY PRIOR TO RUNNING THE FLOATING POINT

1.5

ASSUMPTIONS

IT IS ASSUMED THAT

THE

XXDP+«

THE DIAGNOSTIC OPERATOR

OPERATING SYSTEM AND

THE

IS FAMILIAR MWITH

J1l MICRO-00DT.

2.0

OPERATING INSTRUCTIONS

2.1

LOADING AND STARTING PROCEEDURE

LOAD PROGRAM INTO MEMORY USING STANDARD XXDP+ PROCEEDURES.
THE PROGRAM IS STARTED BY LOADING ADORESS 200 AND USING
THE J11 MICRO-ODT G COMMAND TO START. THE PROGRAM
IDENTIFICATION MESSAGE WILL BE TYPED AFTER THE FIRST PASS
OF THE CCMPLETE PROGRAM,
2.2

PROGRAM OPTIONS

THE FOLLOWING ASSIGNMENTS HAVE BEEN MADE FOR THE KDJ11-A
DIAGNOSTIC SWTTCH REGISTER BITS:

BITe1S
.

14
-&

12
B I

11
S

10
N

9
I

DON'T
TEST

BEVENT

8
v Y

18 BIT

ADDRESS

ONL Y

EXTENDED
CACHE

TESTS

USER DOCUMENTATION
TgC;}
KDJ11A,MAC
15-MAR -84

127
128
129
130
131
132
133
134
135
136
137
138
139

140
141
142
143
144
145

50A(1052)

150
151
152
153
154
153

16:58

PAGE

2.3

SEQ 0005

-4

THE SOFTWARE SWITCH REGISTER HAS NO EFFECT
THIS DIAGNOSTIC.

THE

OPERATION OF

OPERATION UNDER APT

THERE ARE NO ABNORMALITIES IN THE EXECUTION OF THIS DIAGNOSTIC
WHEN OPERATING IN AN APT ENVIRONMENT, PROBLEMS CAUSED 8Y THE
ASYNCHRONQUS HALTS OF THE DIAGNOSTIC BY THE APT MONITOR HAVE
NOT BEEN NOTED.

3.0

ERROR

INFORMATION

ERRORS WILL CAUSE

THE FOLLOWING ERROR MESSAGE

TO BE PRINTED:

ERROR DURING FPP TESTING
ERROR & = (UNIQUE ERROR NUMBER)
ERROR PC = (PC AT TIME OF ERROR)

146

147
148
149

15 MAR 84

THE ERROR WILL
WILL HALT.

THEN BE REPORTED

4.0

PROGRESS

REPORT

END OF

EACH PASS

THE

TO APT

AND

DIAGNOSTIC NAME

THE PROGRAM

AND PASS COUNT

ARE PRINTED.

PROGRAM

HEADER

KDJ11A . MAC

AND

TABLES

15 MAR 84 15:51

156
157
158

Gl
MACY11

30A(1052)

MAR

16:58

.TITLE PROGRAM HEADER AND
.SBTTL
PROGRAM MEADER

159

.MCALL

160
161
162
163
164

.MCALL
.MCALL
.MCALL

PAGE

SEQ 0006

TABLES

NEWT
.EQUAT,
ST
.KT11,,$
,E
40CAT,.$
RR
EOP,
DE
. $APTBLS,
F,
SETUP

.$TYPE,.,BGNTST
$TYP
,ENDTST,BGN
DEC,
MOD ,ERRD
ENOMOD , CKL F
OOP
.HEADER, .SETUP, . $TRAP,BGNSUB,E
.$ACT11,
NDSUB,
. $APTHDR
.$APTYPE,.$ERROR,.$TYPOC
.$READ
T,

165

166
167
168
169
170

LTITLE
KDJL1-AR FLOATING POINT
;*COPYRIGHT (C) OCTOBER, 1983
:+DIGITAL EQUIPMENT CCRP.
: e MAYNARD, MASS., 01754
ie

1;2

; #PACKAGE

171
172

1
175

176

DIAGNOSTIC

HEJ
;¢ THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC

000001
160000

e
$TN=1

(MAINDEC-11-DZQAC-C3),

$SWR=160000

s 3HALT ON ERROR,

JAN

19,

1977.

LOOP ON TEST,

INWIBIT ERROR TYPOUT

GLOBAL AREAS
KDJ11A
. MAC

15 H

R éq
%OA(

177

15 MA“PSSGR& EADPAGE

SEQ 0007

.TITLE GLOBAL AREAS
.SBTTL
GLOBAL EQUATES SECTION

178

179

180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232

i
i

THE
ARE

.SBTTL
001000

000011
000012
000015
000200
177776
177774

177772
177570
177570
000000
000001
000002
000003
000004
000005
000006
000007
000006
000007

000000
000040
000100
000140
000200
000240
000300
000340

100000
040000
020000

010000
004000
0C2000
001000

GLOBAL EQUATES SECTION CONTAINS
USED IN MORE THAN ONE TEST.

PROGRAM EQUATES

THAT

BASIC DEF INITIONS

i *INITIAL ADDRESS OF
STACK=
1000
L.EQUIV
EMT,ERROR
.EQUIV
I07,SCOPE

THE

STACK POINTER «4s

1000

sas

; sBASIC DEFINITION OF ERROR CALL
1 1BASIC DEFINITION OF SCOPE CALL

;s sMISCELLANEOUS DEF INITIONS

LF=
12
CR=
1S
CRLF
200
PS»
177776
LEQUIV
PS,.PSW
STKLMT= 177774
PIRG=
177772

OSuWR =

DDISP=

177570

s sCODE FOR HORIZONTAL TAB

;1:CODE FOR LINE FEED
1 sCODE FOR CARRIAGE RETURN
; 1CODE FOR CARRIAGE RETURN-LINE FEED
- 3 ;PROCESSOR STATUS WORD

s:STACK LIMIT REGISTER

1 :PROGRAM INTERRUPT REQUEST REGISTER

: tHARDWARE SWITCH REGISTER

1 sHARDWARE DISPLAY REGISTER

s sGENERAL P\RPOSE REGISTER DEFINITIONS

RO=
Rl=
R2=
R3=

11
2
u3

1 sGENERAL
1 sGENERAL
1 tGENERAL
s tGENERAL

1 1GENERAL REGISTER

R4 =

R6e

SPa

RS=

R7=

PCs

1 sGENERAL REGISTER
s sGENERAL REGISTER

1 3GENERAL REGISTER

1 sPROGRAM COUNTER

3 1STACK POINTER

:APRIORITV LEVEL DEFINITIONS
PRO=
s sPRIORITY LEVEL O
PR1=
40
$1PRIORITY LEVEL 1

PR2»
PR3PR4 =

100
140
200

PR6 =

300

PRS =

PR7=

$1iPRIORITY LEVEL 2
s 1PRIORITY LEVEL 3
; 1PRIORITY LEVEL 4

240

1 sPRIORITY LEVEL S

340

s sPRIORITY LEVEL 7

t 1PRIORITY LEVEL 6

;6”SWITCH REGISTER” SWITCH DEFINITIONS

SW1S=

SWlar=

100000

40000

SW1i3s

20000

SW10+
SW09-

2000
1000

Suiz2=
SWils=

10000
4000

GLOBAL

AREAS

MACY1l

KDJ11A.MAC

15-MAR 84

233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
221
252
253
254
255
256
257

000400
000200
000100
000040
000020
000010
000004
000002
000001

2358

259
260
261
262
263
264
265
266
267
268
269

270

30A(1052)
15:51

1S5 MAR-84

16:58

PAGE 8

BASIC DEFINITIONS

SW08=
SWo7=
SWO6 =
SWO5=
SWo4=
SWO3=
Swo2=
SwolSWOO~
LEQUIV
.EQUIV
.EQUIV
.EQUIV
.EQUIV
EQUIV
L.EQUIV
LEQUIV
EQUIV
.EQUIV

400
200
100
40
20
10
4
2
1
SW09,SW9
SWO08,Suw8
SMWO7,SwW?
SWO06,SuWé
SWOS,SwS
SWO04,Swa
SWO3,SW3
SW02,Sw2
SWO1,SwWi
SWO00,SW0

100000
040000
020000
010000

;#DATA BIT DEFINITIONS (BITOO TO BIT1S)
B8IT15=
100000
B8ITi4=
40000
B8IT13=
20000
BITi2=
10000

002000
001000
000400
000200
000100
000040
000020
V00010
000004
000002
000001

B8IT10=
81709=
BIT08=
BITO7=
8IT06=B8IT0S=
BITO4«
BITO3=
BIT02BIT01=
8I700=

004000

BITil=

LEQUIV

4000

2000
1000
400
200
100
40
20
10
4
2
1

BIT09,B179

271
272
273

.EQUIV
.EQUIV
EQUIV

BIT08,8178
B8I707,8177
BIT06.8176

275
276

.EQUIV
.EQUIV

BITO4,BIT4
BITO03.BIT3

278
ggg

LEQUIV
.EQUIV

B8IT01,8IT1
BIT00.BITO

274

.EQUIV

277

281
282
283
284
285
286
287
288

LEQUIV

000004
000010
000014
000014
000014
000020
000024

BITO5,8ITS

BIT02,81T2

1 #BASIC "CPU“
ERRVEC= 4
RESVEC= 10
TBITVEC=14
TRTVEC= 14
BPTVEC- 14
IOTVEC= 20
PWRVEC» 24

TRAP VECTOR ADDRESSES
s3TIME QUT AND OTHER ERRORS
1 tRESERVED AND ILLEGAL INSTRUCTIONS
b T BIT
15 TRACE TRAP
i tBREAKPOINT TRAP (8PT)
1 s INPUT/0UTPUT TRAP (IOT) #eSCOPEee
1 1POWER FAIL

SEQ 0008

GLOBAL AREAS
KDJ11A
. MAC

289
290

291
292
293

294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333

334
335
336
337
338
339
340
341
342
343
344

MACY1l

15 MAR 84
000030
000034
000060
000064
000240

30A( 1 052)

15: 5 1

13 MAR R 1 BePINI T18Rs®

EMTVEC= 30
1 1EMULATOR TRAP (EMT) 44ERROR4#
TRAPVEC=34
11 "TRAP" TRAP
TKVEC=
60
+3TTY KEYBOARD VECTOR
TPVEC=
64
11TTY PRINTER VECTOR
PIRQVEC=240
s 1PROGRAM INTERR!IPT REQUEST VECTOR
.SBTTL
MEMORY MANAGEMENT DEFINITIONS

1#KT11 VECTOR ADDRESS
000250

MMVEC=

250

s#KT11 STATUS REGISTER ADDRESSES
177572
177574
177576
172516

SRO»
SR1=
SR2=

SR3=

177572
177574

177576

172516

;#USER "“I" PAGE DESCRIPTOR REGISTERS
177600
177602
177604
177606
177610
177612
177614
177616

UVIPORO= 177600
UIPDR1= 177602
UIPDR2= 177604
UVIPDR3» 177606
UIPDR4= 177610
UIPDRS= 177612
UIPDR6= 177614
UIPDR7= 177616

isUSER "D” PAGE DESCRIPTOR REGISTORS
177620
177622
177624
177626
177630
177632
177634
177636

UDPDRO= 177620

UDPDR1=
UDPDR2+=
UOPDR3=
UDPDR4=
UDPORS=
UDPDRG=
UDPDR7=

177622
177624
177626
177630
177632
177634
177636

:sUSER "I” PAGE ADDRESS REGISTERS
177640
177542
177644
177646
177650
177652
177654
177656

UIPARO=
UVIPAR1=
UIPAR2=
UIPAR3=
UIPAR4=
UIPARS>
UIPAR6=
UIPAR7=

177640
177642
177644
177646
177650
177652
177654
177656

3#USER “D" PAGE ADDRESS REGISTERS
177660
177662
177664

UDPARO=
UDPAR1«
UDPAR2=

177660
177662
177664

SEQ 0004

GLOBAL AREAS

KDJ11A . MAC
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
gg?

MACY1l

15 MAR 84 15:%1
177666
177670
177672
177674
177676

172200

172202
172204
172206
172210
172212
172214
172216

iK1l
16:58

172220
172222
172224
172226
172230
172232
172234

172236

g;z

PAGE

UDPAR3=
UDPAR4=
UDPARS=
UDPAR6=
UDPAR7=

177666
177670
177672
177674
177676

SIPORO=

SIPDR1=
SIPDR2=
SIPDR3=
SIPDR4=
SIPORS=
SIPDR6~
SIPDR7=

SOPDRO=
SDPOR1=
SDOPDR2+=
SOPOR3=
SDPDR4=
SOPDRS=
SOPDR6=

“I“” PAGE DESCRIPTOR REGISTERS

172200

172202
172204
172206
172210
172212
172214
172216

"D" PAGE DESCRIPTOR REGISTERS

172220
172222
172224
172226
172230
172232
172234

SOPDR7= 172236

i *SUPERVISOR “I" PAGE ADDRESS REGISTERS

375
376

172240
172242

SIPARO=
SIPAR1=

172240
172242

378

172246

SIPAR3*

172246

SIPARSs
SIPARG=

172252
172254

377

279

380
381

ggg

172244

172250

172252
172254

172256

ggg
386
387
388
389
390
391
392

ggz

400

SIPAR2= 172244

SIPAR4= 172250

SIPAR7= 172256

: $SUPERVISOR "D PAGE ADDRESS REGISTERS
172260
172262
172264
172266
172270
172272
172274

172276

ggz
397
398
399

MEMORY HRNAGEHENT DEF INITIONS

;#SUPERVISOR

g;;

1S MAR 84

i sSUPERVISOR

§6§
364
365
366
367
368
369
370

30A(1052)

SDPARO=
SOPARL1=
SDPAR2=
SOPAR3=
SDPAR4=
SOPARSs
SDPARG=

SDPAR7=

172260
172262
172264
172266
172270
172272
172274

172276

i #KERNEL “I“ PAGE DESCRIPTOR REGISTERS
172300
172302
172304
172306

KIPDRO=
KIPDR1=
KIPDR2=

KIPDR3»

172300
172302
172304
172306

SE@ 0010

GLOBAL

AREAS

MACY11

KDJ11A
. MAC

15-MAR-84

401
402
403
404
405
406

172310
172312
172314
172316

408
409
410
a1l
412

172320
172322

407

413
414
415
316
a1?
418
419
420
421
422
423
424
425
426
427
428
423
430

431
432
433
434
435
436
437

438
439
440
441
442
443
444
44s
446

447
448
449

450
451
452
453
454
455
456

172324
172326
172330
172332
172334
172336

30A(1052)

15:51

15-MAR-84

16:58

MEMORY

K1PDR4=
KIPDRS=
KIPDR6=
KIPDR7=

172310
172312
172314
172316

; sKERNEL

“0”

KOPORO=
KOPDR1=
KDPDR2=
KDPDR3=
KOPDR4=
KOPDRS=
KDPDR6~
KDPDR7=

172320
172322
172324
172326
172330
172332
172334
172336

;oKERNEL
172340
172342
172344
172346
172350
172352
172354
172356

172360

172362
172364

PAGE

MANAGEMENT

PAGE

SEQ 0011

DEFINITIONS

OESCRIPTOR

REGISTERS

"I" PAGE ADDRESS REGISTERS

KIPARO=
KIPAR1=
KIPAR2=
KIPAR3=
KIPAR4=
KIPARS=
KIPARG=
KIPAR7=

172340
172342
172344
172346
172350
172352
172354
172356

s oKERNEL

"D"

KOPARO=

172360

PAGE

ADORESS REGISTERS

KDPAR1= 172362
KDPAR2+= 172364
KDPAR3= 172366

172366
172370
172372
172374
172376

KDPAR4= 172370
KDPARS= 172372
KDPARG= 172374
KDPAR7= 172376

000000
000001
000002
000003
000004
000005
000006
000007

ACO=
AC1=
AC2~
AC3=
ACA~
AC5=
AC6=
AC7=

%0
sl
2
u3
=4
L]
%6
%7

000244

FPVEC=

244

177746
177744
177752
17776€

CCR=

177746

HITMIS=

177752

s THESE ARE FLOATING POINT ACCUMULATOR EQUATES

; THESE ARE CACHE REGISTER EQUATES

MSER>»

CPEREG=

177744

177766

1CACHE CONTROL REGISTER

1MEMORY SYSTEM ERROR REGISTER
tHIT/MISS REGISTER

1CPU ERROR REGISTER

GLOBAL

AREAS

KDJ1.1A
MAC

457
458
459

500
501
502
503
504
505

506
507

508
509
S10
511
512

15-MAR-84

30A(é052)

15:51

15 MAR

M1
4

HSHOR%sh: SAGEagfiflgFFINITIONS

SEQ 0012

{MISCELANEQUS DEFINITIONS
BEVENT= 177546
:BEVENT CONTROL REGISTER
RCSR=
177560
RBUF =
177562
XCSR=
177564
XBUF =
177566
ERRTN=
HALT
$TSTNU=1
ERRNUM= 1
s INITIALIZE ERROR NUMBER COUNTER
AUSWR=
2000
1SWR FOR APT--NO BEVENT TESTING

177546
177560
177562
177564
177566
000000
000001

460
461
462

463
464
465
466
467
468
469
470
a71
472
473
a74
475
476
477
478
479
480
481
482
483
484
48°
486
487
488
489
490
491
492
493
494
495
496
497
498
499

MACY1]

000001
002000

i THIS EQUATE DEFINES THE BOTTOM OF THE PROGRAM STACK POINTER

001000
000000

000000

ASECT

STBOT=

1000

.SBTTL

TRAP CATCHER
.=0

i*ALL UNUSED LOCATIONS OF

THE

VECTOR

AREA CONTAIN

1*A ", +2, JOT" SEQUENCE TO CATCH AND PROCESS ILLEGAL
;»TRAPS AND INTERRUPTS THAT MIGHT OCCUR.

;oTHE

IOT

TRAP WHICH IS

TAKEN ON

THE

ILLEGAL

TRAP/INT

:#TRAPS TO THE $SCOPE ROUTINE WHICH (IF THE RETURN PC IS
:sLESS THAN 1002) JUMPS TO THE SERROR ROUTINE.
;#THE $ERROR ROUTINE WILL REPORT THE ERROR AS FOLLOWS:

PC=YYYYYY

UNEXPECTED

TRAP

XXX

:sAND RETURN TO THE PROGRAM AT PC=YYYYYY.2
i ¢WHERE XXX*LOCATION OF ILLEGAL TRAP
s
YYYYYY=PC AT TIME OF TRAP

;#NOTE: IF THE PROCESSOR IS NOT AN 11/05 THE PROGRAM
i
CAN BE STARTED AT ADDRESS O AS WELL AS ADORESS 200.
000000
000002

000000
000737

000004
000006

002200
000340
000174

000174
000176
000200

000137

$40CAT:

HALT
BR

.~100

$sHALT
::??935? TO 177700 &€ TIME OUT (NOT ON

.MWORD
.H?gg

START
340

;1 iVECTOR TO STARTING ADDRESS
$1iWITH PRIORITY LEVEL 7

002200

DISPREG: .MORD
O
3 1 SOF TWARE DISPLAY REGISTER
SWREG:
.WORD
0o
1 :SOF TWARE SWITCH REGISTER
.SBTTL
STARTING ADDRES(ES)
JMP
BOSTART ;GO TO START OF PROGRAM
.SBYTL
ACT11 WOOKS
1 08 508 4880844008080040404883008008480200080000803000000040000000

000046

000052

000204
000046
036362

+HOOKS REQUIRED BY ACT1l
ssx:c-.

ieggno

000052
000000
000204

WORD
.S8TTL

. =8SVPC

1SAVE PC

111)SET LOC.46 TO ADDRESS OF $SENDAD IN .SEOP

APT PARAMETER BLOCK

112)SET LOC.52 TO ZERO
t1:

RESTORE PC

s SEABERAAALARARE
0400000000800A0EA
0 0080000040000
L0A04
000000000004

;SET LOCATIONS 24 AND 44 AS REQUIRED FUR APT

GLLOBAL

AREAS
KDJ11A, MAC

513
S14
315
516
517
518
S19
520
521
522
523

524
525
526
527

528
529

530
531
532
533
S34
535
536
537

000024

000044

MACY11l

15-MAR 84
000204
000024
000200
000044
000204
000204

30A( 1052)

15:51
]

15 MAR-84

16:58_

PAGE

13
APT PARAMETER BLOCK

SEQ 0013

Fi88400 0004008000000 0044080000002 0000 A00 00800k
bktbttttatbbbnitss

8X=,
.*24
200
. =44
$APTHDR
.= 8X

: 1SAVE CURRENT LOCATION
$:SET POWER FAIL TO POINT

;iFOR

APT

START

TO START OF PROGRAM

: tPOINT TO APT INDIRECT ADDRESS PNTR,
: sPOINT TO APT HEADER BLOCK
3 tRESET LOCATION COUNTER

1508808880088 0000000408400

0008000 458000504800 00088450000000000044

:SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC
: INTERFACE SPEC.
000204
000204
000206
000210
000212
000214
000216

000002
000004
000006

000000
001000
000001
000002
000000
000014
000204
000002
000000
000006
000004
000204
001000

$APTHOD:
$HIBTS:
$MBADR:

$TSTM:

$PASTM:
SUNITM:
.=

.22
0
6

48X

28X
.=1000

.WORD
.WORD
.WORD
.WORD
.WORD
. WORD

0
$MAIL

1
2
0

;:TWO HIGH BITS OF 18 BIT MAILBOX ADDR.
: 1ADDRESS OF APT MAILBOX (BITS 0-15)

;i tRUN TIM OF LONGEST TEST
$3RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY)
3 1ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT

SETE
- $MAIL/2
ND

;;LENGTH MAILBOX-ETABLE(WORDS)

:SAVE CURRENT LOCATION COUNT

:SET UP SOME VECTORS

;RESTORE LOCATION COUNT

GLOBAL

ARE NS

KDJ11A . MAC

MACY11l

15-MAR

538
539

5S40

001000

000000
000000
000000
000000
000000
000000
000000
000000

559

001020

000

001020

001021
001022
001028
001026

000
000000
002000
000000

1 1APT MAILBOX

SMSGTY:
$SFATAL:
$TESTN:
$PASS:
SDEVCT:
SUNIT:
$MSGAD:
SMSGLG:

.WORD
.WORD
.WORD
.WOPD
.WORD
.WORD
.WORD
.WORD

AMSGTY
; MESSAGE TYPE CODE
AFATAL
;;FATAL ERROR NUMBER
ATESTN
;;TEST NUMBER
APASS ; jPASS COUNT
ADEVCT
;;DEVICE COUNT
AUNIT
;;I/0 UNIT NUMBER
AMSGAD
; ;MESSAGE ADDRESS
AMSGLG
; 1MESSAGE LENGTM

SENV:

.BYTE

AENV

SETABLE :
S$ENVM:
$SWREG:
SUSWR:
$CPUOP:

_BYTE
.WORD
.WORD
,WORD

1 tENVIRONMENT BYTE

BITS

BIT

1o
1

001030

11APT ENVIRONMENT TABLS

AENVM ; ;ENVIRONMENT MODE BITS
ASWREG
;;APT SWITCH REGISTER
AUSWR
;;USER SWITCHES
ACPUOP
;;CPU TYPE,OPTIONS

S66

BIT
SIT

SETEND:

572

11/70=06,PDQ=07,Q-10

10-REAL

TIME CLOCK

9sFLOATING POINT PROCESSOR
B-MEMORY MANAGEMENT

1 THESE LOCATIONS ARE USED IN MORE

THAN ONE

TEST

1O STORE

“SCTOR DATA

tFROM THE DEFAULT RESPONCE
.

001030
001032

000000
000000

SLOCOO:
SLOCOL:

578
S79
S8L
581
582
S83
S84
585
586

001034
001036
001040
001042
001044
001046
001050
001052

000000
000000
000000
000090
000020
177570
177570
000C00

s THESE LOCATIONS ARE USED
EXPDAT: WORD
O
RECDAT: .MORD
©
COUNT:
,MORD
O
FLAG:
LMORD
O
ERRCNT: .MORD
O
SWR :
LMORD
DSWR
DISPLA
. WORD
Y:
DOISP
SERFLG: .WORD
O

001054
001056
001060
001062
001064

000000
000000
000000
000000
00000C

OCOUNT:
ALLCTR:
LOOPIN:
SAVSPl:
SAVSP2:

s87

11704+01,11/705202,11/20+03,11/40-04,11/45205

(WHEN THE TEST NEEDS TO MAVE AN ERROR CONDITION RESPOND DIFFERENTLY

S7S
g;g

588
589
S90
591
592
593

15-11-CPU TYPE

LMEXIT

573

S74

THAT ARE USED

APT MAILBOX-ETABLE

)

565

569

$MAIL ;

564

ngcz’

GLOBAL DATA SECTION

3 |0.‘0““‘0““““t.“‘00.“‘00.““.0“0“&“‘0“00‘00“0‘000‘

001000
001002
001004
001006
001010
(001012
001014
001016

567
568

SEQ 0014

SECTION

.EVEN

549
S50
551
552
553
5S4
555
556

563

THE GLOBAL DATA SECTION CONTAINS DATA
IN MORE THAN ONE TEST.

.SBTTL

546

559
S60
561
562

DATA

PAGE

iee

544
545

557

16:58

GLOBAL

+
+

S43

548

15:51

15 MAR 84

.SBTTL

541
542

547

B30A(1052)

.WORD
.WORD

IN MORE THAN ONE TEST TO STORE WORKING DATA.
s STORES EXPECTED (GOOD) DATA FOR COMPARISONS
1STORES RECIEVED DATA TO BE VERIFIED
1ERROR INDICATOR FOR FLOATING POINT TESTS
tUSED TO STORE “FLAG" CONDITIONS
1STORAGE FOR ERROR COUNT
1STORAGE FOR SMITCH REGISTER ADDRESS
1STORAGE FOR DISPLAY REGISTER ADDRESS
1ERROR FLAG

s THESE LOCATIONS ARE USED By MORE
.WORD
. WORD
,WORD
.WORD
WORD

O
O
O
O
O

THAN ONE TEST AS LOOP COUNTERS

1STORAGE FOR UNEXPECTED
:
'

TRAP DATA
’

594
595
596
59~
598
599
600
601
602
603
604
005
606
607
608
609

1s"HRALP8LAES)

001066
001076
001106
001116
001126

001136
001136

15 MARABY 1Bk BORELAS
BTEXP:
BTRES:

RECFEC:
RECST:
RECDST:

.BLIKW
.BLKW

.BLKW
.BLKW
.BLKW

SHLDODLD

KbORTh.ARE">

3 10000THIS IS

000020

TSTLOC:

.BLKW

Ce
SEQ 0015

1STORES EXPONENT DURING BIT TESTS
1STORES RECIEVED DATA FOR BIT TESTS
tRECIEVED FLOATING POINT EXCEPTION CODE
tRECIEVED FLOATING POINT STATUS
1DESTINATION ADDRESS FOR FLOATING POINT

TESTS

610
611
612
613
614
615

616

617
618
619
620
o2l
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638

001176
001200
001202
001204
001206
001210
001212
001214
001216
001220
001222
001224
001226
001230
001232
001234
001236
001240
001242
001244
001246
001250
001252
001254
001256
001260
001262
001264
001266
001270
001272
001274
001276
001300
001302
001304
001306
001310
001312
001314
001316
001324
001326
001330
001332
001334
001336
001340
001342
001344
001346
001354
001356
001364
001366
001370

MACY11

15-MAR 84

30A(1052)

15:51

15 MAR 84
APT

123456
000000
000000
000001
055555
177777
145671
100000
003000
123456
000000

16:58

MAILBOX

TAB1:

TAB2:

TABS:

000000

055555
1777277
000000
000000
043243
000000
000000
000000
162400
000000

TAB4:

TABS:

TABSA:

000000

PAGE

D¢

ETABLE

.WORD

.WORD
.WORD
. WORD

. WORD

.WORD
.WORD
.WORD

.WORD

.WORD
. WORD
.WORD

.WORD

. WORD
.WORD
. WORD

. WORD

.WORD
.WORD
. WORD
.WORD

.WORD

.WORD
.WORD

TA86:

.HWORD

TAB6A:

.WORD

TAB7:

.MORD

TABS ;

. WORD

TAB9:

. WORD

TAB10:

.WORD

123456
000000
0
1
055555
177777
145671
100000
003000
123456
0
0
55555
-1
0
0
43243
0
0
0

162400

000000

GLOBAL ARt AS
KDJU11
. MAC
A

47050

10000
0
0
200
0
0
0

200

0
0
1
400,0,0,0

30000

3000

030000

003000

000002

TAB11A:

.WORD

0
0
16400
0
0
0
30000, 3000,2,0

016100
000001
016200
000000

000000

TAB12:

.WORD

16100,0.0,1

TAB13:

.WORD

TAB11:

.WORD

16200

SEQ 0016

GLOBAL

AREAS
KDJU11A, MAC

666
667
668
669
670
671
672
673
674
675
676

677
678
679
680
681
682
683
684
685
686
687

688
689
690
€91
692

001372
001374
001376
001404

001406
001410

MACY11l

1S-MAR 84
000000
000001
030000
140000
030000
000000
000000
000000
024700
000000
000000
000000
025000

001412
001414
001416
001420
001422
001424
001426
001430
001432
001434
001436
001440
001442
001446
001450
001452
001454
001456
001464
001466
001474
001476
001504
001506
001514
001516
001524
001526
001534
001536
001544
001546
001554
001556
001564
001566
001574

000000
000200
000001
062400
000000
001100
000000
100600
000000
001000
000000
000600
000000
010100
000000
010100
000000

001576
001604
001606
001614
001616
001624
001626
001634
001636
001644
001646
001654

000500
000000
100400
000000
016000
000000
011600
000000
000640
000000
077600
000000

175363
123456
123456
030000
007020

000000
023456
000000
000000
000001
100200
000000

30A(1052)

15:51

003000

15 MAR 84
APT

000000

6:58

MAILBOX

.WORD
.WORD
.WORD

30000

TAB17:

.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
. WORD
. WORD
-WORD
. WORD
. WORD

TAB18:

.WORD

TAB138B:
TAB14:

TAB15:

TAB16:

000000

100400

PAGE 1 7
ET BLE

. WORD
. WORD

300
3000,
00,
0, 140000

25000
175363
123456
123456
30000
7020
0,0
23456
0

000000

TAB21:

. WORD
. WORD
.WORD
. WORD

000000

TAB22:

.HWORD

100400,0,0,0

000000

TAB23:

.WORD

200,0,0,1

000000

TAB24
:

.WORD

62400,0,0,0

000000

100200,0,0,0

TAB2S:

1100,0,0,0

TAB26:

100600,0.0,0

TAB27:

000000
000000

000000

TAB2S:

600.0,0,0

TAB29:

10100,0,0,0

TAB29A:

10100,0,2000,0

1A830:

500,0,0,0

1AB31:

100400,0.0.0

TAB32:

16000,0,0,0

TAB3S:

11600,0,0,0

TAB34:

640,0,0,0

TAB4O:

. WORD

77600,0,0,0

SEQ 0017

GLOUBAL

ARE AS

MACY11

KDJ11A <MAC

15-MAR 84

722
723

100200
000001
000340
000000
000077
177776
000577
177777
000577
000000
173737
012346
000000
¢12346

724
725

726
727
728
729
730
731
732
733

734
735
736
737
738
739

001656
001664
001666
001674
001676
001704
001706
001714
001716
001724
001726
001734
001736
001744
001746
001754
001756
001764

173737

000000
000600
000000

30A(1052)

15:51

15 MAR 84
APT

16:58

MAILBOX

Fe
PAGE

ETABLE

000000

TAB41:

.WORD

100200,0,0,1

C00000

000000

TABA?
:

.WORD

340,0,0,0

177777

1777177

TAB43:

.WORD

17.177777,172777,177776

177777

TABAS:

. WORD

577.-1,-1,-1

1777717

000000

TAB46:

.WORD

577,-1,0,0

124242

052525

TAB47:

.WORD

173737,124242,052525,12346

000000

052525

TABA7A;

.WORD

0,0,052525,12346

124242

000000

TRB48:

. WORD

173737,124242,0,0

000000

TABA49:

. WORD

600,0,0,0

SEQ 0016

GLOBAL

RREAS
KDJ11A
. MAC

HACYL%qS??{%?SZ)

15 MAR

15 MAR 84
16*
GLOBAL

740

.SBTTL

741

742
743
744
745

767

768

PA8§I63
SE

GLOBAL

SEQ 0019

TEXT SECTION

THE

MESSAGES,

746

747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766

8
XT

GLOBAL

TEXT

SECTION CONTAINS FORMAT

AND ASCII

THAN ONE

TEST.

STATEMENTS,

INFORMATION THAT ARE USED IN

FORMAT

STATEMENTS USED

IN PRINT

CALLS

001766
001774
002002

002010

002013
002020
002026
002034
002042
002046
002054
002062

002070

002076
002077
002104

005015
020105
046505

051117
015
051117
047111
020120

047111
005015

020122

005015
020122
000
015
000
002106

044103
052123
051122

ERRMSG
: .ASCIZ
:

<CR><LF>/CACHE SYSTEM ERROR/

FPPERR:

.ASCIZ

<CR><LF>/ERROR DURING FPP TESTING/

020107
042524
000107
051105
020043
051105
041520

051122
051125
050106
052123
047522
000075
047522
036440

ERR1:

.RSCIZ

<CR><LF>/ERROR &

ERR2:

.ASCIZ

<CR><LF>/ERROR PC

020012

020040

$CRLF:

(ASCIZ

<CR><| F>/

040503
054523
042440
000
042412

042040

.EVEN

GLOBAL ARfAS
KDJ11A_MAC
769
770
771
772
773
774
778

MACY11l 30A(1052)
15-MAR 84 15:51

15-MAR-84
16:58
PAGE 20
GLOBAL ERROR REPORT
.SBTTL

e
SEQ 0020

SECTION

GLOBAL ERROR REPORT

SECTION

jee
3 THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS
i USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION.
$--

GLOBAL AREAS
KDJU11A. MAC

803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826

827
828
829
830

15-MAR-84
16;58
PAC € 21
GLOBAL SUBROUTINES SECTION
.SBTTL

SEQ 0021

GLOBAL SUBROUTINES SECTION

THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES

THAT

ARE USED

IN MORE

THAN ONE

TEST,

012600
012605
104000
000001
002013
000110

002122
002124
002126

000000
000207
000207

:FPP_COMMON SUBROUTINES

WLDTRP:

MOV
MOV
ERROR
.WORD
.WORD
JMP

TRPFLG: .WORD

ERRFP:
ERR:

RTS
RTS

(SP).,RO
(SP)+,RS

: SAVE PC
$1SAVE STATUS AND RESTORE STACK
$ALL ERRORS TO TRAP TO EMT VECTOR

tUNIQUE ERROR NUMBER

FPPERR
(RO)

s ADDRESS OF ERROR MESSAGE
1GO BACK INLINE

R7
R7

002106
002110
002112
002114
002116
002120

787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802

15:51
S

w00

783
764
785
786

30A( 1052)

776
777
778
779
780
781
782

MACY11

15-MAR 84

SUBROUTINE DATA VERFICATION

; CALLED BY

JSR

1 INPUT ;

(R4 )=EXPECTED DATA

;

R7,DATVER

(R1)=RECEIVED DATA

1 THIS ROUTINE VERIFIES THAT THE 4 CONSECTIVE WORDS STARTING WITH (R4) ARE

;S?g?hR;gDTHE FOUR WORDS ADDRESSED BY
‘

;LOCATION “COUNT” ,

tARE SIMPLY CHECKED FOR ZEROS

010446
010146
012767
000167

002146
002150
002152
002160
002164
002166
002170
002172
002174
002176

010446
010146
012767
005367
001402
022421
001773
012601
012604

000207

DATVFR:
000003
000012

176676
i

OATVER:
000005
176654

176660

DATY:

THE LAST

R4, -(SP)
R;,-(SP)
€3 .COUNT
DAY

i1SAVE R1
i1SET UP ITERATION COUNT
H

MOV
MOV
MOV

R4, -(39)
Ry, -(5P
05, COUNT

:1SAVE R4
$SAVE R1
iSET UP ITERATION COUNT

8EQ

18RANCH IF DONE

BEQ
MOV

DATL
(SP)Y+ ,R1

DEC

MOV
RTS

AND R1

TWO BYTES OF RECEIEVED

MOV
MOV
MOV
JP

cHp

2%:

THE CONTENTS OF R4,

IF NOT LQUAL TO O SIGNIFIES DATA ERROR

+IF THE STATUS IS FLOATING MODE,

002130
002132
002134
002142

(R1).

COUNT

(R4)+,.(R1).

(SP)+.Ra
R7

:SAVE R4

tRESTORE R1

;RESTORE R4
1G0 BACK TO CALLING ROUTINE
+IF DATA ERROR, COUNT NE O

ARE NOT

GLOBAL

AREAS

KRDJ11A.MAC
831
832
833
834
835
836
837
838
839
840

841
842
843
844
845
846
847
848

849

850
851
852
853
854
855
856
ggg

002200
002200

MACY1l

30A(1052)

012737

000014

15-MAR 84 15:51

15-MAR-84

177746

012706

001000

002212
002220
002226
002234

012737
012737
012737
012737

040046
000340
037530
000340

000030
000032
000034
000036

002246
002254

016767
105067

034056
176572

034046

002260
002264
002272
002300

013746
012737
012767
012767

000004
002320
177570
177570

002314

001012

002316
002320
002324
002326
002334
002342

000403
012716
000002
012767
012767
012637

002306

005067

022777

176540

177777

000004
176546
176542

176532

002326

000176
000174
000004

MOV
#14,80CCR
+SET CACHE TO FORCE MISS
INITIALIZE THE COMMON TAGS
MOV
@STACK, SP
1 :SETUP THE STACK POINTER
;s INITIALIZE A FEW VECTORS
MOV
@$ERROR, S4EMTVEC ; ;EMT VECTOR FOR ERROR ROUTINE
MOV
0340,80EMTVEC+2 ;;LEVEL 7
MOV
03 TRAP ,BOTRAPVEC ;; TRAP VECTOR FOR TRAP CALLS
MOV
©340,80TRAPVEC +2;LEVEL 7

.SBTTL

CLR

176512
176506

cHP

65$:

664

861

862
$ARGL :

ggg

%ggglg

871
872
873
874
g;g

002370
002376
002404
002416
002414

877
878
879

885

886

BR
MOV
RTI
MOV
MOV
MOV

558
0658 ,(SP)

THE

PASS COUNT

LENDM

13 TRY TO REFERENCE HARDWARE SWR

1 sBRANCH IF NO TIMEOUT TRAP OCCURRED
13AND
THE HARDWARE SWR IS NOT =
1
s sBRANCH IF NO TIMEOUT
1:SET UP FOR TRAP RETURN

OSWREG , SWR
1 sPOINT TO SOF TWARE SWR
8DISPREG,DISPLAY
(SP)+ ,B0ERRVEC
;;RESTORE ERROR VECTOR

$$SETMAIL
2$ARG1
CLR
$PASS
BITB
OAPTSIZE,$ENVM

: sCLEAR PASS COUNT
;;TEST USER SIZE UNDER APT

MOV

1 1NO,USE APT SWITCH REGISTER

$ARG1

#3$SWREG, SWR

$$SETMAIL
CLR
$PASS
BITS
SAPTSIZE,$ENVM
8EQ
678

176434
000200

176441

012767

001022

176456

674

012737
012737
005037
005067
012737

040046
000340
177766
176370
000014

000020
000022

MOV
MOV
CLR
RESTART: CLR
MOV

177746

1 sCLEAR

MOV

9$SWREG, SWR

+ 1 YES,USE NON-APT SWITCH

1 sCLEAR PASS COUNT
;;TEST USER SIZE UNDER APT
$ s YES,USE NON-APT SWITCH

1 sNO,USE APT SWITCH REGISTER

Q$ERROR ,B0IOTVEC
#340,00I0TVEC .2
80177766
$TESTN
14 ,69CCR

$1SET UP IOT VECTORS
1:T0 GO TO ERROR ROUTINE
;:CLEAR CPU ERROR REGISTER
;RESET STESTN TO ZERO
:SET CACHE TO FORCE MISS

3‘.0.00““.“.&.‘t‘l“““.t““Q“.“‘.‘t“““.“‘.“t.‘t.‘.‘0‘.‘.“‘.0‘
.SBTTL
FLOATING POINT TESTS
;‘0“0“‘.“t““t“0“0"t“““0‘.‘.‘0“QA.“.‘0..00“‘0‘0“.‘0““‘t"t.

880

881
882
883
884

005067
132767
001403

#-1,8S5WR

BNE

BEQ

863
864

$PASS

MOV
$ENOCT, $EOPCT ;; SETUP END -OF -PROGRAM COUNTER
CLRB
$ERFLG
1 sCLEAR THE ERROR FLAG
1:SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS
1tEQUAL TO A -1, SETUP FOR A SOFTWARE SWITCH REGISTER.
MOV
S¥ERRVEC, -(SP)
; ;SAVE ERROR VECTOR
MOV
9648 ,00ERRVEC
;;SET UP ERROR VECTOR
MOV
QDSWR, SWR
13SETUP FOR A HARDWARE SWICH REGISTER
MOV
oDDISP,DISPLAY
;;AND A HARDWARE DISPLAY REGISTER

.MACRO

002346
002352
002360

SEQ 0022

START:

648

859
860

865
866
867
868

PAGE 22

GLOBAL SUBROUTINES SECTION

002206

002242

16:58

002422

BEGIN FLOATING POINT TESTING

1866002800040 4884808000000008808800000000000080008000808000000008048300004000n
;tt““““"i“...“““‘.“.‘...0.““‘0‘.“.0.““‘t‘tt.“‘t“‘.o‘."00‘
MBTL:
138088084048484044840000000000000000004800000204030400000028000000402

;oTEST 1

FPP REGISTER BIT TESTS

§1068080848888000000880004000000000000000000000000000000000000000

GLOBAL AREAS
KDJ1.1A
MAC

MACY1l

15 MAR 84

30 A(1052)

:5
15:51

15 MAR-84
T1

16:58

FPP

SEQ OG-~

887

;R1=TEMPORARY COUNTER
1R2=POINTER TO EXPECTED DATA
;R3=POINTER TO RECEIVED DATA
sR4=0DD/EVEN COUNTER

1 0 8 0 40 08

002422
002422
002426
002430
002432
002436
002442
002444
002446
002450
002452
002454
002456
002460
002462
002464
002466
002472
002476
002500
002504
002510
002514
002520
002524
002530
002534
002540
002544
002550
002554
002560
002564
002566
002570
002574
002600
002602
002604
002610
002616
002620
002626
002630
002636
002640
002646
002650
002650

005267
170011
005005
012702
012703
170400
174012

004 0840080408040

TST1:

176356

INC
SETD
CLR

MBT2:

001066
001076

MOV
MOV

MBT2A

CLRD
STD

005004

170400
1/0401
170402
170403
170404
170405

010501
070127
062701
000111

172467
174067

000167
172567
174167
000167
172667
174267
000167
172767
174367
000167

172467
174004
172404
000167
172467
174005
172405
000167
026767
001014
026767
001010
026767
001004
026767
001403

104000

CLR
CLRD
CLRD
CLRD
CLRD
CLRD
CLROD

87GO:

MOV

000014
002500

MUL
ADD

176362
176366
000074
176346
176352
000060
176332
176336
000044

MACO:
MACOA
MACL:
MAC?2:

176316

MACS:

176322
000030
176302

MACA
:

177710
176266

MACS:

177674
176252

176260

176244

176252

176236

176244

176230

176236

MACE
:

888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942

JMP
LOD
STD
JMP
LDD
STD
JMP
LDD
STD
JHP
LDD
ST0
JHP
LOD
STD
LDD
JHP
LOD
STO
LDD
JMP
cHP
8NE
CHpP
BNE
cMP
BNE

CMP

BTER:

8EQ

ERROR

0000400088000 0000000000400A00bt0bts

$TESTN

s INCREMENT TEST NUMBER

$1SETUP FPP ACC POINTER
sPOINT TO TEST DATA

ACO
ACO.(R2)
R4
ACO
ACL
RC2
AC3
ACA
ACS

sSETUP FPP REGISTER VALUES

R5,R1
014 R}
OMACO,RL

sGET FPP AC NUMBER INTO R1
;ALLOW 10 LOCATIONS FOR OPERATION
sSETUP UMP LOCATION

MACE

;LOAD TEST DATA INTO TEST REGISTER
;sSAVE TEST RESWLT
:GET OUT

9BTEXP ,R2
OBTRES,R3

(R1)
B8TEXP,ACO
ACO,BTRES

BTEXP,ACL

AC1,.BTRES
MACE

BTEXP,AC2

AC2,BTRES
MACE
BTEXF ,AC3
ACS,BTRES
MACE
BTEXP,ACO
ACO,ACA
AC4,ACO
MACOA

B8TEXP,ACD
ACO ,ACS
ACS,ACO

MACOA

BTEXP ,BTRES
BTER
BTEXP.2,BTRES+2
BTER
BTEXP.4 ,BTRES 4
BTER
BTYEXP+6,BTRES+6
MBT8

tPOINT TO RECEIVED DATA
sCLEAR EXPECTED VALUE

$:SETUP FPP REGISTER VALUES

;LOAD TEST DATA INTC TEST REGISTER

;SAVE TEST RESWLT
:GET ouY
:LOARD TEST DATA INTO TEST REGISTER

:SAVE TEST RESWT
;GET 0UT
:LOAD TEST DATA INTO TEST REGISTER
;SAVE TEST RESWLT

1GET OUT

:LOAD TEST
: SAVE TEST
sGET QUT
1LOAD TEST
sLOAD TEST

OATA INTO TEST REGISTER
RESWLT
DATA INTO TEST XFER REGISTER
REGISTER

;STORE RESULT INTO XFER FPP REGISTER

:GEY OUT

;:BRANCH IF REGISTER ERROR

1GOCD RESWLT
{ALL

ERRORS

TRAP

TQ EMT

VECTOR

GLOBAL AREAS
KDJ11A.MAC
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958

959
960
961
962
963
964
965
966
967
968
969
970

971
972
973

974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989

991
992
993
935

997
998

002652
002654

MACY11

15 MAR 84

104000
000003
002013

002712
002716
002720
002724
002730
002732
002734
002736

020527
001410
174167
004767
001403
104000
000004
002013

002740
002744
002746
002752
002756
002760
002762

020527
001410
174267
004767
001403
104000

005001
005705
001413

020527
100010
174067
004767
001403

16:?8p

020527
001410
174367
004767
001403
104000
000006
002013

003014
003020
003022
003024
003030
003034
003036
003040
003042

020527
001411
172404
174067
004767
001403
104000
000007
002013
020527
001411

EQSES?ER BIT TESTS

.WORD
. WORD

000004

176200
000246

iNOW VERIFY
MBTS8:
CLR
TST
B8EQ
od
8PL
STD

ERROR
. WORL
. WORD

000001

MBTBA:

176152
000220

000002

MeTeB:

176124
000172

cMP
BEQ
STD
JSR
BEQ
ERROR
. WORD
.WORD

cMP
BEQ

STD
JSR
8€Q
ERROR

.WORD
. WORD

000003

MBTAC:

176076
000144

MB8T8D:

176046
000114

000005

cHp
BEQ
STD
JSR
BEQ
ERROR
.WORD
. WORD

FPPERR

R1
RS

sCLEAR TEMPORARY COUNTER
sSEE IF RO UNDER TEST
$1BRANCH IF TEST ING RO

MBTBA

RS, 04
MBTE8A
ACO,BTRES
R7,BTTST

$SEE IF TESTING FPP KEGISTER
1SKIP RO TESTING

sALL ERRORS TO TRAP TO EMT VECTOR

:UNIQUE ERROR NUMBER

FPPERR

R5,01

+BAD ACO

MBT88B
AC1,BTRES

R7,BTTST

MBT188
4

FPPERR

R3,02
MBT8C

;BAD AC1

AC2,BTRES
R7,BTTST

:BAD AC2

MBT8D

AC3,BTRES
R7,8T7SY

JSR

R7,BTTST
MBTBE

1BAD AC3

MBT8E

ACO,BTRES

7
FPPERR

cMP
8tQ

MBT8F

RS, 05

sSEE IF TESTING FPP REGISTER AC2
sBRANCH IF R2 UNDER TEST
sSAVE AC TEST RESWLY

THAT CONTENTS REMAINED ZERC

;ADDRESS OF ERROR MESSAGE
:SEE IF R3 UNDER TEST
:BRANCH IF R3 UNDER TEST
$SAVE AC TEST RESWLY

1BRANCH IF GOOO
tALL ERRORS TO TRAP TO EMT VECTOR
tUNJQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE
:SEE IF R4 UNDER TEST

1BRANCH IF R4 UNDER TEST
tMOVE REGISTER CONTENTY
1SAVE AC TEST RESWLY
tVERIFY THAT CONTENTS REMAINED ZERO
tBRANCH IF GOOD
tALL ERRORS TO TRAP YO EMT VECTOR
tUNIQUE ERROR NUMBER

AC4.ACO

8EQ
ERROR
. WORD
.WORD

;VERIFY THAT CONTENTS REMAINED ZERO
sBRANCH IF GOOD
;ALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
sADORESS OF ERROR MESSAGE

:VERIFY THAT CONTENTS REMAINED ZERO

MBT8D

RS, 04

:SEE IF R1 UNDER TEST
;BRANCH IF R1 UNDER TEST
:SAVE AC TEST RESWLT

sBRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER

FPPERR

s ADDRESS OF ERROR MESSAGE

s VERIFY

H878C

RS,43

>R4

$1SAVE AC TEST RESULT
i VERIFY THAT CONTENTS REMAINED ZERO
1BRANCH IF EXPECTED RESULT

MBT8A

e
BEQ
D0
STD

MBTBE:

SEQ 0024

s UNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
3FPP AC LOADED INCORRECTLY
THE OTHER REGISTERS REMAINED ZERO

JSR
BEQ

000005
002013

002766
002772
002774
003000
003004
003006
003010
003012

003044
003050

15-HARY?4

000002
002013

002656
002656
002660
002662
002664
002670
002672
002676
002702
002704
002706
002710

002764

SOA(AQSZ)
15:

1BAD ACA

s ADDRESS OF ERROR MESSAGE

:SEE IF RO UNDER TEST
tBRANCH IF RO UNDER

TEST

GLOBAL AREAS
KDJU11A. MAC

999

1000
1001

1002

1003
1004
1005
1006
1007
1008
1009

1010

1011
1012

1013
1014
1015
1016

1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054

003052
003054
003060
003064
003066
003070
003072

MR84 08¢ 49°2)

15-MAR 84

172405
174067

004767
001403

15 MAR
84 16:8, PAGE 2B: 81T rESTS
LOD
STD
JSR
BEQ
ERROR

176016

000064

104000
000010
002013

003074
003076
003100
003104
003106
003110
003112
003116
003122
003126
003130

005204
000241
042704
001401
000261
006112
006162
006162
006162

000004
000006

000167

177314

003134
003136

003142
003144

005205
020527
100016
000167

003150
003154
003156
003162
003164
003170
003172
003176

005767
001010
005767
001005
005767
001002
005767
000207

103402

MBT8F:

177776

000002

000006

MBT8FG:

MBT8I:

175722

INC
CLC
8IC
BEQ
SEC
ROL
ROL.
ROL
ROL

BTYST:

175712

003200

MBTE:

003200

MFACY:

1BRANCH IF GOOD
1ALL ERRORS TO TRAP TC EMT VECTOR
1UNIQUE ERROR NUMBER

1BAD ACS

+ADDRESS OF ERROR MESSAGE

s INCREMENT PATTERN COUNTER

(R2)

sROTATE LSW OF

2(R2)

4(R2)
6(R2)

MBT81
8TGO
R5

7ST
BNE
18T
BNE
157
BNE

BTRES
BYISTE
BTRES.2
BTISTE
BTRES
«4
BYTSTE
BTRES+6

BTTSTE: RTS

1SAVE AC TEST RESULT
1 VERIFY THAT CONTENTS REMAINED ZERO

R5, 06

TST

tMOVE REGISTER CONTENTS

4177776,R4
MBT8FG

cHe

8PL
JMP

175716

175706

1C
FPPERR

INC

177272

ACS,ACO
ACO,BTRES
R7,BTTST
MBT8F

.WORD
.WORD

8Cs
JMP

SEQ 0025

MBTE
MBT2A

TEST FOR ODD /EVEN

;BRANCH IF EVEN

3SET CARRY FOR TEST PATTERN SHIFT
TEST PATTERN

sROTATE 2 WORD OF TEST PATTERN

sRGTATE

3 WORD OF

TEST PATTERN

sROTATE 4 WORD OF TEST PATTERN
sJUMP IF THROUGH WITH TEST PATTERN
sCONTINUE WITH NEW TEST PATTERN

;GO TO NEXT REGISTER TESTY
$SEE IF THROUGH TESTING
1 JUMP IF THROUGH
iCONTINUE TESTING WITH NEW PATTERN
IVERIFY CONTENTS AS ZERO
sEXIT IF 10T ZERO

sVERIFY CONTENTS AS ZERO

$EXIT IF NOT ZERO
tVERIFY CONTENTS AS ZERO

$EXIT IF NOT ZERO
sVERIFY CONTENTS AS ZERO
1G0 BACK TO CALLING ROUTINE

1380080854080 0008080048000400000088008800800800800800080000000000200

$oTEST 2

TEST UNIQUENESS OF FPP ACCUMULATORS

1188400088808 400000840008088008008000000800000008000800000080040822

1 THIS TEST LOADS UNIQUE PATTERNS INTO EACH ACCUMULATOR SIMULTANEOUSL).

sR2-POINTER TO EXPECYED DATA
1R3=POINTER TO RECEIVED DATA

003200
003200

JEORR48084080800080080080800008000000000000000000000830000400400a

005267

175600

TST2:

INC

$TESTN

t INCREMENT TEST NUMBER

;1SETUP FPP ACC POINTER

}

003204
003206

170011

005000

MFA;

%ETD

CLR

GLOBAL AREAS
KDJL11A. MAC

1055
1056

1037

1058

1059

1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1102
1104
1105
1106
1107
1108
1109
1110

MACY11l

15 MAR-84

30A( 1C52)

15: 51

003210
003212
003216
003222
003230
003236
003244
003252
003256
003260
003264
003270
003272
003276
003302
003306
003312
003316
003322
003326

172667
004567
172567
004567
172467

175554
000206
175544
000176
175534

003332
003336
003342
003344
003346
003350

174067
004567
001403
104000
000011
002013

175540
000246

003352
003356
003362
003366
003370
003372
003374

004567
174167
004567
001403
104000

000200
175514
000222

005004
012702
012703
012767
012767
012767
012767

172467
174005

004567
172467
174004
004567
1722767
004567

001066
001076
000051
000052
000053
000054
175610

15-MAR-84
T2

16:58
PAGE 26
TEST UNIQUENESS OF FPP ACCUMULATORS

CLR

MOV
MOV
MOV
MOV
MOV
MOV

175636
175632
175626
175622

LDD
STD
JSR
LOD
STD
JSR

000240
175576
000226

175564

L0D
JSR
LOD
JSR
L00
JSR
LoD

000216

STD

JSR
8EQ
ERROR
.WORD
. WORD
BFACL:

002013

003376
003402
003406
003412
003414
003416
003420

004567
174267
004567
001403
104000
000013
002013

000154
175470
000176

003422
003426
003432
003436
003440
003442
003444

004567
174367
004567
001403
104000
000014
002013

000130

003446
003452
003454
003460

004567
172704
174367
004567

000104

175444

BFACZ:

8FACS:

000152

175416

000124

OBTEXP,R2
#BTRES,R3
#51,BTEXP
952 ,BTEXP +2
#53,BTEXP
+4
#54 ,BTEXP +6

;+MOVE DATA TEMPORARILY
s1PUT DATA INTO TEST REGISTER

$SUBTRACT TEN FROM EACH EXPECTED DATA
sMOVE DATA TEMPORARILY
sMOVE DATA INTO

sSTORE INTO TEST REGISTER

RS, SUBT
B8TEXP,ACL
RS,SuUBT
BTEXP,ACO

ACO,BTRES
RS,BFA

BFACL
11

RS5,ADDT
AC1,8TRES

AC2,BTRES
R5,BFA
BFAC3

FPPERR

RS,ADDTY
AC3,BTRES
RS5,BFA
BFAC4
14

FPPERR

R5,ADDT
AC4,AC3
AC3,BTRES
R5.BFA

TEST REGISTER

sSUBTRACT 10 FROM TEST DATA WORDS
sSTORE INTO TEST REGISTER
sGET NEXT SET OF UNIQUE DATA WORDS

BTEXP,AC2

RS, ADDT

STD
JSR

BTEXP,AC3
R5,SuBT

JSR
STD
JSR
BEG
ERROR
. WORD
.WORD

JSR
L0D

ACO,AC4
RS,sSuBT

FPPERR

8EQ

BTEXP,ACO

FPPERR

TO RECEIVED DATA

$sSETUP EXPECTED DATA

ACO,ACS
R5,SUBT

. WORD

JSR
570
JSR

tPOINT TO TEST DATA

sPOINT

BTEXP,ACO

R5.8FA
BFAC2

ERROR
.WORD
. WORD

BFAC4Y:;

JSR
S70
JSR
8EQ

ERROR
. WORD

000012

SEQ 0026

;sBAD ACO

;GET NEXT SET OF TEST DATAS
sLOAD TEST REGISTER
;GET NEXT SET OF TEST WORDS
sLOAD FINAL TEST REGISTER
sALL REGISTER CONTAIN UNIQUE TEST WORDS
$sSTORE ACO,RESWLT
;CHECK RESWULT
1BRANCH IF GOOD
;ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

;sUPDATE EXPECTED RESWLT
:STORE AC1 RESWLT
;CHECK RESWLT
:BRANCH IF GOOOD
sALL ERRORS TO TRAP TO EMT VECTOR
:UNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
:1BAD RESWLY AC1
sUPDATE EXPECTED RESWLT
;STORE AC2 RESWLT
;CHECK RESWLTY
;:BRANCH IF GOOD
;ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE
;BAD AC2 RESLUT
:UPDATE EXPECTED RESULTY
s SAVE TEST RESWLT
;CHECK RESWLT
:BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;s ADDRESS OF ERROR MESSAGE
;BAD AC3 RESULT
1UPDATE EXPECTED RESWLT
:1SAVE TEMPORARY
:STORE ACA RESWLT
sCHECK RESULT

u—?
B

&f
=3

[ d ad o ol el el

VN
WP »e QOB
YO UVBWNre

pe =0 Pt

40 it po Pt Pt Pt s Pt

- pue po loladad adad od ol ol
ol o

n
w

1124

1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1165
1166

AREAS

.MAC

MACY11

15 MAR 84

003464
003466
003470
003472

001403
104000
000015
002013

003474
003500
003502
003506
003512
003514
003516
003520

004567
172605
174267
004567
001456
104000
000016
002013

003522

000452

003524
003532

162767
162767
162767
162767
000205
062767
062767
062767
062767
000205

003540
003546
003554
003556
003564
003572
003600
003606

003610
003616
003620
003626

003630
003636
003640
003646

026767
001013
026767
001007
026767

001003
026767
000205

30A(1052)

15:51

15 MAR 84
12

000056

16:58

TEST

BFACS:

175370

000076

PAGE 27

UNIQUENESS

BEQ
ERROR
.WORD
. WORD

BFACS

JSR
LOD
STO
JSR

RS,ADDT
AC5,AC2
AC2,BTRES
RS,BFA

8EQ
ERROR
.WORD

FPP

FPPERR

BF AE
16

FPPERR

BFAE
000010
000010
000010
000010

175334
175330
175324
175320

SUBT:

000010
000010
000010
000010

175302
175276
175272
175266

ADOT:

SEQ 0027

ACCUMULATORS

1BRANCH IF GOOD

tALL

ERRORS

TRAP

TQ EMT

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
1BAD AC4 RESWLT

VECTOR

tUPDATE EXPECTED RESWLT
1SAVE

TEMPORARY

tMOVE ACS RESWLT
s1CHECK RESWLT
1BRANCH IF GOOD

tALL

ERRORS

COPY

TRAP

sUNIQUE ERROR NUMBER

TO EMY

VECTOR

1ADDRESS OF ERROR MESSAGE

1BAD ACS RESULT
sEXIT MODWLE

#10,8TEXP

sUPDATE EXPECTED CONTENTS
s UPDATE EXPECTED CONTENTS
sUPDATE EXPECTED CONTENTS

#10,BTEXP+6
RS
#10,BTEXP
#10,8TEXP.2
OIO.BTEXPOQ
:éO.BTEXPo6

tUPDATE EXPECTED CONTENTS

sUPDATE EXPECTED CONTENTS
tUPDATE EXPECTED CONTENTS
sUPDATE EXPECTED CONTENTS

sUPDATE EXPECTED CONTENTS
3

175252

175260

175244

175252

175236

175244

175230

175236

BFA:

BYEXP ,BTRES
- )
BTEXP+2,BTRES+2
8re

BYEXP+4 ,BTRES.4
BFb
BIEXP+6,BTRES+6

:13:
1

003650

BFAE
;

003650

TSFPL:

IVERIFY CONTENTS

sEXIY

IF NOT ZERO

IVERIFY CONTENTS
1EXIT IF NOT ZERO
tVERIFY CONTENTS

sEXIT IF NOT ZERO
sVERIFY CONTENTS
3GO BACK TO CALLING ROUTINE

$10888880050008005000080000000080008004800800000600000008000030000¢

soTEST
003650
003650
003654
003660
003664
003670
003674
003700
003704
003710
003712

TEST LOFPS AND STFPS MODE O

1108800040008 80040088300080300800000000800000000008000000000000000¢

005267
005037
012704
004767
012704
004767
012704
004767

000032
105252
000022
042505
000012

004767

000004

175130
002122
147757

TST13:;

INC
CLR
MOV

JSR
MOV
JSR
MOV

JSR
CLR
JSR

STESIN

S4TRPFLG

1 INCREMENT TEST NUMBER
1CLEAR TRAP FLAG

8147757 ,R4
PC,LOST
2105252 ,R4

1SETUP DATA TO BE LOADED
1LOAD AND STORE FPS MITH DATA
1SETUP DATA TO BE LOADED

042505,R4
PC,LOST
R4
PC.LOST

1SETUP DATA TO BE LOADED
1LOAD AND STORE FPS WITHM DATA

PC,LOST

tLOAD AND STORE FPS WITH DATA

1SETUP DATA TO BE LOADED
tLOAD AND STORE FPS WITH DATA

GLOBAL ARt AS
KDJ11A
. MAC
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
117
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222

003716
003722
003724
003726
003730
003732
003734
003736

003740
003742

MACY11l

30A( g?Sé)

000167

000020

15 MAR 84

15:

15 MAR

C3
16: 98 PABFe8%N STFPS MODE o

SEQ 0028

JMP

FIN1

LDFPS
STFPS

R4
R1

tLOAD FPS WITH DATA
sLOAD R1 WITH (FPS)

BEQ
ERROR

1§

+YES GO ON
sALL ERRORS TO

170104
170201
020401
001403
104000

LOST:

cMP

.WORD

000017
002013

000207

13:
FINL:

R4 ,R1

tOID

.WORD

FPPERR

RTS

THE

INSTRUCTIONS WORK

TRAP TQ EMT VECTOR

JUNIQUE ERROR NUMBER

1 ADDRESS OF ERROR MESSAGE

tNO GO TO ERROR

sRETURN

003742

TSFP2:
gg.".‘.‘0‘.“‘.‘..“..0...‘.“.‘0..‘0‘0“‘0‘..‘0“.00“.‘0..

1oTEST 4

003742
003742
003746
003752
003756
003762
003766

TEST

.‘.‘

CFCC

3|‘..‘0‘.‘.“‘“.O.““‘.““.““.‘...‘0“‘.0““.0‘.‘0..‘0‘0.‘.

003772
003776
004002
004004

005267
005037
012704
004767
012704
004767
012704
004767
005004
004767

175036
002122
000017
000032
000012
000022
000005
000012

004010

000167

000030

004014
004016
004020
004024
004030

170104
170000
013701
042701
020401

004032
004034
004036
004040

001403
104000
000020
002013

004042
004044

000207

TSTA:

INC
CLR

$TESTN
S8TRPFLG

JSR

PC,TSF2

MOV

MOV
JSR
MOV

sLOAD rPS AND COPY CONDITION CODES TO PS

JSR

PC,ISF2

t1LOAD FPS AND COPY COWDITION CODES TO PS

FIN2

LOFPS
CFCC
MOV
8IC

R4 .R)

BEQ
ERROR

177776
177760

1SETL? DATA TO BE LOADED

sSETUP DATA TO BE LOADED
tLOAD FPS AND COPY CONDITION CODES TO PS
1SETLP DATA T0O BE LOADED

000004

TSF2:

17 ,R4

012 ,.R4
PC.TSF2
5 ,R4

JSR
CLR

.sNCPEMENT TEST NUMBER
sCLEAR TRAP FLAG

1s:

FIN2:

PC.1SF2
R4

sLOAD FPS AND COPY CONDITION CODES TQ PS
;1SETUP DATA TO BE LOADED

iLOAD FPS
1COPY CONDITION CODES YO PS

0177776 ,.R1
0177760,R}

MORD
.WORD

20
FPPERR

RYS

iSAVE PS T0O R1
tMASK OUT UNMANTED BITS

1WAS CONDITION CODE BITS TRANSFERRED
1CORRECTLY

1YES GO ON
tALL ERRORS TO TRAP 70 EMT VECTOR

tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

sNO GO TO ERROR

3 RE TURN

004044

TSFPS:
$100800048008008000480800000000008000080000008200000030000000000004000

;eTEST

004044
004044
004050
004054

TESY

SETF,

SETD,

SETV

SETL

1100006000440 8040000000080084000008000000000000000000040000000000002

005267
005037

012704

174734

002122
000200

1S75:

INC

CLR

MOV

S$TESTN

S0TRPFLG
#200,R4

1 INCREMENT TEST NUMBER

1CLEAR TRAP FLAG

1SETUP DATA TO BE LOADED

KBIT1h. AL 15 MRk 1< 3PE14P5)
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278

004060
004062
004064
004066
004072
004074
004076
004100

170104
170001
170201

020127
001403
104000
000021
002013

004102
004104
004106
004110
004112
004114
004116

170011
170201
020104
001403
104000
00002
002013

004120
004124
004126
004130
004132
004136
004140
004142
004144

012704

004146
004150
004152
004154
004156
004160
004162

170104
170002
170201

D3
15 MAR
B4 16:
PABE
3p.
29 . (o SETI, SETL
LOFPS

SETF
STFPS
cMP
BEQ
ERROR
.WORD
.WORD

000000

18:

SETD
STFPS
cMe
BEQ
ERROR
.WORD

.WORD

000100

MOV

LOFPS
SETI
STFPS

020127
001403
104000
000023
002013

3s:

020104
001403

104000

004164

TSFPA:

311IS FO=0
1YES GO ON

sALL ERRORS

1 ADDRESS OF

ERROR MESSAGE

tMAKE

R1
R1,R4
2%

€100.R4

FPPERR

SETL
SIFPS
cP
BEQ

R}
Ri.R4
48

JWORD

TRAP

TO EMT

IUNIGUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
iNO GO TO ERROR
1SETUP DATA TO BE LOADED
tLOAD FPS
sSTORE FPS

1 IS FL=O
1YES GO ON

1ALL ERRORS TO TRAP TO EMT VECTOR
tUNJQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
iNO GO TO ERROR
IMAKE FL =)

1STORE FPS
$11IS FLel
s YES GO ON

sALL ERRORS TO TRAP T0 EMT VECTOR
IUNIQUE ERROR NUMBER

FPPERR

:ADORESS OF ERROR MESSAGE
1NO GG 1O ERROR

3180888000080 0808000003008000000080000000000000080000000000000000000

004164
004164
004170
004174
004200
004204
004212
004216
004224
004230
004236
004240
004242
004244

TEST ILLEGAL OP CODES AND STST

J8608888000800080400800000000000600004008000800000000008080080000080

005267
005037
012705
013746
012737
013746
012737
013746
012737
005003
170103
005002
01C537

174614
002122
170003
000244
004340
000004
004424
000010
004434

004250

1576:

ING

CLR

MOV

000244

000010

01:

STESTN

0170003

1 INCREMENT TEST NUMBER
iCLEAR TRAP FLAG
sINIT OP CODE

ormsou.m
9010, -($P)
oILLOP2, 8010

1SETUP NEMW VECTOR
$1SAVE TIME QUT VECTOR
1SETUP NEMW VECTOR
1SAVE ILLEGAL VECTOR
1SETUP NEMW VECTOR

somm.c

ésn

MOV
MOV

om.oh
904, sy

CLR
LOFPS

RS
R3

MOV

RS, 9002

MOV
MOV
MOV
CLR

VECTOR

sMAKE FL =0

JoTEST 6

VECTIR

FD~1

$YES GO ON
sALL ERRORS

. WORD

TO EMT

1STORE FPS
;IS FDe}

22
FPPERR

TRAP

tUNIQUE ERROR NUMBER

tNO GO TO ERROR

.WORD

LHORD

FD=0O

1STORE FPS

2l
FPPERR

cre
BEW

ERROR

000024
002013

1LOAD FPS

sMAKE

R1
R1,00
1

R1
R1,
0
3s

ERROR

170012
170201

SEQ 0029

1SAVE FP VECTOR

1CLEAR FPS
:

1SETUP THE ILLEGAL INST

GLOBAL AREAS
KDJU11A . MAC

1279
1280
1281
1282
1283
1284
1285
1286
1287

1288

1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
ggg

1304
1305
1306
1307
1308
1309

1310

MACY11l 30A(1052)
15 MAR 84 15:51

004250
004252
004254
004256
004260
004262
004264
004266

170201
104000
000025
002013

004270

022705

000000
170000

001003
012705
000755
022705
001001
000402
005205
000747
012637
012637
012637

000010
000004
000244

004334

000167

000104

004354

022626

1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321

004356
004360
004364
004366
004370
004372

170201
022701
001403
104000
000027
002013

004374
004376

005004
170304

1323
1324
1325
1326
1327
1328
1329

004400
004404
004406
004412
004412
004414
004416

022704
001002
000167
104000
000030
002013

igié

004420

000167

1333
1334

004424
004424

104000

1322

1330

170010

004274
004276
004302
004304
004310
004312
004314
004316
004320
004324
004330

022716
001403
104000
000026
002013

16:58
PAGE 30
TEST ILLEGAL

D2:
03:

005202
005202

004340
004344
004346
004350
004352

15-MAR 84
T6

04a:

170013
170077

D5:
06:

004252

07:

H
3

ILLOPY:

1$:
100000

2%:

000002

177656
3s:

177644
TIMEOQU:

.WORD
CFCC
INC
INC
STFPS
ERROR
LWORD
.WORD

cMpP

E3
OP CODES AND

'
tMEMORY WORDS TO BE USED WITH

Re
R2
RI1

sEXECUTION OF
3

25
FPPERR

#170010,RS

BNE
MOV
B8R
cHP
BNE
B8R
INC
B8R
MOV
MOV
MOV

DS
#170013,RS
D1
€170077,RS
D6
07
RS
(0}
(SP).,B010
(SP)+,804
(SP)., 80244

JMP

FINA

CMP
BEQ
ERROR
LHORD
.WORD

oD3,(SP)
1

crp

26
FPPERR

(SPYe

STFPS
cre
BEQ
ERROR
MWORD
.WORD

27
FPPERR

CLR
STSY

Ra
R4

oy o
BNE
JMP

22.R4
L1
04

ERROR
. WORD
.WORD

30
FPPERR

JMP

ERROR

SEQ 0030

3TST

(SP).

1GO

ILLEGAL OP CODE

1 SAVE FPS
tALL. ERRORS TO TRAP TO FMT
sUNIQUE ERROR NUMBER
3 ADDRESS OF ERROR MESSAGE
TO ERROR

VECTOR

1COMPUTE NEXT OP CODE
:
:
:
:
3
:
:
;
sRESTORE
:
:

VECTORS

iDID TRAP OCCUR ON TEST INST
1 YES GO ON
sALL ERRORS TO TRAP TO EMY VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
tNO GO YO ERROR

1CLEAN UP STACK

R1
2100000 ,R1
24

iNC GO

tSTORE FPS
:11IS FPS CORRECT
+YES GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
TO ERROR
sINT R4 TO A XNOWN STATE
sSTORE FEC AT Ra
s IF THE DESTINATION MODE IS IMPROPERL
;DECODED AN ODD ADDRESS TRAP 710 4

1SHOULD OCCUR

t+IS FEC CORRECT
itNO GO TO ERROR
1 YES GO ON

tALL ERRORS TO TRAP YO EMT
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

VECTOR

1GO 10 ERROR

1 THEN GO ON
tALL ERRORS

TO TRAP TQ £MT VECTOR

GLOBAL

AREAS

KOJL11A.MAC ~
1335
1336
1337
1338
1
1330
1341
1342
1343
1343
1345
1346
1347
1348

1349

MACY1l

004426
004430

000031
002013

004432

000006

004434
004434
004436
004440

004432
004444

30A(1052)

15 MAR-84 15:51

15 MAR 84

ILLOP2:

000006

005037
013746
012737
012703
170103
170020
170000
170201
022701
001403
104000
000033
002013

004516
004520

170304
022708

004444

004524

005267

001403

1371
1372
1373
137a
1375

004526
004530
004532

104000
000034
002013

004534

012637

1377
1378

004540

1387

1388
1389

1390

RTT

3EQ 0031

JUNIQUE ERROR NUMBER
JADDRESS OF ERROR MESSAGE
JERROR BECAUSE OF TRAP TO 4
s RETURN

JALL ERRORS TO TRAP TO EMT
JUNIGQUE ERROR NUMBER
JADDRESS OF ERROR MESSAGE
{ERROR BECAUSE OF TRAP TO 10
s RE TURN

VECTOR

004544

TEST FID (INTERRUPT DISABLE BIT)

18T7:

174334

002122
000244
004544
080000

000244

140000

000002

000244

1s:

INC

s INCREMENT TEST NUMBER

R1
0140000,R1
14

iSEE IF ERROR WAS RECORDED IN FPS
:
1YES GO ON

33
FPPERR

STST
cHP

R4
92,Ra

ERROR
WORD
'WORD

FPPERR

MOV

(SP)+,80244

»P

FINS

8€EQ

28:

S$TESTN

CLR
MOV
MOV
MOV
LDFPS
.WORD
¢ree
STFPS
oM
8EQ
ERROR
.WORD
'WORD

SOTRPFLG
90244, (SP)
*ILL, 0244
#40000,R3
RS
170020

iCLEAR TRAP FLAG
{SAVE FP VECTOR
1SETUP NEW VECTOR
;SETUP DATA TO BE LOADED
{LOAD FPS, FID=1
: ILLEGAL FP INSTRUCTION

1ALL ERRORS TO TRAP TO EMT VECTOR
{UNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE

iNC GG TO ERROR
:SEE IF FEC=2
:

{YES GO ON

:ALL ERRORS TO TRAP TO EMT
{UNIQUE ERROR NUMBER
ADDRESS OF ERROR MESSAGE
:NO GO TO ERROR
sRESTORE VECTOR

VECTOR

;

000167

000010
$

108000

004546
008550

000035
002013

004552
004554

000006

004554

‘3‘.‘.“.““.““““““““““‘.““‘.““““‘.““‘“.“.‘.

004450
004454
004460
004466
004472
004474
004476
004500
004502
004506
004510
004512
004514

1382
1383
1384
1385
1386

32
FPPERR

H ‘“.““..““““‘““‘..“.‘..‘.“‘“‘.‘..“.““.“‘...““.‘

1oTEST

1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367

1380

ERROR
WORD
"WORD

FINA:
:
157PS;

004444

1381

31
FPPERR

RTT

104000
000032
002013

1352

1370

PAGE

851 10EeBh op robES AND sTST

1351

1368
1369

16:58

JWORD
'WORD

1350

1353

[ 3

ERROR
.WORD
{WORD

FINS:

RTT

35
FPPERR

1ALL ERRORS TO TRAP TO EMT VECTOR

tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
FID ERROR
1RETURN

1SFP6
1 0608060 0 000004640060000008000400080000000000800880080800008000000

ssTEST 10

TEST LDD, STD FSRC AND FDST MODE 1

GLOBAL

ARERS
KDJ11A
. MAC

1391
1392
1393
1394
1395
1396
1397
1398
1399

1400

1401
1402
1403
1404
1405
1306
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
14456

MACY1l

15 MAR 84

172414
020427
001403
104000
000036
002013

004626
004632
004636
004640
004642
004644
004646

012701
012703
022421
001403
104000
000037
002013

004650
004652
004656
004660
004664
004666
004670
004672

077306
012704
174014
020427
001403
104000
000040
002013

004674
004700
004704
004706
004710
004712
004714

012701
012703
022421
001403
104000
000041
002013

004716
004720

077306
012637

004724

000167

004742
004744
004746

15 MART?g

16:?85T

pCBE.SSYD FSRC AND FDST MODE 1

SEQ 0032

JiR0A8400000000000000840000800880080000804800084004080

004554
004554
004560
004564
004566
004570
004572
004576
004604
004610
004€12
004¢ 16
004620
004622
004624

004730
004732
004734
004736
004740

30A 5%?52)

005267
005037
005004
170104
170011
013746
012737

012704

177777
000000

052525
125252
i
000000
052525
125252

TST10:

174224

002122

000004
004750
004740

LOD
CcHP
B8EQ
ERROR
. WORD
. WORD
1¢:
28:

001136

3s:

MOV

MOV
cHp
BEQ
ERROR
. WORD
. WORD
S08
MOV

STD

001136

004730

INC
CLR
CLR
LDFPS
SETD

MOV
MOV
MOV

000004

004740

004730
000004

0008080000804

cHe

BEQ
ERROR
. WORD
. WORD
4%

Ss:

63:

000030

MOV
MOV
cp
8EQ
ERROR
. WORD
. WORD

S08
MOV

$TESTN

B8OTRPF
.G
R4
R4

804, -(SP)
#1S5F6,804
#TS6DAT,R4

(R4),ACO

R4, 8TS6DAT

FPPERR

9756DA,R1
04 ,R3

(R4)+,(R1).
34

FPPERR

R3,2¢
#TSTLOC,R4
ACO,(R4A)
R:.OTSTLOC
4

40
FPPERR
OTS6DA,RL
44 ,R3

(R4)+,(R1)»

41
FPPERR

R3,5¢

(SP)+.B04

FING
i

TS6DA:

TS6DAT:

177777
000000
052525
125252
171777
000000
052525
125252

i INCREMENT TEST NUMBER
1iCLEAR TRAP FLAG
1SETUP TO LOAD DATA
1CLEAR FPS
1SET FD 10 &
1 SAVE TIMEOUT VECTOR
$1SETUP NEW VECTOR
$SETUP POINTER TO DATA
3 TEST INSTRUCTION
;IS R4 CORRECY
1YES GO ON

sALL ERRORS

TO TRAP

sUNIQUE ERROR NUMBER

TO EMT

VECTOR

s ADDRESS OF ERROR MESSAGE
iNO GO TO ERROR
sSETUP POINTER T0O DATF
:INIT COUNTER
tWAS SOURCE DATA ALTEED
sNO GO ON

sALL ERRORS TO TRAP TO EMT VECTOR

sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MES.AGE
;1YES GO TO ERROR
:1ARE WE DONE

sSETUP POINTER FOR DATA

TEST

INSTRUCTION

31IS R& CORRECT
1YES GO ON
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
sNC GO TO ERROR
;SETUP POINTER 70O DATA
1 INIT COUNTER
11IS DESTINATION DATA CORRECT
s YES GO ON
tALL ERRORS TO TRAP T0O EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
iNO GO 1O ERROR
1ARE WE DONE
IRESTORE VECTOR

GLOBAL AREAS
KDJ1.1A
MAC
1447
1448
1449

1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460

1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486

1487
1488
1489

1490

1491
1492
1493

1494
1495
1496
1497
1498
1499

1500
1501
1502

004750
004750
004752
004754
004756
004760

MACY11l

15-MAR 84

30A( 1052)

5
15:51

15-MAR_84
T10

16:

FSRC

AND FDST

MODE

SEQ 0033

tsre.

104000
000042
002013

sALL ERRCRS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

FPPERR

1tADDRESS OF ERROR MESSAGE

100D ADDRESS TRAP

000006

1RETURN

FING:
3

004760

TSFP?:
130 080 08 0 0000004000008000044040880800480000800400
08800060

$»TEST

TEST LDD,

0484

LDF FSRC MODE O

1100200000 000000000000000000088000000000000000004000000008000000s

004760
004760
004764
004770
004774
004776
005002
005010
005014
005016
005022
005024
005026
005032
005033
005040
005044
005050
005052
005056
005062
005064
005066
005070
005072
005076
005100
005104
005110
005114
005116
005122

005267
005037
012704

174020
002122
000200

013746
012737
012704
172414
012701
172511
172401
012704
174114
004767
012704
012701
174014
004767
012701
172511
170001
172401
170011
012704
174114
004767
012704
012701
174011
004767
012637

000004
005154
005164

005126

000167

005132
005136
005140
005142
005144
005146

170104

012703
022421
001403
104000
000043
002012

TST11l:

INC

CLR

MOV
L.OFPS

MOV
MOV
MOV
LDD
MOV
LDD
LDD
MOV
STD
JSR
MOV
MOV

000004

005174
001136
000072
001136
005174

STD

000054
005164

JSR
MOV
LOD
SETF
LOF
SETD
MOV
STD
JSR
MOV
MOV
STD
JSR
MOV

001136
000026
005204
001136

000010

000062

P
§

CHECKT: MOV
CHEKT:
cHP
BEQ
ERROR
. WORD
. WORD

STESTN

SeTRPFLG

#200,R4
R4

804, -(SP)
OTSF7,804

@TS7DAL
. RA

(R4),ACO

#TS7TDA2,R1

(R1),ACt

ACL,ACO
#TSTLOC,R4
RC1,(R4)
PC.CHECK?
#TSTLOC.R4
eTS70A2,R1
ACO,(R4)
PC,CHECK?
STSTDAY,RY
(R1),ACY

ACl1.ACO
#TSTLOC ,RA

AC1,.(R4)

PC.CHECK?
#TS7DAA
R4
#TSTLOC,R1
ACO,(R1)

PC,CHECK?

s INCREMENT TEST NUMBER
1CLEAR TRAP FLAG
$SETUP TO LOAD FPS
sLOAD FPS, FD=1

$SAVE TIMEOUT VECTOR

sSETUP NEW VECTOR
$1SETUP POINIER TO DATA
sCLEAR ACO
sSETUP POINTER TO DATA
sLOAD AC1 WITH DATA
3 TEST INSTRUCTION
3

;CHECK IF AC1 HAS BEEN ALTERSD
3

;SETUP POINTERS FOR DATA

1CHECK IF ACO RECEIVED CORRECT DATA
3

1SETUP POINTER TQ DATA
sCLEAR AC)
$SET FD+0
s+

TEST

INSTRUCTION

1SET FO=}
sSETUP POINTER TO DATA
1CHECK IF AC1 MAS BEEN ALTERED
H

1SETUP POINTERS FOR DATA
[

;CHECK IF ACO HAS CORRECT DATA
3

;RESTORE VECTOR

FIN?

#4,R3

(R&)+,(R1).
CH?
43

FPPERR

1 INIT COUNTER
1IS DATA Ox

tYES GO ON
1ALL ERRORS TO TRAP T0O EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

iNO GO T0 ERROR

1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519

1520
1521
1522
1523
1524
1525
1526

1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558

005150
005152
005154
005154
005156
005160

005162
005164
005166
005170
005172
005174
005176
005200
005202
005204
005206
005210
005212
005214

MACvY1] SOA(éOSZ)
15 MAR 84 15:51

15 MAR-84
T

077306
000207

16 9BsPRB3foF
E. Fsre MooE o

CHK?:
TSF7:

104000

000044
002013

S08
RTS

ERROR
.WORD
.WORD

000006

R3,CHEK?

44
FPPERR

000000
000000
000000
000000
037641
065121

TS7DA1l:

TS70A2:

037373
022265
000000
000000
037373
022265

TS7DA4:

FIN7:

.WORD
. WORD
. WORD
.WORD
.WORD
.WORD

.WORD
. WORD
. WORD
. wlon
.WORD
. WORD

+ARE

WE DONE

tYES RETURN

sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

s ADDRESS OF

100D ADDRESS TRAP

RTT
:

567

ERROR MESSAGE

s RETURN

[eXe
Yo Xo)

OGLOBAL ARE RS
KDJ1.1A
MAC

37641

65121
37373
32265
0

57373
22265

005214

TSFP1G:;
1104080004400 2000080080004008000000400800400008000040000040084800008408

seTEST
005214
005214
005220
005224
005230
005232
005236
005244
005250

005252
005256
005260
005262
005266
005270
005274
005300
005304
005306
005312
005316
005320
005322
005324
005326
005332
005334
005340

TEST STD,

STF FOST MODE O

13088880002 4880880880000880800400000004008000020300048480048000008600¢

005267
005037
012704
170104
013746
012737
012704
172414
012701
172511
174100
012704
174114
004767
012704
012701
174014
004767
012701
172511
170001
174100
170011
012704
174114
004767
012704

TST12:

173564
002122
000200
000004
005410
005420

005430

001136
000072
001136
005430
000054
005420

001136

000026
005440

000004

INC
CLR
MOV
LOFPS
MOV
MOV
MOV
LoD
MOV
<00
STD
MOV
STD
JSR
MOV
MOV
STD
JSR
MOV
LOD
SETF
STF
SETD
MOV
STD
JSR
MOV

S$TESTN

RETRPFLG

4200,Re
R4
‘.‘.-(SP)
01SF10,004
#1510D01,R4
(R4),ACO
#751002,R1

(R1),AC1
AC1,ACO
#TSTLOC,R4
AC1,(R4)

PC.CHECLO
#ISTLOC,R4
#751002,R1

ACO,(R4)

PC,CHEC10
4151001 ,R1

(R1),AC1

AC1,ACO
OTSTLOC,RA
AC1,(R4)
PC,CHEC10
0751004 ,R4

s INCREMENT TEST NUMBER
1CLEAR TRAP FLAG
:SETUP TG LOAD FPS

sLOAD FPS,

FD»1

tSAVE TIMEOUT VECTOR
1SETUP NEW VECTOR
;SETUP POINTER TO DATA

sCLEAR ACO

tSETUP POINTER TO DATA
tLOAD AC1 WITH DATA
¢ TEST INSTRUCTION
3

+CHECK IF AC1 HAS BEEN ALTERED
H

:SETUP POINTERS FOR DATA
3

sCHECK IF ACO RECEIVED CORRECTY DATA
i

:SETUP POINTER TO DATA
1CLEAR ACL
1SET FD=0
+ TEST INSTRUCTION
1SET FD=1
1SETUF POINTER TO DATA
tCHECK IF AC1 HAS BEEN ALTERED
i

1SETUP POINTERS FOR DATA

0034

GLOBAL

AREAS
KDJU11A, MAC

1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593

1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614

MACY11l

30A(1052)

005344
005350
005352
005356

012701
174011
004767
012637

001136

000010
000004

STD
JSR
MOV

005362

000167

000062

JMP

FIN1O

005366
005372
005374
005376
005400
005402

012703
022421
001403
104000
000045
002013

000004

CHEC10: MOV

24 ,R3

005404
005406

077306
000207

15 MAR-84

15:51

MAR-84
T12

16:58
PAGE 35
TEST STD, STF FDST MODE O
MOV

CH10:

(R4)+,(R1)»
CHK10

.WORD

45
FPPERR

S08

RYS

R3,CH10
PC

005410
005410
005412
005414

104000
000046
002013

005416

000006

TSF10:

1CHECK

]

IF ACO HAS CORRECT DATA

[

+RESTORE VECTOR

cMP
8EQ

ERROR
.WORD

CHK10:

@TSTLOC,R1
ACO, (R1)
PC,CHECiO

SEQ 003S

ERROR
. WCRD
. WORD

1 INIT COUNTER
$IS DATA OK

$YES GO ON

sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
sNO GO TO ERROR
sARE WE DONE

1YES RETURN

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
:0DD ADDRESS TRAP

RTY
$

005420
005422
005424
005426
005430
005432
005434
005436
005440
005442
005444
005446
005450

FIN1O:

005450

TSFP11:

TS1001:

TS10D2:

TS1004:

150085008850 05080000808800080008000408000808000002048000000800000802

;»TEST

005450
005450
005454
005460
005464
005466
005472
005474
005476
005500
005504
005506
005512

TESY FDST SINGLE OPERAND MODE O

138028040343 88384000488580000000080800080000000000503080000800880800¢

005267
005037
012704

170164
012704
172414
170400
170203

173330
002122
006,200

INC

CLR

MOV
LOFPS
MOV

©J5550

LDO

CLRD

012704

001136

012701
022427

000004
000000

174014

TST13:

1$:

STFPS
MOV
ST0
MOV

o
oy

$TESTN

BOTRPFLG
0200,R4

R4
#751101,R4

(R4),ACO
ACO
R3

#TSTLOC,R4
ACO,(R4)
04 ,R1
(R4).,00

: INCREMENT TEST NUMBER
;CLEAR TRAP FLAG
;SETUP 1O LOAD FPS

1SEY FD=1
1SETUP POINTER 70 DATA
tLOAD ALL ONES TO ACO
: TEST INSTRUCTION
;GET FPS
H

1CHECKX ACO FOR ALL ZEROES
s INIT COUNTER
i

GLOBAL AREAS
KDJ11A . MAC

1615
1616
1617
1618
1619
1620
1621
1622

1623
1624
1625
1626
1627
1628
1629
12;0
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646

MACY1l 30A(1052)
15-MAR 84 15:51

005516
005520
005522
005524

001403
104000
000047
002013

005526
005530
005534
005536
005540
005542

077107
020327
001403
104000
000050
002013

005550
005552
005554
005556
005560

000167

000010

005576
005600
005602
005604
005610
005612
005614
005616

1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670

005620
005624
005626
005630
005632

022705
001403
104000
000052
002013

H
]
TS1101:

177777
177777
177777
177777

1647
1648
1649
1650
1651
1652
1653
1654

173220
002122
040200

OPERAND MODE

24
47
FPPERR

S08
CMP
BEQG
ERROR
.WORD
.WORD

R1,1$
R3,0204
34

JMP

FIN11

.WORD
. WORD
. WORD
. WORD

177777
177777

S0
FPPERR

000002

SEQ 0036

30K GO ON
tALL ERRORS TO TRAP T0O EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
$tNO GO TO ERROR
1ARE WE DONE
sCHECK FPS
sOK GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
iNO GO TO ERROR

177777

177717
FIN11:
:
TSFP12:
138088000 00408808088000000004500000080080803084000000004800008408068048
;oTEST 14
TEST FDST SOP MODE O WITH ILLEGAL AC?7
8800080000080 0000080000000000000000080888000000008800086004004884
TST1a;
INC
S$TESTN
1 INCREMENT TEST NUMBER
CLR
BOIRPFLG
1CLEAR TRAP FLAG
MOV
#40200,R3
sSETUP TO LOAD FPS
LOFPS
RS
;SET FID=1, AND FD-»1
CLRD
STFPS
STSTY

140200

005634

e
BEQ
ERROR
L,WMORD
LMORD
1s:

2%:

cp
BEQ
ERROR
LMORD
.WORD

AC7?
RA
RS
#140200,R4
1s

5%
FPPERR
#2,R3
24

i TEST INSTRUCTION
iGET FPS
;GET FEC
1 IS FPS CORRECT
sYES GO ON
sALL ERRORS TO TRAP TO EMY
tUNIQUE ERROR NUMBER
s ADORESS OF ERROR MESSAGE

iNO GO TO ERROR

52
FPPERR
sNO GO

005267

173144

VECTOR

s IS FEC CORRECT
:YES GO ON
sARLL ERRORS TQO TRAP T0O EMT VECTOR
sUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
TO ERROR

005634

005634
005634

es:

3s:

005267
005037
012703
170103
170407
170204
170305
022704
001403
104000
000051
002013

1655

000204

005560

005560
005560
005564
005570
005574

16: 58
PAS
EST FOST SINGLE

B8EQ
ERROR
.WORD
.WORD

005544

15 MAR 84
T13

TSFPLS:
3108080880860 00000000000000800008800008800000400000002008000000400
s oTEST 15
TEST FDST SOP MODE 1
$50084080800000000008000000000000000080000000004000080000d0R00ad2
TST1S;
INC
$TESTN
t INCREMENT TEST NUMBER

AREAS
KDJ11A
. MAC

GLOBAL

1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726

MACY11l

15-MAR-84

005640
005644
005652
005656
005662
005664
005670
005674
005700
005702
005706
005710
00L712
005716
005720
005722
005724

012704
012724
077503
012702
170412
170203
020227
001403
104000
000053
002013

005726
005732
005736
005740
005742
005744

012701
022227
001403
104000
000054
002013

005746
005750
005754
005756
005760
005762

077107
020327
001403
104000
000055
002013

005764

012637

005770

000167

005774
005774
005776
006000

104000
000056
002013

006002

000006

30A(1052)

15:51

013746
012737
005037
012702

000004
005774
002122
000200

012705

000004
001136
171717

170102

1S MAR 84

T15

16:58

PAGE

TEST FDST

MOV
MOV

000004

CLRD

(R2)

LOFPS

MOV
MOV
MOV

MOV

STFPS

001136

cMP
BEQ
ERROR
. WORD
. WORD

3s:

000204

4%
H

000010

tsF13:

FIN1S:

006004

TSFP14:

S0B
cHe
BEQ

R3, 0204
4

R1,2¢

+WORD

FPPERR

MOV

(SP)«,804

FIN13

ERROR
. WORD

FPPERR

sSETUP POINTER TO DATA

INSTRUCTION

s4AS R2 ALTERED
s1NO GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE

(R2)+,00

TEST

sGET FPS

FPPERR

04,R1

TRAP FLAG

1 ARE WE DONE

1¢

RTT

006004

1CLEAR

$1SETUP TO LOAD FPS
$1SEY FO=1
s INIT COUNTER
sSETUP POINTER TO TEST LOCATION
sMOVE ALL ONES TO TEST LOCATION

R3
R2,4TSTLOC

FPPERR

,WORD

$SAVE TIMEQUT VECTOR
1SETUP NEW VECTOR

#TSTLOC,R2

MOV
CHp
BEQ
ERROR
-WORD
. WORD

ERROR
.WORD

SEQ 0037

S08

CLR

001136

SOP MODE

804, -(SP)
4TSF13,804
80TRPFLG
#200,R2
R2
24 RS
OTSTLOC,R4
0177777,(R4).
R5,100%

MOV

1004:

s YES GO TO ERROR
s INIT COUNTER
;CHECK LOCATION FOR O
;0K GO ON
tALL ERRORS YO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERRCR MESSAGE
tNO GO TO ERROR
sARE WE DONE

sCHECK FPS
sOK GO ON

;sALL ERRORS TO TRAP T0Q EMT VECTOR

sUNJQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE
iNO GO TO ERROR
sRESTORE VECTOR

sALL ERRORS TO TRAP T0O EMT VECTOR
tUNIQUE ERROR NUMBER
+ ADORESS OF ERROR MESSAGE
;00D ADDRESS TRAP
;RETURN

§3088884840888040088008808000000000000800340008800000800000080000

1¢TEST 16

006004
006004
006010
006014
006022
006026

TEST FOST SOP MODE 2

$180884800080088000840000000088000040308000000004000000000000000000

005267
013746
012737
005037
012702

TST16:

172774
006150
002122
000200

000004

INC
MOV
MOV
CLR

MOV

$TESTN
804, -(SP)
OTSF 14,808

S80TRPFLG
#200,R2

1 INCREMENT TEST NUMBER
1SAVE TIMEOUT VECTOR
1SETUP NEW VECTOR
1CLEAR TRAP FLAG
{SETUP TO LOAD FPS

GLOBAL AREAS
KDJ11A . MAC

1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741

MACY11l 30A(1052)
15 MAR-84 15:51

006032
006034
006040
006044
006050
006052
006056
006060
006062
006066
006070
006072
006074

170102
012705
012704
012724
077503
012702
170422
170203
020227
001403
104000
000057
002013

006076
006102
006106
006112
006114
006116
006120

012702
012701
022227
001403
104000
000060
002013

000004
001136
177777

001136
000004
000000

077107
020327
001403
104000
000061
002013

006140

012637

000004

1758
i;gg

006144

000167

000010

1768
1769
1770
1771

100$:

001146

006122
006124
006130
006132
006134
006136

i;gg

1$:

es:

000204

43
H

LDFPS
MOV
MOV
MOV
s08
MOV
CLRD
STFPS
CMP
BEQ
ERROR
.WORD
.WORD
MOV
MOV
CMP
BEG
ERROR
.WMORD
.WORD

006150
006150
006152
006154

104000
000062
002012

006156

000006

TSF14:

SEQ 002E

R
#4 ,RS
@TSTLOC,R4
#177777,(R4).
R5,100¢
#TSTLOC,R2
(R2)+
R3
R2,4TSTLOC+10
1s
57
FPPERR
#TSTLOC,R2
04 ,R1
(R2)+,00
3

60
FPPERR

SO8
CcHe
BEQ
ERROR
.MORD
.WORD

61
FPPERR

MOV

(SP).,a04

JMP

FIN1A

ERROR
.MORD
JWORD

62
FPPERR

R1.2%
R3, 8204
44

tNO GO

$SET FD»1
s INIT COUNTER
$SETUP POINTER TO TEST LOCATION
sMOVE ALL ONES TO TEST LOCATION
$+ARE WE DONE
sSETUP POINTER TO DATA
; TEST INSTRUCTION
;GET FPS
1 IS R2 CORRECT
s YES GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

TO ERROR

sSETUP POINTER TO DATA
sINIT COUNTER
3CHECK LOCATION FOR O
sYES GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
sNO GO TO ERROR
tARE WE DONE
sCHECK FPS
;0K GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE
iNO GO YO ERROR
sRESTORE VECTOR

RYT

tALL ERRORS TO TRAP T0 EMT
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
;00D ADDRESS TRAP

VECTOR

sRETURN

006160

FIN14:
]
TSFP1S:
!
$1088800008088450088000000000000000088000000000000088080800000800

006160

;oTEST 17

006160
006160
006164
006170
006176
006202
006206
006210
006214

1772

1773
1774
1775
1776
1777
1778
1779
1780
1781
1782

16:58
PAGE 38
TEST FDST SOP MODE

001136

1742
1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
%;g?

1761
1762
1763
1764
1765

15 MAR-84
T16

005267
013746
012737
005037
012702
179102
012705
012704

172620
000004
006370
002122
000200
000011
001136

000004

TEST FOST SOP MODE 3

1108888400008 4000840000008080000808800808008008080000000000000%200
TST17:
INC
$TESTN
s INCREMENT TEST NUMBER
MOV
884, -(SP)
1SAVE TIMEOQUT VECTOR
MOV
#TSF1S,804
sSETUP NEW VECTOR
CLR
SOTRPFLG
1CLEAR TRAP FLAG
MOV
#200,.R2
tSETUP TO LOAD FPS
LOFPS
RQ
1SET FD=1
MOV
49.,R5
1 INIT COUNTER
MOV
4TSTLOC, R4
1SETUP POINTER TO TEST LOCATION

GLOBAL

AREAS
KDJ11A
. MAC

1783
1784
1785
1786
1787
1788
1789
1790
1791
1792
1793

1794
1795
1796

1797
1798
1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811

1812

1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825
1826
1827
1828
1829
1830
1831
1852
1833
1834
1835
1836
1837
1838

006220
006224
006226
006234
006240
006242
006244
006250
006252
006254
006256

006260
006264
006270
006272
006274
006276

MACY11l

15-MAR-84
012724
077503
012737
012702
170432
170203
020227
001403
104000
000063
002013

012702
022227
001403
104000
000064
002013

30A(1052)

15:51

15-MAR-84
T17

177777
001150
001136

100s:
001136

1$:

012701
022227
001403
104000
000065
002013

006320
006322
006326
006332
006334
006336
006340

077107
012701
022227
001403
104000
000066
002013

006342
006344
006350
006352
006354
006356

077107
020327
001403
104000
000067
002013

64:

012637

006364

000167

006370
006370
006372
006374

104000
000070
002013

006376

000004
177777

Ss:

000204

S08

CLRD
STFPS
CMP
BEQ
ERROR
.WORD
.WORD

001149

001136
001150

MOV
MOV
MOV

006300
026304
006310
006312
006314
006316

006360

16:58
PAGE 39
TEST FDST SOP MODE

7s:

000010

TSF15:

000006

MOV

cHP
8EQ

006400

FIN1S:

006400

TSFP16:

FPPERR

#TSTLOC,R2

s INIT SEST LOCATION
1ARE WE DONE
s INIT TEST LOCATION
;SETUP POINTER TO DATA
t+ TEST INSTRUCTION
sGET FPS
+ IS R2 CORRECT
sYES GO ON

tALL ERRORS TO TRAP 10O EMT VECTOR
tUNIQUE ERROR NUMBER

1ADDRESS OF ERROR MESSAGE

iNO GO TO ERROR

$SETUP POINTER TO DATA

(R2)+,0TSTLOC+12
24

;IS DATA CORRECT
;YES GO ON

sUNIQUE ERROR NUMBER

FPPERR

MOV

€4 ,R1

(R2)s, 0177777

CHP
8EQ
ERROR
. WORD
.WORD

FPPERR

S08
MOV

R1,3$
&4 ,R1

(R2)+,80

sALL ERRORS TO TRAP TO EMT VECTOR
s ADDRESS OF ERROR MESSAGE

tNO GO TO ERROR

: INIT COUNTER

;IS LOCATION ALL ONES

1YES GO ON

sALL ERRORS TO TRAP 10O EMT VECTOR
sUNIQUE ERROR NUMBER

i ADDRESS OF ERROR MESSAGE

sNO GO TO ERROR

;ARE WE DONE
s INIT COUNTER

:IS LOCATION O

1 YES GO ON

66
FPPERR

tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

S08
cmp
BEQ
ERROR
.WORD
. WORD

R1,5
RS, 8204
78

MOV

(SP)Ys ,a04

JrP

FINL1S

ERROR
.WORD
.WORD

RTT

SEQ 0039

#177777,(R4).
RS, 1004
HTSTLOC+12,86TSTLOC
OTSTLOC,R2
8(R2)+
R3
R2,0TSTLOC.2
1

ERROR
. WORD
.WORD

cHP
BEQ
ERROR
. WORD
. WORD

FPPERR

tALL ERRORS TO TRAP TO EMT VECTOR

iND GO TO ERROR

;ARE WE DONE
1CHECK FPS
;0K GO ON
tALL ERRORS TO TRAP

tUNJQUE ERROR NUMBER

TO EMT VECTOR

1 ADDRESS OF ERROR MESSAGE

;NO GO TO ERROR

:RESTORE VECTOR

1ALL ERRORS TO TRAP TO EMT VECTOR

tUNIQUE ERROR NUMBER

1 ADDRESS OF ERROR MESSAGE

;0DD ADDRESS TRAP
1RETURN

GLOBAL

AREAS

KDJ11A MAC

MACY1l

15 MAR

30A(1052)
15:51

1839

006400
006400
006404
006410
006416
006422
006426
006430
006434
006440

006444
006446

005267
013746
012737
005037
012702
170102
012705
012704
012724

077503
012702

006452
006454
006456
006462
006464
006466
006470

1/0442
170203
020227
001403
104000
000071
002013

1862
1863
1864
1865
1866
1867

006472
006476
006502
006504
006506
006510

012701
022227
001403
104000
000072
002013

1869
1870
1871
1872
1873

006512
006514
006520
006524
006526

077107
012701
022227
001403
104000

1875
1876
1877

006532

1868

1874

1878
1879
1880
1881
1882
1883
iggg

1886

igg.a'

1889
1890
1891
1892
1893
1894

FDST

SOP MODE

SEQ 0040

006530

TEST FDST

SOP MODE 4

§100000000000000000000000000000000000000480000000600004000060688040

1854
1855
1856
1857
1858
1859
1860

1861

TEST

B4
PAGE 40

1¢TEST 20

1841

1852
1853

120

16:58

130000000000 000000000000000000000000040000000008000000800000600008

1840

1842
1843
1844
1845
1846
1847
1848
1849
1850
1851

15 MAR 84

172400
000004
006562
002122
000200
000010
001136
1777717

1S7120:

100¢:

001146

001136

000004
000000

000004

1777717

18:
es:

3s:
a8

000073

INC
MOV
MOV
CLR
MOV
LOFPS
MOV
MOV
MOV

S08
MOV
CLRD
STFPS
cHP
BEQ
ERROR
. WORD
.WORD

MOV
cp
BEQ
ERROR
JMORD
.MORD

006534
006536
006542
006544
006546
006550

077107
020327
001403
104000
000074
002013

006552

012637

000004

006556

000167

000010

000204

58:

68:

t INCREMENT TEST NUMBER
1SAVE TIMEOUT VECTOR
1SETUP NEW VECTOR
tCLEAR TRAP FLAG
1SETUP TO LOAD fPS
1SET FDse}
1tINIT COUNTER
1SETUP POINTER TO TEST LOCATION
s INIT TEST LOCATION

R5,1004
@TSTLOC+10,R2

tARE WE DONE
$sSETUP POINTER

TO DATA
s TEST INSTRUCTION
1GET FPS
1 IS R2 CORRECT
sYES GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

-(R2)
RS
R2,#TSTLOC
1¢

71
FPPERR
44 ,R1
(R2)+,00
3s
72
FPPERR

S08
MOV
e
8EQ
ERROR

R1,28
o4, ,R)
(R2)s 01777272
5%

.WORD

FPPERR

S08
ce
8€Q
ERROR
. WORD
LHMORD

R1,4%
R3,4204
64
74
FPPERR

MOV

(SP)s D04

JHP

FIN1G

LMORD

002013

$TESTN
804, -(SP)
#TSF16,004
SeTRPFLG
#200,R2
R2
#8.,R5
e@TSTLOC,R4
@177777,(R4).

tNO GO TO ERROR

s INIT COUNTER
1 IS LOCATION O
1YES GO ON
sALL ERRORS TO TRAP T0O €EMT
IUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

VECTOR

sNC GO Y0 ERROR

1ARE WE DONE
+ INIT COUNTER

1 IS LOCATION UNCHANGED

1NO GO

1INO GO

s YES GO ON
$ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
TO ERROR
1ARE WE DONE
1CHECK FPS
10 GO ON
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
TO ERROR
1RESTORE VECTOR

$
]

006562
006562
006564
006566

000075
002013

006570

000006

104000

TSF16:

ERROR

LHORD
LHORD

RTT

75
FPPERR

IALL ERRORS TO TRAP

1O EMY

tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1000 ADDRESS TRAP
1RE TURN

VECTOR

GLOBAL ARE RS
KDJ11A MAC

1895
1896
1897
1898

1899

1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919

1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941

1942

1943
1944
1945
1946
1947
1948
1949
1950

MACY11

15 MAR 84

30A(1052)

15:51

15 MAR 84
120

16:58

TEST

PAGE 4t
FDST

SOP MODE

Ca
SEQ N041

]

006572

FIN16:

006572

TSFP17:

110008400400000000848000800000000000000000000080400000000004

1eTEST

TEST FDST

0040000080044

SOP MODE S

'3‘0““‘“‘.“““‘“..““‘..‘.“‘.“‘0

006572
006572
006576
006602
006610
006614
006620
006622
006626
006632
006636
006640
006646
006652
006654
006656
006662
006664
006666
006670

001403
104000
000076
002013

006672
006676
006700
006702
006704

022227
001403
104000
000077
002013

001150

006706
006712
006716
006720
006722
006724

012701
022227

000004
177777

005267
013746
012737
005037
012702

170102

012705
012704
012724
077503
012737
012702

170452
170203
020227

001403
104000
000100
002013

006726
006730
006734
006740
006742
006744
006746

001403
104000
000101
002013

006750
006752
006756
006760
006762
006764

077107
020327
001403
104000
000102
002012

TST21:

172206

000004
006776
002122
000200

000004

000011
001136
177777

001150
001140

"0“‘....“‘.““‘0“00

INC
MOV

$TESTN

€TSF17,804

SeTRPFLG
#200,R2

001136

BEQ

TM R

(R2)e, 017277727

100

FPPERR
a8

022227

Ss:

f1,8¢
4 R
63

101

FPPERR

000204

68:

1CLEAR TRAP FLAG

1SETUP T0O LOAD FPS

$SET FDe1
s INIT COUNTER
sSETUP POINTER TO TEST LOCATION
s INIT TESY LOCATION
s ARE WE DONE
s INIT

TEST

TEST LOCATION

1SETUP POINTER TO DATA

INSTRUCTION

tGET FPS

11IS R2 CORRECT
1YES GO ON
sALL ERRORS TO TRAP TO EMT VECTOR
76
sUNIQUE ERROR NUMBER
FPPERR
1ADDRESS OF ERROR MESSAGE
iNO GO 7O ERROR
(R2)+,8TSTLOC
12
1 IS DATA CORRECT
28
sYES GO ON
sALL ERRORS TO TRAP T0 EMT VECTOR
FPPERR

077107
012701

tSETUP NEW VECTOR

R2
9. .R5
4TSTLOC,
R4
®177777,(R&).
RS, 100¢
OTSTLOC+12,80TSTLOC
@TSTLOC.2,R2
8-(R2)
R3
R2,0TSTLOC
14

1004

1¢:

1 INCREMENT TEST NUMBER
1SAVE TIMEOUT VECTOR

R1.5¢
R3, 0204
74

102

FPPERR

tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
iINO GO TO ERROR
1 INIT COUNTER
IS LOCATION ALL ONES
sYES GO ON

tALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
iNG GO 7O ERROR
1ARE WE OONE
1 INIT COUNTER
1 IS LOCATION O
1 YES GO ON
tALL ERRORS TO TRAP TQ EMT VECTIOR
TUNIQUE ERRUR NUMBER
1ADORESS OF ERROR MESSAGE
tNO GO TO ERROR
1ARE WE DOONE
1CHECK FPS
10 GO ON
1ALL ERRORS TO TRAP TO EMT VECTOR
TUNIQUE ERROR NUMBER
1ADDRESS OF ERROk MESSAGE
iNO GO YO ERROR

RbITTR ARERS
31,084

19}

1953

1958
1956

1957

15 MAR
84 16:58.

000004

MOV

(SP)+,904

006772

000167

000010

JMP

FINL7

006776

TSF17:

104000

007008

000006

007006

FINL?:

1965

007006

TSFP20:

007006

005267
005037
013746
012737
012702

171772
002122
000004
007176
000200

007036

012705

000010

007046

012728

1977

007042

1979

007052

1981
1982

007060
007064

1983

007054

007066

170102

012708

077503

012702
170462
170203

020227

1984

007072

001403

1986
1987

007076
007100

000104
002013

1989
1990

007102
007106

012702
012701

1985

1988
1991

1992
1993

1994
1995

1996
1997
1998

0070784

007112

007116
007120

007122
007124

007126
007130

022227

001403
104000
077107
012701

022227
001403

2002
2003

007148
007146

000106
002013

007150
007152

077107
020327

2004

2005
2006

sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

;0DD ADDRESS TRAP
1 RE TURN

TEST FDST SOP MODE 6

177777

INC
CLR
MOV
MOV
MOV

S$TESTN
SOTRPFLG
804, -(SP)
0TSF20, 804
0200,R2

s INCREMENT TEST NUMBER
JCLEAR TRAP FLAG
1SAVE TIMEOUT VECTOR
sSETUP NEW VECTOR
1SETUP TO LOAD FP3

MOV

o8 .RS

sINIT COUNTER

LOFPS

1008:

001137

MOV
MOV

001137

177777

000004

000000

38;
48

104000

000204

TEST LOCATION

7(R2)
RS

i+ TEST INSTRUCTION
+GET FPS

JYES GO ON

#TSTLOC.1.R2

R2.8TSTLOC1

JMORD
'WORD

104
FPPERR

MOV
MOV

#TSTLOC,R2
o4,R1

8EQ
ERROR

+SETUP POINTER TO DATA
:IS R2 CORRECT

1ALL ERRORS TO TRAP TO EMT VECTOR

tUNIQUE ERROR MNUMBER
1ADDRESS OF ERROR MESSAGE

tNO GO TO ERROR

{SETUP POINTER 1O DATA
JINIT COUNTER

(R2)+,0177777

1IS DATA CORRECT

.HORD
(MORD

105
FPPERR

{UNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

$08
MOV

R1,28
04 ,R1

1YES GO ON
1ALL ERRORS TO TRAP TO EMT VECTOR

iNO GO TO ERROR

1ARE WE DONE
+INIT COUNTER

crp
8EQ

(R2).,80
St

1IS DATA CORRECT
1YES GO ON

.WORD
‘WORD

106
FPPERR

IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

508
cHP

R1,48
RS, #204

ERROR
5%,

1SETUP POINTER TO TEST LOCATION

+INIT

CLRO
STFPS

cwP

2s:

0177777, (R&).

{ARE WE DONE

8EQ

1s:

oT$1LOC. R

{SET FDe1

RS, 1004

ERROR

001136
000004

S08

MOV

000007

000105
002013

007134
007140

007142

001136

15T22:

104000

1999
2000

2001

sALL ERRORS TO TRAP TO EMT VECTOR

"‘.“‘...‘.“‘..““.“..“‘..“"....““.“.“.‘......‘.“““

007006
007012
007016
007022
007030

007034

1980

VECTOR

];‘..“‘..““‘.“..‘..“‘.“.....‘..““‘...‘..‘“‘.““‘.‘...‘.

1975
1978

103
FPPERR

RTT

{aTEST 22

1%8

1976

{RESTORE

1967

1970
1971
1972
1973
1974

ERROR
.WORD
'WORD

1963

1969

SEQ 0042

1961

1%6

]

PAGE 9200 wopE 5

012637

000103
002013

1964

006766

007000
007002

1962

(s"ARA1A4SP8(49S)

1958
1959

1960

1ALL ERRORS TO TRAP TO EMT VECTOR

iNO GO TO ERROR

1ARE WE DONE
115 FPS CORRECT

GLOBAL ARE AS
KDJUL1A, MAC

2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
€022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062

007156
007160
007162
007164

MACy11

15-MAR 84

30 A(1052)

5:51
15:

MAR_84

T2e

1638 1PPBE1*30p MoDE 6

001403
104000
000107
002013

BEQ

ERROR
.WORD

.WORD

007166

012637

000004

007172

060167

000010

6%
i

SEQ 0043

1YES GO ON

tALL

107

FPPERR

MOV

(SP)»,804

JMP

FIN20

ERROR
. WORD
.WORD

110

ERRORS

TRAP

IUNIQUE ERROR NUMSER

1ADDRESS OF

iNO GO TO ERROR

sRESTORE

TO EMT

VECTOR

ERROR MESSAGE

VECTOR

007176
007176
007200
007202

104000
000110
002013

007204

000006

TSF20,

FPPERR

RTY
3

007206

FIN20O:

007206

TSFP21:

1ALL ERRORS

TRAP

TO EMT

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
s0DD ADDRESS TRAP
s RE TURN

VECTOR

1100800000 000000000000080004800000000000000800080080006

1oTEST 23
007206
007206
007212
007216
007222
007230
007234
007236
007242

0080800686¢

J10208000208000000088840000000000000000000000000006000

007266
007272
007274
007300

005267
005037
013746
012737
012702
170102
012705
012704
012724
077503
012737
012702
170472
170203
020227
001403

007302
007304
007306
007310
007314
007320
007324
007326
007330
007332

104000
000111
002013
012702
012701
022227
001403
104000
000112
002013

007334
007336
007342
007344

077107
022227
001402
104000

007246
007252
007254
007262

TEST FDST SOP MODE

TST23:

171572
002122
000004
007420
000200

INC
CLR

S$TESTN

s INCREMENT TEST NUMBER

8, -(SP)

$SAVE TIMEOUY VECTOR

SOTRPFLG

1004
:

0TSF21 . 004

1SETUP NEM VECTOR

8, RS

sINIT COUNTER

1SETUP TO LOAD FPS
1SET FDs}

#TSTLOC, R4

;SETUP POINTER TO TESY LOCATION

®177777,{R48 ).

RS, 1008

s INIT TEST LOCATION

STSTLOC,.08TSTLOC10
OTSTLOC.3,R2
5(R2)

001146

001141

sINIT TESY LOCATION
1SETUP POINTER TO DATA
$188eTEST INSTRUCTIONess

sGEY FPS

1YES GO ON

1 IS R2 CORRECY

111

iNO GO T0 ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

#TSTLOC,R2

1SETUP POINTER TO DATA

FPPERR

#,R1

(R2).,80

112

FPPERR
3s:

;ARE WE DONE

R2,01STLOC.3

001136

tCLEAR TRAP FLAG

4200,R2
R2

000010
001136
1772777
001136
001141
000005

008000008088

Ry,24

(R2)+,87STLOC

1ADDRESS OF ERROR MESSAGE

s INIT COUNTER

:+IS DATA CORRECT

1YES GO ON

1ALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER

1ADDRESS OF ERROR MESSAGE
1NO GO TO ERROR
1ARE WE OONE

1IS DATA CORRECY

1YES GO ON

tALL ERRORS TO TRAP TO EMT VECTOR

GLOBAL ARE RS
KDJ11A
. MAC

2063
2064
2065
2066
2067
2068
2069
2070
2071
2072
2073

2074
2075
2076
2077
cv78
2079
2080
2081
2082
2083
2084
2085
2086

2087
2088
2089
2090
2091
2092
2093
2094

MACY11

15-MAR-84

007346
007350

000113
002013

007352
007356
007362
007364
007366
007370

012701
022227
001403
104000
000114
002013

007372
007374
007400
007402
007404
007406

077107
020327
001403
104000
000115
002013

007410

012637

007414

000167

30A( 1052)

1S: 51

15 MAR _84
T23

2109
2110
2111
2112
2113
2114
211S
2116
2117
2118

16: 381
PBE
% %0p mooE 7
.WORD
.WORD

000003
1772777

5¢:

MOV

cMP

BEQ
ERROR
.WORD
.WORD
6%:

000204

7%:
i

000010

S08

113

FPPERR

0% ,R1
(R2)+,08177777
64

114

FPPERR

R1,5%
R3, 4204
7

cMP
BEQ
ERROR
.WORD
.WORD

FPPERR

MOV

(SP)+,804

JMP

FIN21

ERROR
.WORD
. WORD

116

115

SEQ N044

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
tNO GO TO ERROR
$ INIT COUNTER
+IS DATA CORRECT
1YES GO ON
sALL ERRORS

TRAP

1UNIQUE ERROR NUMBER

TO EMT

VECTOR

1ADDRESS OF ERROR MESSAGE
tNO GO TO ERROR
;1ARE

WE DONE

;CHECK FPS
;0K GO ON

sALL ERRORS

TO TRAP

TO EMT

sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
sNO GO TO ERROR
sRESTORE

VECTOR

YECTOR

007420
007420
007422
007424

104000
000116
002013

007426

000006

T1SF1:

FPPERR

RTY

sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
;0DD ADORESS TRAP
;RETURN

007430
007430

FIN21:

TSFP22:
131008080008882805008880080400008000000088000000000000000008

2095

2096
2097
2098
2099
2100
2101
2102
2103
2104
2105
2106
2107
2108

[ 4

soTEST 24

007430
007430
007434
007440
007444
007452
007456
007460
007464
007470
007474
007476

007504
007510

007512
007516
007522

007526

007530

007532
007534

0880800008

TEST FDST SOP MODE 3 GR7

530808804088400408008000000000000080000040000000040400000000

005267
005037
013746
012737
012702
170102
012705
012704
012724
077503
012737
170437
170203
012702
012701
022227
001403
104000
000117
002013

TST24

171350
002122
000004
007606
000200

8080000040880

INC
CLR

MOV

0TSF 22,004

.a‘ .as

177777

001136
000004
000000

804, -(5P)
#200,R2

000010
001136

001146
001136

$TESTN
SPTRPFLG

1008 ;

MOV

001136

¢TSTLOC,
R4
®177777.(R4).

RS, 1008

OTSTLOC+10,80TSTLOC

STSTLOC

18:

RS
OTSTLOC,R2
o4 RY

(R2)+,80
4)

117

FPPERR

s INCREMENT TEST NUMBER
iCLEAR TRAP FLAG
$SAVE TIME OUT VECTOR
1SETUP NEM VECTOR
$SETUP TO LOAD FPS
1SET FDe}
$INIT COUNTER
1SETUP POINTER TO TEST LOCATION
sINIT TESY LOCATION
1ARE WE OONE
$INIT TEST LOCATION
1GET FPS

TEST

INSTRUCTION

tSETUP POINTER TO DATA
sINIT COUNTER
1 IS DATA CORRECT
1YES GO ON
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUe ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
1NO GO TO ERROR

GLOBAL

MACS 1s"MAaR'8a PB140°2) 15 MAR:BY 16:38. PRGE 4R0p MoDE 3 GR7

KDJ11A.MA

2119
2120
2l2l
2lee
21e3

2124

2125

2126
2127
2128

2le9
2130
2131
2132
2133
<134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174

007536
007540
007544
007550
007552
007554
007556

077107
012701
022227
001403
104000
000120
002013

007560
007562
007566
007570
007572
007574

077107
020327
001403
104000
000121
002013

007576

012637

000004

007602

000167

000010

007606
007606
007610

007612

104000
000122
002013

007614

000006

000004
1777727

000204

2s:
3s:

S08

MOV
CMP

BEQ
ERROR
.WORD
.WORD
4s;

Ss:
H

TSF22:

S08

SEQ 004S

R1,1%

+ARE

(R2)»+,0177777

120

FPPERR

R1,3$
R3, 0204
St

cMP
BEQ
ERROR
.WORD
.WORD

FPPERR

MOV

(SP)+,.804

Jre

FIN22

ERROR
. WORD
.WORD

122

121

FPPERR

RTT

WE DONE

t INIT COUNTER
1IS DATA CORRECT

s YES GO ON

$ALL ERRORS TO TRAP TO “MT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
tNO GO TO ERROR
s ARE WE DONE

1CHECK FPS
10K GG ON

1ALL ERRORS

TQO

TRAP

TO EMT

VECTOR

tALL ERRORS

TO TRAP

TO EMT

VECTOR

tUNIQUE ERROR NUMBER
: ADDRESS OF ERROR MESSAGE
1NO GO TO ERROR
sRESTORE VECTOR

sUNIQUE ERROR NUMBER
s RDORESS OF ERROR MESSAGE
1000 ADDRESS TRAP
sRETURN

007616

FIN22:

007616

TSFP23:

]

3500080800440080000080000000000000008000048800680848040600060800004

:o0TEST 25

007616
007616
007622
007626
007632
007640
007644
007646
007652
007656
007662
007664
007670
007672
007676
007702
007706

TEST FOST SOP MODE 6 GR7

1100888400804 80004800840040004000080800000000000000800080008005000000008

005267
005037
013746
012737
012702
170102
012705
012704
012724
077503

007710
007712
007714

170467
170203
012701
012702
022227
001403
104000
000123
002013

007716
007720

077107
020327

171162
002122
000004
007744
000200
000004
001136
177777

1ST72S:

STESTN

SOTRPFLG
OO‘.-(SP)
#TSF23,004

100s¢:

MOV

18:

171246

000004
001136
000000

#200,R2
R2
*4,R5
#TSTLOC,.R4
#177777,(R).
&
RS, 1009
TSTLOC
R3
#4 R
#TSTLOC,R2

(R2)+,40
2t
123

FPPERR

000204

2%:

S08

R1,1¢
R3, 2204

: INCREMENT TEST NUMBER
stCLEAR TRAP FLAG
1SAVE TIMEOUT VECTOR
1SETUP NEW VECTOR

1SETUP TO LOAD FPS
1SET FDs=1
s INIT COUNTER
1SETUP POINTER TO TEST LOCATION
:INIT TEST LOCATION
tARE WE OONE
¢ TESY INSTRUCTION
;GEY FPS
s INIT COUNTER
1SETUP POINTER TO DATA
1IS DATA CORRECT
1 YES GO ON
sALL ERRORS TO TRAP TQ EMT VECTOR
IUNTQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
iNO GO TO ERROR
1ARE

OONE

1CHECK FPS

GLOBAL AREAS
KDJ11A. MAC
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187

2188

2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230

15AR 4a>95(4932) 15 MAR
84 16: 285 1PPB5 1%%0p MooE 6 GRY

007724
007726
007730
007732

001403
104000
000124
002013

007734

012637

000004

007740

000167

000010

BEG
ERROR
.WORD
.WORD

FPPERR

MOV

(SP).,804

JMP

FIN23

ERROR
. WORD

125

SEQ 0046

124

10K GO _ON
tALL

ERRORS

TRAP

TO EMT

VECTOR

sALL

ERRORS

TRAP

TO EMT

VECTOR

1UNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
1NO GO TO ERROR
tRESTORE VECTOR

TSF23:

0077«4

007744

007746
007750

007752
007754

104000
000125

002013

.WORD

000006

FIN23:

FPPERR

RTT

sUNIQUE ERROR NUMBER

3 ADDRESS OF ERROR MESSAGE

10DD ADDRESS TRAP

TSFP24:

007754

$10088000480048000088008008800008000800080304000400086086004

1oTEST 26

007754
007754
007760
007764
007770
007776
010002

010004
010010
010014
010020
010022
010030
010034
010036
010042
010046
010052

TEST FDST SOP MOCE

80484848

7 GR7?

1008884880400 8000808800800400080000005000080000000884808000000048044

005267
005037
013746
012737
012702
170102
012705
012704
0l2724
077503
012737
170477
170203

012702
012701
022227
001403

010054
010056
010060
010062
010064
010070

002013
077107
022227
001403

010072
010074
010076
010100
010104
010110
010112
010114

104000
000127
002013
012701
022227
001403
104000
000130

TST26:

171024

002122
000004
010146
000200

000010
001136
177777
001136

171112

001136
000004
000000

$TESTN

BOTRPFLG
804.'(59)

100%:
001146

18:

104000
000126

OTSF24,504
#200,R2
R2
48 RS
#TSTLOC
R4
€177777,(RA).

RS,1008
STSTLOC,B8TSTLOC10
8TSTLOC+10
R3
@TSTLO
. R2
C
M R1

(R2)+,80

-2]

126

001136

2%:

FPPERR
R1,18

g??)o.OTSTLOC

127

000003
177777

FPPERR
o3,R}

(R2)+, 0177727
5%

130

s INCREMENT TEST NUMBER

1CLEAR TRAP FLAG
1 SAVE TIMEOUT VECTOR
1SETUP NEW VECTOR
sSETUP TO LOAD FPS

1SET FD=}

1 INIT COUNTER
1SETUP TEST LOCATION POINTER
s INIT TEST LOCATION
:1ARE WE DONE
sINIT TEST LOCATION
:08aTEST INSTRUCTIONees
1GET FPS
sSETUP POINTER TO DATA
1 INIT COUNTER
sIS DATA CORRECT
1YES GO ON
3"0. GO 10 ERROR
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

sADDRESS OF ERROR MESSAGE
1ARE WE DONE

: IS DATA CORRECY
s YES GO ON
iNO, GG TO ERROR
tALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE
s INIT COUNTER
1 IS DATA CORRECT
1YES GO ON

;1ALL ERRORS TO TRAP TQ EMIY
sUNIQUE ERROR NUMBER

VECTOR

GLOBAL AREARS
KDJ11A MAC

2231
2232
2233
2234
2235
2236
2237
2238
2239

5340

010116

002013

010120
010122
010126

077107
020327
001403

22482

4
2245
c246

2247
2248
2249
2250
2251

2252
2253

2254

2255

000204

010130
010132
010134

104000
000131
002013

010136

012637

000004

010142

000167

000010

SS:S

MACY1]l 30A(1052)
15 MAR 84 15:51

010146
010146
010150

010152

010154

104000
000132
002013

2261
2262
2263
2264
2265
2266
2267
2268

010156
010156

R1,4%
R3, 0204
6¢

ERROR
. WORD
.WORD

131
FPPERR

MOV

(SP)+,804

JMP

FINZ2A

SEC 0047

GR7

1 ADDRESS OF ERROR MESSAGE
tNO GO TO ERROR
tARE WE DONE
1CHECK FPS
;10K GO ON
sALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE
tNO GO TO ERROR
sRESTORE

VECTOR

ERROR
.WORD

132
FPPERR

RTT

tALL ERRORS TO TRAP TO EMT
tUNIQUZ ERROR NUMBER
;sADDRESS OF

100D ADDRESS TRAP
H

VECTOR

ERROR MESSAGE

s oTEST 27

010156

010156
010162

010166
010170
010172
010176
010202
010206
010210
010214

005267
005037

005002
170102
012705
012708
012724
077503
012702
170422

010226
010230
010232
010234
010240
010244
010250

104000
000133
002013
012702
012701
022227
001403

2281
2282

010252
010254

104000
000134

010256

010260
010262
010266

TEST CLRF

300840008408 80800000000000000000800008080000000000084600660000000¢

2273
2274
2275
2276
2277
2278
2279

2283

S08
CcMP
BEQ

104808400 00000004000000046000000002060080408080000040000080808080480

170203
020227
001403

2284
2285
2286

FPPERR

3
FIN24:
3
TSFP2S:

010216
010220
010224

2280

6$:

000006

2269
2270
2271

2272

.WORD

2257

2259
2260

16:58
PASE 47
TEST FOST SOP MODE

3
TSF24.:

2256

2258

15 MAR 84
T26

170622
002122

000004
001136
177117

1ST27:

1008 :

INC
CLR
CLR
LDFPS
MOV
MOV
MOV
508
MOV
CLRF
STFPS
ce
BEQ

1¢:

ERROR
.WORD
MORD
MOV
MOV
cHp
BEQ

001136

001142

001136
000002
000000

2s:

ERROR
. WORD

002013

077107
012701
022227

000002
177777

34:
4%:

. WORD

S08
MOV
cMe

$TESTN
SOTRPFLG
R2
R2
TM RS
ATSTLOC R4
2377777,(R4)»
RS, 1008
eTSTLOC . R2
(R2).
[, ¢]
R2,81STLCC 4
1s

1 INCREMENT TEST NUMBER
iCLEAR TRAP FLAG
;SETUP TO LOAD FPS
1SET FO~0
s INIT COUNTER
sSETUP POINTER 10 TESY LOCATION
s INIT TESY LOCATION
1ARE WE DOMNE
1SETUP POINTER T0O DATA
1 TEST INSTRUCTION
iGETY TPS
11S R2 CORRECT
1YES GO ON

133
FPPERR
#TSLOC, R
#2,R1
(R2)+,00
3

sALL ERRORS TO TRAP TO EMT
$UNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
1SETUP POINTER YO DATA
s INIT COUNTER
1 IS DATA CORRECT
1 YES GO ON

VECTOR

tALL ERRORS TO TRAP T0O EMY
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1ARE WE DONE
1INIT COUNTER
tIS DATA CORRECY

VECTOR

134
FPPERR
Rl,28
o,
(R2)e , ML727272

iND, GO T0 ERROR

iNO, GO TO ERROR

GLOBAL AREAS
KDJ11A MAC

2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299

2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335

2336

2337
2338
2359
2340
2341
2342

010272

MACY1l

15-MAR 84

30A(1052)

15:51

15-MAR-84
127

001403

010274
010276
010300
010302
010304
010310

104000
000135
002013
077107
020327
001403

010312
010314
010316
010320

104000
000136
002013

16:58
PAGE 48
TEST CLRF

BEQ

000004

s YES GO ON

ERROR
. WORD
. WORD

135
FPPERR

CMP
BEQ

R3,04
64

ERROR

.WORD

63:

SEQ 0048

.WORD

tNO GO TO ERROR
1tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
s ARE WE DONE

136

FPPERR

+CHECK FPS
;0K GO ON
tNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE

010320

TSFP26:
1108084400044 084000840400408000804000040004848088008800060040060056080040

;1aTEST

TEST

TSTF AND TSTD

1180888800888 00880000800400020084000000000804000000000008064800800084004

010320
010320
010324
010330
010332
010334
010340
010342
010346

005267
005037
005004
170104
170567
170203
020327
001403

010350
010352
010354
010356
010362
010366
010372
010376
010400
010404

104000
000137
002013
012704
012702
004767
170537
170203
020327
001403

010406
010410
010412
010414
010420
010424
010430
010434
010436
010442

104000
000140
002013
012704
012702
004767
170567
170203
020327
001403

010444
010446
010450
010452
010456

104000
000141
002013

012704
012702

170460

TST30:

o122

INC

CLR
CLR

LOFPS
ISTF

000302

STFPS
cHP
BEQ
ERROR
<WORD

010640
010670
000224
010650

i1t

LWORD
MOV

010660
010710

137

FPPERR
#T526D0,R4

SIres
cp
8EQ

R3
R3S, 010
23

. WORD

2%:

R3
R3, 04
1s

#71526D3,R2
PC,CHEC26

ERROR
010650
010700
000166
000224

R4
152600

MOV
JSR

ISTF

000010

$TESTN

SOTRPFLG
R4

80752601

140

MWORD
MOV
MOV
JSR
TSTF
STFPS
cw
8EQ

FPPERR
#T526D1
R4
2152604 ,R2
PC,CHEC26
182602
RX
R3,00
3

ERROR
.WORD
. WORD
MOV
MOV

141
FPPERR
752602,
R4
#152605,
R

s INCREMENT TESY NUMBER
sCLEAR TRAP FLAG
1SETUP TO LOAD FPS
$1SET FD=0
;0480TESYT

INSTRUCTIONess

1GET FPS
1CHECK FPS
GO ON
s0K
iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
1URIQUE ERROR NUMBER

sADDRESS OF ERROR MESSAGE
sSETUP POINTERS T0O DATA
:

sCHECK IF DATA IS CORRECT
1908 TEST INSTRUCTIONsse

sGETY FPS

;CHECK FPS
sO¢ GO ON
iND, GO TO ERROR
;ALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1SETUP POINTERS TO DATA
:CHECK IF DATA IS CORRECT

100aTEST

INSTRUCTIONes«

sGET FPS
1 CHECK FPS
10K GO ON
iNO, GO TO ERROR

tALL ERRORS TO YRAP TO EMT VECTOR

tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1SETUP POINTERS TQ DATA
:

GLOBAL AREAS
KDJ11A. MAC

2343
2343
2345
2346
2337
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363
2364
2365
2366
2367
2368
2369
2370
2371
2372
2373
2374
2375
2376
2377
2378
2379
2380
2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393
2394
2395
239
2397
2398

MACY1l

15-MAR 84

010462
010466
010472
010474
010500
010502
010506

004767
012704
170104
170537
170203
020327
001403

010510

104000
000142
002013
012704
012702
004767
170567
170203
020327
001403

010512

010514
010516
010522
010526
010532
010536
010540
010544

010546
010550
010552
010554
010560
010564
010570
010574
010576
010602
010604
010606
010610

104000
000143
002013
012704
012702
004767
170567

170203
020327
001403
104000
000144
002013

AP 15 g eigg P???F42ND TSTD
000130
000200

JSR
MOV
LDFPS
TSTD

010640

STFPS
CMP
BEQ

000204

ERROR
-WORD
010640
010670
000064
000112

. WORD

MOV
MOV

JSR

TS10

STFPS
CMp
8EQ

000210

ERROR
010650
010700
000026
000064

S$:

TSTD

9200,R4
R4
84752600
R3
R3, 4204
a4

142
FPPERR
4752600 ,R4
4752603 ,R2
PC,CHECR6

7152601
R3
R3,#210
54

143

FPPERR
8752601 ,R4
0752604 ,R2
PC,CHEC26
752602

STFPS
cHe
BEQ
ERROR
.WORD
+WORD

FPPERR

JHP

FIN26

CHEC26 : MOV

o4 R}

000200

010612

. WORD
MOV
MOV
JSR

PC,CHEC26

R3
R3, 0200
64
144

6s:

010612

000167

010616
010622
010624
010626
010630
010632

012701
022422
001403
104000
000145
002013

010634
010636

077106
0002C7

2%:

010640
010642
010644
010646
010650
010652
010654
010656

000177
177777
177777
177777
1777717
000000
000000
000000

152600:

000102
13:

cHe
8EQ

(R4)+,(R2)
24

.WORD
. WORD

FPPERR

ERROR

]

TS2601:

S08

145

R1,1%

RTS

. WORD
.WORD
.WORD
. WORD
. WORD
. WORD
.WORD
.WIRD

177
177777
177777

177777

177277
0
0
0

5€Q 0049

1CHECK IF DATA IS CORRECT

sSETUP

TO LOAD FPS

{SET FD=1
1866 TEST INSTRUCTION#
s
s+GET FPS
:CHECK FPS
;0K GO ON
sNO, GO TO ERROR
tALL ERRORS

TRAP

TO EMT

sUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
1SETUP POINTERS TO DATA

VECTOR

sCHECK IF DATA IS CORRECT

$668TEST

INSTRUCTIONsss

1GET FPS
sCHECK FPS
;0K GO ON
iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMY VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1SETUP POINTERS TO DATA
3

1CHECK IF DATA IS CORRECTY
;064TEST INSTRUCTION
;GET FPS

;CHECK FPS
10K GO ON
sALL ERRORS 10O TRAP T0O EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
iNO GO TO ERROR

1 INIT COUNTER

3 IS DATA CORRECY
3 YES GO ON
1ALL ERRORS TO TRAP TO EMT VECTOR
;{UNIQUE ERROR NUMBER
1ADORESS OF ERROR MESSAGE
sNO GO TO ERROR
sARE WE CONE
1 RETURN

GLOBAL AREAS
KDJ11A .MAC

2399
2400
2401
2402
2403
2404

2405

2406

2407
2408
2409
2410
2411
2412
2413
2914
26415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446
2447
2448
2449
2450
2451
2452
2453
2454

010660
010662
010664
010666
010670
010672
010674
010676
010700
010702
010704
010706
010710
010712
010714
010716
010720

MACY11l

15 MAR 84

30A(1052)

15:51

15 MAR 84

1730

L4
16:58

077777
000000
000000
000000
000177

1S26D3:

177777
177777
177777

TS26D2:

17727277

000000
000000
000000
077777
000000
000000
000000

TSTF

AND

TS26D4:

.WORD
.WORD
.WMORD
.WORD
.WORD
.WORD
MWORD
.WORD

.WORD

77777
O
O
O
177
177777
177777
177777

TS2605:

.WORD
.MORD
.WORD
.WORD
.WORD
.WORD
.WORD

O
O
O
77777
O
©
O

FIN26:

010720

TEST

PAGE

SEQ 0050

TSTD

177777

TSFP27:
11080848080 084800000040840408000000400000000000088400004800800000080088

1+TEST 31

010720
010720
010724
010730
010732
010734
010740
010744
010750
010752
010754
010760
010762
010764
010770
010772

$30008080488080404088080800808000520208800080000000008000000880600

005267
005037
005005
170105
012701
012704
012703
012324
077102
012705
170615
170203
020527
001403

011004
011010
011014

104000
000146
002013
012702
004767
020327
001403

011016
011020
011022
011024
011030
011032
011034
011040

104000
000147
002013
012705
170625
170203
020527
001403

011042

104000

010774
010776
¢11000

020

TEST ABSF

170060
002122
000014
001136
011204

TST31:

100¢:

001136

00114¢

001152

INC
CLR
CLR
LOFPS

$TESTN
SOTRPFLG
R3
RS

MOV
MOV

¢TSTLOC,.R4
#1S2700,R3

MOV

001136

011234
000152
000000

080840

MOV

S0B

2%:

(R3)+,(R4).

R1,100%

MOV
ABSF
STFPS
crp

@TSTLOC,RS
{RS)
R3
RS,8TSTLOC

ERROR
LHWORD
.WORD
MOV
JSR
cHe
BEQ

146
FPPERR
971527D3,R2
PC,CHEC27
R3,#0
2%

ERROR
JMORD
.WORD
MOV
ABSF
STFPS

147
FPPERR
@TSTLOC+10,RS
(RS).
R3

8EQ

B8EQ

1%:

e12.,R1

cMpP

ERROR

R5,0TSTLOC+14

s INCREMENT TEST NUMBER
1CLEAR TRAP FLAG
1SETUP TO LOAD FPS
1SEY FD=0
s INIT COUNTER
sSETUP POINTER 10 TEST LOCATION
1SETUP POINTER TO TEST VALUE

sINIT TEST LOCATION
1ARE WE DONE
1SETUP POINTER TO DATA
106aTEST INSTRUCTIONess
iGEY FPS
11IS RS CORRECY
1YES GO ON
iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE
;SETUP POINTER TO DATA
;CHECK IF DATA IS CORRECT

sCHECK FPS

10K GO ON
iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1SETUP POINTER TO DATA
1046TEST INSTRUCTIONa
s
1GET FPS

1 IS RS CORRECT

1YES GO ON

i1NO, GO TO ERROR
tALL ERRORS TO TRAP TO EMT VECTOR

GLOBAL AREAS

SEQ 0051

KDJ11A.MA

2455
2456
2457
2458
2459
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476

2477
2478

2479

2480
2481
2482
2483
2484
2485

011044
011046
011050
011054
011060
011064
011070

000150
002013
012705
012702
004767
020327
001403

011072
011074
011076
011100
011104
011110
011112
011116

104000
000151
002013
012705
170665
170203
020527
001403

011120
011122
011124

104000
000152
002013
012705
012702
004767
020327
001403

011126
011132
011136
011142
011146

001146
011244
000076
000000

001136
000020

as:

001136

001156
011254
000020

.WORD
. WORD
MOV
MOV
JSR
CMP
BEQ

ERROR
. WORD
. WORD
MOV
ABSF
STFPS
CcMP
BEQ
€RROR
.WORD
. WORD
MOV
MOV
JSR

cMP
8EQ

150

FPPERR

#TSTLOC+10,RS
4152704 ,R2
PC,CHEC2?
R3, #0

151

FPPERR
#TSTLOC,RS

20(RS)

R3
R5,0TSTLOC

152

FPPERR

4TSTLOC+20,R5
#TS2705,R2
PC,CHEC27
R3,
4

011150
011152
011154
011156

104090
000153
002013

011156

000167

011162
011166
011170

012701
022522
001403

4 .,R1
(R5)¢,(R2).
24

011172
011174
011176
011200
011202

104000
000154
002013
077106
000207

FPPERR

011204
911206
011210
011212
011214
011216
011220
011222
011224
011226
011230
011232

177777
177777
177777
177777

ERROR
. WORD
. WORD

153

FPPERR

tUNIQUE ERROR NUMBER

s ADDRESS OF

ERROR MESSAGE

1SETUP POINTER TO DATA
;

;CHECK IF DATA IS CORRECT
s CHECK FPS
10K GO ON
iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

sSETUP POINTER TO DATA
$06sTEST

INSTRUCTION&se

:GET FPS
:IS RS CORRECT
:YES GO ON
:iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
sSETUP POINTERS TO DATA
3

;CHECK IF DATA IS CORRECTY
;1CHECK FPS
sOK GO ON

iNO, GO TO ERROR
;ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1ADORESS OF ERROR MESSAGE

2486

2487
2488
2489
2490
2491
2492
2493
2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508
2509
2510

000377

175436
136477

000001
000177
175436
136477
000001

000102

FIN27

154

R1.1%
PC

1S2701:

172727
177777
177777
177777
377
175436
{36477

152702

177
175436

136477

; INIT COUNTER
1 IS DATA CORRECTY
1YES GO ON
iNO, GO TO ERROR
tALL ERRORS TO TRAP TO EMT VECTOR
sUNJQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE
1ARE WE DONE

;RETURN

GLOBAL AREAS
KDJ11A, MAC

2511
2512
2513
2514
2515
2316
2517
2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540
2541
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566

011234
011236
011240
011242
011244
011246
011250
011252
011254
011256
011260
011262
011264

MACY11l

15 MAR-84

30A(1052)

15:51

077777

15 MAR-84
T31

16:58
PAGE 52
TEST ABSF

TS2703:

1777727
177777

1772777
000377
175436
136477

TS2704:

000001
000000
000000
136477
000001

TS270S5:

FIN27?:

.WORD

.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
.WORD

N4
SEQ 0052

77777

17777
177777
177777
377
175436
136477
1
0
0
136477
1

011264

TSFP30:
11088048800 480000480000008000004800800040400000008440808454880448880644

toTEST 32
011264
011264
011270
011274
011300
011302

011306
011312
011316
011320
011322

011326
011330
011332
011336
011340

844

TEST ABSD

11000002 548084448400000000000000000808808008004088056458408080080680488¢

005267
005037
012705

170105

012701
012704
012703
012324
077102
012705
170615
170203
020527
001403

104000
000155
002013
012702
004767
020327

011342
011344
011346
011352
011356
011362

001403

011364
011366
011370
011372
011376
011400
011402
011406

104000
000156
002013
012705
170625
170203
020527
0.1403

011410
011412
011414
011416
011422

104000
000157
002013
012705
012702

167514
002122
000200
000014
001136
011552

TST32:

100¢:

INC
CLR
MOV
LOFPS
MOV
MOV
MOV

MOV

001136

$TESTN

SOTRPFLG
#200,R5

6ie2..R1
#TSTLOC,R4
#7S30D0,R3
(R3)+,(R4).

R1,100¢

#TSTLOC,RS

{RS)

R3
RS, #TSTLOC
1

001136

155

011602
000152
000200

1s:

MOV

8EQ

FPPERR
8753003, ,R2

PC.CHEC3O
RS, 2200

156

001146

2%:

MOV

STFPS

001156

8EQ
ERROR
001146
011612

WORD

MOV

FPPERR
Q@TSTLOC+10,R5

(RS5).

R3
§§.0757LOC~20

157

FPPERR
#7STLOC+10,RS
4753004 ,R2

s INCREMENT TEST NUMBER
sCLEAR TRAP FLAG

;SETUP TO LOAD FPS
3SET FO=1
s INIT COUNTER
1SETUP POINTER 1O TEST LOCATION
1SETUP POINTER TO TEST VALUE
sINIT TEST LOCATION
s ARE WE DONE
;SETUP POINTER 10 DATA
1064TEST INSTRUCTIONs
s

iGET FPS
IS RS CORRECT
;YES GO ON
iNO, GO TO ERROR
tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
+SCTUP POINTER TO DATA
1CHECK IF DATA IS CORRECT
;CHECK FPS
;0K GO ON
1IN, GO TO ERROR
;ALL ERRORS TO TRAP TO EMT VECTOR
iUNIQUE ERROR NUMBER

sADDRESS OF ERROR MESSAGE

;SETUP POINTER TO DATA
:1202TEST INSTRUCTIONase
;GET FPS
1IS RS CORRECTY
1 YES GO ON
iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
;SETUP POINTERS TO DATA
H

GLOBAL

ARE AS
KDJ11A .MAC

2567
2368
2569
2570
2571
2572
2573

2574
2575
2576
2577
2578
2579
2580
2581
23582
2583
2584
2585
2586
2587
2588
23589
2590
2591
2392
2593
2595
23596
2597
2598

2599

2600
2601
2602
2603

2605
2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2618
2619
2620
2621
2622

MACY11l

15 MAR 84
004767

011426
011432
011436

020327
001403

011440
011442
011444
011446
011452
011456
011460
011464

104200
000160
002013
012705
170665
170203
020527
001403

011466
011470
011472
011474
011500
011504
011510
011514

104000
000161
002013
012705
012702
004767
020327
001403

011516
011520
011522
011524

104000
000162
002013

011524

000167

15:51

15 MAR 84

132

16:58

000076
000200

012701
022522

011540
011542
011544
011546
011550

104000
000163
002013
077106
000207

001403

177777
1772777
177777
177777
000377
175436
136477
000001
000177
175436
136477
000001
077777
177777
177777
177777
000377

TEST

PAGE

JSR

CcHP

eEQ

ERROR

001136
000020

001136

001156
oll622
000020
000204

+WORD
.WORD
MOV

ABSD
STFPS
cHP
BEQ

ABSD

SEQ N0S3

PC,CHEC30

R3,0200
44

160
FPPERR
@TSTLOC,R5

20(R5)
R3
RS5,8TSTLOC
S

161
FPPERR
#TSTLOC+20,RS
#153005,R2
PC,CHEC30

8EQ

R3, 0204

ERROR
WORD
.WORD

162
FPPERR

JHP

FIN3O

CHECS0: MOV
1$:
cHP
8EQ

®4,R1

000102

1CHECK

IF DATA IS CORRECT

1CHECK FPS

;O GO ON
tNO, GO TO ERROR
1ALL ERRORS TO TRAP TO EMT VECTOR
JTUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
sSETUP POINTER TQ DATA
1060TEST

INSTRUCTIONess

1GET FPS
IS5 RS CORRECTY
s YES GO ON

iNO,

ERROR
JWORD
.WORD
MOV
MOV
JSR

cHP

64:

011530
011534
011536

011552
011554
011556
011560
011562
011564
011566
0115790
011572
011574
011576
011600
011602
011604
011606
011610
oi1612

30A(1052)

sALL

GO TO ERROR

ERRORS

TRAP

TO EMT

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
1SETUP POINTERS TO DATA

VECTOR

1CHECK IF DATA IS CORRECT
1CHECK FPS
sOK GO ON
iNO, GO TO ERROR

sALL ERRORS

TO TRAP

TO EMT

IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

VECTOR

ERROR
WORD
MORD

28:
]

¥53000:

S08

(R5).,(R2).
28
163

FPPERR

R1,1

RTS

. WORD
. WORD

1172107
1777717

LWORD

177777

753001

.WORD
LWORD
JMWORD

377
175436
136477

1S3002:

JHORD
LWORD
.WORD
.WORD
LWORD

177
175436
156477
1
77777

LWORD
.WORD

177772
177777

1S30D3:

153004
:

LMORD

.WORD

L7772

s INIT COUNTER
1 IS DATA CORRECT

s YES GO ON

iINO, GO TO ERROR
:ALL ERRORS TD TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

sADDRESS OF ERROR MESSAGE
1ARE WE DONE
1RE TURN

KbIRTh.ARE">

2677

2678

Ol1e1l4
011616
011620
011622
011624
011626
011630
011632

15 MAR.QY

16:3B¢ PAGE,Se

175436

136477

000001
000000
000000
000000

TS30D05:

000000

FIN3O:

S5EQ

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

.WORD

}

011632

TSFP31:
;|“‘““‘.‘“‘...“““‘.“‘0.000““‘000.‘0“.“0.00

1o TEST

TEST FDST

SOP MODE

“00000“0‘

2 GR7

1106880000000 0400000080000004040080400000000800000608000000000006000

012702
022227
001403
104000
000165
002013

011732
011736
011742
011744
011746
011750

012701
022227
001403
104000
000166
002013

011752
011754

077107
012637

011760

000167

011764
011764
011766
011770

104000
000167
002012

000005

TSD31:

000204

011664
000005

000003
000240

INC
CLR

MOV

1s:

o11712
011716
011722
011724
011726
011730

170102
170527

167146

002122
000004
011764
000200

000240
000240
000240
170203
020327
001403
104000
000164
002013

005267
005037
013746
012737
012702

TST33:

011632
011632
011636
011642
011646
011654
011660
011662
011666
011670
011672
011674
011676
011702
011704
011706
011710

wiv

2623
2624
2625
2626
2627
2628
2629
2630
2631
2632
2633
2034
2635
2636
2637
2638
2639
2640
2641
2642
2643
2644
2645
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660
2661
2662
2663
2664
2665
2666
2667
2668
2669
2670
2671
2672
2673
2674
2675
2676

1sTRAR'ALSP8LAES)

44:

MOV
MOV
LDFPS
TSTD

NOP
NOP
NOP
STFPS
crp
8EQ
ERROR
. WORD
. WORD

#TSF31,004
#200,R2
R2
*

R3
R3, 0204

164

FPPERR

MOV

#15031.2,R2

BEQ
ERROR
. WORD
.WORD

CcHp

MOV

c
8EQ

(R2).,05
165

FPPERR
o3,.R1

(R2)+,0240

ERROR
.WORD
.WORD

FPPERR

S08

Ry, 3¢

MOV
000010

$TESTN
SOTRPFLG
804, -(SP)

166

s INCREMENT TEST NUMBER
1CLEAR TRAP FLAG

1SAVE

TIMEQUT VECTOR

1SETUP NEW VECTOR
$sSETUP TG LOAD FPS
sSEV FDe-)
$00sTEST

INSTRUCTIONese

1GET FPS
1CHECK FPS
;0K GO ON
1ALL ERRORS T0O TRAP T0O EMT VECTOR
tUNIQUE ERROR MUMBER
sADORESS OF ERROR MESSAGE

sNO GO YO ERROR
1SETUP POINTER TD DATA

1 IS DATA CORRECT
1YES GO ON

sALL ERRORS TO TRAP T0 EMT
sUNJQUE ERROR NUMBER

VECTOR

1ADDRESS OF ERROR MESSAGE

sNO GO 10 ERROR
s INIT COUNTER
3 IS DATA CORRECTY

1 YES GO OM

sALL ERRORS TO TRAP T(O EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
1NO GO 10 ERROR
JARE WE DONE

tRESTORE VECTOR

JMP

FINSt

ERROR
+WORD
. WOROD

167

FPPERR

tALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
100D ADDRESS TRAP

0054

RbIPIn ARE">
A

(sARAYAL SP8LAY
M

{

52)

MAR

DS
16:38PAGES530p MoDE 2 GR?

188

79
2873

72
o2

2681

011774

FIN31:

2683

011774

tsrps2.

000006

RTT

SEQ 0055
JRE TURN

1108480040008
"YESY
3‘
404000000400
YESV
00000000 ‘.“‘.“...‘.‘.‘.“‘“.““‘..
MGF

gggz

“.“‘

2687

01177‘

2688

011774

005267

2691
2692
2695
2694
2634

012006
012010
012014
012020
012020

170105
012701 000014
012704 001136
012703
012210
012703

2697
2697

012030
012030

170767

2699

012036

012705

2701

012046

004767

2703

012056

001403

%g;;:.“.““““."......‘.“““““‘

.‘0.““‘.“.““‘..‘..“‘

)

3689 012000 005037 ooaiaa
2090 012008 005005

2696 012026 077102
170767

loos:

167102

2700 012042 015702 8?558
000114

5;85 012052 020327 000000
2705
012060 oooggg
104
2705
012060
2707 012064 002013
2708 012066 170767

2709 012072 170203
10

012074

167054

BORPE
R
PTG

g
P 10 LoAS¢

508

R1 :565“‘)‘

‘xgéruéE35NEOCArI°N

3¥§§58§23

LOFPS
MOV
MOV
MOV
HOv
g$g;s

’

3711 012100 012705 Ousoee

2712 012104 004767 000056

{

;grLoc

PC,CHECS2

8EQ

1 oE
T Forg LOR0 FPS
VINIT Sou
Frs e ol
EToP
:3ETUP POINTER
POINTER 7O
TO JEST
TEST LOCATION
VALUE
:'EE?TEE; INSTRUCTIONs
s
:

1SETUP POINTERS 70 DATA
:

RS, 00

:E:Eg: g;smYA IS coRrecT

ERROR

170

WORD
NEGF

FPPERR
TIST

TALL
1ALL ERRORSo
TO TRAP TQO EMT VECTOR

STFPS

MoV

JSR

g;fi 012110 020327 000010

RS
012..R1
#TSTLOC.Ra
#TS3300.R
#153200,R3

JSR

cHe

18:

NUMB

I
CLR

"55 gg gg

RS Loc-10

eTciseg asTM®
PC,CHEC 2

R3. 810 32

e DoNEes oF
b
4
:
&3 TR LooshcE

'&E?‘%&E INSTRUCTIONe»e

;

§SETUP POINTERS TO DATA
:

ORRE

'g’ég ;;Sonu IS coRmecr

2714

012114
012114

001403

8€Q

2716
2716

012116
o12116

104
oooggg

RROR
Euoao

- WORD

rpéenn

STFPS
HOV
MOV

R3 Loc.20
oTST
crssggg’gg'as

LGET FRg STRUCTIONSs.
IR
1SETUP POINTERS TO DATA

:x?(n Ggoo?o ERR

2718 012122 002013
2719

012128

170767

012142

767

27
?

012152

001403

BEQ

2727
2727

012154
Q12154

104000

104

e:ggg

167026

2720 012130 170203
2721 012132 012705 001156
g;gg 012136 012702 012260

’

0000,

gzgg 012146 823337 oooogg
2729 012160 002013

g;go

912160

NEGF

832

2’

TST

SS'E?‘C’E
,

"WORD

FPEER

JMP

FIN32

MOV

04 ,R1

ERR

:.gs 020070 Erron

tALL
ERROR
sALL ERRORS

;wmxu €

RROR .

;

3y %t

2738

012166

000i67
012701

000102
000004

CHEC32:

VECTOR

e
o alE
ORRE

TALL
1ALL ERRORS TO%
TRAP TO EMT VECTOR

retdoor i
:

ERROR

012162

TO EMT

'E:EE: E:SDATA IS CORRECT

g;gg

TRAP

{INIT COUNTER

MESSAGE

012172
012174

022522
001403

012176
012200
012202
012204
012206

104000
000173
002013
077106
000207

012210
012212
012214
012216
012220
012222
012224
012226
012230
012232
012234
012236
012240
012242
012244
012246
012250
012252
012254
012256
012260
012262
012264
012266
012270

170000
003541
177777
172710
070000
003541
1777717
172710
000177
100000
177777
177007
070000
003541
1777277
172710
170000
003541
177777
172710
000000

HARTg:

Eo
16:?ESTPGEEF56

1$:

CcMP
BEQ
ERROR

2s:
i

793200

TS3201:

.WORD
. WORD
S08

153204
:

153205

000000

177777
177007

173

FPPERR

R1,1$

. WORD
.WORD
.WORD
. WORD
.WORD
.WORD

170000
3541
177777
172710
70000
3541
177777

. WORD
.WORD
.WORD

FIN32:

SEQ 0056

+IS DATA CORRECT
1 YES GO ON

tNO,

. WORD
.WORD
. WORD
.HWORD
753203:

(R5)+,(R2).
24

RTS

2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2745
2746
2747
2748
2749
2750
2751
2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767
2768
2769
2770
2771
2772
2773
2774
2775
2776
27717
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790

ISHQ 51643?g§g?52)

5558888848

GLOBAL ARE AS
KDJ11A MAC

GO TO ERROR

tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1RDDRESS OF ERROR MESSAGE

1ARE WE DONE
s RETURN

172710
177
100000
177777
177007
10000

3541
177777
172710
170000
3541

177777

372710

1777727
177007

1sFP3S;

012270

5100408000800 0880408030040000000000400000000008000046000800008000008

soTESY 35
012270
012270
012274
012300
012304
012306
012312
012316
012322
012324
012326
012332
012334
012340
012344
012350
012354

TEST NEGD

3008888000080 0880080000800000000880000000008880008000000008000000800

005267
005037
012705
170105
012701
012704
012703
012324
077102
170767
170203
012705
012702
004767
020327
001403

166510
002122
000200

TST3S:

000014
001136
012506

e2,,R1

100%:
166604

001136
012536
000114
000200

STESTN

SOIRPFLG
$200,R5
RS
#T5TLOC,
R4
07S33D0,R3

(R3)+,(R4).
R1,1008

TSTLOC
R3
OTSTLOC.RS
#1533D3,R2
PC,CHEC33
?3.0200

1 INCREMENT TEST NUMBER
1CLEAR TRAP FLAG
1SETUP TO LOAD FPS

1SET FD=1
1 INIT COUNTER
tSETUP POINTER YO TEST LOCATION

1SETUP PQINTER TO TEST VALUE
tINIT TEST LOCATION
$1ARE ME DONE
100aTEST
1GEY FPS

INSTRUCTIONeee

1SETUP POINTERS T0O DATA
$

;CHECK IF DATA IS CORRECT

1CHECK FPS

10 GO ON

012460

000167

012464
012470
012472

012701
022522
001403

012474
012476
012500
012502
012504

104000
000177
002013
077106
000207

012506
012510
012512
012514
012516
012520
012522
012524
012526
012530
012532
012534
012536
012540
012542
012544

170000
003541
177777
172710
070000
003541
177777

ERROR

CHEC3S:
18:

53301;

172710

000177
100000
177777

153302;

070000
003541
177777
172710

TS33D3;

177007

RS
0TSTLOC+20,RS
#TS3305,R2
PC,CHEC33

§§.0204

MOV
cp

MR
(R5)+.(R2).

BEQ

t53300:

FPPERR
TSTLOC.20

FIN3S

ERROR
2%:

175

JMP

3s;

FPPERR

000102

174
FPPERR
TSTLOC+10
R3
@TSTLOC+10,RS
27S3304,R2
PC.CHEC33
R3,0210

104000
000176
002013

ce
8EQ

012452
012454
012456
012460

001156
012556
000020
000204

S08

RTS

170203

012705
012702
004767
020327
001403

28:

ERROR
.WORD
.WORD
NEGD
STFPS
MOV
MOV
JSR

012426
012430
012434
012440
012444
012450

166530

o
BEQ

012422

001146
012546
000056
000210

104000
000175
002013
170767

1$:

012414
012416
012420

166556

ERROR
.WORD
. WORD
NEGD
STFPS
MOV
MOV
JSR

104000
000174
002013
170767
170203
012705
012702
004767
020327
001403

012356
012360
012362
012364
012370
012372
012376
012402
012406
012412

2791
2792
2793
2794
2795
2796
27197
2798
2799
2800
2801
2802
2803
2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816
2817
2818
2819
2820
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836
2837
2838
2839
2840
2841
2842
2843
2844
2845
284¢

15 1A 84 T8(4P2) 15 MAR.RE 16138 PRER,S

GLOBAL ARE RS
KDJ11A
. MAC

176

177
FPPERR
R1,18

170000

3541

1777

172710
70000

3541
17
172710
177
100000
1772777
177007
70000
3541
17772727

172710

SEQ 0057

iNO, GO TO ERROR
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
; ADDRESS OF

1848TEST

ERROR MESSAGE

INSTRUCTIONsss

tGET FPS
sSETUP POINTERS TO DATA
H

tCHECK

IF DATA IS CORRECT

;CHECK FPS
;0K GO ON
iNO, GO TO ERROR
$ALL

ERRORS

TRAP

T0 EMT

sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
166sTEST INSTRUCTIONsss
sGET FPS
;SETUP POINTERS TO DATA

VECTOR

sCHECK IF DATA IS CORRECT

;CHECK FPS
10K GO ON
iNO, GO TO ERROR
tALL ERRORS TO TRAP T(Q EMT VECTOR
;UNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

s INIT COUNTEFR
1 IS DATA CORRECT
1 YES GO ON
siNO, GO 10 ERROR
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
1ARE WE DONE
sRE TURN

2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882
2883
2884
2885
2886
2887
2888
2889
2890
2891
2892
2893
2894
2895
2896
2897
2898
2899
2900
2901
2902

012546

012550
0125352
012554
012556
012560

012562
012564
012566

MACY1}

15-M R-84S?gsé?52) 15 "ARng 16:?ESTPQEEDSG
170000
003541
177777
172710
000000
000000
000000

TS3304:

.WORD

.WORD
.WORD
.WORD
.WORD

TS33D05:

.WORD
.WORD
.WORD

000000

FIN3S:

5EQ 0058

170000
3541
177777
172710

0000

GLOBAL AREAS
KDJ1.1A
MAC

012566

MFSRCMO;
1108088000000 0400000048000800400400600480408808004000

1+TEST 36
005267
012704
170104
012702
172407

012606
012610
012614
012616
012620
012622

170201
022701
001403
104000
000200
002013

012636

012640

012642
012646
012650
012652
012654

ILLEGAL

800000680004004

AC7

1308880008880 0004000004000080004030000000008800008088

012566
012566
012572
012576
012600
012604

012624
012626
012632
012634

TEST LOD MODE O,

170312
022722
001403
104000

166212
047600

TST36:

001106

1%:

INC
MOV
LOFPS
MOV
LoD

STFPS
cHP
BEQ

147600

ERROR

. WORD
.WORD

000002

2%:

STSY

cp
BEQ

ERROR

000201

002013

022722
001403
104000
000202
002013

0880400400400848

012604

3s:

012656

M.ODM2:

SRECFEC,R2
R7,ACO

R1
#147600,R1

200

FPPERR

(R2)

02,(R2).
3s

201

.WORD

FPPERR

In,4
BEQ
ERROR

. WORD

FPPERR

‘m

012656

$TESTN

047600,R4
R4

'1.0(“2)‘

202

s INCREMENT TEST NUMBER
sSETUP FPP STATUS
sLOAD FP STATUS
sPOINT TO RECEIVED FEC MEMORY
soTEST INSTRUCTION
sLOAD ACO FROM ILLEGAL AC7
$SAVE FPP STATUS

sVERIFY FER BIT SET
$BRANCH IF GOOD ERROR CONDITION
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
s ADORESS

OF ERROR MESSAGE

;THE FER BIT DIONT SEY
$SAVE FEC AND FEA
tVERIFY FEC CONTENTS
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
+FEC NE 2 (OPCODE ERROR)
IVERFIY FEA CONTENTS
1BRANCH FI GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
tFER NOT CORRECT ERROR ADDRESS

F19080404800808008800084050800000000000080080000000000000000000080

1o TEST 37

012656
012656
012662
012666
012672
012676
012700
012702

TEST LDD MOOE2

5008044200000 08800800800000000048008000000000008000000000800000020

005267
012701
012704
012702
170102
172424
170203

166122
001126
001176
047750

TST37;

INC
MOV
MOV
MOV
LOFPS
L0D
STFPS

STESTN
#RECDST,R1

#TAB1,R4
#47750,R2
R2
(R‘)"ACO
R3

1tINCREMENT TEST NUMBER
tPOINT TO RECEIVED DATA LOCATION
tPOINT T0 GOOD DATA

1LOAD GOOD STATUS
1LOAD FPP STATUS - DOUBLE,ID
106oTEST INSTRUCTION - MODE Cess
1SAVE TEST FPP STATUS

GLOBAL

AREAS

KDJ11A.MAC

2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916
2917
2918
2919
2920
2921
2922
2925
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934

2935

2936
2937
2938

2939
2940

2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952

2953
2954

2955
2956
2957
2958

MACY1l

15-MAR 84

30A(10S2)

15:51

012704
012706
012710
012712
012714
012716

174021
020203
001403
104000
000203
002013

012720
012724
012726
012730
012732

022704
001403
104000
000204
002013

001206

012734
012740
012744
012750
012754

012704
162701
004767
005767
001403

001176
000010
167176
166064

012756
012760
012762
012764

104000
000205
002013

15 MAR 84

737

16:58

PAGE 59

TEST

STO

cMe

BEQ
ERROR
. WORD
.WORD

1$:

2%:

cvp
BEQ
ERROR
. WORD
. WORD
MOV

SuUB

3s:

ACO,(R1)»

$SAVE TEST RESULT MODE 2
1VERIFY FPP STATUS
1BRANCH IF GOQD

R2,.R3
14

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER

203
FPPERR

sADDRESS OF ERROR MESSAGE
1BAD FPP STSTUS
sVERFIY AUTO-INCR

0TABL1+10,R4
28

$BRANCH IF GOOO

tALL ERRORS TO TRAP

204
FPPERR
0TAB1,R4

BEQ

TO EMT

VECTOR

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
1BAD AUTO- INCR
sPOINT TO RECEIVED DATA

#10,R1

R7,.DATVER

ERROR
.WORD
.WORD

SEQ 0059

LOD MODE2

JSR
TST

sRETURN R1

TO PROPER VALUE

sVERFIY DATA FROM FPP
$1SEE IF COUNTER=0O
s8RANCH IF GOOD COMPARE
$8AD DATA FROM FPP
stALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

COUNT

205
FPPERR

012764

MLODMS:
1108000000000 00004800004800080045000000000800000000000000860060800048

;oTEST 40

012764
012764
012770
012776
013002
013010
013014
013020
013022
013024
013026
013010
013034
013036
013040
013042

013044
013050

TEST LDD MODE

1308840040084 088040800000808000040000000000000080800000800008080008004800

005267
012737
012701
012737
012704
012702
170102
172434
170203
174031
022703
001403
104000
000206
002013

166014
001126
001140

001206
001136
047750

1ST40;

001140

001136

001140

013052
013054
013056

013060
013064
013066
013070

022701
001403
104000
000210

001142

18;

STSTLOC+2,R1
#TAB2,90TSTLOC

MOV
LOFPS
LDD
STFPS
STD
cw

47750,R2
R2
(R4
). ,ACO
R3
ACO,8(R1).
#47740,R3

STSTLOC,Ra

BEQ
ERROR
. WORD
.WORD

206
FPPERR

crp

#1STLOC2,.R4

8BEQ

ERROR
.WORD

2%:

S$TESTN

RECOST, DOTSTLOC 2

MOV
MOV

MOV

047740

022704
001403
104000
000207
002013

INC

MOV

207

.MORD

FPPERR

(o,

OTSTLOC 4,4}

8EQ
ERRNR
. WORD

210

: INCREMENT TEST NUMBER
sPOINTY TO RECEIVED DATA LOCATION
1SETUP STD IN HMODE 3
1POINT TO DATA TABLE
sPOINT TO GOOD DATA
1LOAD GOOD STATUS
1LOAD FPP STATUS - DOUBLE.ID
1080TEST INSTRUCTION - MODE 2ses
1SAVE TEST FPP STATUS
tSAVE TEST RESWLT IN MODE 3
IVERIFY FPP STATUS

1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

1BAD FPP STATUS

sVERFIY AUTO-INCR
1BAD AUTQ-DEC ON LDD
1ALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE
18AD AUTO-INC
1 TEST STD AUTO-IMT
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER

GLOBAL

ARE AS
KDJ11A
. MAC

2959
2960
2961
2962
2963
2964
2965
2966
2967
2968
2969
2970
2971
2972
2973
c974
2975
2976
2977
2978
2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014

013072

013074
013100
013104
013110
013114
013116
013120
013122

15 1Ak 8475049797 15 MAR. 5 1638, PRBE e s
002013
012704
012701
004767
005767
001403
104000
000211
002013

.WORD
001206
001126
167036
165724

33:

MOV
MOV

JSR
TST
BEQ
ERROR
.WORD
.WORD

013124

MLODMA;

15
EQ 0060

FPPERR

1ADDRESS

ERROR

MESSAGE

+BAD AUTO INCR
sPOINT TO RECEIVED DATA

4TAB2,.R4

ORECDST ,R1
R7,DATVER
COUNT

+POINT

TO RECEIVED DATA

1VERFIY DATA FROM FPP
1SEE IF COUNTER=O
1BRANCH IF GOOD COMPARE
tALL ERRORS TO TRAP TO EMT
1UNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

2ll

FPPERR

VECTOR

$1BAD DATA FROM FpP

1310088800808 0030000048000000000800680000800006000000006000046806000

1oTEST

TESY LOF,

STD MODE

6004

3388000408000 4000800040080400800000800000000080060000800000080080001

013124
013124
013130
013134
013140
013144
013150
013152
013156
013160
013162
013164
013170
013172
013174
013200
013202
013204
013206

005267
012701
012704
012705
170127
172415
012702
170102
172444
170203
012702
170102
174041
022703
001403
104000
000212
002013

013210
013214
013216
013220
013222

022704
001403
104000
000213
002013

001216

013224
013230
013234
013240
013242
013244
013246

012704
004767
005767
001403
104000
000214
002013

001216
166712
165600

165654
001132
001222
001256
000200

TSTAL:

INC
MOV

$TESTN
#RECOST+4,R1
#TAB3+.4,R4
#TAB6,RS
9200

1 INCREMENT TEST NUMBER
sPOINT YO RECEIVED DATA LOCATION
sPOINT 1O GOOD DATA
sCLEAR OUT ACO
1SET TO DOUBLE
sACO=0
sLOAD GOOD STATUS FLOATING
tLORD FPP STATUS
- DOUBLE, ID
1oTEST INSTRU. Tlm - MODE
4
1SAVE TEST FPP STATUS
sSET 10 DOUBLE TMMODE
1SET FPP TO DOUBLE

(RS),ACO

047550

#47550,R2
Re

é(Rl).ACO

047750

M7750,R2
R2
ACO, -(R1)

047540

1SAVE

::7540.R3

1ALL ERRORS TO TRAP TO EMT VECTOR

212

iUNIQUE ERROR NUMBER
1PDORESS OF ERROR MESSAGE
1BAD FPP STATUS
tVERFIY AUTO-DEC
1BRANCYH IF GOOD
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE
1BAD AUTO- INCR
iPOINT YO RECEIVED DATA

FPPERR

1%:

cre
8EQ

#TABS R4

213

FPPERR

2%:

MOV
757
BEQ
ERROR

.WORD

013250

3s:

013250

MLOOMS;

TEST RESWLY

IVERIFY FPP STATUS
;1BRANCH IF GOOD

0TAB3, R4

R?,DATVER

sVERFIY DATA FROM FPP

CouNY

1SEE IF COUNTER=O
1BRANCH IF GOOD COMPARE
1ALL ERRORS TO TRAP YO EMY VECTOR
1TUNIQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE
1BAD DATA FROM FPP

-id

FPPERR

$5888000088000008000008800080000030020000000008208380000000003000

1oTEST 42

TEST LDD MODE

GLOBAL

AREAS
KDJ11A, MAC

3015
2016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026

3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
3068
3069
3070

MACY1l

15-MAR-84

30A(1052)

15:51

15 MAR-84
T42

16:58
PAGE 61
TEST LDD MODE S

J5
SEQ 0061

1188880840040 800040000000080080040000008000008080

013250
013250
013254
013260
013264
013272
013276
013300
013302
013304
013306
013310
013312
013314
013316

174011
020203
001403
104000
000215
002013

013320
013324
013326
013330
013332

022704
001403
104000
000216
002013

001136

013334
013340
013344
013350
013352
013354
013356

012704
004767
005767
001403
104000
000217
002013

001176
166602
165470

005267
012701
012704
012737
012702
170102
172454
170203

165530
001126
001140
001176
047750

TSt142:

001136

00000044024000000404

INC
MOV
MOV
MOV
MOV
LOFPS

$TESTN
ORECDST,R1
OTSTLOC+2,R4
&TABL,B0TSTLOC
047750,R2
R2

.WORD

FPPERR

(o, ]

OTSTLOC,R4

LDD
STFPS
STD
cMP
BEQ
ERROR
LWORD

1%:

8€Q

ERROR
LWORD
.WORD

2%:

MOV
JSR
TST
BEQ
ERROR
LWORD

.WORD

013360

3s:

013360

MLDDMG:

8-(R4),ACO
R3
ACO,(R1)
R2,R3
1t

215

216
FPPERR
OTABL R4
R7,DATVER
COUNT
33

217
FPPERR

s INCREMENT TEST NUMBER
tPOINT 1O RECEIVED DATA LOCATION
sPOINT TO GOOD DATA
1SET UP MODE S POINTER TO DATA
sLOAD GOOD STATUS
1LOAD FPP STATUS - DOUBLE,ID
1#TEST INSTRUCTION - MODE S
$1SAVE TEST FPP STATUS
$SAVE TEST RESULT
sVERIFY FPP STATUS
1BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
$8AD FPP STATUS
s VERFIY AUTO-DEC
sBRANCH IF GOOD

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
18AD AUTO-DEC
1POINT TO EXPECYED DATA
sVERF1Y DATA FROM FPP
:SEE IF COUNTER=0
sBRANCH IF GOOD COMPARE
sALL ERRORS YO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
sBAD DATA FROM FPP

110888800084 048000000000000000000400000000800008000040800088000008084

;oTEST 43

013360
013360
013364
013370
013374
013400

TESY LDD MODE 6

31808884005480840000080000004008400000080880008000000408000800880804

005267
012701
012704
012702
170102
172464

013402
013406
013410
013414
013420
013422
013424
013426

170203
174061
022703
001403
104000
000220
002013

013430
013434
013440
013444

162701
062704
004767
005767

165420
001326
001006
047750

TSTAS:

177600
047740

166502
165370

#TAB2-200,R4

LDFPS
LDD
SIFPS

w2
200(Ra) ACO
A3

STD
cHe
BEQ

1%:

2%:

S$TESTN

RECDST+200,R1

MOV
MOV

000200

000200
000200

INC

MGV

477150 ,.R2

ACO, -200(R1)
847740, ,R3
13

ERROR
LMWORD
.WORD

220
FPPERR

SuUB

€200,R1

JSR

R7,DATVER

ADD

TS8T

#200,Re

COUNT

1 INCREMENT TEST NUMBER
t+POINT TO RECEIVED DATA LOCATION
;SETUP R4 FOR MODE 6
;1LOAD GOOD STATUS

iLOAD FPP STATUS - DOUBLE.,ID
1LOD MODE 6
1SAVE TEST FPP STATUS
1SAVE TEST RESWLY
sVERIFY FPP STATUS
1BRANCH IF GOOD
tALL ERRORS YO TRAP TO EMT VECTOR
1UNJQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
18AD FPP STATUS
1R1=RECDST
tPOINT

TO EXPECTED DATA

iVERFIY DATA FROM FPP
1SEE IF COUNTER=0

GLOBAL AFEARS
KDJ11A
. MAC
3071
3072
3073
3074
3075
3076

3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098
3099

3100
3101
3102
3103

3104

3105
3106
3107
3108

3109
3110
3111
3112
3113
3114
3115
3116
3117
3118
3119
3120
3121
3122
3123
3123
312%
3176

013450
013452
013454
013456

MACY11l

15-MAR 84

30A(1052)

15:51

15 MAR 84

143

16:58

001403
104000
000221
002013

PAGE 6

TEST LS6 HBOE 6

BEQ
ERROR

.WORD
'WORD

013460

3s:

013460

MLODM7:

SEQ@ 006

1BRANCH IF GOOD COMPARE
1ALL ERRORS TO TRAP TO EMT

221
FPPERR

JUNIQUE ERROR NUMBER
ADDRESS OF ERROR MESSAGE
1BAD DATA FROM FPP

VECTOR

H ;‘..‘.‘.““““‘.“““.“““““.““‘.““‘.‘.“.

1+TEST

TEST

LDD

MODE

““..““‘

gg““““““““““““‘““.."“““““‘C“‘.

013460
013460
013464
013470
013472
013500
013504
013506
013512
013514
013516
013520
013522
013524
013526

002013

013530
013532
013534
013536
013540

005704
001403
104000
000223
002013

013542
013546
013552
013556
013560
013562
013564

012704
004767
005767
001403
104000
000224
002013

005267
012701
005004
012727
012702

170102
172474
170203
174011

165320
001126
001176
047750

INC

MOV
CLR
MOV

001136

MOV
LOFPS
LDO
STFPS
STD
cHP

001136

020203
001403
104000

000222

1%:

001176
166374
165262

“““.‘.“.“

15744;

MLDM27:

;BRANCH IF GOOD
;ALL ERRORS TO TRAP TQ EMT VECTOR
{UNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE

TST

sLOAD GOOD STATUS
1LOAD FPP STATUS - DOUBLE. Io
1 6TEST INSTRUCTION - MOOE
7
:SAVE TEST FPP STATUS
;SAVE TEST RESULT
{VERIF* £PP STATUS

:BAD FPP STATUS
sVERFIY CONTENTS OF R4

6EQ
ERROR
JWORD
'MORD

223
FPPERR

:BRANCH IF GOOO
{ALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER
;gggagfs OF ERROR MESSAGE

MOV
JSR

#TABL,R4
R7,DATVER

:POINT TO RECEIVED DATA
;VERFIY DATA FROM FPP

BEQ

1BRANCH IF GOOD COMPARE

224
FPPERR

{UNTQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
:BAD DATA FROM FPP

.MORD
_MORD

013566

047750,R2
R2
8TSTLOC(R4),ACO
R3
ACO,(R1)
R2,R3

222
FPPERR

ERROR
3s:

s INCREMENT TEST NUMBER

1POINT TO RECEIVED DATA LOCATION
1R4=0
1POINTER FOR MODE 7 GOOD DATA

BEQ
ERROR
.MORD
'MORD

TST

013566

$TESTN

ORECDST,R1
R4
OTABL,8TSTLOC

COUNTY

1SEE IF COUNTER=0

1ALL ERRORS TO TRAP TO EMT VECTOR

F 3.“..“".“““‘.Q““‘Q‘.““....“‘..‘..“““‘.“....‘...‘.

16 TEST 45

013566
013566
013572
013576
013602
013606
013610
013612
013616

TEST LDD MODE 27 - ONLY 16 BITS ARE LOADED OR STORED

F ‘“‘.“‘.‘.““".““.‘..“‘..“".“.‘“.....‘..‘.““..“....

005267
012701
012704
012702
005005
170102
172427
005205

165212
001126
001236
047750

TST4S:

INC

MOV

MOV
MOV

CLR

043243

LOFPS
LDD
INC

STESTN

1INCREMENT TEST NUMBER

@TABS R4

+POINT TO GOOD DATA

ORECOST R

t1POINT TO RECEIVED DATA LCCATION

#47750,R2

1LOAD GOOD STATUS

R2
95205 ,ACO
R3

{LOAD FPP STATUS - DOUBLE.ID
16TEST INSTRUCTION - MODE 27

RS20

GLOBAL

AREAS
KDJ11A
. MAC

X127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145
3146

3147

3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168
3169
3170
3171
3172
3173
3174
3175
3176
3177
3178
3179
3180
3181
3182

MACY11l

15-MAR 84

013620
013622
013624
013630
013632
013634
013635

005205
005205
022705
001403
104000
000225
002013

013¢40

170203
174011

30A(1052)

15:51

15 MAR 84

T4S

16:58
PAGE 63
TEST LOD MODE

INC
INC
CMP
BEQ
ERROR
+WORD
.WORD

000003

1s:

0136.42
013€44
013650
013652
013654
01365¢

022703
001403
104000
000226
002013

047740

013660
013664
013670
013672
013674
013676

u04767
005767
001403
104000
000227
002013

166262
165150

STFPS
STD

CHP
BEQ
ERROR
. WORD
. WORD
28:

013700

3s:

013700

MNNRML
:

JSR
TSY
8EQ
ERROR
. WORD
.WORD

LS
27

SEQ

ONLY 16 BITS ARE LOADED OR STORED

RS
RS
#3,RS

1 TEST PROPER PC PATH
$VERIFY ONLY 3 PC INCREMENT

$BRANCH IF PROPER PC ACTION

sALL

225

ERRORS

tUNIGQUE

FPPERR

TRAP

ERROR NUMBER

TO EMT

VECTOR

tADDRESS OF ERROR MESSAGE
1BAD MODE 27 LOAD

R3
ACO,(R1)
447740,R3
2%

1SAVE

TEST FPP STATUS

$SAVE TEST RESWLT
tVERIFY FPP STATUS
1BRANCH IF GOOD
$ALL

226

ERRORS

TRAP

TO EMT

tUNIGUE ERROR NUMBER
s ARDDRESS OF ERROR MESSAGE
t1BAD FPP STATUS

FPPERR

R7,DATVER

VECTOR

sVERFIY DATA FROM FPP

COUNT

sSEE IF COUNTER=0
1BRANCH IF GOOD COMPARE
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
:1BAD DATA FROM FPP

227

FPPERR

§10004000000804008000008000000008040080000800000000004800060646008084800

soTEST 46

TEST ADOF,

ADDD, SUBF,

SUBD - ACO=0 FSRC=0;

P5000880000000000800060080000000000848000000000000000808000004048000080

013700
013700
013704
013710
013714
013720
013724
013726
013730
013732
013734
013740
013742
013744
013746

170102
172414
172014
170203
022703
001403
104000
000230
002013

013750
013754
013756
013762
013766
013770
013772
013774

012701
174011
004767
005767
001403
104000
000231
002013

oo1126

013776
014002

012702
170102

040200

005267
012704
005067
005067

012702

165100
001256
165216
165214

TSTA6:

INC

MoV

040000

STESTN

#TAB6 R4
.4
RECDST
RECDST.6

#40000,R2
R2

(R4),ACO
(R&4),ACO

RS
#40004 ,R3
is

040004

230

FPPERR
13:

166164
165052

ORECOST,R1
ACO.(R1)
R7 ,DATVER

COUNT

231

FPPERR

2¢:

#40200,Re
R2

s INCREMENT TEST NUMBER

sPOINT TO FSRC TEST DATA
1CLEAR OUT RECEIVED DATA TABLE
s

:SET UP GOOD STATUS
sLOAD FPP STATUS. FLOATING
sLOAD ACO WITH O
$0+0

1SAVE STATUS
sVERIFY STATUS

1BRANCH IF GOOD
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

1BAD FPP STATUS

iPOINT TO RECEIVERD DATA
t SAVE DATA
sVERIFY DATA
$

1BRANCH IF GOOD
tALL ERRORS TO TRAP TQ EMT VECTOR
tUNIQUE ERROR NUMBER
{ADDRESS OF ERROR MESSAGE
18AD DATA IN ACO
tLOAD FLOATING STATUS
3

0063

HREANS
¥ MAC

HAEY[&

15-MAR

014004
014006
014010
014012
014014
014020
014022
014024
014026

172414
172014
174011
170203
022703
001403
104000
000232
002013

014030
014034
014040
014042
014044
014046

004767
005737
001403
104000
000233
002013

014050
014052
014054
014056
014062
014064
014066
014070

172414
173014
170203
022703
001403
104000
000234
002013

014072
014074
014100
014104
014106
014110
014112

004767
005767
001403
104000
000235
002013

014114
014120
014122
014124
014126
014130
014134
014136
014140
014142

170127
172414
173014
170203
174011
022703
001403
104000
000236
002013

014144
014150
014154
014156
014160
014162

004767
005767
001403
104000
000237
002013

174011

SOA(AOSZ)

15:51

MAR_84

T46

16:58
PAGE 64
TEST ADDF, ADDD,
LDD
ADDD

040204

166112
001040

3s:

443

040204

166046
164734

4%
:

S5%:

165776
164664

ACO,(R1)
R3

JSR
TST

R7,DATVER
0COUNT

014164

7%:

014164

MNNRMD»

ACO=0 FSRC=0,;

+LOAD ACO WITH O
1¢TEST INSTRUCTION
$1SAVE DATA
1 SAVE FPS
s VERFIY STATUS

#40204 ,R3
34

$BRANCH IF GOOD

232
FPPERR

8EQ
ERROR
.WORD
.WORD

443

LOD
SUBD
STFPS

(R4),ACO
(R4),ACO
R3

233
FPPERR

iBAD FPS

1BAD ACO

234
FPPERR
ACO,(R1)
R7,DATVER

8EQ
ERROR
.MORO
.WORD

LOFPS
LDO
SUBF
STFPS
STD
crp
BEQ
ERROR
JHORD
.MORD

#0
(R4) ACO
(R4),ACO
RS
ACO,(R1)
#4 RS
6%
236
FPPERR

JSR

R7 . DATVER

BEQ
ERROR
.WORD
.WMORD

iVERFIY DATA
sVERIFY RESWLT
sBRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER

s ADDRESS OF ERROR MESSAGE
1SETUP DATA
:oTEST INSTRUCTION

iALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

:1BAD FPS

COUNT

235
FPPERR

sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

; SAVE STATUS
sVERFIY STATUS
$1BRANCH IF GOOO

040204 ,R3
49

ST0
JSR
TSY

suBD

(R4),ACO
(R4),ACO

STD
STFPS
cMP
BEQ
ERROR
.WORD
.WORD

cHP
8EQ
ERROR
.WORD
.WORD

SUBF,

;sADDRESS OF ERROR MESSAGE
i SAVE ACO DATA
;VERFIY DATA
:

;BRANCH IF GOOD
;ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

18AD ACO
1STORE FPP STATUS

;LOAD ACO

:10-0

18AD FPS

s SAVE STATUS
;1SAVE ACO
sVERFIY STATUS
;BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

1 VERIFY DATAT

TST COUNT

237
FPPERR

:BRANC

IF GOOD

:8AD ACO

tALL ERRORS 10 TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

SEG

NH0sK4

GLOBAL

AREAS

KDJ11A . MAC

MACY11l

30A(1052)

15-MAR 84 15:51

3239

3264

3265
3266
3267
3268
3269
3270
3271

3272
3273

3274
3275

3276
3277
3278
3279
3280
3281
3282
3283
3284
3285
3286
3287
3288
3289
3290
3291
3292
3293
3294

PAGE

?SST ASSF.%UBD

1o TEST 47

3241

3254
3255
3256
3257
3258
3259
3260
3261
3262
3263

T47

16:

N5
FSRC=0, ACO NE O

SEQ 0065

1108080008 0884004408008044400000080880088800000400080048000840040084

3240
3242
3243
3244
3245
3246
3247
3248
3249
3250
3251
3252
3253

15 MAR-84

014164
014164
014170
014174
014200
014204
014210
014212
014214
014216
014220
014222

005267
012701

012705
012704
170127
172415
005002
170102
172414
172015
170203

164614
001126

174011
022703
001403
104000
000240
002013

014242
014246
014252
014256
014260
014262
014264

012704
004767
005767
001403
104000
000241
002013

001226
165674
164562

014266
014272
014274

170127
172414
173015

000200

014302
014306

014310
014312
014314
014316
014322
014326
014332
014334
014336
014340

1S747:

091256
001206
000200

014224
014226
014232
014234
014236
014240

014276
014300

TEST ADDF,SUBD

FSRC=0,

ACO NE O

JI0008400004000000000400300408000000800480004080480008000000000

STF
cMP
8EQ
ERROR
.WORD
.WORD

000000

1%:

2%:

000200

001226
165620
164506

sPOINT TO SOURCE DATA TABLE
$sPOINT TO ACO DATA
1SET TO DOUBLE FOR CLEAR
3

R2
R2
(R4),ACO
(R5),.ACO
RS3
ACO,{R1)
@0 ,R3
1
240
FPPERR

LOFPS
LDD
SUBD

#200
(R4),ACO
(RS5),AC0

MOV
JSR
157
8EQ
ERROR
.WORD
.MWORD

s INCREMENT TEST NUMBER
1POINT TO RECEIVED DATA TABLE

9TAB6,RS
#TAB2,R4
2200
(R5),ACO

0TABA4 R4
R7,DATVER
COUNT
24

cp
BEQ
ERROR
LMORD
.MORD
3%:

$TESTN
ORECOST,R1

MOV
JSR
TSY
BEQ
ERROR
LWORD
.WORD

STFPS
STD

104000
000242
002013

012704
004767
005767
001403
104000
000243
002013

INC
MOV

MOV
MOV
LOFPS
LOD
CLR
LOFPS
LOF
RADOF
STFPS

170203
174011

022703
001403

0044

241
FPPERR

R}
ACO,(R1)

€200,R3
3
242
FPPERR

4TAB4 R4
R7,DATVER
COUNT
41

243
FPPERR

tBAD FPS

sSETUP FPP STATUS
sLOAD FPS
sLOAD ACO
s#TEST INSTRUCTION
1SAVE STATUS
1 SAVE ACO
sVERFIY NEGATIVE RESULT
sBRANCH IF GOOD
sALL ERRORS 1O TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
sADDRESS OF ERAOR MESSAGE
sPOINT

TO EXPECTED DATA
i VERFIY ACO
sCHECK RESULT
1BRANCH IF GOOD
:ALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE FRROR NUMBER
;ADDRESS OF ERROR MESSAGE

+BAD ACO
tSET STATUS TO DUOBLE NODE
sLOAD ACO WITH A VALUE
14TEST INSTRUCTION
iSAVE FPP STATUS
$ SAVE ACO

tVERIFY RESWLT
$BRANCH IF GOOD

sALL ERRORS TO TRAP ~“0 EMT VECTOR
iUNIQUE ERROR NUMBER
1 ADORESS OF ERROR MESSAGE
1BAD SUBD
:POINT TO EXPECTED
sVERIFY ACO
:
:BRANCH IF GOOD ACO
+ALL ERRORS TO TRAP TD EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
1BAD ACO

014342

MNNRMS;
(100808000004 840008000000000048000000004000008000000000000000400000
s#TEST 50
TEST ADDD, SUBF
FSRC NE O, ACO+0
Fi008400800000080000000400004000800000008000000000000800000s00000s

Bé
]

GLOBAL AREAS
KDJ11A . MAC

MACY1l 30A(1052)
15 MAR 84 15:51

15 MAR 84
150

16:58
PAGE 66
TEST ADDD, SUBF

3295
3296
3237
3298
3299
3300
3301
3302
3303
3304
3305
3306
3307
3308
3309
gg{g

014342
014342
014346
014352
014356
014362
014366
014370
014372
014374
014376
014400
014404
014406
014410
014412

005267
012701
012705
012704
012702
170102
172415
172014
170203
174011
022703
001403
104000
000244
002013

3312
3313
3314
331S
3316
gg%g

014414
014420
014424
014426
014430
014432

004767
005767
001403
104000
000245
002013

165526
164414

3319
3320
3321
3322
3323
3324
3325
3326
3327
3328

014434
014440
014442
014444
014446
014450
014454
014456
014460
014462

170127
172415
173014
170203
174011
022703
001403
104000
000246
002013

000200

3330
3331
3332
3333
3334
3335
3336

014464
014470
014474
014500
014502
014504
014506

012704
004767
CO5767
001403
104000
000247
002012

3338
3339
3340
3341

014510

44:

014510

MNNRMA

3329

3337

3342
3343
3344

3345
3346
3347
3348
3349
3350

014510
014510
014514
014520
014522
014526

164436
001126
001256
001176
000200

1ST150:

000210

18:

2%:

000200

001446
165452
164340

Ss:

INC
MOV
MOV
MOV
MOV
LOFPS
LDD
ADDD
STFPS
STD
cHp
8EQ
ERROR
LHORD
.MORD

JSR
1ST
BEQ
ERROR
.WORD
LMORD

LDFPS
LOF
SUBD
STFPS
STF
o
BEQ
ERROR
LHORD
,WORD
M0V
JSR
157
8EQ
ERROR
. WORD
SORD

FSRC NE O,

$TESTN
ORECDST,R1
0TAB6,RS
0TAB1,R4
0200,R2
R2
(RS),ACO
(R4),ACO
/3
«20,(R1)
#210,R3
14

s INCREMENT TEST NUMBER
1POINT TO RECEIVED DATA TABLE
1POINT TO ACO DATA TABLE
tPOINT TO FSRC DATA
sSETUP FPP STATUS
1LOAD FPS
sLOAD ACO
1¢TEST INSTRUCTION
1SAVE STATUS
1SAVE ACO
tVERFIY NEGATIVE RESWLT
1BRANCH IF GOOO
sALL ERRORS TO TRAP T0O EMT VECTOR
tUNIQUE ERROR NUMBER
8AD ",SMDDRESS OF ERROR MESSAGE

244
FPPERR

R7,DATVER
COUNT
24

]

245
FPPERR

0200
(R5),ACO
(R4),ACO
RS
ACO,(R1)
#200,RS
33
246
FPPERR
*TADL8 R4
R7,DATVER
COUNT
as
‘47
FOPERR

IVERFIY ACO
sCHECK RESWLY
1BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
84D ACOMDDRESS OF ERROR MESSAGE

164270
003240
001276
001306

TS151;

INC
MOV
LOFPS
MOV
MOV

STESTN
3240, ,R2
R
OTAB? R4
#TABS,RS

VECTOR

$SET STATUS 1O DUOBLE NODE
sLOAD ACO WITH A VALUE
10TEST INSTRUCTION
1SAVE FPP STATUS
$SAVE ACO
sVERIFY RESULY
sBRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
s ADORESS OF ERROR MESSAGE

1BAD SUBD

18AD ACO

sPOINT TO EXPECTED DATA
SVERIFY ACO
:
sBRANCH I+ GOOD ACO
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

1506000000058000000080000000008000000000800000000000000808000000000
soTEST 51
TEST
ADDF, SUBD - EXP(ACO) « EXP(FSRC)
J10000080000000008000000000008000000000050000000008000000000000000

005267
012702
170102
012704
012705

SEQ 0066

ACO=0

1 INCREMENT TEST NUMBER
1SET FIU,FO.FY
1SET FSRC
1SETUP ACO

Cé

RBOTIR.ARETMS 1s"BAR'4P8LAP52) 15 MAR
B4 16198 PAGEIBT (g,
3351
3352
3353
3354
3355
3356
3357
3358
3359
3360
3361
3362
3363
3364
3365
3366
3367
3368
3369
3370
3371
3372
3373
3374
3375
3376
3377
3378
3379
3380
3381
3382
3383
3384
3385
3386
3387
3388
3389
3390
3391
3392
3393
3394
3395
3396
3397
3398
3399
3400
3401
3402
3403
3404
3405
3404

014532
014536
014540
014542
014544
014550
014554
014560
014562
014564
014566

014570

014574

014600
014604
014606
014610
014612
014614
014620
014624
014626
014630
014632

012701

172415

172014
174011
012704
004767
005767
001403
104000
000250
002013
012704
012703
012702

170102
172413
061400
174011

004767
005767
001403
104000
000251

001126

001306
001306
003200

MOV

ORECDST,R1

JSR

ACO,(R1)
4TAB9,R4
R7,DATVER

LDD
ADOD
STD
MOV

001316
165372
164260

TST
BEQ
ERROR
. WORD
.WORD

1¢:

MOV
MOV
MOV
LOFPS
LDD

ADD
ST

165326
164214

JSR
ST

BEQ
ERROR
. WORD
.WORD

002013

014634

2%:

014634

MXDF 1

EXP(ACO)

SEQ no67

EXP(FSRC)

tPOINT TO RECEIVED DATA
1LOAD ACO

(R5),ACO
(R4),ACO

1¢TEST

INSTRUCTION

1SAVE TEST RESWLT
1POINT TO EXPECTED DATA
$VERIFY ACO DATA

COUNT

$BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

250

FPPERR

1BAD ADDD

@TABS R4
0TABS ,R3
#3200 ,Re
R2

1SETUP SAME ACO
1ROUND MODE

(R3),RCO
(R4),ACO

sLOAD ACO

soTEST

ACO,(R1)
R7,DATVER

INSTRUCTION

sSAVE DATA
iVERIFY ACO

COUNT

$BRANCH IF GOOD
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADORESS OF ERROR MESSAGE
1BAD ROUND RESWLY

251

FPPERR

110000046004840000808008000000400000000048004000800000000000

1oTEST S2

TEST ADD

EXP(FSRC)

08000000

.GT. EXP(ACO)

$10080000800500000000000400000000000000000000800000480000000

014634
014634
014640
014644
014646
014652
014656
014662
014664
014666
014670
014672
014676
014700
014702
014704

012701
012705
172415
172014
170203
174011
022703
001403
104000
000252
002013

014706
014712
014715
014722
014724
014726

012704
004767
005767
001403
104000
000253

005267

012702
170102
012704

164144
003200

TST1S2:

001336
001126
001326

0¢080008

INC
MOV
LOFPS
MOV

MOV
MOV

L00
ADDO

STFPS

STD

003200

ce
BEQ

ERROR
. WORD
«WORD
001346
165230
164116

18:

MOV
JSR
153
8€Q
ERROR
. WORD

TESTN
#3200,R2
R2
OTABL),
R4
ORECOST,R1

#TAB10.RS
(RS),ACO

(R4),ACO
R3

ACO,(R1)
:2200.“3

2%
FPPERR

,
R4
OTABL1A

R7,DATVER

COUNTY
28

253

s INCREMENT TEST NUMBER

sR2<FPP STATUS

1LOAD FPS STATUS
sPOINT TO FSRC DATA
1POINT TO ACO RESWLY
1POINT TO ACO DATA
1LOAD ACO DATA
toTEST

INSTRUCTIONS

iSAVE FPP STATUS
1SAVE ACO DATA

tVERIFY FPP STATUS
18RANCH IF GLOD

tALL ERRORS 10 TRAP TO EMT VECTOR
IUNIQUE ERROR NAMBER
s ADORESS OF ERROR MESSAGE

1BAD FPP STATUS
1POINT TO EXPECTED DATA

1VERIFY CONTENTS OF ACO
3

tBRANCH IF GOOD ACO
tALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER

LLOBAL

ARE AS

KDJ11A.MAC
3407

3408

3409
3410

014730

MACY1]l

30A(1052)

15 MAR 84 15:%1
012704
172415

001356

3412
3413
3414
3415
3416
3417
3418
3419

014742
014746
014750
014754
014760
014762
014764
014766

012704
174011
004767
005767
001403
104000
000254
002013

001376

3421
3322
3423
3424

015006

012702
012704
012705
172415

003000
001406
001416

3425

014770
014774
015000
015004

3426
3427
3428
3429
3430
3431
3432

015010
015012
015016
015020
015024
015030
015034

172014
170127
174011
012704
004767
005767
001403

3420

014740

104000
000255
002013

3437
3438
3439
3440
3441

015044
015050
015052
015054
015056

012705
170102
172415
172014
174011

3443
3444
3445
3446
3447

015064
015070
0150784
015076
015100

004767
005767
001403
104000
000256

3448

3449

015060

015102

2%:

012704

165172
164060

3s:

000200

001326
165116
164004

001426

4%;:

001436

#TAB12,R4
(R5).ACO

MOV
STD
JSR
TST
BEQ
ERROR
.WORD
.WORD

0TAB13B,R4
ACO,(R1)
R7,DATVER
COUNT
.1 ]
254
FPPERR

MOV
MOV
MOV
LDD

#3000,R2
0TAB14,.R4
#TAB15,RS
(R5),ACO

002013

MNGOP
;

3458

015104

(R4),ACO
0200
ACO, (R1)
4TABL10,.R4
R7,DATVER
COUNT
4%

255
FPPERR
*TAB16,RS
R
(RS),ACO
(R&4),ACO
ACO,(R1)

JSR
757
B8EQ
ERROR
LMORD

R7,DATVER
COUNY
58

LWORD

015104

(R4),ACO

MOV
LOFPS
LOF
ADOF
STD

MOv

165056
163744

3454

015104
015110
015114
015116

MOV
LDD

ERROR
LHORD
LMORD

S$:

3459
3460
3461
34562

FPPERR

ADDF
LOFPS
STD
MOV
JSR
TST
8EQ

015104

3455
3456
3457

.WORD

LOFPS

3450

3451
3452
3453

Es1PABb *Pexecrsrey .6T. Expcaco)

ADDD

170102

015036
015040
015042

3442

16:

172014

3433
3434
3435

3436

183

002013

014732
014736

3411

15 MAR

#TABL7,.RA

256
FPPERR

SEQ noe8

1ADDRESS OF

ERROR MESSAGE

t8AD ACO, SHOWD = FSRC
tPOINT
sACO

TO FSRC DATA

$oTEST

INSTRUCTION

tPOINT TO EXPECTED RESULT
1SAVE ACO DATA INTO RECDAY
{VERIFY DATA

$BRANCH IF GOOD DATA
1ALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
$ADDRESS OF ERROR MESSAGE

VECTOR

1BAD ACO DATA

tGET FPP STATUS DATA
sPOINT TO FSRC DATA
sPOINT TO ACO DATA
sLOAD ACO
sFPP

STATUS

FLOAT,

INTERRUPTS ENABLE

5o TEST INSTRUCTION
sRESEY TO DOUBLE
tRECOST=ACO
1POINT TO GOOD DATA
$VERFIY CONTENTS OF ACO
3
1BRANCH IF GOOD

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

18AD FLOATING ADD

1POINT TO ACO DATA
1FPP STATUS « FLOAT
1LOAD ACO
soTEST INSTRUCTION
3SAVE ACO
DATA
1POINT TO GOOD DATA

sBRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER

1 ADDRESS OF ERROR MESSAGE

1BAD FLOATING ADD

15000000060000000000400800040000000000008880000000000000000000800
1o TEST 53
TEST ADDD WITHM NEGATIVE OPERANDS
§1008800600000080000000000000000000000000006008000000000000800¢808008

005267
012702
170102
012704

163674
003209

001456

15753

INC
MOV
LDFPS
MOV

S$TESTN
#3200,.R2
R2
#TAB21 R4

t INCREMENT TEST NUMBER
1LOAD FPS VALUE
i
1DATA ADDRESS FOR ACO AND FSR

GLOBAL

AREAS
KDJ11A.MAC

3463
3464
3465
3466
3467
3468
3469
3470
3471
3472
3473
3474
3475
3476
3477
3478
3479
3480
3481
3482
3483
3484
3485

3486
3487
3488
3489
3490

3491
3492
3493
3494
3495
3496
3497
3498
~399
3500
3501
3502

3503
3504
3505
3506
3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517
3518

MACY11l

15-MAR 84

30A(1052)

15:51

015146
015150

172414
172014
170203
012701
174011
022703
001403
104000
000257
002013

015152
015156
015162
015166
015170
015172
015174

012704
004767
005767
001403
104000
000260
002013

001466

015176
015202
015206
015214
015216
015220
015222
015224
015226

012704
012701
012737

001456
001476
015230

015122
015124
015126
015130
015134
015136
015142
015144

172411
172014
170000

022703
001403
104000
000262
002013

015254
015256
015262
015264
015266
015270

012605
020527
001403
104000
000263
002013

015272
015274
015300
015304
015310
015312
015314
015316

005726
012704
004767
005767
001403
104000
000264
002013

170203
012701

174011

153

16:58

TEST

LDD

STFPS

001126

MOV

STD
cHp
8EQ
ERROR
. WORO
.WORD

003210

1¢:

164764
163652

es:

000244
100¢%:

001126

101s:

015220

001506
164642
163530

MOV
JSR
ST
BEQ
ERROR
.WORD
. WORD
U

MOV
MOV
MOV
LOO
ADDD
CFCC
ERROR
. WORD
. WORD

STFPS

MOV

ST0
crp
8EQ
ERROR
. WORD
. WORD

103200

3s:

102%:

t 6

PAGE 69

ADDD

104000
000261
002013

015230
015232
015236
015240
015244
015246
015250
015252

15 MAR 84

ADDD WITH NEGATIVE

(R4),ACO
(R4),ACO

+AC0=100200 0 0 O

$oTEST

RS
ORECDST,R1
ACO.(RL)

INSTRUCTION

1 SAVE STATUS
sPOINT TO RECEIVED DATA TABLE
$SAVE ACO DATA

:3210.R3

tVERIFY

STATUS

1BRANCH IF GOOO

sALL

257

ERRORS

TRAP

tUNIQUE ERROR NUMBER

TO €MT

FPPERR

1ADDRESS OF ERROR MESSAGE

#TAB22,R4
R7,DATVER

sPOINT

TO EXPECTED DATA

tVERIFY DATA

1BRANCH IF GOOOD
tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
$ADDRESS OF ERROR MESSAGE

260

FPPERR

!-FSRC!

!ACO!

0TAB21 .R4
€TAB23,R1
#101¢,80FPVEC

(R1),ACO
(R4),ACO

iPOINT TO FSRC DATA
sPOINT TO ACO DATA
1SETUP FP VECTOR

1LOAD ACO
1oTEST INSTRUCTION

s1COPY FPP CC

sALL ERRORS TO TRAP TO EMT VECTOR

261

FPPERR
)]
ORECOST,
A1

ACO,(R1)Y
;103200.“3
$

262

FPPERR

TST
MOV
JSR

0TAB24
. RA
R?,DATVER

{5P)+,RS
R5, 0100

1024

263

(SP).

COUNT

sUNIQUE ERROR NUMBER
1 ADORESS OF ERROR MESSAGE
160 TO ERROR
1SAVE FPP STATUS

sPOINT TO RECEIVED DATA TABLE

$1SAVE ACO DATA

sVERIFY STATUS
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
$1BAD STATYS
1GET ERROR PC
tVERIFY ERROR ADDRESS ON STACK
tBRANCH IF GOOD
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
31ADDRESS OF ERROR MESSAGE
1BAD ERROR RETURN ON STACK
tRESTORE STACK
tPOINT TO EXPECTED DATA TABLE
IVERIFY DATA

1BRANC IF GOOOD

tALL ERRORS TO TRAP TO EMT VECTOR

264

tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

FPPERR

!-ACO!

VECTOR

[

COUNT
24

MOV
Cp
BEQ
ERROR
. WORD
«WORD

TST
8EQ
ERROR
. WORD
. WORD

SEQ 0069

OPERANDS

=«

!FSRC!

1BAD ACO DATA

GLOBAL AREAS
KDJ11A . MAC

3519
3520
3521
3522
3523
3524
3525
3526
3527
3528
3529
3530
3531
3532
3533
3534
3535
3536
3537
3538
3539
3540
3541
3542
3543
3544
3545

3546

3547
3548
3549
3550
3551
3552
3553
3554
3555

3556

3557
3558
3559
3560
3561
3562
3563
3564
3565
3566
3567
3568
3569
3570

g'g';é
3573
3574

MACY11l 30A(1052)
15 MAR-84 15:51

015320
015324
015330
015336
015342
015344
015346
015350
015352
015354
015356

012704
012701
012737
012702
170102
172411
172014
170000
104000
000265
002013

015360
015362
015366
015370
015374
015376
015400
015402

170203
012701
174011
022703
001403
104000
000266
002013

015404
015406
015412
015414

012605
020527
001403
104000

015416

015420

015422
015424
015430
015434
015440
015442
015444
015446

015450
015454
015460
015464
015466
015474
015476
015500
015502
015506
015510
015514
015516
015520

015522

015524
015530

001476
001456
015360
003200

15 MAR B4
153

4% ;

000244

103s:

1044 :

001126
103200

S$:

015350

000267

012704
012701
012702
170102
012737
172411
172014
170203
012701
174011
020327
001403
104000
000271

1058:

001506
164512
163400

001526
001516
003200

000246

6%:

000244

001126

003200

002013

012704
004767

MOV
MOV
MOV
MOV
LDOFPS
LDD
RDOD

CFCC
ERROR
LWORD
.WORD
STFPS
MOV
STO
cHe
B8EQ
ERROR
LWORD
.MORD

R3
ORECDST,R1
ACO,(R1)
4103200,R3
St
266
FPPERR

(SP)+,RS
R5,0103¢
105

.MORD

FPPERR

187
MOV
JSR
IST
BEQ
ERROR
.WORD
.WORD

(SP)»
#TAB24 R4
R7.0ATVER
COUNT
63

1-FSRC?Y «

MOV
MOV
MOV
LOFPS
MOV
LDD
ADDD
STFPS
MOV
STD
ce
BEQ
ERROR
LWORD

.MORD

001536
164412

265
FPPERR

MOV
JSR

267

1POINT TO FSRC DATA
sPOINT TO ACO DATA
1SETUP FP VECTOR
1LOAD FPS VALUE
s
tLOAD ACO DATA
1¢TEST INSTRUCTION

sCOPY FPP CC
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1GO TO ERROR
$SAVE FPS
1 SAVE ACO
]
sVERFIY STATUS
sBRANCH IF GOOO
sALL ERRORS YO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
sADORESS OF ERROR MESSAGE
sBAD FPS STATUS
1GET ERROR PC
1VERIFY ERROR ADDRESS ON STACK
sBRANCH IF GOCO
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

s ADDRESS OF ERROR MESSAGE

1BAD ERROR RETURN ON STACK

tRESTORE STACK
sPOINT TO EXPECTED DATA

270
FPPERR

0TAB26 R4
#TAB2S ,R1
€3200,Re
R2
0246, 80FPVEC
(R1),ACO
(R4),ACO
RS
ORECOST, A1
ACO,(R1)
R3,43200
74

1BAD ACO

1ACO!

271

FPPERR
4TAB27,R4
R7,DATVER

SEQ 0070

OPERANDS

4TAB2: ,R4
9TAB21,R1
01043 ,80FPVEC
03200,R2
R2
(R1),ACO
(R4),ACO

MOV
ce
8EQ
ERROR
LWORD

002013

005726
012704
004767
005767
001403
104000
000270
002013

[ o

16: 58
PAB 70
EST ADDD WITH NEGATIVE

S
1BRANCH IF
GOOD
1ALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
1POINT TO FSRC DATA
+POINT TO ACO DATA
31LOAD FPS VALUE
3
sSETUP FP VECTOR
1LOARD ACO DATA
1+TEST INSTRUCTION
1SAVE STATUS
tPOINT TO RECEIVED DATA TABLE
1SAVE ACO
IVERIFY STATU3
18RANCH IF GOOD
tALL ERRORS TO TRAP YO EMT VECTOR
tUNIQUE ERROR NUMBER

BAD FPS:RDDQESS OF ERROR MESSAGE
:

tPOINT TO EXPECTED DSATA
1VERIFY DATA

GLOBAL

AREAS

KDJ11A . MAC

3575

3576
3577
3578
gggg

3581
3582
3583
3584
3585
3586
3587
3588

3589

3590

3591

3592
3593

3594

3595
3596
3597
3598
3599
3600
3601

3602

3603

3604
3605
3606
3607
3608
3609
3610
3611
3612
3613
3614

32%2

015534

015540
015542
015544
015546

015600

001403

015604
015606

000273
002013

015610
015614
015620
015624
015626
015630
015632

012704
004767
005767
001403
104000
000274
002013

015574

015602

015634
015640
015644
015646
015650
015652
015656
015660
015664
015666
015670

015672

3625
3626
3627

015720

3630

005767

001403
104000
000272
002013

0127038
012701
172411
172014
170203
012701
174011

015674
015700
015704
015710
015712
015714
015716

3629

15-MAR-84

015550
015554
015560
015562
015564
015566
015572

3617
3618
3619
3620
3621
3622
gggz

3628

MACY1l

020327

30A(1052)
15:51

15 MAR 84

T53

163300

001516
001526

8s:

001126

003200

001556
001546

10%;

001126

003200

118:

12%:

SEQ 0071

OPERANDS

COUNT

;

}
MOV
MOV
LOD
ADDD
STFPS
MOV
STD

'FSRCY!
>
0TAB2S,R4
4TAB26,R1
(R1),ACO
(R4),ACO
R3
ARECOST,R1
RCO,(R1)

8EQ

sBRANCH IF GOOD

LWORD
.WMORD

273
FPPERR

sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

MOV
JSR
TST
BEQ
ERROR
MORD
.WORD

oTAB27 R4
R7,DATVER
COUNT
108
274
FPPERR

1-FSRC! «

MOV
MOV
L0
ADDD
STFPS
MOV
STO
ce
8€Q
ERROR
LMORD

. WORD

001566
164242
163130

WITH NEGATIVE

272
FPPERR

ERROR

001536
164326
163214

ADDD

BEQ
ERROR
.WORD
.WORD

cHP

002013

012704
004767
005767
001403
104000
000276
002013

TEST

PAGE

TST

104000

012704
012701
172411
172014
170203
012701
174011
020327
001403
104000
00027S

GO
16:58

MOV
JSR
1ST
8EQ
ERROR
LWORD
. WORD

1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
H

AC!

R3, 063200

eTAB29 .R4
#TAB2S8,R1
{R1),ACO
(R&4),ACO
R3
ORECOST,R1
ACO,(R1)
RS, #3200
118

1POINT TO FSRC DATA
1POINT TO ACO DATA
sLOAD ACO DATA
1¢TEST INSTRUCTION
:SAVE STATUS
sPOINT TO RECEIVED DATA TABLE
1 SAVE ACO

;VERIFY STATUS

;ALL ERRORS TO TRAP TO EMT VECTOR

1BAD FPS

sPOINT TO EXPECTED DSATA
;VERIFY DATA
'
sBRANCH IF GOOO

tALL ERRORS TO TRAP 10 EMT VECTOR

$BAD ACO

1ACO!

278
FPPERR
CTAB29A R4
R7.DATVER
COUNT
129

sUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE

sPGINY TO FSRC DATA
sPOINT TC ACO DATA
1LOAD ACO DATA
;oTEST INSTRUCTION
sSAVE STATUS
+POINT TO RECEIVED DATA TABLE
1SAVE ACO
tVERIFY STATUS
18RANCH IF GOOD
iALL ERRORS TO TRAP TO EMT VECTOR
3UNIQUE ERROR NUFBER

B8R0 FPS;ADDRESS OF ERROR MESSAGE
3

276
FOPERR

;POINY TO EXPECTED DATA
iVERIFY DATA
i
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
1ADDRESS OF CRROR MESSAGE

015720

MSB:

VECTOR

15606060000000000000000000000000404000000000000800000000000000000

GLOBAL AREAS
KDJ11A . MAC

MACY11 30A(1052)
15 MAR 84 15:51

3631
3632
3633
3634
3635
3636
3637
3638
3639
3640
3641
3642
3643
3644
3645
3646
3647

015720
015720
015724
015730
015732
015736
015742
015744
015746
015750
015752
015756
015760
015762
015764

005267
012702
170102
012704
012701
172414
173014
170203
174011
022703
001403
104000
000277
002013

3649
3650
3651
3652
3653
3654
3655

015766
015772
015776
016002
016004
016006
016010

012704
004767
005767
001403
104000
000300
002013

001256
164150
163036

3657
3658
3659
3660
3661
3662
3663
3664
3665
3322_6,

016012
016016
016020
016022
016024
016026
016032
016034
016036
016040

012704
172414
173014
170203
174011
022703
001403
104000
000301
002013

001406

3668
3669
3670
3671
3672
3673
3674

016042
016046
016052
016056
016060
016062
016064

012704
004767
005767
001403
104000
000302
002013

3648

3656

3675
3676

3677

3678

3679
3680

163060
003200

001456
001126

003204

3685
3686

15 "Aflrgz

001256
164074
162762

016066

1¢:

2s:

3s:

MOV
JSR
TST
B8EQ
ERROR
. WORD
.WORD

300
FPPERR

MOV
L0D
SUBD
STFPS
STD
cHp
8EQ
ERROR
.WORD
. WORD

#TAB14 R
{R4),ACO
(R4 ),ACO
RS
ACO,(R1)
#3204 R}
3

MOV
JSR
187
B8EQ
ERROR
.WORD
. WORD

#TABS R4
R7.DATVER
COUNT
4t

tBAD FPS STATUS

18AD ACO

sPOINT

TO FSRC AND ACO DATA
sLOAD ACO DATA
;oTEST
INSTRUCTION
1 SAVE FPS
s SAVE ACO INTO RECOST
tVERIFY FPS
1BRANCH IF GOOD
;ALL. ERRORS TO TRAP 10O EMT VECTOR
IUNIQUE ERROR NUMBER
BAD ACO;AODRESS OF ERROR MESSAGE

301

FPPERR
'

tPOINT

TO EXPECTED DATA
iVERIFY ACO

1BRANCR IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER

302

FPPERR

sPOINT TO EXPSCTED DATA
1VERIFY ACO
H
sBRANCH IF GOOO
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

18BAD ACO

1ADDRESS OF ERROR MESSAGE

MNRM ;
10084068 0000080000080400008080000600000000300000000000000000¢

ssTEST 5%

016072
016076

O0TAB6 ,R4
R7,.DATVER
COUNT
2

016066

016066
016066

5EQ 0072

1#TEST 5S4
TEST SUB WITH EXP[ACO)*EXP{FSRC])
J100000400000000000400048000008040000800800040000000600040000000400
TST154:
INC
$TESTN
s INCREMENT TEST NUMBER
MOV
43200.R2
sLOAD FPS DATA
LOFPS
R
1LOAD FPS
MOV
@TAB21 ,R4
1POINT TO FSRC DATA
MOV
ORECDST,R1
sPOINT TO ACO RECEIVED DATA TABLE
LOD
(R4),ACO
1LOAD ACO
sSuUBD
(R4),ACO
$sTEST INSTRUCTION
STFPS
R3
$ SAVE STATUS
STD
ACO,(R1)
1SAVE ACO INTO RECDST
cHP
03204 ,R3
IVERIFY STATUS
BEQ
1
sBRANCH IF GOOD
ERROR
tALL ERRORS TO TRAP TQO EMT VECTOR
.WORD
271?
tUNIQUE ERROR NUMBER
. WORD
FPPERR
s ADDRESS OF ERROR MESSAGE

003204

3681

3682
3683
3684

Ho
16:58
PAGE 72
TEST SUB WITH EXP{ACO)=EXP[FSRC]

005267
012702
170102

162712
003200

TEST NORMALIZE

;;‘.‘..‘...‘.“‘.“‘.‘.“‘....“.‘.“..‘.““.‘.““‘0..‘0‘.“6.t
TSTS5:
INC
$TESIN
s INCREMENT TEST NUMBER
MOV
LOFPS

€3200,R2
R2

iLOAD FPS
]

GLOBAL AREAS
KDJ11A
. MAC
3687
3688
3689
3690
3691
3692
3693
3694
3695
3696
3697
3698
3699
3700
3701
3702
3703
3704
3705
3706
3707
3708
3709
3710
3711
3712
3713
3714
3715
3716
3717
3718
3719
3720
3721
3722
3723
3724
3725
3726
3727
3728
3729
3730
3731
3732
3733
3734
3735
373
3737
3738
3739
3740
3741
3742

MACY11l

15-MAR 84

30A(1052)

15:51

016100
016104
016110
o16112

012705
012701

016114
016116
016122
016124
016130
016134
016140
016142
016144
016146

170203
012704
174014
012701
004767
005767
001403
104000
000303
002013

016150
016154
016160
016162

012701
012705
172411
173015

001616
001626

016164
016170
016172
016176
016202
016204
016206
016210

012701
174011

001126

172411
173015

004767
005767
001403

15 MAR 84

155

16:58

001606

PAGE

MOV

001576

MOV

LDD

001126
001636
164012
162700

016212

2s:

016212

MUVAD:

+POINT

1POINT

(R15,ARCO

STFPS
MOV
STD

R3
ORECDST
R4
ACO,(R4)
OTAB34 ,R1

JSR

R7,DATVER

BEQ
ERROR
.WORD
.WORD

303
FPPERR

MOV
MOV
L00

#TAB32,R1
QTAB33
RS
(R1),ACO

(RS),ACO

MOV
STD

#RECDST
RY
ACO,(R1)

JSR

R7,DATVER

BEQ
ERROR
. WORD
.WORD

F1]

TO FSRC DATA

TO ACO DATA

1LOAD ACO
1#TEST INSTRUCTION
11 LEFT SHIFT
$SAVE STATUS

tPOINT

COUNT

suBaD

104000
000304
002013

2TAB31,RS

(RS),ACO

TST

163750
162636

SEQ 0073

O0TAB30,R1

SuUBD

MOV

1¢:

TEST NORMALIZE

TO RECDATA

$ SAVE ACO
TO EXPECTED DATA

sVERIFY DATA

1BRANCH IF GOOD

sALL ERRORS

TRAP

TO EMT

tUNIQUE ERROR NUMBER
1 RODRESS OF ERROR MESSAGE

VECTULR

sACO DATA
sFSRC DATA
1oTST

sLOAD ACO

INSTRUCTION

156 LEFT SHIFTS
;sSAVE DATA
s

COUNT

]

sALL ERRORS TO TRAP 10O EMT VECTOR
sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

304
FPPERR

1108080400880 000084000000000000000000000000880000800008868008466066

;oTEST S6

016212
016212
016216
016222
016224

016230
016234
016236
016240

TEST ADDD WITH OVERFLOW AND UNDERFL
OMW

13080808080 08808008000000084000000088000000808000000600000000880040

005267
012702

170102
012704
012701
172411

162566
000200

IST56:

001646

MoV

LDD

172014
170203

016242
016246
016250
016254
016256
016260
016262

012701
174011
022703
001403
104000
000305
002013

016264
016270
016274

012704
004767
005767

INC
MOV
LOFPS
M0V

001126

001256
163652
162540

1s:

(R1),ACO

(Ra),ACO
RS
ORECDST
R}

cp
8EQ

9206, R3S
1s

1SAVE FPS

ACO,(R1)

ERROR
. WORD
LHORD

305
FPPERR

MOV
JSR

&TAB6 R4
R7,0ATVER

TSt

s INCREMENT TEST NUMBER
1SETUP FLOATING POINT STATUS
1LOAD FPS
1POINTY TO FSRC DATA
tPOINT 10O ACO DATA
sLOAD ACO WITH TEST DATA
18TEST INSTRUCTION

#TAB4O,RL

ADDD
SIFPS
MoV
STD

0C0206

STESTN
#200,R2
R
S1AB40
. R4

COUNT

1BAD FPS

tPOINT TO RECEIVED DATA TABLE
1SAVE ACO RESWT
sVERIFY STATUS
sBRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

iPOINY TO EXPECTED DATA
IVERIFY DATA

GLOBAL

AREAS
KDJ11A
. MAC

3743
3744
3745
3746

3747

3748
3749
3750
3751
3752
3753
3754
3755
3756
3757
3758
3759
3760
3761
3762
3763

3764
3765

3766
3767
3768
3769
3770
3771
3772
3773
3774
3775
3776
3777
37738
3779
3780
3781
3782
3783
3784

3785
3786
3787
3788
3789
3790
3791
3792
3793
3794
3795
3796
3797
3798

016300
016302
016304
016306

MACY11l

15-MAR -84

15:51

15 MAR-84
756

001403

012702
170102
012704
012701
172411
012737
172014
170000
104000
000307
002013

016350
016352
016356
016360
016364
016366
016370
016372

170203
012701
174011
022703
001403
104000
000310
002013

016374
016376
016402
016404
016406
016410

012600
022700
001403
104000
000311
002013

016412
016414
016420
016424
01643C
016432
016434
016436

012600
012704
004767
005767
001403
104000
000312
002013

012702
170102
012737
012704
012701

172411
172014
170203
012701
174011
022703

001403

16:58
PAGE 74
TEST ADDD WITH OVERFLOW AND UNDERFLOW

BEQ

104000
000306
002013

016310
016314
016316
016322
016326
016330
016336
016340
016342
016344
010346

016440
016444
016446
016454
016460
016464
016466
016470
016472
016476
016500
016504

30A(1052)

ERROR

. WORD
. WORD

28:

MOV
LOFPS

MOV
MOV

001646
001646

LDD

000244

MOV

238

3s:

001126

ADDD

016340

S¢:

001256
163522
162410

iSETUP FLOATING POINT STATUS
;LOAD FPS

#TAB4AO R4
0TAB40O,R1

sPOINT TO FSRC DATA
sPOINT TO ACO DATA

(R1),ACO

sLOAD ACO WITH TEST DATA

4348 ,80FPVEC

1CHANGE TRAP VECTOR

RS}
#RECDST R

MOV

(SP)..RO

cw
8EQ
ERROR
. WORD
LMORD

311
FPPERR

MOV

(SP). RO

MOV
JSR

sCHECK STORED PC

H
1BRANCH IF RETURN ADDRESS IS GOOOD
1ALL ERRORS TO TRAP 10 EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

sBAD RETURN ADDRESS

sCLEAN UP STACK

sPOINT TO EXPECTED DATA
iVERIFY DATA

$BRANCH IF GOOD

812
FPPERR

1UNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

2200,R2

S8TABT R4

cHe
BEQ

sADDRESS OF ERROR MESSAGE

MOV

STFPS
MOV
STD

1BAD FPS

COUNT

MOy
L0D

IUNIQUE ERROR NUFMBER

OTABG , R4
RT .DATVER

LOFPS
MOV

1SAVE ACO
RESWLTY
sVERIFY STATUS
sBRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR

€238 ,R0
Se

sUNDERFLOW TRAPS DISABLED
MOV

s SAVE FPS
sPOINT TO RECEIVED DATA TABLE

310

FPPERR

INSTRUCTION

tFAILED TO TRAP ON OVERFLOW

ACO,(RY)
€101206,R3
48

.WORD

ADDD

000204

VECTOR

STFPS
MOV

. WORD
MORD

000244

TO EMT

sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

187

78:

TRAP

307
FPPERR

ERROR

001126

41200,R2
R2

1sTEST

8EQ

000200

1BAD ACO

ERRORS

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

(R4),ACO

.WORD

sBRANCH IF GOOD

sALL

CFCC
ERROR
.WORD
.WORD

STD
cp
8EQ
ERROR

101206

002106
001276
001656

306
FPPERR

;OVERFLOW TRAPS ENABLED

001200

016350

SEQ

MR DTRP ,QeFPVEC

®TABAL RS
(R1),ACO

1ALL ERRORS TO TRAP T0O EMT VECTOR

1BAD ACO

1SETUP FLOATING POINT STATUS

:LOAD FPS

iREPLACE MILD TRAP VECTZR

1POINT YO FSRC DATA

1POINTY TO ACO DATA
;LOAD ACO WITH TEST DATA

(Ra4),ACO

1+TEST INSTRUCTION

#204 ,R3
as

+SAVE ACO
RESWLTY
s VERIFY STATUS
1BRANCH IF GOOD

RSB
MRECDST R1
ACO,(R1)

1SAVE FPS
1POINY T0 RECEIVED DATR TABLE

n074

GLOBAL

AREAS
KDJ11A, MAC

3799
3800
3801
3802
3803
3804
3805
3806
3807
3808
3809
3810
3811
3812
3813
3814
3815
3816
3817
3818
3819
3820
3821
3822
3823
3824
3825
3826
3827
3828
3829
3830
3831
3832
3833
3834
3835
3836
3837
3838
3839
3840
3841
3842
3843
3844
3845
3846
3847
3848
3849
3850
3851
3852
3853
3854

MACY11

15-MAR-84

016506
016510
016512

000313
002013

016514
016520
016524
016530
016532
016534
016536

012704
004767
005767
001403
104000
000314
002013

016540
016544
016546
016554
016560
016564
016566
016570
016572
016574
016576
016600
016602
016606
01661¢C
016614
016616
016620
016622

15,51

15 MAR 84
156

104000

012702
170102
012737
012704
012701

172411
172014
170000

170203
012701
174011

022703
001403
104000
000316
002013

001403
104000
000317
002013

016642
016644
016650
016654
016660
016662
016664
016666

005726
012704
004767
005767
001403
104000
000320
002013

012605
020527

012702
170102
012737
012704
012701

[<ey
16:58

PAGE

001256
163422
162310

8s:

. WORD
. WORD

313
FPPERR

MOV
JSR
TST

0TAB6,R4
R7,DATVER
COUNT

B8EQ

ERROR

. WORD
.WORD

016600

001276
001656

93:

000244

MOV
MOV
MOV

11%;

001126

102210

128:

016570

MOV

LOFPS

108 :

L0D
ADDD
CFCC
ERROR

1BAD FPS

13s:

163272

162160

1BAD ACO

14¢:
000244

MOV

1BAD ¥PS

TO EMT VECTOR

sADDRES" OF ERROR MESSAGE

1POINT TO EXPECTED DATA

IVERIFY DATA

148

18RANCH IF GOOD

1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

320

FPPERR

B8R0 Atoc‘DUlESS OF ERROR MESSAGE
3

- NON-ZERO RESWAT

SOWLDTRP ,8#FPVEC
#TAB42 R

TO TRAP

:GET ERROR PC
IVERIFY ERROR ADDRE
3S ON STACK
1BRANCH IF GOOO
tALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
;8AD ERROR RETURN ON STACK
iRESTORE STACK

R7,DATVER
COUNTY

*TAB4AL R4

STATUS

s SAVE FPS
sPOINT T0 RECEIVED DATA TABLE
1SAVE ACO
RESWLT
;VERIFY STATUS
1BRANCH IF GOOD
iALL ERRORS TO TRAP TO EMTY VECTOR
1tUNJQUE ERROR NUMBER

(SP).

MOV

VECTOR

sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
sFAILED TO TRAP ON UNDERFLOW

S4TABSA R4

#200.R2
w2

TO EMT

sL0OPO ACO WITH TEST DATA
INSTRUCTION

sALL ERRORS

317
FPPERR

MOV
LOFPS

MOV

1RAP

;ADDRESS OF ERROR MESSAGE

;oTES)

316

sUNDERFLOW WITH TRAPS DISBLED

000200

sREPOSITION TRAP VECTOR
sPOINT TO FSRC DATA
sPOINY 1O ACO DATA

#102210,R3
12¢

(SP)..RS
RS, #1108
15¢

LHORD

ERRORS

:COPTY FPP CC

MOV
cre

VECTOR

sSETUP FLOATING POINT

(R1),ACO
(R4),ACO

FPPERR

ERROR
. WORD

TQ EMY

sLOAD FPS

0114 ,80FPVEC
#TAB7,R4
4TAB41 R}

MORD

B8EQ

TRAP

sPCINT TO EXPECTEC DATA
iVERIFY DATA

42200,R2

R3S
MRECDST,RY
ACO,(R1)

JSR
187

tUNIQUE ERROR NUMBER

STFPS
MOV
STD
cp
BEQ
ERROR
LMWORD

ERRORS

;BRANCH IF GOOD

FPPERR

315
FPPERR

MOV

€@ 0075

tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

sALL

314

.MORD
LWORD

8EQ
ERROR
LORD
WORD

001246

002106
001656
001666

sALL

;UNDERFLOW TRAPS ENABLED

002200

TEST ADDD WITH OVERFLOW AND UNDERFLOW

ERROR

104000
000315
002013

016624
016626
016632
016634
016636
016640

016670
016674
016676
016704
016710

30A(1052)

1SETUP FLOATING POINT STATUS
1LOAD FPS

iRESTORE TRAP VECTOR
tPOINT 1O FSRC DATA

1POINT

TO ACO DATA

GLOBAL AREAS
KDJ11A, MAC
3855
3856
3857
3858
3859
3860

3861
3862
3863
3864
3865
3866
3867
3868
3869
3870

3871

3872
3873
3874
3875
3876
3877
3878
3879
3880
3881
3882
3883

3884
3885
3886

3887

3888
3889

3890
3891
3892
3893

3894
3895
3896

3897
3898
3899
3900
3901
3902
3903
3904
3905
3906
3907
3908
3909
3910

MACY1l

15 MAR 84

016714
016716
016720
016722
016726
016730
016734
016736
016740
016742

174011
022703
001403
104000
000321
002013

016744
016750
016754
016760
016762
016764
016766

012704
004767
005767
001403
104000
000322
002013

172411
172014
170203

012701

30A(1052)

15:51

15 MAR-84

756

16:58

TEST

L &
PAGE

ADDD

LOD
ADDD
STFPS
MOV
STD
CMP

001126

000204

8EQ

ERROR
. WORD

. WORD

001256
163172
162060

15¢:

(R1),ACO
(R4),ACO
R3
ORECDST ,R1
ACO,(R1)
9204 ,R3

sLOAD ACO WITH TEST DATA
1oTEST INSTRUCTION
1 SAVE FPS
tPOINT YO RECEIVED DATA TABLE
1SAVE ACO
RESWULTY
tVERIFY STATUS

1BRANCH IF GOOD

sALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER

321
FPPERR

MOV
JSR
TST
BEQ
ERROR

©TAB6 R4
R7.DATVER
COUNT
164

.WORD

FPPERR

. WORD

012702
170102
012737
012704
012701
172411
172014
170000
104000
000323
002013

sPOINT TO EXPECTED DATA
;iVERIFY DATA

;BRANCH IF GOOD

tALL ERRORS

322

017030
017032
017036
017040
017042
017044
017050
017052
017054
017056

170203
012701
174011
012600
005726
022700
001403
104000
000324
002013

017060
017064
017066
017070
017072

022703
001403
104000
000325
002013

102204

017074
017100
017104
017110
017112
017114
017116

012704
004767

001676
163042
161730

005767
001403
104000
00032€
002013

017030
001656
001666

164
000244

001126

18;:

8AD AcoxflDDRESS OF ERROR MESSAGE

ADDD
CFCC

(R4),ACO

:oTEST INSTRUCTION

LMORD
. WORD

323
FPPERR

ERROR

STFPS

(R1),ACO

tLOAD ACO WITH TEST DATA

sALL ERRORS TO TRAP T0Q EMT VECTOR

IUNIQUE ERROR NMUMBER
+ADDRESS OF ERROR MESSAGE
iINO TRAP ON UNDERFLOW
1SAVE FPS

1oV

MRECOST,RL

MOV

(SPY+ RO

1SAVE STACK CONTENTS

oy ]
B8EQ

#a78,.R0
198

sVERIFY RETURN ADDRESS
:BRANCH IF GOOD

.MORD

324

ERRDOR
MHORD
cHp

BEQ

ERROR
LWORD
.MORD

20%:

RESWLT
1SETUP FLOATING POINT STATUS
1LOAD FPS
tRESTORE TRAP VECTOR
sPOINT 10 FSRC DATA
sPOINT T0O ACO DATA

TST

19¢:

VECTOR

#102200,R2
Re
9184 ,80FPVEC
®TABA1 R4
#TAB42 R

STD

017020

TQ EMT

MOV
LOFPS
MOV
MOV
MOV

LDD
178:

TO TRAP

sUNJIQUE ERROR NUMBER

tUNERFLOW WITH TRAPS ENABLED - NON-ZERO

102200

VECTOR

BAD FpS.ADDRESS OF ERROR MESSAGE

016770
016774
016776
017004
017010
017014
017016
017020
017022
017024
017026

SEQ 0607¢,

WITH OVERFLOW AND UNDERFLOW

MOV

;1SAVE ACO

(SP)»

FPPERR
2102204 ,R3

tALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER

1ADORESS OF ERROR MESSAGE
1BAD RETURN ADDRESS
{VERIFY STATUS

1BRANCH IF GOOD

tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
BAD FPS:flDDQESS OF ERROR MESSAGE

325
FPPERR
#TABAS R4

R7,.DATVER

BEQ
ERROR
.WORD
.WORD

214

COUNT

326
FPPERR

RESWLTY

iCLEAN UP STACK

2048

JSR
TSY

;POINT TO RECEIVED DATA TABLE

ACO,(R1)

:1POINT

TO EXPECTED DATA

1VERIFY DATA

1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

GLOBAL AREAS

KDJ11A . MAC

3911
3912
3913
3914
3915
3916

MACY1l

15 MAR-84

30A(1052)
15:51

21s:

017120

MLOC:

3944

3945
3946
3947

3948

3949
3950

M6
SEQ 0077

ADDD WITH OVERFLOW AND UNDERFLOW

$1BAD ACO

1sTEST S7

017120
017120

005267

161660

017124
017130
017132
017136
017142
017144

012702
170102
012704
012701
172411
177424

000300

017146
017152

017154
017160
017162
017164

012701
174011

022704
001403
104000
000327

017166

002013

017170
017174
017200
017204
017206
017210
017212

012704
004767
005767
001403
104000
000330
002013

017214
017216
017220

017224

017230
017232

005002
170102
012704

012701

172411
177424

017234
017240
017242
017244
017246

020427
001403
104000
000331
002013

3957
3958
3959
3960
3961
3962
3963
3964

017250
017252
017256
017260
017264
017266
017270
017272

170203
012701
174011
022703
001403
104000
000332
002013

3966

017274

012704

3965

TEST

PAGE

TEST LDCFOD,

LDCOF

1088000008000 088044400840000000800000000000000400000800400040480460004

3951
3952
3953
3954
3955

3956

16:58

11080404000 488408000040400008300080480000480008480008000006880404084080880848

3918

3943

156

017120

3917

3919
3920
3921
3922
3923
3924
3925
3926
3927
3928
3929
3930
3931
3922
3933
3934
3935
3936
3937
3938
3939
3940
3941
3942

15-MAR-84

TSTS7:

INC
s TRUNCATE
MOV
LOFPS
MOV
MOV
LDD
LOCFD

001706
001256

001126

MOV
S1D

001712

cHp
BEQ
ERROR
.WORD

.WORD

001716
162746
161634

1%:

MOV
JSR
ST
8EQ
ERROR
.MORD
.WORD

$TESIN

s INCREMENT

4300,R2
R2
#TAB4S,R4
#TAB6,R1
(R1),ACO
(R4).,ACO
ORECOST ,R1
ACO,(R1)
#TABAS+4 ,R4
13

1SETUP FLOATING POINT STATUS
1LOAD FPS
tPOINT TO FSRC DATA
sPOINT TO ACO DATA
sLOAD ACO WiTH TEST DATA
soTEST INSTRUCTION

327
FPPERR

OTAB46 R4
R7 ,DATVER
COUNT
2¢
330
FPPERR

$AUTO-INC DOUBLE MOOE

001706

001426

3¢:

000000

001756

R2
R2
#TABAS R4

LoD
LOCOF

(R1),ACO
(R4)+,ACO

MOV

001716

001126

CLR
LOFPS
MOV

44:

sPOINT TO RECEIVED DATA TABLE
$SAVE ACO
RESWLT
sVERIFY AUTO-INC
sBRANCH IF GOOD AUTO-INC
sALL ERRORS TO TRAP TG EMT
tUNIQUE ERROR NUMBER

R4 ,0TABAS.10
L3

STFPS
MOV
STD
ce
8EQ
ERROR
.WORD
.WORD

R}
RECOST,R1
ACO,(R1)
#0,R3
44

MOV

0TAB4A9 R4

331
FPPERR

332
FPPERR

VECTOR

sADDRESS OF ERROR MESSAGE
$BAD AUTO-INC
sPOINT TO EXPECTED DATA
sVERIFY DATA

;B8R0 ACO

$1BRANCH IF GOOO
sALL ERRORS TO TRAP TO €EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
$1SETUP FLOATING POINT STATUS
tLORD FPS
sPOINT TQ FSRC DATA

#TAB16,R)

c
BEQ
ERROR
. WORD
.WORD

TEST NUMBER

1POINT TO ACO DATA

iLOAD ACO WITH TEST DATA
1¢TEST INSTRUCTION
sVERIFY AUTQ-INC
1BRANCH IF GOOOD
;ALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

1BAD AUTO-INC ON DOUBLE

1BAD FPS

1SAVE FPS
1POINY TO RECEIVED DATA TABLE
1SAVE ACO
RESWLTY
tVERIFY STATUS
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMY VECTOR
sUNIQUE ERROR NUMBER
1tADDRESS OF ERROR MESSAGE
tPOINT

TO EXPECTED DATA

GLOBAL ARERS

KDJ11A, MAC

3967
3968
3969
3970
3971
3972
3973
3974
3975
3976
3977
3978
3979
3980
3981
3982
3983
3984
3985
3986
3987
3988
3989
3990
3991
3992
3993
3994
3995
3996
3997
3998
3999

4000
4001

4002
4003
4004
4005
4006
4007
4008
4009
4010
4011
4012
4013
4014
4015
4016
4017
4018
4019
4020
4021
4022

017300
017304
017310
017312
017314
017316

MACY1l

30A(1052)

004767
005767
001403
104000
000333
002013

162642

15 MAR 84

017320
017324
017326
017330
017334
017336
017340
017342
017346
017350
017352
017354

177427
005203
005203
005203
022703
001403
104000
000334
002013

017356
017362
017364
017370
017374
017376
017400
017402
017406
017410
017414
017416
017420
017422

012702
170102
012704
012701
172411
177414
170203
012701
174011
022703
001403
104000
000335
002013

017424
017430
017434
017440
017442
017444
017446

012704
004767
005767
001403
104000
000336
002013

017450
017454
017456
017462
017466
017470
017472
017474
017500
017502

012702
170102
005003

C12702
170102
012704
012701

172411
177414
170203
012701
174011
022703

15:5

1> MAR.8S 16:381PPBEF3® Locor
JSR
TST
BEQ
ERROR
.WORD
.WORD

161530

000200

;LOCFD GR?
5%:
MOV
LOFPS

CLR

043243

LOCFD
INC
INC

INC
CMP
BEQ
ERROR
.WORD
.WORD

000003

000200
001726
001706

000210

7¢:

000200

001256
001746

001126
000204

ERROR MESSAGE

05203,ACO
R3
R3
R3
#3,R3
64

soTEST

334
FPPERR

MOV

#TABAS,R4

1BRANCH IF GOOD

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
;8AD PROGRAM FLOW

sSETUP FLOATING POINT STATUS
sLOAD FPS
sPOINT TO FSRC DATA
sPOINT 1O ACO DATA
sLOAD ACO WITH TEST DATA
soTEST INSTRUCTION

(R1),ACO

JSR

R7,DATVER

B8EQ

1SAVE FPS

tPOINT TO RECEIVED DATA TABLE
iSAVE ACO RESWLT

sVERIFY STATUS

;BRANCH IF GOOO

1BAD FPS

0200,R2
R2
#TABS,
R4
#TABAS,R1
(R1),AC0O
(R4),ACO
R3
#RECDST ,RL
ACO,(R1)
0204 ,R3

sALL ERRORS TO TRAP T0O EMT VECTOR
1UNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE
s+POINT TO EXPECYED DATA
iVERIFY DATA

COUNT

336
FPPERR

INSTRUCTION

1IF LOCFO WORKED, R3 SHOMLD=3
sVERIFY CORRECT PROGRAM FLOW

#200,R2

335
FPPERR

MOV
LOFPS
MOV
MOV
LDD
LOCFD
STFPS
MOV
STD
o,

sRDDRESS OF

1SETUP FLOATING POINT STATUS
1LOAD FPS

(R4),ACO
R3
®RECDST,R1
ACO,(R1)
#210,R3
7

sLOAD A ZERO

8¢:

1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

4200,R2
R2

LOCFD
STFPS
MOV
STD
ce
BEQ
ERROR
LWORD
.WORD

ERROR
.WORD
.WORD

DATA

1BRANCH IF GOOD

+BAD ACO

R2
OTABA7
R4
#TABAS,R1

187

t+VERIFY

333
FPPERR

LOFPS
MOV
MOV

LOOD

001126

001746
162512
161400

MOV

SEQ 0078

R7,DATVER
COUNT
54

iNEGATIVE OPERANDS

6%:

$BRANCH IF GOOD

1ALL ERRORS TO TRAP TO EMT VECTOR
iUNIQUE ERROR NAUMBER

1BAD ACO

tADDRESS OF ERROR MESSAGE

$1SETUP FLOATING POINT STATUS
:LOAD FPS
tPOINY 10 FSRC DATA
1POINT TO ACO DATA
1LOAD ACO WITH TEST DATA
1¢TEST INSTRUCTION
1SAVE FPS
t1POINT TO RECEIVED DATA TABLE
1SAVE ACO RESWT
tVERIFY STATUS

GLOBAL ARE AS
KDJ11A MAC
4023
4024
4025
4026
4027
4028
4029
4030
4031
4032
4033

4034
4035
4036

4037
4038
4039
4040
4041

4042
4043
4044
4045
4046
4047
4048
4049
4050
4051
4052
4053
4054
4055
4056
4057
4058
4059
4060
4061

4062

VoS
4064
4065
4066
4067
4068
4069
4070
4071
4072
4073
4074
4075
4076
4077
4078

MACY1l

15 MAR-84

017506
017510
017512
017514

001403
104000
000337
002013

017516
017522
017526

012704
004767
005767
001403
104000
000340
002013

017532
017534
017536
017540

30A(1052)

15:51

15 MAR 84
57

16:58
PAGE 79
TEST LDCFD, LDCOF

8EQ
ERROR
.WORD
001256
162420
161306

9s:

017542

10%:

017542

MCHMPD:

1BRANCH IF GOOD

tALL

337

FPPERR

MOV

O0TABG6,R4

JSR

R7.DATVER

B8EQ

10¢

ERROR
.WORD
. WORD

56Q 0079

.HWORD

TST

tBAD FPS

ERRORS

TRAP

TO EMT

1UNIQUE ERROR NUMBER
1 RDDRESS OF ERROR MESSAGE
tPOINT

VECTOR

TO EXPECTED DATA

IVERIFY DATA

COUNT

$BRANCH IF GOOD

$tALL ERRORS

340
FPPERR

:1BAD ACO

TRAP

TO EMT

IUNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE

VECTOR

110000000000000000000000008000008000000000400500000060400008080600

1oTEST 60

3 ;....““..‘..‘...“..“‘.“‘.“"0..“.‘......“

017542
017542

017546
017552
017556
017564
017566
017574
017576
017600

017602

000

TEST CMPD

TST60:

161236
001042
000152

1
0000C2

000200
000204

017610
017614
017622
017624
017632
017634
017634

012737
004767
000000
125252
000100
000123
000200
000204

017640
017644
017650
017656
017660
017666
017670
017672

005037
004767
000400
000023
000200
000000
000200
000210

017674
017700
017706
017710
017716
017720

004767
or7777
1777717
077777
1777717

000200

000001
000114

001042

000022

000123

001042

012346

“0......00....

INC

S$TESTIN

JSR
.WORD

R7,CMPRTN
0,0,0,0

.MORD

0,0,0,0

tFSRC AT START

MORD
LWMORD

200
204

1FPS AT
sFPS AT

mov
J
.WORD

01 ,00FLAG
R? ,CMPRTN
0,0,0,125252

1SIGNAL THMAT ACO MILL -~ O
tROUTINE TO TEST DATA
$ACO AT START

. WORD

100,22,123,123

tFSRC AT START

LHORD
LMORD

200
204

1FPS AT
1tFPS AT

JSR
.WORD

R7,CMPRTN
400,12346.12346,23

tACO REMAINS UNCHANGED
sROUTINE TO TEST DATA
1ACO AT START

s INCREMENT TEST NUMBER

CMPD WITH FRSC=ACO+0
CLR
SFLAG

CMPD WITH EXP[FSRC)«0,

sSIGNAL

THAT ACO REMAINS CONSTANT

sROUTINE TO TEST DATA
tACO AT START

EXPIACO]=0

CMPD FSREO>EXP[ACO)
0
CLR
SFLAG

tFSRC AT

START

STARY
END

(D)

START

LHORD
LMORD

200
210

1FPS AT START
1FPS AT END

s CMPD FSRC+ACO»0

(D)

END

(D)

000030
177777

177777

JSR
. WORD

R7,CMPRIN
77717,-1,-1,-1

tROUTINE YO TEST DATA
1ACO AT STARY

177777

. WORD

17777,-1,-1,-1

1IFSRC AT

. WORD

200

tFPS AT

START
START

(D)

LLOBAL ARE AS
KDJ11A MAC
4079
4080
4081

01272722
017724

15HAR R SPBL 49527 15 MAR
B4 16:38. PRRE,80
000204
000167

. WORD
JMP

000126

4082

jeXaxXa)XoXoXaxXaXaXeXsXaXeXeXoXoX0XOXOXOXOXOXOXAXOXOXAXOXOXOX

4086

4104

4111

4112
4113
4114
4115

4116
4117
4118

4119

4120
4121
4122
4123
4124
4125
4126
4127
4128
4129
41.0
4131
4132
4133
4134

1FPS AT END
sHOP OVER SUBROUT INE

s COMPARE ROUTINE DATA TABLES
ACO

4087

4105
4106
4107
4108
4109
4110

204
HOPA44

jeXaXeXeXaXeXaXoXaX0X0XAXMXEXEXOXOEXOXOAXOXOXEXOXOXOXOXOXOXOX

4083
4084
4085

4088
4089
4090
4091
4092
4093
4094
4095
4096
4097
4098
4099
4100
4101
4102
4103

SEQ 0080

FIRC
FPS BEFORE EXECUTION
FPS AFTER EXECUTION

(FEC)

joXaXeXeXaXaXaXoXaX0XoXOXOXOXOXEXSXAXOXOXOXOXOXOX
XX XX
OX

jeXeXaXoXaXeXoXoX0X0XoX0XOXOXOXAXEXOXOXOXOXOXOXEXOXOX
X 0X0X

017730
017732

017736

017740
017742
017746

017750
017752
017756

017760
017762
017764
017770
017772
017776
020000
020004
020006
020010
020012
020014
020020
020022
020026
020030
020032
020036
020042
020044
020046
020050

020052
020056

020056

012605
012702
170102
010504
062704
010501

172411

016502
170102
173414
170203
012702
170102
012701
174011
026503
001403
104000
000341
002013

005737
001403
012704

000401

010504
004767
005767
001403
104000
000342
002013
000165

]

000200

CHMPRTN:

MOV
MOV

LOFPS
MOV

000010

(SP)+,RS

#200,R2
R2
RS,R4
#10,R4
RS,R1

(R1),ACO
20(R5),R2

000020

1¢:
000200
001126
000C22

CHPD

sPOINT

1SET FPP Y0 OOUBLE

34)

001256

4TABG R4
49

162110
160776

R7,DATVER

1BAD FPS

1VERIFY

DATA

1BRANCH IF GOOD
1ALL ERRORS TO TRAP TO EMT VECTOR

342

24(RS)

1SEE IF ACO REMAINS UNCMANGED

1ACO=0
DATA
160 VERIFY
1POINT YO EXPECTED DATA

COUNT

000024

1+POINT TO RECEIVED DATA TABLE
1SAVE ACO RESWLY
sVERLIFY STATUS
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
1BRANCH IF ACO STAYS THE SAME

RS ,.R4

FPPERR

10O FSRC DATA

sGET TEST fFPS
sLOAD TEST FPS
soTEST INSTRUCTION
1SAVE FPS

FPPERR

g:FLflG

AS POINTER

tPOINT TO ACO DATA
sLOAD ACO WITH TEST DATA

g%(RS).RS

001042

TO USE

(R4),ACO
RS
#200,R2
R2
ORECDST,R1
ACO.(R1)

RETURN ADDRESS

$SET_TO DOUBLE MODE FOR LOAD
1LORD FPS

1UNIQUE ERROR NUMBER

18AD ACO

1ADDRESS OF ERROR MESSAGE

1RETURN

MOIVF
:
1106600000008 08080000050000000830000000000000008000000000000000¢000

LLOBAL

ARE AY
KDJ1.1A
MAC

HAC115430A(é?52)

15 MAR

15:

MAR

4135
4136

4137
4138
4139
4140
4141
4142

4143
4144

4145
4146
4147
4148
4149
4150
4151
4152
4153
4154
4155

4156
4157
4158

4159
4160
4161
4162
4163
4164
4165
4166
4167

4168
4169
4170
4171
4172
4173
4174
a17s
4176
4177
4178
4179
4180
4181
4182
4183
4184
4185
4186
4187

4188
4189

4190

18]

16: 9851
hE5 0!

1o TEST

TEST

DIVF

JI080000A00000000C0ER00RCARIRIEINRGR00C0CECNIILIOIRALL

020056
020056

005267

160722

020062
020070
020074
020100
020104
020110
020112
020114

012737
004767
000100
000000
000100
040000
140000
000004

000002
000706
000027
000000
000027

020116
020124
020130
020134
020140
020144
020146
020150

012737
004767
000000
000100
000000
000000
100000
000004

000001
000652

020152
020156
020162
020164
020172
020176
020200

SEQ 0081

005037
004767
000177
004100
000000
007400
007404

ALALALIGIGLS

TST61:;

001042

INC
$YESTN
11/EXP{AC }=FSRC=0
MOV
02 ,80FLAG
JSR

. WORD
'WORD

001042

1 TRAPS ENABLED

MOV
JSR

000001
000566
104210
025252
104210

020236
020242
020246
020252
020256
020262
020264

005037
004767
077760
077760
040200
007414
007400

001042

020266
020272
020276
020302
020306
020312
020314

005037
004767
052525
052525
040200
007400
007400

001042
000504
052525
052525
000000

000000
104210

1FSRC

IRESULT

TEST FPS

tRESULT FPS

iFEC

1ACO

s INTERRUPT
;100 TESTY

sFSRC

tRESWLT

SOFLAG

iNO INTERRUPT

WORD
WORD
'WORD
[WORD
'WORD

177,234
4100,0
0,0
7400
7404

IRESULTY FPS

MOV
JSR

01,80FLAG
R7.0VFSUB

R7,0VFSUB

1 4/ACO>EXP(FSRC
) *0
_WORD
JWORD
"WORD
JWORD

JMORD
‘WORD

000534
1777277

1ACO

100 TEST

JSR

001042

&1 ,88FLAG
R7.0VFSUB
0,0
100.0
0.0

40200, 104210
125, 28282
40200, 104210
7557

CLA

.WORD
JWORD
.WORD
JWORD
"WORD
16/AC-FSRC

Seh
J

LMORD

JWORD
[WORD
'WORD
JWORD

TEST FPS

sRESWLY FPS

iFEC

100 TEST

;s INTERRUPTY
1D0 TEST

107557
&

1ACO
sFSRC
IRESLT
1 YESY FPS
IRESULT FPS
1FEC

BOFLAG

1NO INTERRUPT

1S7EXPIACI=EXP{FSRC)

R7,0VFSUB

77760, -1
77760.0
4020C.104210
7414
7400

B bvsue

$2%25,5252%

52525.82835
40200.0
7400
7400

TEST NUMBER

sNO INTERRUPT,

0
100000
4

1 3/FSRC>ACO=0
CLR

001042
000620
000234
000000
000000

012737
004767
040200
000125
040200
007557
107557
000004

100,27
0,0

'WORD
100,27
.WORD
40000
.WORD
140000
4
. WORD
127ACSEXP[{FSRC])
=0

WORD
'WORD
"WORD
. WORD
. WORD
'WORD

020202
020210
020214
020220
020224
020230
020232
020234

R7,0VFSUB

s INCREMENT

100 TESTY

1ACO
IRESULY

1 TEST FPS
RESULT FPS

iNO INTERRUPY
100 TEST
1ACO
1FSRC
WRESULY
1

TESY FPS

IRESWLY FPS

BUT FEC

GLOBAL

ARERS

KDJ11A
. MAC
4191
4192
4193

4194
4195
4196
4197
4198
4199
4200
4201
4202
4203
4204
420¢5
4206

4207

4208
4209

4210

4211
4212
4213
4214

4215

4216
4217
4218
4219
4220
4221
4222

4223
4224
4225
4226
4227
4228
4229
4230
4231
4232
4233
4234
4235
4236
4237
4238
4239
4240
4241
4242
4243
4244
4245
424¢

020316
020322
020326
020332
020336
020342
020344

MACY11l

30A(1052)

005037
004767
017777
040300
077652
007400
007400

001042
000454
125252
000000
070707

15 MAR 84

020352
020356
020362
020366
020372
020374

005037
004767
055377
055300
040252
000000
000000

001042
000424
1777717
000000
125252

020376
020402
020406
020412
020416
020422
020424

005037
004767
064600
066600
036200
000000
000000

001042
000374
000001
000000
000001

020426
020432
020436
020442
020446
020452
020454

005037
004767
012345
005600
044745
000017

001042
000344
156024
000000
156024

020346

020456
020462
020466
020472
020476
020502
020504

000000

005037
004767

040422
140511

140072
000057
000050

SEQ 0082

15:51

001042
000314
101010
101010
020167

020506
020512
020516
020522
020526
020532
020534

005037
004767
160077
040417
157651
000007
000010

001042
000264
000101
177777
143527

020536
020542
020546
020552
020556
020562
020564

005037
004767
060100
040300
060000
000040
000040

001042
000234
000177
000000
000124

1 7/FSRC>0<ACO,

CLR

JSR

.WORD

.WORD
.WORD
. WORD

:18/AC>0<FSRC

CLR
JSR
LMWORD
.WORD
MORD

.MORD
.WMORD
19/FSRC>AC>0

CLR
JSR
.MORD
.WORD
.WORD
.MORD
LMORD
: 107AC>FSRC>0
CLR
JSR
LMORD
LMORD
.WORD
LWORD

t111/FSRC<0
CLR

BOFLAG

iNO INTERRUFPTY

77777,125252

;ACO

R7,DVFSUB

40300,0

77652,070707
7400
7400

86FLAG
R7,0VFSUB
55377,-1
55300,0
40252,125252
O
©
SOFLAG
R7.0vFSuUB
64600,1
66600,0
36200,1
O
©

RFLAG
R7,DVFSUB
12345,156024
05600,0
44745, 156024
17

100 TEST

1tFSRC

$RESULT

TEST FPS

sRESULTY FPS

iNO INTERRUPT

s1ACO

100 TEST

1FSRC

IRESWLT

TEST FPS

tRESULT FPS
iNO INTERRUPT
s00 TEST
1ACO

sFSRC

tRESULY
s TEST FPS

iRESULT FPS

tNO INTERRUPTY
;00 TEST

1ACO
1FSRC
¢

sRESULTY

TEST FPS

tRESULTY FPS
BIFLAG

iNO INTERRUPY
100 TEST
1ARCO
1FSRC
(tRESULTY

R7,DVFSUB

LHORD
LWORD

57
S0

PFLAG

:NQ INTERRUPTY
;100 TESY
1RCO
1FSRC
RESULTY

LMORD
LWORD
LHORD

1127AC<0

ROUND

CLR

40422,101010
140511,101010
140072,20167

JSR

R7,0VFSUB

.WORD

40417,-1

LWORD

160077,101

LHORD
157651, 143527
7
LWORD
LMORD
10
s13/TRUNCATE TESY
CLR
BOFLAG
JSR
. WORD
,WORD
. WORD
LWORD
.WORD

R7,0VFSU8
60100,177
40300,0
60000, 124
40
40

TEST FPS

sRESULY FPS

TEST FPS

tRESULY FPS

tNQ INTERRUPT
100 TEST
(RESULY
1 TESTY FPS
tRESWLT FPS

GLOBAL AREARS
KDJ11A
. MAC
4247
a2a8
4249

4250
4251
4252
4253
4254
4255
4256
4257
4258
4259
4260
a261

4262
4263
4264
4265
4266
4267
4268
4269
4270
a271
4272
4273
4274
4275
4276
4277
4278
4279
4280
4281
4282
4283
4284
4285
4286
4287
4288
4289

4290
4291
4292

4293
4294

4295
4296

4297

4298

4299
4300
4301
4302

MACY1l

15-MAR 84

30A(1052)

15:51

15 MAR-84
T6l

16:58
PAGE 83
TEST DIVF

SEQ 0083

114/ROUND TEST
020566

020572
020576
020602
020606
020612
020614

020616
020624
020630
020634
020640
020644
020646
020650
020652
020660
020664

020670

020674
020700
020702
020704

020706
020714
020720
020724
020730
020734
020736
020740
020742
020750
020754
020760
020764
020770
020772
020774

005037
004767
060100
040300
060000

001042
000204
000177
000000
000125

012737
004767
177700
000200

000001
000152
000000
000000
000000

001042

000002

001042

000000
000000

137700

001100
101112
000010
012737
004767
000200
177700
000000
041100
041104
000010

000116

012737
004767
100200

000001
000062

100000
002000
102014

000001

040377

CLR
JSR
.WORD
.WORD
.WORD
.MORD
.MORD

071525
002537
102500
000012

MOV
JSR
.WORD
.WMORD
.WORD
.WORD
.WORD
.HORD

116/0VERFLOW,
MOV
JSR

.WORD
.MORD
.MORD
.WORD
.WORD
.WORD

001042

117/UNDERFLOM,
MOV
JSR
LWORD
.WORD

177777

LMORD

000012

012737
004767
030325
076777

115/0VERFLOW,

000001
000026
025252
023456
157716

001042

BOFLAG
R7,DVFSUB
60100,177
40300,0 ;FSRC
60000,125
O
O

INTERRUPTS ENABLED
#1,80FLAG
R7,0VFSUB
177700,0
200,0
137700,0
1100
101112
10

TRAPS DISABLED

{NO
JACO

JRESULT
i TEST FPS
iRESULT FPS

1F SRC

1 INTERRUPT
100 TEST
1ACO

sRESULT
1 TEST FPS
IRESULT FPS
FEC

02, 8FLAG
R7,0VFSUB

iNO INTERRUPT
;00 TEST

R7,0VFSUB
100200,0
40377,
-1

;00 TEST
1ACO
1€ SRC

200,0
1ACO
177700,0
+FSRC
0,0
JRESULT
41100
;i TEST FPS
41104
tRESULT FPS
10
1FEC OVERFLOM
TRAPS ENABLED, UV RESULT
01,80FLAG
3 INTERRUPT

100000,1

.MORD
LMORD

2000
102014

JSR

R7.DVFS5U8

iRESWLT

+ TEST FPS
IRESULT FPS

.WORD
12
+FEC
: 187UNDERFLOW,
TRAPS ENABLED. ROUND
MOV
01,00 LAG

LWORD
. WORD
LMORD
JWORD
.MORD

INTERRUPT
100 TEST

+ INTERRUP
T

100 TEST

JWORD

30325,252%2
16717,23456
71525,157716
2537
102500
12

sACO
tFSRC
IRESULT
: TEST FPS
IRESULT FPS
FEC

HOP10

160 10O NEXT TEST

020776

000167

000242

jeXaXaXaXaXN
XoXoX
X0 XXX XAXAXOXSXO
oXoXo
XSXONAXGX
XoXo
AN X
;eXeXaXoXsX0
XeXaX
X0 XoXOX0YaXOXA
oXaXo
XAXGAOXOXOXA
XeXa
XOX O AX

1DIVF SUBROUTINE;

ACO

FSRC

FPS BEFORE EXECUTION

?gécfifTER EXECUTION

GLOBAL

AREAS

KDJ11A.MAC >

MACY1l

30A(}052)

15 MAR 84 1585

L/
15 MAR 84

161

4303

4308

4309
4310
431!
4312
4313
4314
4315
436
4317

2313
1

4320

4321

021002

021004

021012
021016
021020
021022
021026
021030
021034
021036

021040

012605

012737

012702
170102
010504
062704
172415
016502
170102

021042

032737

021054

000343

4330
4331
4332
4333

4334
4335

4336
4337

4338
4339

4340

4341

4382

4343

021052

4346

4348

002013

021060

000167

021064
021072
021074
021076

032737
001005
104000
002013

021102
021106

000167
012604

021110
021112

021116

021120

021122

021124

005726
022704

001403

18:

000001

001042

(SP)+,RS

MOV
LDFPS
MOV
ADD
L0D
MOV
LOFPS

OIVF

(R4),ACO

SETF

8IT

000042
000001

001042

;LOAD ACO WITH TEST

14(RS),R2

1GET

000020

S18:

021040

1¢TEST

000345

002013

.MORD

FPPERR

8IT
BNE
ERROR

1 ,00FLAG
Si¢

. WORD

FPPERR

JP
MOV

29
(SP)+ ,Ra

TEST FPS
INSTRUCTION

;VERIFY A NO TRAP CONDITION

;BRANCH IF GOOD

$ALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER

sADDRESS OF ERROR MESSAGE
s INSTRUCTION SHOULD HAVE TRAPPED

+REJOIN CODE

1SEE IF EXPECTING A TRAP
:BRANCH IF EXPECTING A TRAP
1ALL ERRORS TO TRAP TO EMT VECTOR

344

tUNIQUE ERROR NUMBER

1 ADDRESS OF ERROR MESSAGE
s INSTRUCTION MASNT SUPPOSE TO TRAP

sREJOIN CODE
tSEE IF PC = INSTRUCTION

(SP)
213 ,.Ra

BEQ

LHORD

345

LMORD

DATA

TRAP

#1,96FLAG
343

ERROR

FPS

iWAIT FOR POSSIBLE FPA TRAP.

. WORD

TSY
e

TEST

1LOAD

.WORD

TO USE AS POINTER

1SET TO DOUBLE MODE FOR LOAD
iLOAD FPS
iPOINT TO FSRC DATA

: INSTRUCTION TRAPPED

S08:

RETURN ADDRESS

{REDIRECT TRAP VECTOR

0200,R2
R2
RS ,R4
01 ,R4
(RS),ACO

8EQ

ERROR

9508, 8OFPVEC

1 INSTRUCTION DIDNT

104000

FPPERR

1CLEAN UP STACK
3
1BRANCH IF GOOD COMPARE

1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER

1ADORESS OF ERROR MESSAGE

1PC WAS INCORRECT

021126

021130

012702

021150

001403

4355
4356

021154
021156

000346
002013

021160

010504

021144

021152

;COMMON CODE FOR TRAP AND NO TRAP

170203

4353

4357
4358

;

000344

021100

021134
021136
021142

4354

000014

MOV

)

4349
4350
4351

4352

000004

104000

021056

:g:g
4347

000200

000244

DVFSUB:

4324

4329

021068

174414

001426

2:2:5;

170001

021050

4325
4326

5eQ nosa4

0XoX
;‘X‘X‘X‘XOX‘X‘X‘X‘X‘XOX‘X‘X‘X‘XOX‘XOX‘XtX‘XAXOX‘XtXOX‘XAXOX

4322

4323

tes1 Otr

jeXaXeXoaXaXaXoXoXoXAXAXOXOXAXOXAXSXOXEXOXEXOXEXOXEXSXEX

4305

4307

PAGE

4304

4306

16:

170102
012701
174011

026503

000200

2%:

SIFPS

MOV

001126

000016

iSAVE FPS

1SET FPP TO DOUBLE

R2
SRECDST AL
ACO,(R1)

sPOINT TO RECEIVED DATA
1SAVE ACO
RESWLT

BEG

18RANCH IF GOOD

LWMORD
.WORD

346
FPPERR

tUNIOUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

MOV

R5,R4

ERROR

L1 K]

#200,R2

LDFPS
MOV
STD

104000

R3S

16(RS),R3

TABLE

1 VERIFY STATUS

1ALL ERRORS YO TRAP TO EMY VECTOR

1BAD FPS

;POINT

TO EXPECTED DATA

GLOBAL ARE AY
KDJ11A. MAC
4359
4360
4361
4362
4363
4364
4365
4366

4367
4368
4369
4370
4371
4372
4373
4374
437s
4376
4377
4378
4379
4380

438}
4382
4383
4384
4385
4386

4387
4388
4389
4390
4391
4392
4393
4394
4395

4396
4397
4398
4399
4400
4401
4402
4403
4404
4305
4406
4407
4408
4409
4410
4411
4412
4413
4414

021162
021166
oe1172
021176
021200
021202

062704
004767
005767
001403
104000
000347
002013

000010

021206
021212
021214
021220
021222
021226
021230
021232
021234
021236

005737
001002
000165

001042

016504
020401
001403
104000
000350
002013

000020

021240

000165

000022

021204

170301

as:

160736
157642

ADD

R7,0ATVFR

BEQ

TST

Ss:

000020

78:

010,R4

JSR

1tVERIFY DATA

COUNT

ERROR
.WORD
. WORD

347
FPPERR

ST
BNE
JP
STST
MOV
cHP

80F LAG
6t
20(RS)
R1
20(RS),.R4
R4 ,R1

BEQ
ERROR
.WORD
. WORD

350
FPPEMR

JMP

22(RS)

1BRANCH

sALL

1BAD ACO

IF GOOD

ERRORS

TRAP

TO EMT

sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

1SEE IF NEED TO CHECK FEC
1BRANCH IF NEED TO CHECK

tRETURN FROM TEST

iSAVE FEC

;GET FEC
IVERIFY FEC
1BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
31BAD FEC

sRETURN FROM TEST

[

021244
021244

HOP10:
MOIVD:
3100808048880 8000400800000008000000000000068008088008000000000000000

1 oTEST 62

021244
021244

TEST DIVD -

1100088800008 0000000080000000000800800800000000000600000000484806800

005267

157534

021250
021256
021262
021270
021272
021300
021302
021310
021312
021314
021316

012737
004767

000002
000516

021320
021326
021332
021340
021342
021350
021352
021360
021362
021364
021366

012737
004767

000000
000000
000000
000402
000000
000200
10200
000004

021370
021374
021400

005037
004767
034300

000402

001042

: 3/ROUND
000000

1 INCREMENT TEST NUMBER

$ACO

iNO INTERRUPY
100 TEST

. WORD

100,0,0,0

1FSRC

. WORD

0,0,0.1

IRESWLT

LWORD
HORD
LHORD

40000
140000
4

MOV
JSR
. WORD

1, 90FLAG
R7.0VO5UB
402,0,0,C

1ACO

LWORD

0,0,0,0

sFSRC

.WORD

402,0,0,0

. WORD
. WORD
. WORD

200
100200
4

: TEST FPS
IRESULT FPS
FEC

CLR
JSR
. WORD

SOFLAG
R7,0vDSUB
34300,0,0.1

1NO INTERRUPT
100 TESY
1ACO

12/FSRC=0,

000001
000446

001042
000400
000000

TST62:

INC
S$TESTN
:17AC=FSRC=0 TRAPS DISABLED
MOV
02 ,80FLAG
JSR
R7,0VOSUB
. WORD
0,0,0.1

TRAPS ENABLED

VECTOR

TESY FPS

sRESWLY FPS
iFEC
s INTERRUPY

;00 TESY

1RESWLY

GLOBAL

AREAS
KDJ1.1A
MAC
4415
4416
4417

4418
4419

4420

aa2}
4422
4423
4424
4425
4426

4427
4428

4429

4430
4431
4432
4433
4434
4435
4436
4437
4438
4439
4440
444)
4442
4443
4444
4445
4446
4447
4448
4449
4450
4451
4452
4453
4454
4455
4456
4457
4458
4459
4460
4461
4462
4463
4464
4465
4466
4467
4468
4469
4470

021406
021410
021416
021420
021426
021430
021432

021434

021440
021444
021452

021454
021462
021464
021472
021474
021476
021500

021504

021510

021516

021520
021526
021530
021536
021540
021542
021544
021550
021554
021562
021564
021572
021574
021602
021604
021606

MACY1l

15-MAR 84
000001

30A(1052)

15:51

15 MAR 24

162

16:58

TEST

PAGE 86

L/
SEQ 0086

DIVD

140300

000000

. WORD

140300,0,0,0

sFSRC

134200
000001
000200
000210

000000

.WORD

134200,0,0,1

sRESULT

. WORD
. WORD

200
210

s+ TEST FPS
tRESULTY FPS

005037
004767
034300

001042
000334
000000

000000

CLR
JSR
.WORD

80FLAG
R7,0V0SUB
34300,0,0,1

iNO INTERRUPT
;D0 TEST
1ARCO

140300
000000

000000

. WORD

140300,0,0,0

1FSRC

. WORD

134200,0,0,0

tRESWLT

.WORD
. WORD

240
250

s TEST FPS
tRESWLTY FPS

JSR
.WORD

R7,0V0SUB
177642,0,0,151

000000

. WORD

166600,0,0,123

000000

. WORD

51242,0,0,0

.WORD
. WORD

200
200

1 YEST FPS
tRESULY FPS

CLR
JSR

SFLAG
R?7,0V0SUB

177642,0.0,151

iNO INTERRUPY
:00 TEST

ACO

. WORD

166600,0,0,123

;FSRC

240
240

s+ TESY FPS
sRESULY FPS

BOFLAG
R7,0v0OSUB

iNO INTERRUPY
100 TEST

000000

000001

134200

000000
000240
000250

0CS037
004767
177642
000151
166600
000123
051242
000000
000200
000200
005037
004767

177642

000151
166600
000123
051241

177777
000240
000240

000000

;6/TRUNCATE NEAGTIVE AC, FSRC

001042
000224

000000

177777

1772777

040200
000000
007717
007700

000000

021654
021662
021666
021674

012737
004767
100200
000000

000001
000112
000000

1777707
055521
177777

:1S/ROUND NEGATIVE AC, FSRC
CLR
SFLAG

001042
000270
000000

021610
021614
021620
021626
021630
021636
021640
021646
021650
021652

005037
004767
055521

14/ TRUNCATE

001042
000160
047621

100333

047621

100333

.WORD

. WORD
LMORD
3 17AC=FSRC
CLR
JSR

LWORD
LHORD

. WORD

001042

tNO INTERRUPTY
;ACO

100

TEST

;FSRC
sRESWLY

58521,47621,100333,-1

ACO

55521.47621,100388,
-1

:FSRC

. WORO

7700

JSR

R7,0VOSUB

TEST FPS

IRESWLT FPS

$8/7UNDERFL_OW TRAPS ENABLED, UV RESWLT
MOV
21 ., 00FLAG

1t INTERRUP
Y
100 TEST

GLOBAL ARE RS
KDJ11A.MAC
4471
4472
4473
4474
4475
4476
4477
4478
4479
4480
4481
4482
4483
4484
4485
4486
4487
4488
4489
4490
4491
4492
4493
4494
4495
449¢
4497
4498
4499
4500
4501
4502
4503
4504
4505
4506

4507

4508

4509
4510
4511
4512
4513
4514
4515
4516
4517
4518
4519
4520
4521
4522
4523
4524
4525
4526

J 7

MACY11

30A(1052)

021676
021704
021706
021714
021716
021720
021722

077777
000000
140400
100201
002200
102210
000012

000000

.WORD

77777,0,0,0

100200

.WORD

140400, 100200, 100200, 100201

.WORD
.WORD
.WORD

2200
102210
12

021724
021732
021736
021744
021746

012737
004767
077000
000525
000303
140001
036650
064003
001700
101702
000010

000001
000042

021754
021756
021764

021766
021770
021772

15-HAR 84

15:51

15-MAR-84
T62

001042

16:58
PAGE 87
TEST DIVD

:197/0VERFLOW TRAPS ENABLED
MOV

JSR

SEQ 0087

1FSRC

sRESULY

+ TEST FPS
sRESULT FPS
1FEC

#1,86FLAG

1 INTERRUPT

R7,0VDOSUB

s00 TESTY

123465

012346

000001

140000

. WORD

303,1,140000,140001

sFSRC

163002

103645

.WORD

36650,163002.1C3645,64003

sRESWLT

.WORD
. WORD
. WORD

1700
101702
10

JHP

HOP11L

. WORD

77000,123465,12346,525

sACO

3 TEST FPS
tRESULT FPS
sFEC

021774

000167

000242

sHOP OVER SUBROUT INE

jeXaXaxX
X0 Xa X0 X0
eXsX
X0XOXOXEXONOXOXeXOXO
aXeX
XE XXX
oXe
XXX

jaXeXs
XXX XoX0XEXEXO
XaX
XAXOXOXOXO
aXo
XOXOXSXEXO
XeX
XOXSX
o
X
H

;OIVD SUBROUTINE:

H
3
i
L
3

ACO
FSRC
FPS BEFORE EXECUTION
FPS AFTER EXECUTION
(FEC)

taXeXaXaXaXe
XX
XsXo
XEXOXEXOX
XaXo
O XX XO
XoXo
XXX X X0
Xo
XX

jeXaXaXaXa
X0 X0 X0
XaXaX
X0 XXX XaXoXoXOXEXO
oXaXs
XOXOXEXSX0X
Xe

022000
022002
022010
022014
022016
022020
022024
022026
022032

170102
010504
062704
172415
016502
170102

022034
022036

174414
170000

012605
012737
012702

022062
000200

000244

DVOSUB:

MOV
MOV

(5P)+,RS
508 ,0FPVEC

1 RETURN ADDRESS YO USE AS POINTER
sREDIRECT TRAP VECTOR

LOFPS

1LOAD FPS

MOV

000010

MOV

RS,.Re

LDO

(R5),ACO

ADD

000030
H

14:

#200,R2

#10,R4

032737
001426
104000
000351
002013

000001

022056

00C167

000042

001042

1POINT T0 FSRC DATA

$1LOAD ACO WITH TEST DATA

MOV
LOFPS

30(R5),R2
R2

sGEY TESY FPS
iLOAD TEST FPS

DIVD
CFCC

(R4),ACO

1oTEST INSTRUCTION
i1MAIT FOR POSSIBLE FPA TRAP,

022040
022046
022050
022052
022054

1SEY TO DOUBLE MODE FOR LOAD

sINSTRUCTION DIONT TRAP
817

B8EQ

ERROR
LHORD
. WORD
JP

01, 0FLAG

351
FPPERR
as

tVERIFY

1BRANCH IF GOOD

A NO TRAP CONDITION

1ALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

1 INSTRUCTION SHOULD HAVE
1REJOIN CODE

TRAPPED

GLOBAL

ARE AS

KDJ11R.MAC
4527
4528
4529
4530
4531
4532
4533
4534
4525
4536
4537
4538
4539
4540
454]
4542
4543
4544
4545
4546
4547
4548
4549
4550
4551
4552
4553
4554
4555
4556
4557
4558
4559
4560
4561
4562
4563
4564
4565
4566
4567
4568
4569
4570
4571
4572
4573
4574
4575
4576
4577
4578
4579
4580
4581
4582

MACY1l

15 MAR -84

30A( égse)

15:

15 HAR723

16:?85Yp895068

SEQ 0088

}

022062
022070
022072
022074
022076

032737
001005
104000
000352
002013

000001

022100
022104
022106
022110
022114
022116
022120
022122

000167
012604

000020

005726
022704
001403
104000
000353
002013

001042

s INSTRUCTION TRAPPED

S08:

S1¢:

022036

8IT
BNE
ERROR

&1,86FLAG
S1¢

.WORD
.WORD

352
FPPERR

JMP
MOV
TST
cHe
BEQ
ERROR

24
(SP)+ R4
(SP).
018 .,R4
24

. WORD
.WORD

353
FPPERR

170203

012702

000200

012701
174011
026503
001403
104000
000354
002013

001126

022156
022160
022164
022170
022174
022176
022200
022202

010504
062704
004767
005767
001403
104000
000355
002013

022204
022210
022212
022216
022220
022224
022226
022230
022232
022234

005737
001002
000165
170301
016504
020401
001403
104000
000356

001042

022236

000165

000036

022242
022242

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
s INSTRUCTION WASNT SUPPQOSE TO TRAP
sREJOIN CODE
$SEE IF PC = INSTRUCTION
;CLEAN UP STACK
;
;BRANCH IF GOOD COMPARE
sALL ERRORS TO TRAP TO EMT

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

2%:

STFPS
MCV
LOFPS
MOV

STD

cHp

000032

157756
156644

354

000034
000034

FPPERR

MOV

RS .R4

4%:

JSR
TST

R7,DATVER
COUNT

68;

355
FPPERR

TST
BNE

SOFLAG
6%

34(R5)
Rl

cre

R4 R1

ERROR
. WORD
LWORD

356
FPPERP

002013

7%:

JHP

26(RS)

34{R5), R4
Ts

TABLE

sVERIFY STATUS

1IUNIQUE ERROR NUMBER

T0O EMT

;POINT

TO EXPECTED DATA
:VERIFY DATA

i BRANCH IF GOOD
sALL ERRORS TO TRAP

;BAD ACO

T0 EMT VECTOR

sUNIQUE ERROR NUMBER
stADDRESS OF ERROR MESSAGE

1SEE IF NEED 1O CHECK FEC
;BRANCH IF NEED TO CHECK
iRETURN FROM TEST
;SAVE FEC

1GET FEC

s VERIFY FEC

:8RANCH IF GOOO

iALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE
;1BAD FEC

;RETURN FROM TEST

HOP11:

MMULF;
H ;.‘l..“‘““..““.““.‘..““““.‘000‘0““.0.‘..“.“.“‘.‘

;oTEST

TEST

MULF

VvECTOR

BAD F.p!:_'xhl)DflES‘.S OF ERROR MESSAGE

P
STSY

BEQ

RESWLT

$BRANCH IF GOOO

€20 ,R4

8EQ
ERROR
. WORD
MWORD

MOV

TO RECEIVED DATA

1SAVE ACO

sALL ERRORS TO TRAP

.MORD

sPOINT

32(RS5),R3

. WORD

ADD

:SAVE FPS
;SET FPP TO DOUBLE

ACO,(R1)
3

ERROR

000020

R}
#200,R2
Re
®RECDST R}

BEQ

VECTOR

sPC WAS INCORRECT

;COMMON CODE FOR TRAP AND NO TRAP

022124
022126
022132
022134
022140
022142
022146
022150
022152
022154

170102

$SEE IF EXPECTING A TRAP
tBRANCH IF EXPECTING A TRAP
sALL ERRORS TO TRAP TO EMT VECTOR

GLOBAL ARE AS
KDJ11A. MAC
4583
4584
4585
4586
4587
4588
4589
4590
4591
4592
4593

4594
4595
4596
4597
4598
4599
4600
4601
4602
4603
4604
4605
4606
4607
4608
4609
4610
4611
4612
4613
4614

4615
4616
4617
4618
4619
4620
4621
4622
4623
4624
4625
4626
4627
4628
4629
4630
4631
4632
4633

4634
4635
4636
4637
4638

MACY11l 30A
15 MAR 84 15

052)

Eél 2

005267

156536

022246
022252
022256
022262
022266
022272
022274

005037
004767
000000
000000
000000
007517
007504

001042
000564
000000
000000
000000

022276

022302
022306
022312
022316
022322
022324

005037
004767
000200
000000
000000
000013
000004

001042
000534
000000
000000
000000

022326
022332
022336
022342
022346
022352
022354

005037
004767
000100
000300
000000
007500
007504

001042
000504
000000
000000
000000

022356
022362
022366
022372
022376
022402
022404

005037
004767
040200
040177
040177
000000
000000

001042
000454
000000

022436
022442
022446
022452
022456
022462
022464

022466
022472
022476
022502

763

5 MAR 84

16:

?ESY PAGE
MULF 89

SEQ 0089

3 ;0““00““‘0““““"““““““““‘l

022242
022242

022406
022412
022416
022422
022426
022432
022434

005037
004767
040177
040200
040177
000040
000040
005037
004767
040100
040100
040020
000012
000000

005037
004767
017500
023652

INC
$+1/RCO=FSRC=0
CLR
JSR
.WORD
.WORD

$TESTN
1 INCREMENT
-INTERRUPTS DISABLED
86FLAG
iNO INTERRUPT
R7.MLFSUB
100 TEST
0,0
1ACO
0,0
sFSRC

. WORD
:2/AC>FSRC=0 -

7504
INTERRUPTS ON

.MORD
.WORD

CLR
JSR
LMORD
.WORD
.MORD
. WORD
MORD
:3/AC=0 FSRC>0

CLR
JSR
JMORD
LMORD
.WORD
LWORD

177777

001042

000344
000000
125252

8O6FLAG
R7,MLFSUB
200,0
sACO
0,0
1FSRC
0,0
13
4

86FLAG
R7,MLFSUB
100,0
sACO
300,0
:FSRC
0,0
7500
7504

JSR
MORD
LMORD
LWORD
LMORD
LMORD

R7 ., MLFSUB
40200,0 ;ACO
40177,-1
40177-1
,
O
O

JSR
LHORD
.WORD

SFLAG
R7 MLFSUB
40177,-1
40200,0 ;FSRC

:S/TRUNCATE
CLR

000000
1772777

001042
000374
000000
000000
000000

0,0
7517

MORD
;4/AC=1 >FSRC - ROUND
CLR
SeFLAG

177777
177777

001042
000424

“““‘“““““t“t‘

TST638:

LHORD
LWORD
LHORD

$16/NORMAL
I ZE

CLR

JSR

s 7/7ROUND

.MORD
MORD
MORD
LWORD
.MORD

CLR

JSR
. WORD

.MORD

40177,
-1
40
40

S LAG

R7,MLFSUB

40100,0 ;ACO
40100,0 ;FSRC
40020,0
12
O

iRESULTY
1 TEST FPS
tRESULTANT

FPS

tNO INTERRUPT
;00 TEST

IRESWLT
3 TEST FPS
1RESULTANT FPS
iNO INTERRUPT

;100 TESTY

sRESULY
s TEST FPS
tRESULTANT FPS
1NO INTERRUPT

;D0 TEST

$1FSRC

sRESWLY

TEST FPS

IRESULTANT

FPS

iNO INTERRUPT
;100 TEST
tACO

sRESULT
TEST FPS

IRESULTANT FPS

1NO INTERRUPT
100 TESY

tRESULY
1 TEST FPS

iRESULTANT FPS

BOFLAG

tNO INTERRUPT
100 TEST

23652,125252

1FSRC

R7,MFSUB
17500,0 ;ACO

TEST NUMBER

GLOBAL
KDJU11A.
4639

4640

4641
4642
4643

4644

4645

4646
4647
4648
4649
4050
4651
4652
4653
4654
4655
4656
4657
4658
4659
4660
4661
4662
4663

4664
4665
4666
4667
4668
4669
4670
4671
4672
4673

4674
4675
4676
4677
4678
4679
4680
4681
4632
4683
4684
4685
4686
4687
4688
4689
4690
4691
4692
4693
4694

15MAR1Aa 308049520

022512
022514

022506

003177
007417
007400

1777717

022516
022522
022526
022332
022536
022542
022544

005037
004767
040342
176543
176711
007500
007510

001042

022546
022552
022556
022562
022566
022572
022574

005037
004767
144600
154000
060400
000017
000000

022576
022602

022606
022612
022616
022622
022624

005037
004767
060000
140377
160177
000017
000010

001042
000234
000000

022626
022632
022636
022642
022646
022652
022654

005037
004767
060000
140377
160177
007547
007550

001042
000204
000000
177776

022656
022664
022670
022674
022700
022704
022706
022710

012737
004767
000200
000200
040200
042117
142100
000012

000002
000152
000001
000001
000002

022712
022720
022724
022730
022734
022740
022742
022744

012737
004767
177777
040300
100077
001117
101116
000010

000001
000116
177777
000000

022746
022754

012737
004767

000002
000062

15 MAR
B4 16:38

[/
PA

SEQ 0090

. WORD
. WORD
. WORD

3177,
7417
7400

JSR
.MORD
. WORD
.WORD
.WORD
.WORD

R7,MLFSUB
40342,
-1
176543,025252
176711,67324
7500
7510

187AC>0>FSRC ROUND
CLR
84FLAG

000314
177777
025252
067324

39/IAC<FSRC<0,

001042

CLR

000264
000000
000000

JSR
.WORD

ROUND

80FLAG

R7,MLFSUB
144600,0

.WORD
154000,0
.MORD
60400,0
17
. WORD
MORD
O
:10/AC<FSRC, ROUND
CLR
SOFLAG
JSR
R7,MLFSUB
.MORD
60000,0
. WORD
140377,177776
.WORD
160177,177776
.WORD
17
. WORD
10

000000

177776
177776

;117AC>0>FSRC,
CLR
JSR
.WORD
. WORD

177776

LMORD
. WORD
JWORD

001042

R7,MLFSUB

MORD

40300,0

LHORD
LMORD
. WORD
. WORD

001042

R7,MLFSUB
60000,0
140377,177717%

160177,177776
7547
7550
1 12/UNDERFLOM, NO INTERRUPTS
MOV
22, 80FLAG
JSR
R7,M FSUB
.MORD
200,1
LMORD
200,1
LWORD
40200.2
42117
LMORD
LWORD
142100
LMORD
12
$113/70VERFLOW, TRAP
MOV
o1, 90FLAG
LMORD

177777

TRUNCATE
SOFLAG

777707-}
,
100077-2
,
1117
101116
10

;147/0VERFLOW NO TRAP
MOV
JSR

92 ,80FLAG
R7.MLFSUB

tRESULT
i TEST FPS
tRESULTANT FPS

tNO INTERRUPT
;100 TEST
1ACO

1FSRC

sRESULTY
:+ TEST FPS
tRESULTANT FPS
iNO INTERRUPT
100 TEST
sACYH
sFSRC

sRESWLT
1+ TEST FPS
iRESULT FPS

sNO INTERRUPT
;DO TEST
;ACO
3

: TEST FPS
IRESULT FPS

iNO INTERRUPT
100 TEST
tACO
;

TEST fFPS

tRESULT FPS

1ACO
tFSRC

iNO INTERRUPT
:00 TESY

1RESULY

TEST FPS

1RESULT FPS
tFEC

iFSRC

1 INTERRUPTY
100 TESY
1ACO

sRESULTY
s+ TESTY FPS
IRESWLT FPS
1FEC
tNO INTERRUPT
:00 TEST

GLOBAL AREAS
KDJ11A. MAC
4695
4696
4697
4698
4699
4700
4701
4702
4703
4704
4705
4706
4707
4708
4709
4710
4711
4712
4713
4714
4715
4716
4717

15"3251343?§$§?52‘

022760
022764
022770
022774
022776
023000

077700
077700
000000
040117
040106
000010

000000
000000
000000

023002
023010
023014
023020
023024
023030
023032
023034

012737
004767

000001
000026

100022
123465
004000
104000
000014

000000

023036

000167

000242

123465

HARYgg

4733
4734

4735

4736

4737
4738
4739
4740
4741
4742
4743

4744
4745
4746
4747
4748
4749
4750

.WORD
.WORD
.WORD
.WORD
. WORD

001042

77700,0
77700,0
0,0
40117
40106
10
. WORD
: 157UNDEF INED VARIABLE IN FSR7,
MOV
01,80FLAG
JSR
R7 ,MLFSUB

.WORD
.WORD
.WORD
. WORD
.WORD
.WORD

JMP

123465.0
100022,0
123465,0

4000

104000
14

SEQ 0091

1ACO
1FSRC
tRESULT
1+ TEST FPS
sRESULT FPS
FEC
TRAP ENABLED
s INTERRUPT
100 TEST

;ACO
$1FSRC
sRESULT

TEST FPS

sRESULY FPS
sFEC

HOP12

joXaXa
X XeX
X6 XAXaXEX0X
aXa
EXEXOXEXE
XaX
XAXSXXOXO
aXa
X0X0XEX0X

iaXaXaXeXaXeXaXaXoXa
XXX XSX0XAKEX
XoX0X
EX0XEXOXS
6XaXs
XSX X
3

ACO

}

FSRC
FPS BEFORE EXECUTION
FPS AFTER EXECUTION

4718
4719
4720
4721
4722
4723
4724
4725
4726
4727
4728
4729
4730
4731
4732

16:?85T PAG
MU

3
3

(FEC)

seXeXaXa
X0 X0 XEXX
XaXa
0N X0XoX0XeXX
XaXa
OXOXOXOXOXEXO
Xo
XX 0X

;eXaXaXaXaXoXaX6XAXoXEXOXS
NN X0 XOX0XOXOXOXEXOXSXEXOXOXEXEX
023042
023044
023052
023056
023060
023062
023064
023070
023074
023076
023100

012605
012737
012702
170102

023124
000200

000244

MLFSUB: MOV

MOV
MOV

172415

010504

062704

016502
170102

000004
000014
;

171014
170001

13:

(SP)+,RS

#3508 , 00FPVEC
#200,R2

LOFPS
LOD
MOV
ADD
MOV
LOFPS

R2
(RS),ACO
R5,R4
o4, R4
14(R5) ,R2
R2

MLF
SETF

(R4),ACO

}

023102
023110
023112
023114
023116

032737
001426
104000
000357
002013

000001

023120

000167

000042

001042

tINSTRUCTION DIONT TRAP
817
8EQ

1,80 LAG
28

ERROR
LWORD
JMORD

357
FPPERR

023124
023132
023134

032737
001005
104000

000001

001042

s INSTRUCTION TRAPPED

504 :

8Iv

BNE
ERROR

#1,80FLAG

s+ RETURN ADDRESS TO USE AS POINTER

1REDIRECT TRAP VECTOR
sSET TO DOUBLE MODE FOR LOAD
:LOAD FPS
:LOAD ACO WITH TEST DATA
tPOINT TO FSRC DATA
1GET TEST FPS
sLOAD TEST FPS

t+TEST INSTRUCTION
tWAIT FOR POSSIBLE FPA TRAP,
iVERIFY A NO TRAP CONDITION
$1BRANCH IF GOOD
;ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
$ADDRESS OF ERROR MESSAGE

s INSTRUCTION SHOULD MAVE TRAPPED
1REJOIN CODE

1SEE

IF EXPECTING A TRAP

1BRANCH IF EXPECTING A TRAP
;ALL ERRORS TO TRAP TO EMT VECTOR

GLOBAL

AREAS

KDJ11A MAC

4751

023136

MACY1l

15-MAR-84

023140

002013

4754
4755

023142
023146

000167
012604

4756
4757

023150
023152

4758
4759

023156
023160

4760

023162

4761
4;6%
476

023164

4765
4766
4767

023166
023170
023174

4764

15:51

005726
022704

001403
104000

000020

S1¢:

023100

000361

002013

170203
012702
170102

000200

026503

001403

000016

023212
023214
023216

023220

023222

023226

010504

000010
155602

004767

4780
4781

005767

02323
023240

001403
104000

4748

4789
4790
4791

023246
023252
023254

023260
023262
023266

005737
001002

156676

001042

170301
016504
020401

000020

:?’g‘S

023276

002013

4797
4798
4799

023300
023304
023304

000165

4803
4804

4805
4805

TRAP

INSTRUCTION

sCLEAN UP STACK
P

1BRANCH IF GOOD COMPARE
tALL ERRORS TO TRAP TO EMT

361

tUNIQUE ERROR NUMBER

FPPERR
WAS

$ ACORESS OF
INCORRECT

MOV
STD

#RECOST,R}
ACO,(R1)

tPOINT TO RECEIVED
$1SAVE ACO
RESWLT

ERROR
.WORD

362

.WORD

FPPERR

MOV

R5,.R4

JSR

R7,DATVFR

ADD
1ST

5%:

151
BNE

s VERIFY

1BAD FPS

68:

STSY
MOV
P

74:

JHP

sADDRESS OF

tPOINT

BAD

1BAD

TO EXPECTED DATA

ACO

TO EMT

sUNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE

1o TEST 64

(RETURN FROM

TEST

1SAVE FEC
1GETY FEC

sVERIFY FEC

14}

sBRANCH IF GOOD
1ALL ERRORS 10 TRAP 10 EMT
sUNIQUE ERROR MUMBER

364

FPPERR

lam‘o
‘_ég OF ERROR MESSAGE
]

tRETURN FROM

TEST

023310

TEST MULD

$10080000000000000000000000000000008000000000000000000000000000000

023304

005267

005037

155474

001042

TS764:

i1/AC=0

INC

S$TESTIN

CLR

BOFLAG

VECTOR

1SEE IF NEED TQ CHECK FEC
1BRANCH IF NEED YO CHECK

R1
20(RS ) ,RA
R4, RY

HOP12:
MRAD:

ERROR MESSAGE

1BRANCH IF GOOD
tALL ERRORS TO TRAP

20(R5)

22(R5)

VECTOR

sVERIFY DATA

COUNT

S#FLAG
6

STATUS

sALL ERRORS TO TRAP T0 EMT
tUNIQUE ERROR NUMBER

#10,R4

363
FPPERR

TABLE

1BRANCH IF GOOO

iVERIFY ERROR STATUS

LMORD
000022

16(R5),R3

L1 ]

DATA

§380800040000000004000080000800000480000000000004800000020000000000000

023304

VECTOR

ERROR MESSAGE

1SAVE FI &
1SET FPP TO DOUBLE

8EQ
ERROR
. WORD

4801

4802

(SP)Y.
o183 R4

R3
0200,R2
R2

WORD
+HORD

000020

001403
104000
000364

SUPPOSE

tREJOIN CODE
1SEE IF PC =

STFPS
MOV
LDFPS

B8EQ
ERROR

000165

023270
023272
023274

t INSTRUCTION WASNT

1PC

cHe

000363
002013

4792
4793
4794

4800

(SP)+,R4

8EQ

062704

023232

023242
023244

2%:

104000
000362
002013

4779

4787

MOV

tUNIQUE ERROR NUMBER

s ADDRESS OF ERROR MESSAGE

1COMMON CODE FOR TRAP AND NO TRAP

023210

4785
4786

)

4771

4782
:?’gz

JMP

.WORD

001126

4778

360

FPPERR

TST
cMp

SEQ 0092

MULF

. WORD

.WORD

012701
174011

4777

TEST

e
PAGE 92

BEQ
ERROR

023176
023202
023204

4775
4776

T63

16:58

.WORD

4768
4769
4770
4772
4773
4774

15 MAR 84

000360

4752
4753

30A(1052)

1 INCREMENT

INO

INTERRUPT

TEST

NUMBER

VECTOR

GLOBAL
KDJ11A,
4807
4808
4809
4810

4811
4812
4813
4814
4815
4816

4817
4818
4819
4820
4821
4822
4823
4824

4825

4826

4827
4828
4829
4830
4831
4832
4833
4834
4835
4836
4837
4838
4839
4840
4841
4842
4843

4844
4845
4846
4847
4848
4849
4850
4851
4852
4853
4854
4855
4856
4857
4858
4859
4860
4861
4862

HAC"> 1s"RRR!Ba (BLAPD2) 15 MARBY
023314
023320
023326
023330

23336
023340
023346

023350
023352
023354
U23360
023364
023372
023374
023402
023404
023412
023414
023416

004767
000100
000000
000411
000001

NO0000

000000
000200
000204

0050387
004767
0777177

16198 PAGELOS

SEQ 0093

000554
000000

000000

JSR
.WORD

R7,MLOSUB

JACO

177777

000000

.WORD

411,

1FSRC

000000

.WORD

0,0.0,0

tRESWLT

200
204

s TEST FPS
tRESULTANT FPS

000000

. WORD
.WORD
12/FSRC=0
CLR
JSR
. WORD

80FLAG
R7,MLDSUB
177177,0,0,0

1NO INTERRUPT
t1D0 TESTY
1ACO

000000

. WORD

0,0,0,0

. WORD

0,0,0,0

. WORD
.WORD

7704

tRESULTANT FPS

84FLAG
R7,M.OSUB
40200,0,0,0

iNO INTERRUPT
100 TEST

001042
000510

137AC=1

106.0,0.0
1,0,1

;FSRC

IRESWLT

7700

023420
023424
023430
023436
023440
023446
023450
023456
023460
023462

001042
000444
000000

000000

CLR
JSR
.WORD

177777

. WORD

277.".‘1-

177777

1777717

.WORD

277.‘15‘1."

023464
023470
023474

001042
000400
000000

000000

CLR
JSR
. WORD

177777

1777717

. WORD

177777

177117

.WORD

023502
023504
023512
023514
023522
023524
023526

.WORD
. WORD

. WORD
. WORD

023530
023534
023540
023546
023550
023556
023560
023566
023570
023572

001042
000334
177777

023574
023600

001042
000270

1957AC<FSRC<0

CLR

sFSRC

IRESULY

1717

7700
TRUNCATE

TEST FPS

1RESUL TANT FPS

SFLAG

sNO INTERRUPTY

65500,0,0,1

$ACO

R7,MLOSUB

37577,-1,-1,

100 YEST

1FSRC

IRESULT
7717
7700

s+ YEST FPS
tRESWLTANT FPS

BOFLAG

tNDO INTERRUPY

177777

R7,M.05u8

000000

. WORD

165400,0,0,1

000000

. WORD

65000,0,0,0

CLR
JSR

TEST FPS

;ACO

JSR
.WORD

. WORD
. WORD
:16/AC>FSRC>0

;00 TEST

1717

1ACO

100 TESY

1FSRT

IRESWALT
s TESY FPS

7700

1RESULTANT FPS

SOFLAG

tNO INTERRUPT
100 TeSY

R7,M.05u8

&69???.32&“5
4863
4864
4865
4866
4867
4868

4869
4870

4871

4872
4873
4874
487%

487¢
4877
4878
4879
4880
4881
4882
4883
4884
4885
4886
4887

4888

4889
4890
4891
4892
4893
4894
4895
4896
4897

4898

4899
4900
4901
4902

4903

4904
4905
4906
4907
4908
4909
4910
4911
4912
4913

4914

4915
4916
4917
4918

023604

023612
023614
023622
023624
023632
023634
023636
023640
023644
023650
023656
023660
023666
023670
023676
023700
023702
023704

023712
023716
023724
023726
023734
023736

023744
023746
023750
023752

15"&&&1&43?%&%?52)
017500
000000

123652
125252
103177
1772777

Lo
15 HARTga
000000

.WORD

17500,0,0,0

125252

.WORD

123652,125252, 125252, 125252

177777

.WORD

103177,

.WORD
.WORD

200
210

001042
000224

000001

3 7/UNDERFLOW,

000000
000002

000000
000000
005740
005744

012737
004767
100277
177777
100300
000001
040417
000000
002217
102200
000012

CLR
JSR

.WORD

TRAPS

1ACO

D1SABLED

+ TEST FPS
tRESULTANT FPS

80FLAG
R7,MLOSUB

sNO INTERRUPT
100 TEST

300,0,0,25¢2

1ACO

.WORD

377.1.2.3

1FSRC

.MWORD

0,0,0,0

.WORD
5740
.WORD
5744
18/UNDERFLOW, TRAP ENABLED
MOV
01 .00FLAG
JSR
R7,M.05u8
. WORD
100277,1,2. -1

sRESWLT

s TEST FPS
tRESULT FPS

001042

000001

. WORD

100300.1,1.1

040001

077403

.WORD

40417,40001,77408,0

LHORD
LHORD
LMWORD

2217
102200
12

000002

$9/0VERFLOM,

005037
004767
177777
177777
040200

001042
000110
177777

177777

11717

000000
000000
006740
006746

000000

024020
024026
024032
024040
024042
024050
024052
024060
024062
024064
024066

012737
004767
157700
025252
167700
000000
007420
117777
001240
101242
000010

000001
000042
025252

025252

000000

017777

1177727

001042

CLR
JSR
.

LMORD

TRAPS DISABLED

1ACO

+FSRC

sRESWL
Y

s TEST FPS
tRESWLT FPS
IFEC

sND INTERRUPT
100 TESY

-1.-1,-1,-1

JMORD
6740
LMORD
6746
11070VERFLOM, TRAPS ENABLED

MOV

s INTERR(PT
100 TEST

SFLAG
R?7.M.OSUB

0,0,0,0

sF SRC

tRESWLTY

000001
000156
000001

023754
023760
023764
023772
023774
024002
024004
024012
024014
024016

177777

SEQ 0094

000000

000200
000210

005037
004767
000300
000252
000377
000003

16:?ESTPA6E094

1ACO

1RESULY
s TEST FPS
IRESWLT FPS

&1, B0FLAG

s INTERRUPY

JSR
.MORD

R7, MLOSUB
100 TESTY
157700,2%252,25252,252%2

1ACO

.WORD

7420,017777.117777,.1177
17

IRESWLY

LORD

1240

. WORD
.MORD

101242
10

TEST FPS

IRESULY FPS
IFEC

GLOBAL

AREAS

KDJ11A . MAC
4819
4920

024070

MACYL11l

15-MAR 84
000167

30A(1052)
15:51

15-MAR 84
Té64

000242

4921

1
:
l
:

4928

::5

062701
016502

024126

170102

4943
:g:;

024130
024132

171011
170011

012605
012737
012702
170102
172415
010501

024156
000200

MLOSUB:
000244

000010
000030
4

1s:

024134

4948

4949

024142

024144

4950
4951

024146
024150

000365
002013

:ggz

024152

000167

4965

4966
4967
4968
4969

MOV
MOV
MOV
LOFPS
LDO
MOV

(SP)+,RS
508 ,80FPVEC
#200,R2
R2
(RS),ACO
RS,.R1

ADD
MOV

#10,R}
30(RS),Re

LOFPS

MAD
SETO

(R1),ACO

s RETURN ADDRESS TQ USE AS POINTER
sREDIRECT TRAP VECTOR
$SET TO DOUBLE MODE FOR LOAD
tLOAD FPS
1LOAD ACO WITM TEST DATA
sPOINT Y0 FSRC DATA
1GET

032737

001426

000001

001042

817

8EQ
ERROR

000042

024166
024170

104000
000366

024172

002013

024174
024200

024202
024204

024210
024212
024214
024216

:3;?

000001

€1 ,00FLAG

sVERIFY

1BRANCH IF GOOD

. WORD
LMORD

365
FPPERR

JMP

:ALL

8IT
BNE

. WORD
000020

022704

024132

S1¢:

JP
MOV
TST

crp

8EQ
ERROR
. WORD

. WORD

TRAP

tALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER

FPPERR

sADDRES.

024220

OF ERROR MESSAGE

{REJOIN CODE
1SEE IF PC = INSTRUCTION
1CLEAN UP STACK

367
FPPERR

$BRANCH IF GOOD COMPARE
1ALL ERRORS TO TRAP TO EMT
tUNJQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

4974

024222

;COMMON CODE FOR TRAP AND NO TRAP

170202
012702

000200

2s:

STFPS

MOV

#200,R2

VECTOR

JINSTRUCTION WASNT SUPPOSE TO TRAP

1PC WAS INCORRECY

4972

VECTOR

1SEE IF EXPECTING A TRAP
1BRANCH 1f EXPECTING A TRAP

4973

TO EMT

sREJOIN CODE

366

(9P
013 ,.Ra

TRAP CONDITION

sINSTRUCTION SHOXLD MAVE TRAPPED

&1,80FLAG
S1¢

2%
(S5P)e

ERRORS

A NO

IUNIQUE ERROR NUMBER
s ADORESS OF ERROR MESSAGE

1 INSTRUCTION TRAPPED

S08:

ERROR
. WORD

000167
012604
005726
001403
104000
000367
002013

001042

TRAP.

sINSTRUCTION DIDNT TRAP

104000

032737
001005

FPS

soTEST INSTRUCTION
tWALIT FOR POSSIBLE FPA

024156
024164

TEST

tLOAD TEST FPS

4946

4963
4964

(FEC)

teXaXaXaXaXaXaXoXoX0X0XOXAXOXSXOXOXOXOXSXOXEXEXOXOXAXSX0X0X
1aXeXaXaXaXaXaXoXoX0XEXEXOXOXSXOXEXOXOXEXOXEXEXOXOXEX XXX

4947

4962

ACO
FSRC
FPS BEFORE EXECUTION
FPS AFTER EXECUTION

024074
024076
024104
024110
024112
024114
024116
024122

4961

HOP13

4930
4931
4932
4933
4934
4935
4936
4937
4938
4939
4940

4960

SEQ 0095

MULD

4929

4958
4959

PAGE 95

X X
,.onox.x.X.Xoanax.x.!ox.x-x-xoxox.x.x.xox-xox.x.xoxoxoxo
x

4923

4955

jeXeXaXeXaXaXaXaXoX0XeXOXOXAXEXOXEXEXOXEXOXEXOXOXOXSXOXS

4924
4925
4926
4927

4956
4957

TEST
JMP

4922

4952

16:58

1SAVE FPS
1SEY

FPP

TO DOUBLE

VECTOR

GLOBAL

AREAS

KDJ1.1A
MAC
4975
4976
4977
4978
4979
4980
4981
4982
4983
4984
4985
4986
4987
4988
4989
4990
4991
4992
4993
4994
4995
4996
4997
4998
4999

S000
5001
5002
S003
5004
5005
5006
S007
5008
5009
5010
5011
5012
5013
5014
5015
S016
S017
5018
5019
5020
5021
5022
5023
5024
5025
5026
5027
5028
5029
5030

15 AR 34398149520 15-MAR
B4 16: 984 1PAGEy %€

024226
024230
024234
024236
024242
024244
024246
024250

170102
012701
174011
026503
001403
104000
000370
002013

024252
024254
024260
024264
024270
024272
024274
024276

010504
062704
004767
005767
001403
104000
000371
002613

024300
024304
024306

005737
001002
000165

024312
024314
024320
024322
024324
024326
024330

016504
020401
001403
104000
000372
002013

000034

000165

000036

024332
024336
024336

170301

LOFPS
MOV

001126

STD
cMP

000032

000020
155662
154550

3s:
a8

Re
ORECDST ,R1

370
FPPERR

MOV
ADD

RS5,R4
€20,R4q

1ST

B8EQ

ERROR
.WORD

.WORD

TST
BNE

80FLAG
68

000034

JMP
34(RS)
1VERIFY ERROR STATUS

TO EXPECTED DATA

$tBRANCH IF GOOD

tALL

1BAD ACO

372
FPPERR

36(RS)

ERRORS

TRAP

TO EMT

tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

3SEE IF NEED TO CHECK FEC
sBRANCH IF NEED TO CHECK
;1 SAVE FEC

sGET FEC

R4 ,R}
7

1 VERIFY FEC

1BRANCH IF GOOO
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
:1BAD FEC
tRETURN FROM TEST

330060088080 0880080080800080800800000000080000000000800000000000000

;oTEST 65
024336
024336

TEST MODF

1380088843804 4800000003400008000000800040000008008000000880004080880

154442

024342
024 346
024352
024356
024362
024366
024372
024374

001042
000554
000000
177777
000000
000000

024376
024402
024406
024412
024416
024422
024426
024430

001042
000520
177777
000000
000000

000000

TST65:;

INC

$17AC=0 FSRC=0

CLR

JSR
. WORD
. WORD
.MORD
LMWORD
.WORD
.WORD
12/FSRC=0
CLR
JSR

. WORD
.MORD
LWORD
.WORD

. WORD
LWORD

$TESTN

s INCREMENT TEST NUMBER

S LAG

R7.MOFSUB
100,0
sACO
12346,
-1
0,0
0,0
13
&
SOFLAG

R7,MDF SUB

12356,
-1
0,0
1FSRC
0,0
0,0

3
4

VECTOR

sRETURN FROM TEST

R1
34(RS).R4

cp
8EQ
ERROR
LWORD
.WORD

TABLE

sVERIFY DATA

S$:

7%
HOP13:
MMOOF;

1POINT

COUNT

371
FPPERR

STST
MOV

1BAD FPS

TO RECEIVED DATA

1SAVE ACO
RESWLT
s VERIFY STATUS
sBRANCH IF GOOO
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
:ADDRESS OF ERRDR MESSAGE

R7.DATVER

001042

63:

+POINT

ACO,(R1)
32(RS),
RS

BEQ
ERROR
.WORD
.WORD

JSR

SEQ 0096

sNO INTERRUPY

;00 TEST

1FSRC

$tFRACTIONAL RESWLTY

s INTEGER RESWLTY
1 TESY FPS
tRESULTANT FPS

1NO INTERRUPT
100 TEST
1ACO

1FRACTIONAL RESWLT
tINTEGER RESWLTY
1 TEST FPS

tRESULTANT FPS

005037
004767
046252
040300
000000
046377
000013
000004

001042
000430
125252
000000
000000
177777

024522
024526
024532
024536
024542
024546
024552
024554

005037
004767
077652
040300
C00000
077777
000000
000004

001042
000374
125252
000000
000000
177777

024556
024562
024566
024572
024576
024602
024606
024610

005037
004767

001042
000340

147400

025700

170000
007400
007404

025700

024612
024616
024622
024626
024632
024636
024642
024644
024646
024652
024656
024662
024666
024672
024676
024700

CLR
JSR
.WORD
. WORD
. WORD
. WORD
.WORD
. WORD
14/AC>FSRC>0
CLR

. WORD
:1S/AC>FSRC>0
CLR
JSR
.WORD
.WORD
.WORD

001042
000250
125252
000000
000000
177777

RESULT

1t INTEGER RESWLTY
s TEST FPS
tRESULT FPS

iNO INTERRUPTY
100 TEST
1ACO
tFRACTIONAL RESULT

s INTEGER RESULT
s TEST FPS
tRESULTANT FPS

sFRACTIONAL RESULT

R7,MOFSUB

s INTEGER RESWLT
:+ TEST FPS
sRESULTANT FPS

iND INTERRUPTY
100 TEST
:ACO
1F SRC
1FRACTIONAL RESWLTY
s INTEGER RESWLT
: TESY FPS
IRESWLY FPS
sNO INTERRUPY

100227,
-1

44023,25252

104061,21251

100 TEST

1ACO
1FSRC

(FRACTIONAL

0.0

tINTEGER RESWLY

IRESWLY FPS

TRUNCATE

19/ROUND INTEGER

;FSRC
sFRACTIONAL

0,0
17777,-1
0

18/AC«0>

sNO INTERRUPT
D0 TESY
1ARCO

iNO INTERRUPT
;100 TESTY
1ACO

16/AC>0<FSRC, INTEGERS
CLR
SOFLAG
JSR

SEQ 0097

86FLAG

R7,MOFSUR
77652.125252
40300,0 ;FSRC

. WORD

000010

046377
000053
000044

S80FLAG
R7,MOFSUB
46252, 125232
40300,0 ;FSRC
0.0
46377,
-1

;7/AC¢0<&

005037
004767
100227
044025
104061

005037
004767
046252
040300

8o0F LAG
R7,MOF SUB
0,0
1.'1
0,0
0,0
7500
7504

177777
000000
000000

13/RC=0

024466
024472
024476
024502
024506
024512
024516
024520

001042
000464
000000

iy % 1Y 24 333338

005037
004767
000000
177777
000000
000000
007500
007504

024432
024436
024442
024446
024452
024456
024462
024464

5031
5032
5033
5034
5035
5036
5037
5038
5039
5040
5041
5042
5043
5044
5045
5046
S047
5048
5049
5050
5051
5052
5053
S054
5055
5056
5057
5058
5059
5060
5061
5062
5063
5064
5065
5066
5067
5068
5059
5070
5071
S072
5073
5074
5075
5076
5077
5078
5079
5080
5081
5082
5083
5084
5085
5085

15 AR
da RS 15 TR
g 163 PhgE 7

CLfIMNs
+ o v o o

GL OBAL AREAS
KDJ11A.MA

SOFLAG
R7,MDF SUB
46232,125252
40300,0
53

RESULY

1 TEST FPS

iIND ITERRUPTY
100 TEST
1ACO

1FSRC
1FRACTIONAL

RESWLTY

s INTEGER RESWLT

: TEST FPS
tRESWLT FPS

LLOBAL ARE AS
KDJ1.1A
MAC

5129
5130
5131
5132
5133
5134
5135
5136
5137
5138
5139
5140
5141
5142

024772
024776
025002
025006
025012
025016
025022

005037
004767

025026
025032
025036
025042
025046
025052
025056
025060

005037
004767
040225
066652
000000
066707
007027
007004

001042
000070
125252
052525
000000
025160

025062
025070
025074
025100
025104
02511C
025114
025116
025120

012737
004767
076000
076000
000000
033600
001000
101006
000010

000001
000032
000000
000000
000000
000000

125252

000000
000000
1777717

001042
000160
177777
000000

177770

JSR
. WORD
LWORD
.WORD
.WORD

WORD
LHMORD

000167

80F LAG
R7,MDF SUB
46252,12525%2

40300,0

0,0
46377,
13

$11/7ROUND INTEGER
CLR
SOFLAG

025024

025122

SEQ 0098

4
1 LO/TRUNCATE FRACTION
CLR
8OFLAG
JSR
R7,MDFSUB
.WORD
40777-1}
,
.WORD
40200,0
.WORD
40177,177770
.WMORD
40740,0
.WORD
O
LWORD
O

CLR
JSR
LWORD
WORD

LMWORD

LHORD
.WORD
LWORD

001042

: /OVERFLOM

MOV
JSR
LHORD

O
4

S#FLAG
R7,MDF SUB
40225,125252
66652,52%25
0,0
66707,25160
7027
7004

JMORD
L.WORO
LWORD
LWORD
LWORD

41 ,00FLAG
R7,MOFSUB
76000,0
76000,0
0,0
33600.0
1000
101006

JMP

HOP 14

LWORD

000310

R7,MOFSUB
.0
0,0
0,0
0,0

$112/ROUND FRACTION

tNO INTERRUPT

100 TEST
1ACO

tFSRC
1FRACTIONAL

RESWLT

t INTEGER RESULT

TEST FPS

tRESULT FPS
iNO INTERRUPT

sFSRC

tFRACTIONAL

1 INTEGER RESWLT
: TEST FPS
sRESWLT FPS

RESWTY

i1NO INTERRUPT
;00 TESTY
1ACO
sFSRC
1FRACTIONAL
RESWT
sINTEGER RESWLT
i TEST FPS
iRESWLT FPS
iNO INTERRUPY
100 TEST
1ACO

iFSRC
sFRACTIONAL
RESWLT

1 INTEGER RESWLTY

s+ TESTY FPS
IRESLT FPS

s INTERRUPTY

100 TEST
s ACO
1FSRC
sFRACTIONAL RESWULY
1 INTEGER RESWLT
3 TEST ¢FPS
sRESULT FPS
IFEC

seXaXeXoXaXeXeXoXoXeXoXaXaXoXsXoXoXoXoXoXaXAXOXOXeXoXOXON
X

jeXaXeXaXo
o XeXoXoXoXo X0 X0
XeXeX
KXo XX XOXONOXOXOXOXOX
oXa
AXSX

i
we

5128

005037
004767
040777
040200
040177
040740
000000
000000

CLR
JSR
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD

5121
5122
5123
5124
5125
5126
5127

024736
024742
024746
024752
024756
024762
024766
024770

(4327 15 MAR
84 16:38. PHGE, 98

5111

5112
5113
S114
S511S
5116
5117
5118
5119
5120

001042
000214

024722
024726
024732
024734

005037
004767
046252
040300
000000
046377
000013
000004

024702
024706
024712
024716

5092
5093
5094
5095
5096
5097
5098
5099
5100
5101
5102
5103
5104
5105
5106
5107
5108
5109
5110

30A

5087
5088
5089
5090
5091

MACY1]l

15 MAR 84

ACO

FSRC
FRACTIONAL RESWULTY
INTEGER RESWLY
FPS BEFORE EXECUTICN

LLOBAL ARE AS
KDJ11A MAC

5143
5144
5145
S146
S147
S148
5149
5150
5151
5152
5153
5154
5155
3156
5157
5158
5159
5160
5161
5162
5163
S164
5165
3166
5167
5168
5169
S170
S171
S172
5173
5174
5175
5176
5177
5178
5179
5180
5181
5182
5183
5184
5185
5186
5187
5188
5189
5190
5191
5192
5193
5194
5195
5196
5197
5198

MACY11l 30A(1052)
15 MAR-84 15:51

15 MAR 84

165

16:58

I's

PAGE 99

TEST MODF

SEG 0099

FPS

;

(FEC)

AFTER

EXECUTION

jeXaXa
X0 XXX
XaX
EXOXOXOXXEXOXEXOXE
aXo
XOXOXOX0X
XoX
0X0X0XoX
o
ieXaXaXeXaXaXaXoXaXOXEXAXEXOXA
XXX NOXEXEXOX
XANAXS
X0X0X
XO

025126
025130
025136
025142
025144
025146
025152
025154
025156
023162
025166

012701
172511
010501
062701
016502
170102

025170
025172

171411
170001

012605
012737
012702
170102

172415

025216
000200

000244

MOFSUB:

025426
000004
000020
H

13:

MOV
MOV
MOV
LOFPS
LOD
MOV
LOD
MOV
ADD
MOV
LOFPS

(SP)+,RS
0504 ,80FPVEC
#200,R2
R2
(R5),ACO
#MODGAR,R1
(R1),AC1
RS,R1
4, ,R1
20(RS),R2
R2

1 RETURN ADDRESS TO USE AS POINTER
sREOIRECT TRAP VECTOR
1SET TO DOUBLE MODE FOR LOAD
1LOAD FPS
sLOAD ACO WITH TEST DATA
$LOAD KNOWN INTO AC1
:
sPOINT TO FSRC DATA

MODF
SETF

(R1),ACO

soTEST INSTRUCTION
sWAIT FOR POSSIBLE FPA TRAP,

sGET TESY FPS
sLOAD TESY FPS

[

025174
025202
025204
025206
025210

032737
001426
104000
000373
002013

025212

000167

025216
025224
025226
025230
025232

032737
001005
104000
000374
002013

000001

025234
025240
025242
025244
025250
025252
025254
025256

000167
012604
005726
022704
001403

000020

000001

001042

tINSTRUCTION DIDNT TRAP
8Iv
BEQ

€1,80FLAG
24

ERROR
.WORD
.WORD

373
FPPERR

: INSTRUCTION TRAPPED

50%:

3% H

BIT
BNE
ERROR
MORD
.MORD

374
FPPERR

7S7

(SP)»

MOV

cHp

025172

BEQ
ERROR

104000
000375
002013

.MORD
.MORD

#1,80FLAG
51

(SP)« R4

012702
170102
012701

025274
025276
025302

174011
026502
001403

170203

sALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

iSEE IF EXPECTING A TRAP
1BRANCH IF EXPECTING A TRAP
;ALL ERRORS TO TRAP T0 EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
s INSTRUCTION MASNY SUPPOSE TO TRAP
;REJOIN COOE

sSEE IF PC « INSTRUCTION
sCLEAN UP STACK

375
FPPERR

VECTOR

: INSTRUCTION SHOULD HAVE TRAPPED
sREJOIN CODE

#1%,R4

025260
025262
025266
025270

tVERIFY A NO TRAP CONDITICN
1BRANCH IF GOOO

1BRANCH IF GOOD COMPARE
sALL ERRORS TO TRAP TO EMT VECTOR

$UNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

tPC WAS INCORRECT

;COMMON CODE FOR TRAP AND NO TRAP

000200
001126

000022

2%:

STFPS
RS
MOV
#200,R2
LOFPS
RQ
MOV
#RECOST ,R1
sSAVE FRACTIONAL RESWLT
S1D
ACO,(R1)
crp
22(R5),R3
8EQ
3

1SAVE FPS
1SET FPP TO DOUBLE
tPOINT

TO RECEIVED DATA

1SAVE ACO
RESWLT
tVERIFY STATUS
1BRANCH IF GOOD

TABLE

LLOBA, ARE AS
KDJ11A
. MAC

5199
5200

5201

5202

5203
5204
5205
5206
5207
5208
5209
5210
5211
5212
5213
5214
3215
5216
5217
5218
5219
5220
5221
5222
5223
5224
35225
5226
5227
5228
5229
5230
5231

5232
5233
5234
5235

5236
5237
5238
5239
5240
S241
5242
5243
5244
5245
5246
5247
5248
5249
5250
5251
5252
5253
5254

MACY11l 30A(1052)
15-MAR 84 15:51

025304
025306
025310

104000
000376
002013

025312
025314
025320
025324
025330
025332
025334
025336

010504
062704
004767
005767
001403
104000
000377
002013

025340

025342

025344
025350
025354
025360
025362
025364
025366

174111
010504
062704
004767
005767
001403
104000
000400
002013
005737
001002

025370
025374
025376
0c5402
025404
025410
025412
025414
025416
025420

000401
002013

025422

000165

025426
025434
025436

000165

170301

016504
020401
001403
104000

1777727
177777

15 MAR 84
165

16:58
PAGE 100
TEST MODF

33:

000010
154604
153510

ERROR
. WORD
.WMORD

376
FPPERR

MOV
ADD
JSR
ST

RS,R4
910,R4
R7.DATVFR
COUNT

8EQ
ERROR
.MORD
.MORD

Jes

000014
154554
153460

001042
000024
000024

000026

177777

AC1,(R1)
RS ,R4
014 R4
R?7,.DATVFR
COUNT

400
FPPERR

6%:

TS8T
8NE

SHFLAG
7

78:

SIST

8EQ
ERROR

MODGAR:

MOV
cre

26(RS)

.WORD

-1,-1,-1.-1

TRAP

sUNIQUE ERROR NUMBER

+BAD ACO

TO EMT

sADDRESS OF ERROR MESSAGE
1SAVE

sVERIFY DATA
3

:8AD AC1

;BRANCH IF GOOD
sALL ERRORS TO TRAP 10 EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

sSEF IF NEED TO CHECK FEC
sBRANCH IF NEED 7O CHECK
{RETURN FROM TEST

:SAVE FEC
1GET FEC

i JERIFY FEC

sBRANCH IF GOOD
sALL ERRORS TO TRAP T0O EMT VECTOR
tUNIQUE ERROR NMUPMBER
sADDRESS OF ERROR MESSAGE
1BAD FEC

1RETURN FROM TEST

;KNOWN DATA FOR

AC1

MM000
:
130088880084 0408000400480850008040000800000000000000600080000000804

1+ TEST &6
025436
025436
025442
025446
025452
025460
025462
025470
025472
025500

TEST MO0D

350008806580 880000008080000000000080000008000000800000000000000000

005267

005037
004767
012345
177777
000100
000000
000000
00C000

TST66:

153342

INC

STESTN

CLR
JSR

. WORD

SFLAG
R7,M005U8
1234S,-1,-1,-1

iNC INTERRUPT
100 YEST
1ACO

1 17AC>FSRC»0

001042
001164

AC1l RESWLT

HOP14:

025436

VECTOR

1POINT Y 0 EXPECTED

24(RS)
R4
R4 R}

JHP

VECTOR

TO EXPECTED DATA

$BRANCH IF GOOD

24(RS)

40}
FPPERR

+POINT

tALL ERRORS

MORD
. WORD

tALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
+ADDRESS OF ERROR MESSAGE

sVERIFY DATA

377
FPPERR

BEQ
ERROR
.WORD
.WORD

8s%:

171777

STD
MOV
ADD
JSR
ST

1BAD FPS

; SAVE INTEGER RESWLT

Ss:

SEQ 0100

1 INCREMENT TEST NUMBER

1777717

17717177

000000

. WORD

100,0,0,0

1FSRC

000000

.MORD

0,0,0,0

1FRACTIONAL RESWLT

LLOBAL ARE RS
KDJ11A
. MAC

5255
5256
5257
5258
5259
5260
5261
5262
5263

5264
5265
5266

5267

5268
5269
3270
5271
5272
5273

Se74

3275
5276
5277
5278
5279
5280
5281
5282
5283
5284
3285
5286
5287
5288
5289
5290
5291
5292

5293
5294

5295
5296
5297
5298
5299
5300

5301
5302
5303
5304
5305
5306
5307
5308
5309
5310

MACY1l

30A( 1052)

025502
025510
025512
025514

000000
000000
000200
000204

000000

02353516

005037
004767

001042
001110
000000

025522
025526

15 MAR 84

025534
025536
023544

025546
025554
025556
025564
025566
025570
025572
025576
025602
025610
025612
025620
025622
025630
025632

025640
025642
025644

025646
025652
025656
025664
025666

025674
025676
025704
025706
025714
025716
025720

025722

025726
025732
025740
025742
025750
025752
025760
025762
025770

025772
025774

15:51

15 MAR 84
T66

005037
004767
140240
000000
063714
167737
000000
000000
163777
125726
000210
000204
005037
004767
056200
000001
040340
000000
000000
000000

056340

000001
000213
000204

SEQ 0101

. WORD

0.,0,0,0

i INTEGER RESWLTY

.WORD
. WORD

200
204

i+ TEST FPS
sRESUL TANT FPS

000000

CLR
JSR
.WORD

80F LAG
R7,MDDSUB
0.0,0,0 ;RCO

tNO INTERRUPTY
:100 TEST

177777

000000

.WORD

1234,

1FSRC

000000

.WORD

0,0,0,0

sFRACTIONAL

000000

.WORD

0.0,0,0

s INTEGER RESULY

.WORD
.WORD

7717
7704

; TEST FPS
tRESUL TANT FPS

8OFLAG

iNO INTERRUPT

000000

:2/AC=0<FSRC

007717
007704

005037
004767
056252
125250
040300
000000
000000
000000
056377
177774
000213
0002(4

16:58
PA SB 101
TEST TM
0

1,0,0

RESULT

001042
001034
125252

125252

:3/AC>FSRC»>0
CLR
JSR
.WORD

000000

WORD

40300,0,0,0

sFSRC

000000

WORD

0.0,0,0

sFRACTIONAL RESWLT

1777727

111 n?

.WMORD

56377.-1,-1,-4

WORD
. WORD

213
204

1+ TEST FPS
tRESULTANTY FPS

BFLAG
R7,M00SUB

tNO INTERRUPY
1DO TEST

63714,146314,133572,167737

iFSRC

: INTEGER RESWLT

14/7AC<O>FSRC

R7,MODSUB

;00

56252,125252, 125252, 125250

TEST

1 INTEGER RESWLY

001042
000760
000000

000000

CLR
)
.WORD

146314

133572

. WORD

000000

. WORD

177777

162531

. WORD

163777,-1,162531,125726

. WORD
. WORD

210
204

s TEST FPS
tRESULTANT FPS

SOFLAG
R7,HMODSUB
56200,0,0,1

tNO INTERRUPT
100 TESY
1ACO

1S/AC>FSREC>O

sACO

001042
000704
000000

000000

CLR
JSR
. WORD

000000

.WORD

40340,0,0,0

1FSRC

000000

WORD

0,0,0,0

1FRACTIONAL RESWTY

000000

. WORD

56340,0,0,1

WORD

213
204

st INTEGER RESWLTY
1 TEST FPS
tRESULTANT FPS

GLOBAL AREAS
KDJ11A, MAC
5311
S312

5313
5314
5315
5316
5317
5318
5319
5320
5321
5322
5323
5324
5325
5326
5327
5328
5329
5330
5331
5332
5333
5334
5335
3336
5337

5338
5339
5340
5341
5342

5343
5344
5345
5346
5347
5348
5349
5350
5351
5352
5353
5354
5355
5356
5357
5358
5359
5360
5361
5362
5363
5364
5365
5366

025776
026002
026006
026014
026016

026024
026026
026034
026036
026044
026046
026050
026052
026056
026062
026070
026072
026100
026102
026110
026112
026120
026122
026124
026126
026132
026136
026144
026146
026154
026156
026164
026166
026174
026176
026200

SEQ 0102

125252

:16/TRUNCATE
CLR
JSR
.WORD

000000

.WORD

40300,0,0,0

000000
000000
0563;;
1777
000253
000244

000000

.WORD

0,0,0,0

1727777

177777

.WORD

56377,-1,-1,

WORD
. WORD

253
244

005037
004767
?ggggg

001042
000554
125252

125252

CLR
JSR
JMORD

84FLAG
iNO INTERRUPT
R7,MODSUB
s00 TEST
23252,125252,125125252
2%2,

040300

000000

.WORD

40300,0,0,0

sFSRC

O;;;;;
1
000000

177777

117717

.WORD

23377,-1,-1.-1

tFRACTIONAL

000000

.WORD

0,0,0,0

s INTEGER RESULT

.MORD
LWMORD

253
240

3 TEST FPS
sRESWLT FPS

S LAG
tNO INTERRUPTY
R7,.MDOSUB
;100 TEST
76600,0,0,125252
:ACO

005037
004767

052223
1252
040300

001042
000630

: 7/TRUNCATE

000253
000240

80FLAG
R7,MDDSUB

000000

CLR
JSR
LWORD

000000

.WMORD

0,0,0,0

2;9;32

000000

.WORD

76700,0,0, -1

007700

026256
026264
026270

012737
004767
177777

005037
004767

001042
000424

8;%2%2

052525

838338

000000

g;g;zz

83%838

sFSRC
1FRACTIONAL
1

FRACTION

:8/7ROUND INTEGER

JHORD
200
LWORD
204
19/ROUND THROUGMH FRACTION
CLR
SIFLAG
JSR
R7,H4D0SUB

;FRACTIONAL

40300,0,0,0

172777

171
n?

.WORD

40177,-1,-1,177740

000000

.WORD

41636,0,0,0

1777177

.052525,52%525,5252%

7700

LWORD

7700

MOV
JSR
. WORD

o1 ,80FLAG
R7,MODSUB
“1,-1,-1,-1

s/OVERFLOM,

RESWT

i1NO INTERRUPT
100 TEST

.WORD

001042

RESWLY

s JEST FPS
IRESULT FPS

000000

000001
000346
177777

sACO

3 INTEGER RESWLTY

.WORD

RESWLT

s INTEGER RESWLT

.MORD

007700

sACO

: TEST FPS
tRESULT FPS

001042
000500
000000

026202
026206
026212
026220
026222
026230
026232
026240
026242
026250
026252
026254

INTERRUPT
100 TEST

56252, 125252,125252, 12%252

005037
004767
g;gggg

000200
000204

tNO

TRAPS ENABLED

s:ACO

1FSRC

tFRACTIONAL

s INTEGER RESWLT
1

TEST FPS

IRESULT FPS
1 INTERRUPT
100 TEST
1RCO

RESWLT

GLOBAL HAEAS
KDJ11A.

5367
5368
5369
5370
$371
5372
5373
5374
S375
5376
5377
5378
5379
5380
5381
5382
5383
5384
5385
5386
5387
5388
5389
5390
5391
5392
5393
5394
5395
5396
5397
5398
5399
5400
5401
5402
5403
5404
5405
5406
5407
5408
5409
5410
5411
5412
5413
5414
5415
5416
5417
5418
5419
5420
5421
5422

026276

15 o
Rl&‘SOA é052)

177777
040400
000000
000000
000000
100177

15 HARigg

026300
026306
026310
026316
026320
026326
026330
026332
026334

000010

026336
026342
026346
026354
026356
026364
026366
026374
026376
026404
026406
026410

005037
004767
056700
177777
044440
1777707
000000
000000
063161
040775
000200
000204

026412
026420
026424
026432
026434
026442
026444
026452
026454
026462
026464
026466
026470

012737
004767
066600
000000
066600
000000
000000
000000
015200
000000
047700
147706
000010

000002
000212

026472
026500
026504
026512
026514
026522

000002
000132
000001

000002

000001

026524
026532
026534
026542
026544
026546
026550

012737
004767
100277
177777
100300
000001
000000
000000
000000
000000
005200
005204
000010

026552
026560
026564
026572

012737
004767
100277
177777

1772777
007700
107706

18
16:?esrpfi860103

000000

.WORD

40400,0,0,0

000000

.WORD

0,0,0,0

177777

.WORD

100177,-1,-1,-1

.WORD
7700
.WORD
107706
. WORD
10
:/INTEGER CHOPPED TO 56 BITS
CLR
80FLAG
JSR
R7,MDDSUB
.WORD
56700,0,0,-1

SEQ 0103

;FSRC
+FRACTIONAL

RESULT

s INTEGER RESULT

s+ TEST FPS
tRESULT FPS
sFEC

001042
000270
000000

000000

177777

.WORD

44440,-1,-1,-1

000000

.WORD

0,0,0,0

100000

000001

.WORD

63161,100000,1,40775

LWORD
MORD

200
204

MOV
JSR

42, 00FLAG
R7."DDSU8

iNO INTERRUPT
;D0 TESTY

.MORD

66600,0,0,0

sFSRC

.WORD

0,0,0,0

. WORD

15200,0,0,0

.WORD
. WORD
MORD

47700
147706
10

001042
000000

000000

001042

;/OVERFLOH.

TRAPS DISABLED

3 /UNDERFLOW,
MOV
JSR

000002

tFRACTIONAL

RESULT

1 INTEGER RESWLTY

i TEST FPS
tRESULT FPS

tFRACTIONAL

RESWULT

; INTEGER RESWLT

i1 YESY FPS
tRESULY FPS
FEC

2, 80FLAG
R7,MDDSUB

iNO INTERRUPT
;100 TEST

0,0,0,0

tFRACTIONAL

.WORD

0.,0,0,0

t INTEGER NESWLY

. WORD
. WORD

001042

:FSRC

.WORD

LHORD

000001
000052
000001

TRAPS DISABLED

siNO INTERRUPT
sD0 TEST
sACO

5200

5204

YESY FPS

tRfiSULT FPS
FEC

1 /UNDERFLOW TR“PS ENABLED, UV AS RESULT
MOV

JSR

.WORD

RESWLT

81, 80FLAG

t INTERRUPY

100277,1,2.-1

1ACO

R7,MDOSUB

100 TEST

GLOBAL AREAS
KDJU11A. MAC

5423
5424
5425
5426
5427
5428
5429
5430
5431
5432
5433
5434
5435
S436
5437
5438
5439
5440
5441
5442
5443
S444
5445
5446
5447
S448
5449
5450
5451
5452
5453
5454
5455
5456
5457
5458
5459
5460
5461
5462
5463
5464
5465
5466
5467
5468
5469
5470
5471
5472
5473
5474
5475
5476
5477
5478

026574

026602
026604
026612
026614
026622
026624
026626

026630

MACY1l

15 MAR 84
100300
000001
040417
000000
000000
000000
002200
102200
000012

30A(1052)

15:51

15 MAR-84

166

16:58

PAGE

TEST MOGD

104

N&
SEQ 0104

000001

MORD

100300,1.1.1

040001

077403

.WORD

40417,40001,77403,0

000000

.MORD

0,0.0,0

+ INTEGER RESULT

WORD
'WORD
WORD

2200
102200
12

. TEST FPS
{RESULT FPS
\FEC

HOP1S

s JUMP OVER SUBROUTINE

JFSRC
;FRACTIONAL

RESULT

026632

000167

000300

jaXaXaXaXaXaXaXoXaXaXBXEXEXEXAXOXEXAXAXEXE
XXX
XAXOX0
4X0X
X
jaXaXa
X X0 XX
XaX
XX XAXEXEXO
aXa
NAXEXEXEXEX
XaX
X EX6X0X0X
o
0X

ACO

FSRC
FRACTIONAL RESULT

INTEGER RESULT

FPS BEFORE EXECUTION
FPS AFTER EXECUTION

(FEC)

1eXaXa
X0 X0 X0 X0
XaX
X X0 XoXEXEXSXOX
eXa
OXEXOXEXEX
XoX
XX EX2X0X
s

jaXaXaXeXaXaXoXaXeXa
X0 X0 X0 X0XoXoXsX0XeXoXoXeX0XX0X0Xe XX 8X

026636
026640
026646
026652
026654
026656
026662
026664
026666
026672
C26676

012605
012737
012702
170102
172415
012701
172511
010501
062701
016502
170102

026700
026702

171411
170011

026704
026712
026714
026716
026720

032737
001426
104000
000402
002013

000001

026722

000167

000042

026726
026734
026736
026740
026742

032737
001005
104000

000001

000403
002013

026726
000200

000244

"QDSLB: MOV

025426
000010
000040

18:
001042

950
, OFPVEC
8
9200,R2
R2
(R5),ACO
#M0DGARR1
,
(R1),AC1
RS,.R1
#10,R1
40(R3),.R2
R2

MODD

(R1),ACO

SETD

i INSTRUCTION DIONT TRAP
BIT
BEQ

@1.90FLAG
23

.WORD
'WORD

402
FPPERR

JMP

-3}

ERROR

001042

(SP)+.R5

MOV
MOV
LOFPS
LOD
MOV
LOD
MOV
ADD
MOV
LOFPS

;INSTRUCTION TRAPPED

50s:

BIT

BNE
ERROR
.WORD
.WORD

81.80FLAG

514

403
FPPERR

s RETURN ADDRESS TO USE AS POINTER
tREDIRECT TRAP VECTOR
$SEY TO DOUBLE MODE FOR LOAD
;LORD FPS
sLOAD ACO WITH TEST DATA
;LOAD XNOWN INTO AC1
3

sPOINT YO FSRC DATA

sGEY TESTY FPS
1LOAD TEST FPS
3¢ TEST

INSTRUCTION

iWAIT FOR POSSIBLE FPA TRAP.

sVERIFY A NO TRAP CONDITION
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
s INSTRUCTION SHOULD HAVE TRAPPED
sREJOIN CODE

:SEE IF EXPECTING A TRAP
1BRANCH IF EXPECTING A TRAP
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
i ADDRESS OF ERROR MESSAGE

GLOBAL

AREAS

KDJ11A . MAC

5479

5480
5481
5482
5483
S484
5485
5486
5487
ss:aa
89

026744
026750
026752
026754
026760
026762
026764
026766

5491
5492
5493
S494

026770
026772
026776
027000

5490

5495
5496

S497

MACY11l

15 MAR 84

000167
012604
005726
022704
001403
104000
000404
002013

027004

027006

170203
012702
170102
012701

174011

026503

027012
027014
027016
0270270

001403
104000
000405
002013

5503
5504
5305
5306
5507
5508
5509
5510
5511
5512
S513
5514
5315
5516
5517
5518
5519
5520
gssg;

077022
(27024
027030
(27034
(27040
027042
027044
02:046

010504
062704
004767
005767
001403
104000
000406
002013

5523
5524
5525
5526
5527
5528
5529
5530
5531
5532
5537
5534

15:51

15 Hnnrgz

000020

S1s:
026702

16:58

TEST

PAGE

MOOD

JMP
MOV
TST
cHp
B8EQ
ERROR
.WORD
.WORD

10S

24
(SP).,R4
(SP).
o1¢,R4
24

404
FPPERR

5498
S499
5500
5501

5502

ZOA(1052)

027050
027€S2
027054
027060
027064
02700
027072
027074
0270756

174111
010504
062704
004767
005767
001403
104000
000407
002013

027100
027104
027106
027112
027114
027120
027122
027124
027126
G$27130

005737
001002
000165
170301
016504
020401
001403
104000
r00410
002013

027132

00C165

SEQ 0105

t INSTRUCTION WASKHT SUPPOSE TO TRAP
tREJOIN CODE
1SEE IF PC = INSTRUCTION
1CLEAN UP STACK
'
1BRANCH IF GOOD COMPARE
tALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
INCORREC?Y

1PC WAS

VECTOK

1COMMON CODE FOR TRAP AND NO TRAP

000200

001126

28:

STFPS
MOV
LOFPS
MOV

STD

8€EQ
ERROR
. WORD
. WORD

000030
153062
151750

001042

3s:
4

000046

ACO,(R1)

1SAVE

tPOINT

MOV
ADD
JSR
TSY
BEQ
ERROR
JHORD
LHWORD

42(RS),R}
405
FPPERR

RS, R4
920,.R4
R7,DATVER
COUNT
Ss

63:

7¢;

8%:

1BAD FPS

S LAG
14 ]
44(R5)
k!
44(RS ), Ra
R4, R1
as

46(RS)

410
FPPERR

ACO

TABLE

RESWLTY

1BRANCH IF GOOO
sALL ERRORS TO TRAP TQ EMT
sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

1POINT

VECTOR

TO EXPECTED DATA
1VERIFY DATA

406
FPPERR

757
BNE
JMP
STST
MOV
Crp
B8EQ
ERROR
. WORD
. WORD

TO RECEIVED DATA

tVERIFY STATUS

3¢

31SAVE INTEGER RESWLTY
Ss:
STD
AC1,(R1)
MOV
RS,Re
ADD
030, R4
JSR
R7,DATVER
TS?
COUNT
8€Q
.1 ]
ERROR
JHWORD
407
L.MORD
FPPERR

000044
000044

1SAVE FPS
$1SET FPP 10 DOUBLE

1SAVE FRACTIONAL RESWLT

000042

000020
153112
152000

R3
4200,R2
R
ORECOST R}

18980 ACO

1POINT

$1BRANCH IF GOOD
sALL ERRORS TO TRAP 10O EMT
sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

VECTOR

1S5AVE ACL1 RESWLT
YO EXPECTED
IVERIFY DATA
]
1BRANCH IF GOOD
1ALL ERRORS TO TRAP TO EMT
IUNIQUE ERROR NUMBER

VECTOR

8D Ml‘mss OF ERROR MESSAGE
H

1SEE IF NEED YO CHECK FEC
1BRANCH IF NEED 10 CHECK
sRETURN FROM TEST
1SAVE FEC
sGET FEC
tVERIFY FEC
1BRANCH IF GOOD
1ALL ERRORS 10 TRAP TO EMT
IUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
18AD FEC
1RETURN FROM TEST

VECTOR

LLOBAL
KDJ11A

AR SRR

5535
5536
027136
5537
027136
5538
5539
5540
S541
027136
5542
027136
S543
5544
027142
3545
027146
5546
027154
5547
027156
5548
027164
5549
027166
5550
027170
5551
5552
027172
5553
027176
5554
027204
5555
027206
5556
027214
3557
027216
5558
027220
5559
5560
027222
5561
027226
5562
027234
5563
027236
5564
027244
3565
027246
5566
027250
5567
5568
027252
5569
027256
5570
027264
5571
027266
5572
027274
5573
027276
5574
027300
5575
5576
027302
5577
027306
5578
027314
5579
027316
5580
027324
5581
027326
5582
027330
5583
5584
5585
027332
5586
5587
5588
5589
5590

15 gy

1613 Pagfo os

C
SEQ 0106

HOP15:
MSFOD:
1190000000080 00000000000080080000000000000000

1¢TEST 67

0000000600006000640080048

TEST STCFO

J10000000000000000800000000000000000000006000000000406

005267

80084000000048

TST67:

151642

11/AC=0

S$TESTN

s INCREMENT TEST NUMBER
100 TESY
$1ACO

004767
000177
000001
000000
000000
047557
047544

000000

JSR
.WORD

R7,SFDSUB
0177,0,0,1

000000

.WORD

0,0,0,0

004767
077577

000140
177777

1772777

077577
000000
007540
007540

177777

000000

004767
100377
000000
100377
000000
007517
007510

000110
177777

177777

000170

WORD

13/AC<0,

ROUND

100000

177727

14/AC=-0

004767
100000
000000
000000
C00000
007757
007744
004767
125252
125252
125252
000000
000000
000010

.WORD
47557
.WORD
47544
127RC>0, TRUNCATE
JSR
R7,SFDSUB
. WORD
771577,-1,

1S5/7AC<0

125252

000120

1.,

7540

;100 TEST

sACO

TEST FPS

tRESULT FPS

R?7,SFOSUB
100377,-1,100000,0

.WORD

100877,-1,0,0

IRESWLY

. WORD
. WORD

1517
7510

1 TESTY FPS
sRESWR.T FPS

JSR
.WORD

R7,SFDSUB
100000,0,0,0

.WORD

0.0,0,0

IRESWLT

1757

100 TEST

sACO

100 TEST
1ACO

TESY FPS

. WORD

T744

JSR
. WOR0

R7,SFDSUB
100 TEST
125252,125252, 125252, 125252

. WORD

1252%52,125%2%2,0,0

.WORD
. WORO

0
10

HOP16

]

000167

3 TEST FPS
iRESULT FPS

JSR
.WORD

. WORD

000030
125252

IRESWLY

iRESWLT FPS

;ACO

sRESWLY

s TEST FPS
RESLT FPS

1GET OVER SUBROUTINE

goeXeXsXoXaXoXe
X0 X0 X XoXXaNOXON
XoXoX
ONOXaXOXoX
oXoXo
O X0 XXX

soXsXsXaXoXaXoXoXO
XX XOXOXONXOROXO
XOXeXO
XOXOXOXOXOXOX
XOXA
OX

sSTCFD
s
$

ACO
RESWLY

Ll OBAL ARE AS
KDJ1.1A
MAC
5591
5592
559X
5594
5595
5596
5597
5598
S599

5600
5601
5602
5603

5604

5605
5606
5607
5608
5609
5610
5611
5612
5613
5614
5615
5616
5617
5618
5619
5620
5621
5622
5623
5624
5625

5626

5627
5628
5629
5630
5631
5632
5633
5634
5635
5636
5637
5638
5639
5640
5641
5642
5643
5644
5645
5646

MACY11 30A(1052)
15 MAR 84 15:51

MAR

16:58
PAGE 107
TEST STCFD

T67

SEQ 0107

F"S BEFORE EXECUTION
FPS AFTER EXECUTION
3

1THERE CAN BE * ) TRAPS WITH THE STCFD INSTRUCTION
;OX‘XOX‘X‘X‘XOXOXOXOXOXOX‘X‘XOXOXOX‘XOXOXOXOXOX‘XOXOXOXOXOX
teXaXoXaXoXaXo X8 X0 XOXEXOXEXOXAXEXOXEXOXEXOXAXOXO

XOXSX
XX 0X

027336
027340
027346
027352
027354

027356
027362
027366
027370

012605
012737
012702

170102
172415

012701
016502
170102

027444
000200

000244

SFOSUB:

001126
000020

MOV
MOV
MOV
LOFPS
L00

MOV
LDFPS

s RETURN ADDRESS TO USE AS POINTER
;REDIRECT TRAP VECTOR
$1SET TO DOUBLE MODE FOR LOAD
1LOAD FPS
tLOAD ACO WITH TEST DATA
1tPOINT TO RESULT AREA
1GET TEST FPS
1LOAD TEST FPS

STCFD

ACO,(R1)

1¢TEST

MOV

176011

404

(SP)+,R5

0504, 86FPVEC
#200,R2
R2
(R5),ACO
ORECDST,R1
20(R53),R2

027372
027374

027400
027402
027404
027406
027410

027412

027414
027420
027424
027430

027432
027434

027436

027440

170203
016502
020203
001403
104000
000411

1 INSTRUCTION DIDNT TRAP
i VERIFY STATUS

000022

2s:

000165

STFPS

cMP

R2,R3

ERROR
LWORD
. HORD

411
FPPERR

MOV

R5.R4

MOV

B8EQ

002013

010504
062704
004767
005767
001403
1C1000
000412
002013

000010
152522
151410

000024

LI P

ADD
JSR
IST

104000
000413
002013

027452

000165

)
000024

HOP16:

27456

MSOF
:

1BAD FPS

10,.R4
R7 ,DATVER
COUNT

BEQ
ERROR
LWORD
. WORD

412
FPPERR

284(RS)

sGET EXPECTED STATUS
tVERIFY STATUS
1BRANCH IF GOOO
sALL ERRORS TO TRAP 1O EMT VECTIOR
sUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
sPOINT TO EXPECTED DATA
sVERIFY DATA

1BRANCH IF GOOD

ERROR
.WORD

FPPERR

24(RS%)

027456

s SAVE FPS

22(R5) ,R2

gg?STRUCTIUN TRAPPED

027444
027444
027446
027450

INSTRUCTION

tALL ERRORS TO TRAP TO EMT VECTOR

IUNIQUE ERROR NUPMBER

1BAD ACO

1ADDRESS OF ERROR MESSAGE

sRETURN FROM TEST

1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
tADORESS OF ERROR MESSAGE
s INSTRUCTION WASNT SUPPOSE YO TRAP
1RETURN FROM TEST

300000484 5840000000000040008000008000000000000000000000000800800

soTEST

027456
027456
027462

0000

YEST

STCOF

130800808406040000000080000480000000000000800080800000000000040004

005267
005037

151322
001042

18770:

11/AC=0

00000

INC

STESTN

CLR

6FLAG

t INCREMENT TEST NMUMBER

iNO INTERRUPY

GLOBAL AREAS
KDJ11A MAC
5647
5648
5649
5650
5651
5652
5653

5634
5655
5656
5657
5658
5559

5660

S661

MACY1l 30A(1052)
15-HAR 84 15:51

027466
027472
027500
027502
027506
027510

004767
000177
000000
000000
000200
000204

027512
027516
027522
027530
027532
027536

005037
004767
100000
000100
000000
007777

027540

000220
000000

001042
000170
000300

001042
000140
055555

5670
5671
5672
5673
5674
5675
5676

027572
027600
027604
027612
027614
027620
027622

012737
004767
077777
000000
000000
001200
101206

000001
000106
171777

5678
5679
5680
5681
5682
5683
5684

027624
027630
027634
027642
027644
02765¢
027652

005037
004767
125252
125252
125252
007700
007710

001042
000056
125252

5686
5687
5688
5689
5690
5691
5523%

027654
027662
027666
027674
027676
027702
027704

012737
004767
077777
000000
000000
006700
006706

000002
000024
177777

027706

000167

5694

5697

5698
5699

S700
5701
5702

12/AC=-0

000200

007744

005037
004767
055555
177777
055555
000240
000240

5685

000000

027542
027546
027552
027560
027562
027566
027570

S677

16:58
PAGE 108
TEST STCOF

000000

5662
5663
5664
5665
5666
5667
5668

5669

15 MAR 84
T70

13/7/AC>0,
177777

055555

001042

000000

JSR
.WORD

R7,S0FSUB
177,0,0,0

.WORD
.WORD
.WORD

0,0
200
204

CLR
JSR
.WORD

86F LAG
INO INTERRUPT
R7,SDFSUB
100 TEST
100000, 300,200,100
sACO

.WORD
.WORD

0,0
nn

. WORD

;00 TEST
$ACO

sRESULT
3 TEST FPS
1RESULT FPS

tRESWLT
s TEST FPS

7744

TRUNCATE

sRESWLT

125252

S6FLAG
R7,S0FSUB
55555,55555,

LHORD
.WORD
LWORD

55555,55555
240
240

MOV
JSR
.WORD

o1,80FLAG
R7,S50FSUB
77777, -1.,100000,0

JMWORD
. WORD
MORD

0,0
1200
101206

CLR
JSR
- WORD

SFLAG
iNO INTERRUPY
R7,S0F SUB
100 TESY
125252,125252,125252.1252%2

LWORD
LMORD
LWORD

1252%2,125253
7700
7710

MOV
JSR
LWORD

92, FLAG
R7,SDFSUB
77777,-1, 1,0

LMORD
LWORD

.WORD

0,0
6700

6706

IRESULT
1 YEST FPS
yRESWULY FPS

JMP

HOPL?

1GET OVER SUBROUTINE

1NO INTERRUPT
s00 TESY
1,-1
$ACO

16/7ROUND TO UV, TRAPS DISABLED

177777

000000

FPS

CLR
JSR
.MORD

157AC<0, ROUND

125253

000232

SEQ 0108

sRESWLY
s+ TEST FPS
iRESWLY FPS

$14/7AC<0, ROUND TO UNDEF INED VARIABLE

100000

001042

;

1 INTERRUPT
00 TESTY
$ACO

sRESUL
T
: TEST FPS
IRESWLY FPS

:ACO

sRESWLY
1 TEST FPS
sRESWLY FPS

s INTERRUP T
100 TESY
1ACO

jeXeXoXoXoXoXaXo X0 X0 XXX XX XXX XOXOXOXOXAXAXOXSX XXX
joXeXaXeXaXaXaXo XXX XXX XXX XONOXOXOXOXSXOXOXOXOXOXX

3
:

STCOF

ACO
RESWLY

LGLOBAL ARE RS
KDJ1.1A
MAC

MACY11

15 MAR 84

30A(1052)

15:51

15 MAR 84

170

5703
5704

5705
5706
5707
5708
5709
5710
5711
S712
5713
5714
5715
5716
S717
S718
5719
5720
5721
5722
5723
Sv24
5725
5726
S727
S728
5729
5730
5731
5722
5733
5734
5735
5736
5737

5738

5739
5740
S741
5742
5743
5744
5745
5746
5747
5748
5749
S$750
5751

5752
5753
5754
5755
5756

5757
5758

F9
16:58

TEST

PAGE

‘

109

SEQ 0109

STCOF

FPS BEFORE EXECUTION

FPS

AFTER

EXECUTION

tAR TRAP CAN ONLY OCCUR IF ROUNDING CAUSES OVERFLOW
isXaXaXaXoXoXaX0XaXAXOXEXOXSEXOXSNAXEXEXOXEXOXEXEXOX0X
XXX
0

jeXaXaXaXaXaXa X0 X0 X0XOXSXEXEXAXAXOXOXEXOXEX

AXONE
XX 6X0X0X
XE

027712
027714
027722
027726
027730
027732
027736

012605
012737
012702
170102
172415
012701
016502
170102

027744
027746
027750

176011
170327

027742

0277174
000200

000244

SDFSUB:

MOV

408 :

1%:

000000

0200,R2
R2

MOV
MOV
LOFPS

ORECOST R1
14(RS),R2
R2

sPOINT TO RESWLT AREA
tGET TEST FPS
tLOAD TEST FPS

STCOF

ACO,(R1)

soTEST

STST
JWORD

1SET TO DOUBLE MODE FOR LOAD
sLOAD FPS

(R3),ACO

sLOAN ACO WITH TEST DATA

(PC)»
O

032737
001426
104000
000414
002013

000001

027770

000167

000042

001042

: INSTRUCTION DIDNT TRAP
BIT
81 ,80FLAG
BEQ
ERROR
.WORD
.WORD

414
FPPERR

JMP

sVERIFY A NO TRAP CONDITION
1BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
1UNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

s INSTRUCTION SHOULD MAVE TRAPPED
sREJOIN CODE

027774
030002
030004
030006
03001¢C

032737
001005
104000
000415
002013

000001

030012
030016
030020
030022
030026
030030
030032
030034

000167
012604
005726
022704
001403
104000
000416
002013

000020

001042

; INSTRUCTION TRAPPED

508:

BIT

S14

.WORD
.WORD

415
FPPERR

JMP
MOV
157
P
BEQ
ERROR
MORD

2t
(SP)» R4
(SP).
o135 ,.R4
28

ERROR

51%:

027746

01, 80FLAG

BNE

.WORD

170203
016502
020203
001403
104000
000417
002012

1SEE

FPPERR

IF EXPECTING A

TRAP

$BRANCH IF EXPECTING A TRAP

tALL ERRORS YO TRAP T0O EMY VECTOR

sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

1 INSTRUCTION WASNY SUPPOSE TO TRAP
sREJOIN CODE
$SEE IF PC = INSTRUCTION
1CLEAN UP STACK
1
1BRANCH IF GOOD COMPARE
1ALL ERRORS YO TRAP TO EMT
tUNIQUE ERROR NUMBER

416

030036
030040
030044
030046
030050
030052
030054

INSTRUCTION

sWAIT FOR POSSIBLE FPA TRAP,
$1STORE STATUS HERE.

027752
027760
027762
027764
027766

RETURN ADDRESS TO USE AS POINTER

JREDIRECT TRAP VECTOR

MOV
LOFPS

L.0D

001126
000014

(SP)+,RS

#3504 ,80FPVEC

VECTOR

s ADDRESS F ERROR MESSAGE

1PC WAS INCORRECY

1COMMON COOE FOR TRAP AND NO TRAP
s VERIFY STATUS

000016

2%:

STFPS

1SAVE FPS

cHP
BEQ
ERROR
.WORD
.MORD

A2,R3
3

IVERIFY STATUS
1BRANCH IF GOOD
tALL ERRORS TO TRAP TQ EMY VECTOR
tIUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

MOV

16(RS5) .R2

417
FPPERR

1GET EXPECTED STATULS

1BAD FPS

GLOBAL AREARS
KDJ11A JMAC
5759
$760
5761
5762
5763
5764
5765
5766
S767
5768
5769
5770
S771
$772
5773
5774
5775
5776
5777
5778
5779
5780
5781
5782
5783
5784
5785
5786
5787
5788
5789
5790
5791
5792
5793
5794
5795
5796

5797

5798
5799

5800
5801
5802
5803
5804
5805
5806
5807
5808
5809
5810
5811
5812
5813
5814

030056
030060
030064
030070
030074
030076
030100
030102

MACY1l

15-MAR-84

30A{1052)

15:51

010504

062704
Q04767
005767
001403
104000

000010

152040
150744

15-MAR _84
T70

16:58
PAGE 110
TEST STCOF

34:
a%:

MOV
ADD

JSR
TST
BEQ

ERROR
.WORD
. WORD

000420

002013

RS .R4
€10,R4

001042

S5$:

TST

80F LAG

000020

20(RS)

030116
030122
030124
030130
030132
030134
030136

012704
170314
021427
001403
104000
000421
002013

001106

JMP
s VERIFY FEC
7%:
MOV

030140

000165

000010

000020

8s:

ORECFEC,.R4

(R4)

cMP
8€Q
ERROR
. WORD
. WORD

421
FPPERR

JMP

20(R5)

(R4),010
84

TO EXPECTED DATA

sVERIFY DATA
1BRANCH IF 000

1ALL

420
FPPERR

005737
001002
000165

STSTY

+POINT

R7,DATVFR
COUNT
St

030104
030110
030112

BNE

SEQ 0110

ERRORS

TRAP

tUNIQUE ERROR NUMBER
+BAD ACO

TO EMT

VECTOR

1 ADDRESS OF ERROR MESSAGE

+SEE IF NEED TO CHECK FEC
tBRANCH IF NEED TO CHECK
sRETURN FROM TEST

1POINT TO FEC AREA
1SAVE FEC

s VERIFY FEC FOR OVERFLOW

;1BRANCH IF GOOD

tALL ERRORS TO TRAP T0O EMT VECTCOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

:BAD FEC
iRETURN FROM TEST

030144
030144

HOP17:

MSFDI:
1100880000 0808084000000000800000080380008000480000008000800800084

;oTEST 71

TEST STCFO

- USING ILLEGAL ACCUMULATOR

80840

1300888004848 0000000084008080000000800000008000000000

030144
030144
030150
030154
030156
030160
030162
030164
030170
030172
030174
030176

005267
012701
170101
176006
170202
170303
022702
001403
104000
000422
002013

030200
030204
030206
030210
030212

022703
001403
104000
000423
002013

150634

TST71:

040000

INC
MOV
LOFPS
SICFD
STFPS
STSY

STESTN
640000,R1}
R1
ACO,ACS
R2
R3

s INCREMENT TEST MUMBER
tOISABLE INTERRUPTS

BEQ
ERROR
LHORD

$BRANCH IF ERROR RECEIVED
tALL ERRORS YO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER
1ADORESS OF ERROR MESSAGE

140000

000002

00000008080000486¢

is:

. WORD

422
FPPERR

crp

92.R3%

8EQ

. WORD

423

ERROR
. WORD

030214

2%:

030214

MCLRD:

#140000,R2

FPPERR

toTEST ILLEGAL INSTRUCTION
1SAVE STATUS
$SAVE FEC
IVERIFY FER SEV

(FER BIT NOT SET ON ILLEGAL INST.
tVERIFY FEC = FLOATING OPCDOE ERROR
:BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
tFEC INCORRECT

138808680508 0048800000003004000000008000000000080008000000000000800¢00

soTEST
030214
030214

TEST CLRD

1100068480088 0000053000000000880000080000800300000000000000000000

5267

150%64

TS172:

INC

$TESTN

1 INCREMENT

TEST NUMBER

ul UBAL ARE AY
KDJ1.1A
MAC

5815
5816
S817
5818
5819
3820
S821
5822
5823
5824
5825
5826
5827
5828
5829
5830
5831
5832
5833
S834
S835
5836

5837
5838
5839

5840
5841
5842
5843
5844
5845
5846
S847
5848
5849
5850
5851
5852
5853
5854
5855
5856
5857
5858
5859
5860
5861
5862
5863
5864
5865
5866
5867
5868
5869
5870

MACY11

15 HAR 84

030220
030224
030230
030232
030234
030240
030242
030244
030250
030254
030260
030262
030264
030266

174011
170411
012704
004767
005767
001403
104000
000424
002013

030270
030272
030276
030300
030302
030304

170202
020227
001403
104000
000425
002013

30A(1052)

15:51

012701
012704

001726
000200

012701

001126

170104
172411

15 MAR 84

T72

16:58

PAGE

MOV

MOV
LOFPS
L0o

MOV
STD

001256

131672
150560

000204

TEST

14:

030306

MCLRI:

;POINT 10 DATA
1SET FPP GTATUS TO DOUBLE

ORECDST,R1
ACO,(R1)

tPOINT

(R1),ACO

STFPS

R2
R2, 4204

cHP
BEQ

SEQ 0111

0TABA7 ,R1
0200,R4
R4

(R1)
#TAB6,R4
R7,DATVER
E?UNT

. WORD

28:

111

CLRD
MOV
JSR
IST
BEQ
ERROR
. WORD
.WORD

ERROR
.WORD

030306

CLRD

425

FPPERR

DATA

BUFFER

1CLEAR DATA BUFFER
sVERIFY BUFFER =0
3
]

1BRANCH I RECDSY = O
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

424
FPPERR

1 STORE GARBAGE

tRECDST NOT CLEARED
sSAVE

STATUS

sVERIFY STATUS
tBRANCH IF GOOD
sALL ERRORS TO TRAP T0O EMT VECTOR
sUNIQUE ERROR NUMBER
sADDORESS OF ERROR MESSAGE
$1BAD STATUS

1108808008000 0080880088000000000800000000000000000000800800800000000

;‘TESY

030306
030306
030312
030316

TEST CLRD,

ILLEGAL ACCUMULATOR

1100080880 4800000000800000040000000080000000000000000888000000000

005267
012704
170104

030320
030322
030324
030326
030332
030334
030336
030340

000426
002013

030342
030346
030350
030352
030354

022705
0201403
104000
000427
002013

170406
170203
170305
022703
001403
104000

150472
040200

1ST73:

INC
MOV
LOFPS

CLRD
SIFPS

S$TST
cvp
BEQ
ERROR
+ HORO
. WORD

140200

000002

1¢:

030356

28:

030356

MLSt:

crp
B8EQ
ERROR
. WORD
. WORD

STESTN
#40200,R4
R4

1 INCREMENTY TEST NUMBER
sDISABLE INTERRUPTS
sLOAD STATUS
soTEST INSTRUCTION WITH ILLEGAL ACC
$SAVE STATUS
1SAVE FEC

:uoaoo.n!
s

sVERIFY ERROR

426

tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

FPPERR
#2,R5
24

sBRANCH IF FER SETY

{ERROR IN FPS
iVERIFY FEC <2 OPCODE ERROR
tBRANCH IF GOOD

sALL ERRORS TO TRAP TO EMT

427

tUNJQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE
184D FEC

FPPERR

1100606808800 00000800008800008000040000800000000080000008000000000

soTEST

030356

TEST LOFPS,

STFPS MODE

1386808840008 80080000008000000000000800000000000000000000000000000s

T5174;

VECTOR

GLOBAL ARE RS
KDJ1.1A
MAC

5871
5872
5873
5874
5875
5876
S877
5878

5879
5880
5881
5882
5883
5884
5885
S88¢
588°
58¢3
5889
5890
5891
5892
5893
5894
5895
589
5897
5898
5899
5900
5901
5902
5903
5904
5905
5906
5907
5908
3909
5910
5911
5912
5913
5914
5915
5916
5917
5918
5919
5920
5921
5922
5923
5924
5925
5926

"RCVIA‘Sgggg?SZ)

15 MAR

030356
030362
030366
030372
030376
030404
030406
030410
030414
030416
030420
030422

005267
012704
012714
012701
012737

150422
001136
147757
001116
030462

020427
001403
104000
000430
002013

001136

030424
030430
030432
030434
030436

020127
001403
104000
000431
002013

001116

030440
030446
030450
030452
030454
030456

030462
030464
030466
030470

030472

170114
170211

023727
001412
104000
000432
002013
000167

L
15 Hhfltgz

16:?85'

prFP&fzsrrps MODE 1

INC
MOV

$TESTN
@TSTLOC,R4

MOV
MOV
LOFPS

®RECST R
9108 ,00FPVEC
(R4)

MOV

000244

(R1)
R4 ,0TSTLOC
1s

. WORD

430
FPPERR

cre

R1,8RECST

8EQ

ERROR

. WORD

.WORD
001116

147757

24:

BEQ

ERROR

LMORD

.WORD
000012

JHP

012605
104000

ERROR
.WORD
.MORD

000433
002013

030474

3s:

030474

MLS2:

;sINCREMENT TEST NUMBER
tPOINT R4 10 RAM
1SETUP EXPECTED STATUS
+SET BUFFER FOR RECEIVED STATUS
t1SETUP TRAP VECTOR
1¢TEST INSTRUCTION
soTEST INSTRUCTION
sVERIFY R4
1BRANCH IfF GOOOD
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
;sADDRESS OF FRROR ME SSAGE
3

sVERIFY R1

-3 ]

;BRANCH IF GOOO

;ALL ERRORS

431

FPPERR

BAD A1

SORECST, 0147757

433
FPPERR

TRAP

TC EM'

LECTOR

1+ADDRESS OF ERROR MESSAGE
sVERIFY

STATUS

1BRANCH F GOOD

tALL ERRORS TO TRAP

432

FPPERR

iUNIQUE ERROR NUMBER

iUNEXPECTED TRAP
10s:
MOV
(SP),RO
MOV
(SP)Y. RS

012600

SEQ 0112

2147757, (R4)

STFPS
cP
8EQ

ERROR
.WORD

1s:

sUNIQUE ERROR NUMBER

T0O EMT

VECTOR

s ADDRESS OF ERROR MESSAGE

1BAD STATUSN
1GET OVER TRAP

s SAVE PC
1SAVE PS

sALL ERRORS TO TRAP TO EMY VECTOR
1UNIQUE ERROR NUMBER
sADORESS OF ERROR MESSAGE
sUNEXPECTED TRAP

1:0600800000804000000000000000806600000000000000000800000800080800

soTEST
030474
030474
030500
030510
030514
030522
030524
030526
030532
030534
030536
030540

030542
030546

TESY LDFPS,

STFPS NMODE 2

310080088000000806080000800048000000008800000000000000000000080000

005267
012704
012714
012701
012737
170124

170221

020427
001403

TST?S:

150304

001136

145557
001116
030600

000244

001140

000434
002013

001120

1s:

STESTN

1 INCREMENT TEST NUMBER

STSTLOC.R4
145557, (R4)
MRECST ,RY
2108 ,BOFPVEL
(R4«
(R1).

;POINT Ra YO RAM
tSETUP EXPECTED STATUS
1SET BUFFER FOR RECEIVED STATUS
1SETUP TRAP VECTOR
soYEST INSTRUCTION
1oTEST INSTRUCTION

RA,ATSTLOC 2

tVERIFY R4

ERROR
LWORD
WORD

434
FPPERR

1ALL ERRORS TO TRAP T0Q EMT VECTOR
IUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

P
BEQ

R1,8RECST.2
23

8E€Q

104000

020127
001403

INC

MOV
MoV
MOV
MOV
LOFPS
STFPS

1BRANCH IF GOOD

IVERIFY R}
1BRANCH IF GOOD

Gt OBAL

AREAS

KDJ11R . MAC

5927
5928
gggg

030550
030552
030554

MACY1l

15-MAR 84

30A(1052)
15:51

.WORD

023727
001412
104000
000436
002013

001116

5937
5938
5939
5940
5941
5942
5943

030574

000167

000012

030600
030602
030604
030606
030610

012600
012605
104000
000437
002013

5944

59‘9

145557

030612

3s:

030612

MLS3:

LOFPS,

\J ‘)
STFPS MODE

“EQ 0113

435
FPPERR
SORECST, 0145557
3s

436
FPPERR

}

BAD R

1ALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
tVERIFY STATUS
1BRANCH F GOOD
1ALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER
tADDRESS (F ERROR MESSAGE

VECTOR

;BAD STATUSN

iGET OVER

TRAP

1SAVE PC
s SAVE PS
sALL ERRORS TO TRAP TO EMT
sUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

VECTOR

sUNEXPECTED TRAP

;;.‘.0“‘.0.0‘0..‘0‘000.0.“.“““0‘00‘..““0...000...0.0‘.‘00.

030612
030612
030616
030622
030630
030636
030642
030650
030656
030660
030662
030666
030670
030672
030674

005267
012704
012737
012737
012701
012737
012737
170134
170231
020427
001403
104000
000440
002013

150166
001136
001142
147501
001146
001116
030734

5968
5969
5970
5971
gg;g

030676
030702
030704
030706
030710

020127
001403
104000
000441
002013

001150

030712
030720
030722

030724
030726

TEST LDFPS,

STFPS MODE 3

130 020 0 8 008000800008000000000080200000080800000080000406650000460488

5952
5953
5954
5955
5956
3957
5958
5959
5960
5961
S%2
5963
5964
5965
gggg

5980
5981
5982

(o, o
BEQ
ERROR
.WORD
. WORD

;1«TEST 76

5951

S977
5978
5979

2%:

113

JMP
3
tUNEXPECTED TRAP
10%:
MOV
(SP)s,RO
MOV
(SP),RS
ERROR
. WORD
437
. WORD
FPPERR

5950

5974
5975
5976

TEST

PAGE

ERROR
. WORD

030556
030564
030566
030570
030572

5945
5946
5947
5948

175

16:58

104000
000435
002013

5931
5932
5933
5934
5935

5936

15 MAR B4

023727
001412
104000

000167

030734

012600

001136
001142

001146
000244

001140

001116

000442
002013

030730

TS176:

1s:

147501

2%:

INC
MOV
MOV
MOV
MOV
MOV
MOV
LOFPS
STFPS
e
8EQ
ERROR
. WORD
. WORD

STESTN
8TSTLIC . Re
OTSTLOC +4,80TSTLOC
0147501 ,007STLOC -4
OTSTLOC+10,R1
MRECSTY ,90TSTLOC 10
108 ,80F PV
H(As).
R1)»
R4, 8TSTLOC2
1s

ce
BEQ
ERROR
. WORD
. WORD

RL,8TSTLOC.12
e

ce
8EQ
ERROR

.WORD
. WORD

000012

s INCREMENT TEST NUMBER
sPOINT R4 10 RAM
1 ISTLOC= DEFERRED ADDRESS
sSETUP EXPECTED STATUS
1Rl POINTS TO TSTLOC.10
$SET DEFERRED BUFFER FOR RECEIVED STATUS
1SETUP TRAP VECTOR
1oTEST INSTRUCTION
1o TEST INSTRUCTION
IVERIFY Re
1BRANCH IF GOOOD
sALL ERRORS TO TRAP TO ENMT VECTOR
IUNIQUE ERROR NUMBER
sADORISS OF ERROR MESSAGE

440
FPPERR
]

441
FPPERR
SPRECSY, 9147501
3¢

442
FPPERR

JMP
3
sUNEXPECTED TRAP
108:
MOV
(5P} ,RO

]

BAD R

tVERIFY R}
1BRANCH IF GOOD
1ALL ERRORS TO TRAP TO EMT
IUNIQUE ERROR NUMBER

VEZTOR

+ADDRESS OF ERROR MESSAGE

IVERIFY STATYUS
18RANCH F GOOD
tALL ERRORS TO

TRAP TO EMT
1UNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE
1BAD STATUSN
$1GET

OVER

TRAP

1 SAVE PC

VECTOR

GLOBAL AREAS
KDJ11A.MAC
5983
5984
5985
5986
5987
5988
5989
5990
5991
5992
5993
5994
5995
5996

5997
5998
5999

6000
6001
6002
6003
6004
6005
6006
6007
6008
6009
6010
6011
6012
6013
6014
6015
6016
6017
6018
6019
6020
6021
6022
6023
6024
6025
6C76
6027
6028
6029
6030
6031
6032
5033
6034
6035
6036
6037
6038

030736
030740
030742
030744

Y
MACY11l

15 MRR 84

30A(1052)

15:51

15 MAR 84

176

16:58

012605
104000
000443
002013

PAGE

MOV
ERROR
.WORD
.WORD

030746

3%:

030746

MLSA:

114

TesT CoFPA s TrPS MoDE 3

Sea 0114

(SP)+ RS

s SAVE PS
sALL ERRORS TN TRAP TO EMT
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

443
FPPERR

VECTOR

JUNEXPECTED TRAP

3 3“‘..“.“‘.‘.““““““““‘““..“““““.‘.“‘h
“““.‘.

s« TEST 77

030746
030746
030752
030756
030764
030770
030776
031000
031002
031006
031010
031012
031014
031016
031022
031024
031026
031030

TEST LOFPS,

STFPS MODE 4

1108000000 000000000080800000000000000000000000000000400

0052¢7
012704
012737
012701
012737
170144
170241
020427
001403
104000
000444
002013
020127
001403

150032
001140
147757
001120
031054

TST77;
001136

1$:

104000
000445
002013
001116

031050

000167

000012

031054
031056
031060
031062
031064

012600
012605
104000
000447
002013

$TESTN
#TSTLOC.2,R4
&147757,90TSTLOC

147757

2%:

MRECST2,R1

$SET BUFFER FOR RECEIVED STATUS

LOFPS
STFPS

-(R4)
-(R1)

$1¢TEST INSTRUCTION
1sTEST INSTRUCTION

€108 ,040FPVEC

031066

3s:

031066

MLSS:

tVERIFY R4
1BRANCH IF GOOD
tALL ERRORS TO TRAP 1O EMT VECTOR

444

tUNIQUE ERROR NUMBER

FPPERR

cHp
BEQ
ERROR
. WORD
. WORD

BEQ

tSETUP TRAP VECTOR

R4, #TSTLOC
1s

sADDRESS OF ERROR MESSAGE
:

R1,8RECST
28

445
FPPERR

sVERIFY R1
1BRANCH IF GOOD
tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE

8AD A1

SORECST, 0147757

iVERIFY STATUS

ERROR
. WORD
.WORD

446
FPPERR

MOV
MOV
ERROR
.WORD
. WORD

(SP)+ ,RO
(SP)» RS

IUNEXPECTED TRAP

10%:

i INCREMENT TEST NUMBER
sPOINT R4 TO RAM
s TSTLOC= STATUS ADDRESS

MOV

ce
8EQ
ERROR
.WORD
.WORD

001116

023727
001412
104000
000446
002013

INC
MOV
MOV

MOV

000244

001136

031032
031040
031042
031044
031046

0400000006

447
FPPERR

;BRANCH F GOOD

;ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
:ADDRESS OF ERROR MESSAGE

18BAD STATUSA
iGET OVER TRAP

$SAVE PC
1SAVE PS
;ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR MUMBER
;ADDRESS OF ERROR MESSAGE
JUNEXPECTED TRAP

3500000600000 8000808800000000000084000000800000000000004000000004

s«TEST

031066
031066
031072

100

TEST LOFPS,

STFPS MODE

§1000008680008000040080000000048440000000000000000000004840800000

005267
012704

147712
001140

TST100:;

INC

MOV

S$TESTIN

®TSTLOC.2.R4

s INCREMENT TEST NUMBER

1POINT Ra YO RAM

GLOBAL AREAS
KDJ11A .MAC

6039
6040
6041
6042
6043
6044

6045
6046

6047
6048
6049
6050
6051
6052
6053
6054
6055
6056
6057
6058
6059
6060
6061
6062
6063
6064
6065
6066
6067
6068
6069
6070
6071
6072
6073
6074
6075
6076
6077

031076

MACY11l

15-MAR-84

30A(10S52)

15:51

031104
031112
031116
031124
031132
031134
031136
031142
031144
031146
031150

012737
012737
012701
012737
012737
170154
170251
020427
001403
104000
000450
002013

031152
031156
031160
031162
031164

020127
001403
104000
000451
002013

001146

031166
031174
031176
031200
031202

023727

001412
104000
000452
002013

001116

031204

000167

031210
031212
031214
031216
031220

00.142

147501
001150
001116
031210

15-MAR-84
7100
001136
001142

001146
000244

OTSTLOC+4,80TSTLOC
4147501,807TSTLOC
.4
#TSTLOC+12,R1
ORECST,80TSTLOC+10
9104 ,80FPVEC
8-(R4)

cMe

R4,0TSTLOC

BEQ
ERROR
.WORD
.WORD
1s:

147501

000012

23:

cHP
BEQ
ERROR
.WORD
.WORD

10s:

012600

104000
000453
002013

031222

s¢TEST

1BRANCH IF GOOD
sALL ERRORS TO TRAP TQO EMT VECTOR
sUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

451
FPPERR

452
FPPERR

JMP

MOV

(SP).,RO

S8#RECST, 2147501
3

(SP)+,RS

453
FPPERR

INSTRUCTION

sVERIFY R4

R1,0TSTLOC.10
23

cMe
BEQ
ERROR
LWORD
.WORD

MOV
ERROR
.WORD
.WORD

1 ISTLOC= DEFERRED ADDRESS
1SETUP EXPECTED STATUS
1R1 POINTS 10 412
1SET DEFERRED BUFFER FOR RECELVED STATUS
{SETUP TRAP VECTOR
1#TEST INSTRUCTION

8-(R1)

4S0
FPPERR

sUNEXPECTED TRAP

012605

SEQ 0115

MOV
MOV
MOV
MOV
MOV
LOFPS

STFPS

001136

BAD R1

tVERIFY R1
1BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE

1VERIFY STATUS
1BRANCH F GOOD
sALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE
;BAD STATUS\
1GET OVER TRAP

VECTOR

1 SAVE PC

:SAVE PS
tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
sADDRESS OF ERROR MESSAGE
sUNEXPECTED TRAP

MLS6:
1510680008 8488488040400800000800008000008006080080800804680000000000

;«TEST 101

6078

6079
6080
6081
6082
6083
6084
6085
6086
6067
6088
6089
6090
6091
6092
6093

16:58
PAGE 115
TEST LOFPS, STFPS MODE S

TEST LOFPS, STFPS MODE &

1108880448400 800000608000808000000080000000000080000004800880060048

031222
031222
031226
031232
031240
031244
031252
031256
031262
031266
031270
031272
031274

005267
012704
012737
012701
012737
170164
170261
020427
001403
104000
000454

147556
001136
140001
001246
031334

002013

031276
031302

020127
001403

001246

TST101:

INC

MOV
MOV

001142
000244

177700
001136

: INCREMENT TEST NUMBER

1POINT R4 YO RAM
1SETUP EXPECTED STATUS

MOV
MOV
LDFPS
STFPS

STSTLOC+110,R)
0109 ,80FPVEC
4(R4)
-100(R1)

t1R1 WILL POINT TO TESTLOC+10
1SETUP TRAP VECTOR
:oTEST INSTRUCTION
t¢TEST INSTRUCTION

BEQ

1BRANCH IF GOOO

coe

ERROR

1%:

S$TESTN

STSTLOC,.Re
4140001 ,.80TSTLOC 4

R4, 0TS5TLOC

LHWORD
.WORD

454
FPPERR

cre
BEQ

R1,0TSTLOC. 110
24

IVERIFY Re

sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1+ADDRESS OF ERROR MESSAGE
1VERIFY R1
;BRANCR IF GOOD

GLOBAL AREAS
KDJ11A. MAC

6095
6096
6097
6098
6099
6100
6101
6102
6103
6104
6105
6106
6107
6108
6109
6110
6111
6112
6113
6114
6115
6116
6117
6118
6119
6120
6121
6122
6123
6124
6125
6126
6127
6128
6129
6130
6131
6132
6133
6134
6135
613¢,
6137
6133

6139

6140
6141
6142
6142
ol44

6145
6146
6147
6148
6149
615(C

MACY1l

30A(§?52)
15-MAR-84 15

031304
031306
031310

104000
000455
002013

031312
031320
031322
031324
031326

023727
001412
104000
000456
002013

001146

031330

000167

000012

031334
031336
031340
031342
031344

012600

1 5-MAR_84

M
:

T101 16 ?ESY L8§P§%65TFPS MODE 6
PA

ERROR
. WORD
. WORD
140001

2%:

455
FPPERR

+ALL ERRORS TO TRAP TQ EMT
tUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

cMP
BEQ
ERROR
.WORD
.WORD

456
FPPERR

s VERIFY STATUS
1BRANCH F GOOD
sALL ERRORS TO TRAP TO EMT
;UNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

JMP

BAD R
1
3
80TSTLOC+10,0140001
3

;UNEXPECTED TRAP

103:

012605
104000
000457
002013

MOV

ERROR
.WORD
.WORD

031346

33:

031346

MLS7:

Sea o116
VECTOR

VECTOR

:1BAD STATUSN
;:GET OVER TRAP

(SP)+ RO

:SAVE PC

(SP)Y+ RS

1SAVE PS

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
; ADDRESS OF ERROR MESSAGE

457
FPPERR

IUNEXPECTED TRAP

$11800080004040808400008800000000000800080004000006008604408888004

1oTEST 102

031346
031346
031352
031356
031364
031372
031376
031404
031412
031416
031422
031426
0351430
031432
031434

084800

STFPS HMODE 7

$300008.0040084808000000000000800000500000000088008680804080008004

005267
012704
012737
012737
012701
012737
012737
170174

170271

020427
001403
104000
000460
002013

020127
001403
104000
000461
002013

001046

031452
031460
031462
031464
031466

023727
001412
104000
000462
002013

001146

031470

000167

000012

012600

TST102:

147432

001236
001142
145501
001046
001146
031474
177700
000072
001236

031436
031442
031444
031446
031450

031474

TEST LOFPS,

001136
001142

INC
MOV
MOV

MOV

000244

sSETUP EXPECTED STATUS

MOV
MOV
LOFPS

SISTLOC+10,80TSTLOC 2
9108 ,80FPVEC
8-100(Ra)

3
sSETUP TRAP VECTOR
s oTEST INSTRUCTION

cp
BEQ
ERROR
LHORD
MWORD

R4, #TSTLOC+100
1¢

IVERIFY Ra
1BRANCH IF GOOD
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR MUMBER

STFPS

1$:

872(R}1)

460
FPPERR

LMORD

CcMp
8EQ

80TSTLOC+10,0145501
3

. WORD

462
FPPERR

JMP

ERROR
.MORD

soTEST INSTRUCTION

tVERIFY R1
1BRANCH IF GOOD
sALL ERRORS TO TRAP TO EMT VECTOR

IUNIQUE ERROR NUMBER

FPPERR

B8AD R1 +ADDRESS OF ERROR MESSAGE
]

;UNEXPECTED TRAP
10%;
MOV
(SP)Y+,RO

sR1 POINTS 1O TSTLOC.10

1 ADDRESS OF ERROR MESSAGE

R1,87STLOC-70
-3

. WORD
2%:

&TSTLOC-70,.R1

ce
8EQ

ERROR

145501

s INCREMENT TEST NUMBER
iPOINT R4 TO RAM
s TSTLOC= DEFERRED ADDRESS

0145501 ,90TSTLOC 4

MOV

001140

STESTN
@YSTLOC+100,.Re
OTSTLOC+4,807TSTLGCC

IVERIFY STATUS
1BRANCH F GOOD

tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR MUMBER
1 ADDRESS OF ERROR MESSAGE

;8AD STATUSN

tGET OVER TRAP

1SAVE PC

GLOBAL

AREAS

KDJ11A .MAC

6151
6152
6153
6154
6155
6156
6157
6158
6159
6160
6161
6162
6163
6164
6165
6166
6167
6168
6169
6170
6171
6172
6173
6174
6175
6176
6177
6178
6179
6180
6181
6182
6183
6184
6185
6186
6187
6188
6189
6190
6191
6192
6193
6194
6195
6196
6197
6198
6199
6200
6201
6202
6203
6204
6205
6206

031476

031500
031502
031504

MACY11l

15-MAR-84

30A( 1052)

15: 51

15 MAR-84
T102

16:58
PAGE 117
TEST LDFPS, STFPS MODE

012605
104000
000463
002013

MOV
ERROR

. WORD
. WORD

031506

MLDC2:

SEQ 0117

(SP)+,RS
$ALL

463
FPPERR

i SAVE PS

ERRORS

TRAP

TO EMT

sUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MZSSAGE
1UNEXPECTED TRAP

VECTOR

1108088808404 0 000440000000 0000000040480000000000008408004804800008

{1+ TEST 103

0000

TEST LOCLD MODE 27

3100888844008 400000000000400080000000808808088004044800040

031506
031506
031512
031514
031520
031522
031530
031532
031534
031536
031540
031542
031546
021550
031552
03:554

005201
005201
020127
001412
104000
000464
002013

031556
0%1562
031564

012600
012605

005267
005001
012704
170104
012737

177027
005201
005201

000167

021566
031570
031572

104000
000465
002013

031574
031600
031604
031606
031612
C¢31616
031620
031622
031624

012704
012701
174011
004767
005767
001403
104000
000466
002013

TST103:

147272
007700

031562

INC
CLR

MOV
LOFPS
MOV

000244

000003

000012

004848448

10%:

1s:

s INCREMENT TEST NUMBER
s INIT R
;FPS=DOUBLE, LONG

(R7)+,ACO

s¢TEST

464
FPPERR

JMP
MOV
MOV

(SP).,RO
(SPY+ RS

MOV

150334
147222

R1
R1
R1
R1
R1,03

465
FPPERR

#TABG6A
R4
#RECOST,R1
ACO,(R1)
R7,DATVER

COUNT
24

466
FPPERR

031626

2%:

031626

MLCF

9108 ,80f PVEC

LOCLD
INC
INC
INC
INC
CcHP
BEQ
ERROR
.WORD
. WORD

ERROR

001266
001:26

$ (ESTN
Ry
97700,R4
R4

:SETUP WILD TRAP

INSTRUCTION

H
H

s VERIFY
1BRANCH IF GOOO
tALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;sADDRESS OF ERROR MESSAGE
s INSTRUCTION FAILED
;iJUMP OVER WILD TRAP
1SAVE PC

1SAVE PS
1ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
sWILD TRAP ON INSTRUCTION
1POINT TO EXPECTED DATA
tPOINT TO DATA BUFFER
sVERIFY DATA
3

1BRANCH IF GOOD DATA
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
tADDRESS OF ERROR MESSAGE
1BAD DATA

i 150000088580 084000008048800880040000000008008000008020000000000000

soTEST

031626
031626

104

TEST LOCIF,

LOCLF

$5080888004040406008004400000000000080000000080030000002008008000000

005267

1471Se

TST104:

INC

$TESTN

+ INCREMENT TEST NUMBER

6211
6212

6213
6214
6215
6216
6217
6218
6219
6220
6221
6222
6223
6224
6225
6226
6227
6228
6229
6230
6231
6232
6233

6234

6235
6236
6237
6238
6239
6240
6241
6242
6243
6244
6245
6246
6247
6248
6249
6250
6251
6252
6253
6254
6255
6256

6257

6258
6259
6260
6261
6262

15-MAR 84

01\
3DA(1052)

;5:51

031632
031636
031642
031646
031650

004767
000000
00062
000000
000004

006500
00000
€200

031652
031656
031662
031666
031670

004767
000000
000000
007440
007444

000460
177777
000000

15 MAR 84
T104

16:58

TEST

117INT=0

PAGE

118

LDCIF,

JSR
.WORD
. WORD
.WORD

. WORD
127INT<Q-1
,
JSR
. WORD
.WORD
.WORD
. WORD

1 37LONG=0

SEQ n118

LDCLF

R7,LCFSUB

0,0
.0

R7,LCFSUA

0,1
0,0
7440
7444

1FSRC

031712
031716
031722
031726
031730

004767
040000
043600
000017
000000

031732
031736
031742
031746
031750

004767
000000

040200

031752
031756
031762
031766
031770

004767
000252
042052
000000
000000

R?7,LCFSUB

42052,0
0
]

031772
031776
032002
032006
032010

004767
140000

sFSRC

000007
000010

R7.LCFSUB
-40000,0
%43600.0

032012
032016
032022
032026
032030

004767
177777
140200
000007
000010

032032
032036
032042
032046
032050

004767
125252
143652
000007
000010

000300

032052

004767

000260

000000

000420

JSR
. WORD
. WORD
. WORD
. WORD

14/INT+-4000C

JSR

R7,LCFSUB

tFSRC

R7,LCFSUB
40000,0
43600,0
17
0

100 TEST
1FSRC
sRESWILT
s+ TESY FPS
tRESWLTY FPS

R7,.LCFSUB
0,1

100 TEST

117
100

252,2%2%2

143600

10
J

R7,LCFSUB

- 1 'o

%00200.0
.

125252
126000

197 INT«PATTERN
JSR
. WORD

. HORD
. WORD
+ 10/L ONG = 40000
JSR

100 TEST

0.0
0,0
100
104

40200,0

000117
000100

100 TESY

tRESULT
1 TEST FPS
sRESULTY FPS

004767
000000
000000
000100
000104

000440

100 TEST

tRESWLT
i+ TEST FPS
tRESULT FPS

031672
031676
031702
031706
031710

6207
6208
6209
6210

MACY11l

500

GLOBAL AREAS
KDJ1.1A
MAC

10
R7,LCFSUB

125232,12%252

%45652.126000

10
R7,LCFSUB

tRESWLY
s+ TEST FPS
sRESWLT FPS

IRESWLT
1 YEST FPS
tRESULT FPS

sFSRC
sRESWLY
VEST

100 TES?
FPS

1RESWLT FPS

sD0 TESTY
sRESWLTY

s TESY FPS
IRESULT FPS
sFSRC

100 TESY

I1RE ST
s TESY FPS
sRESWLY FPS
100 TESTY
1IFSRC

sRESWLT
s TEST FPS
tRESULT FPS

100 TEST

LLOBAL
KDJU11A,

6263
6264
6265
6266
6267
6268
6269
6270
6271
6272
6273
6274
6275
6276
6277

6278
6279
6280
6281
6282
6283
6284
6285
6286
6287

T T PR (ST VA

032056
032062
032066
032070

040000
047600
000117
000100

000000
000000

032072
032076
032102
032106
032110

004767
000000
040200
007557
007540

000240

032112
032116
032122
032126
032130

004767
000000
042052
007557

000220
000252

032132
032136
032142
032146
032150

007540
004767

140000
147600

000107
000110

6288

032152
032156
032162
032166
032170

004767
177777
140200
007500
007510

6292
6293
6294
6295

032172
032176
032202
032206

004767

6289
6290
629

6296

6297
6298

6299
6300
6301

000200
000000
000000

1S MAR 984 16
1PPBE
38
1A O 5
ocLr
.WORD
.
WORD

. WORD
. WORD
1 11/LONG=1
JSR
LMORD
.WORD
LMORD
.WORD

000160

177777
000000

000140

032210

032212
032216
032222
032226
032230

004767
0717177
047777
000117
000100

000120
177500
177777

032232
032236
032242
032246
032250

004767
040000
047600
007502
007500

000100
000100
0C0001

032252
032256
032262
032266
032270

004767
040000
047600
007557
007540

000060
000100
000000

032272
032276
032302

004767

000040

125252
125253

40000,0
47600,0

117
100

JSR

.WORC
.HORD
.WORD
.MORD

113/LONG =

JSR

.réRC

1RESULY
1+ TEST FPS

tRESULT FPS

0,1

1FSRC

7557
7540

40200,0

R7,LCFSUB

0,252
42052,0
7557
7540

-40000

.WORD
LWORD
.MORD

SEQ 0119

R7,LCFSUB

i 127/LONG=PATTERN

.WORD

125252
147652
000105
000110

100000
144000

100 TEST

1RESULT

TEST FPS

sRESULT FPS

1FSRC

100 TEST

IRESULTY

TEST FPS

tRESULT FPS

R7,LCFSUB

-40000,0
147600,0
107
110

s 14/L0ONG=
-1
JSR
R7,LCFSUB
. WORD
~1,-1
MORD
140200,0
.WORD
7500
LWORD
7510
115/LONG=PATTERN
JSR
R7,.LCFSUB
LMORD
125252, 12%252
LMORD
147652,12%253
LMORD
105
JWORD
110
1 16/LONG=71777.177500
JSR
R?,LCFSUB
.WORD
77177,1771500
. WORD
417172, 171177
LMORD
117
LMORO
100
1 177LONG=40000,
100
JSR
R7,LCFSUB
LHORD
40000,100
LHORD
47600,1
LWORD
7502
.MORD
7500
s 18/LONG=40000,100 - TRUNCATE
JSR
R7,LCFSUB

.MORD
40000,100
LHORD
47600,0
LWORD
7557
LHMORD
7540
$19/7INTs MOST NEGATIVE
JSR
R7,LCFSUB
.WORD
100000,0
. WORD
144000,0

iRESULT FPS

1FSRC

100 TEST

JRESULT
1 TEST FPS
sRESULT FPS
100 TEST
1FSRC
JRESULT
1 TEST FPS
sRESULY FPS
100 TEST
1FSRC
sRESWLY

s TESTY ¢PS

IRESWLY FPS

LLOBAL AREAS
KOJL.1A
MAC

o319
6320
6321
6322
6323
6324
6325
6326
6327
6328
6329
6330
6331
6332
€333
6334
6335
6336
6337
5338
6339
6340
6341
6342
6343
6344
6345
6346
6347
6348
6349
6350
6351
6352
6353
6354
6355
6356
6357
6358
6359
6360
6361
6362
6363
6364
6365
6366
6367
6368
6369
6370
6371
6372
6373
£374

MACY1]1

15 MAR 84

032306
032310

000007
000010

032312
032316
032322
032326
032330

004767
100000

30R(1052)

15:51

15 MAR 84
T104

L/ L\

16:58
PAGE 120
TEST LDCIF, LDCLF

7
.WORD
.WORD
10
120/7LONG= MOST NEGATIVE
JSR
R?7,LCFSUB
. WORD
100000,0
. WORD
150000,0
107
. WORD
. WORD
110

000020

150000

000107
000110

032332

000167

000126

JMP

HOP18

SEQ 0120

1+ TEST FPS
tRESUWLT FPS
100 TESTY

1FSRC

sRESWLT

1 TEST FPS
tRESULT FPS

1GET OVER SUBROUTINE

H
1aXaXe
X0 X0 X0 X0
XaX
X0 X0 X0XOXOXOX
aXo
OXSXS XA XXX
XoX
OX0X0X0X0
s
X

jeXeXaXoXaXe
XXX XOXOX0XOX
XoXs
oXOXEXSXO
XoXe
XOXSXOX0X
Xo
0X0X

tLOCIF, LOCLF

]

FSRC

]

RESWLT

]

FPS BEFORE EXECUTION
FPS AFTER EXECUTION

3
]

iNO TRAP CAN OCCUR

jeXeXoXaXaXaXeXoXoXoXoXOXeXEXOXOXOXOXOXSXOXOXSXOXOXOXEXSX
X

032336
032340
032346
032352
032356
032360

012602
012737
012701
016200
170100

032362

177014

1oXaXe
X0 XaXOXe
XoX
X XO X XOXO
oXa
X0 X0 XoXAXOXO
XoX
XOX XXX 0X0X
o
3

032446
001126
000010

000244

LCFSUB: MOV

0504 ,DOFPVEC

ORECOST,
AL

1 RETURN ADORESS TO USE AS POINTER
tREDIRECT TRAP VECTOR

tPOINT TO RESULT AREA

10(R2).RO
RO

010204

AOS:

LOCIF

1GET TEST FPS

R2.R4

iLOAD TEST FPS
1POINT TO TEST DATA

(R4),ACO

3o TEST

L]
#200,R0
RO

$SAVE FPS
1SET FPP STATUS TO DOUBLE

032364
032366
032372
032374
032376
032402
032404
032406
032410
032412

001403
104000
000467
002013

032414
032416
032422
032426
032432
032434
032436
032440

010204
062704
004767
005767
001403
104000
000470
002012

170203

012700

170100
174011
016200
020003

000200

sVERIFY STATUS
28:
STFPS

MOV
LOFPS
ST0
MOV
ce
8EQ
ERROR
. WORD

000012

147502
146406

1GEY EXPECTED STATUS
sVERIFY STATUS

467

tALL ERRORS YO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

3s:

MoV

JSR

R2,R4
TM, RA
R7,DATVFR

BEQ

COUNT
1)

. WORD
. WORD

470
FPPERR

ERROR

tSAVE TEST RESWULT INTO RECDST

:2.&3

FPPERR

TO MODE
)

ACO,(R1)
12(R2),.RO

. WORD

ADD

INSTRUCTION (ACCORDING

1BRANCH IF GOOD

1BAD FPS

tPOINT TO EXPECTED DATA
iVERIFY DATA

1BARD ACO

$BRANCH IF GOOO
1ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
1ADDRESS OF ERROR MESSAGE

LLOBAL ARE AS
KDJ11A MAC

6375
6376
6377
6378
6379
6380
6381
6382
€383
6384
6385
6386
6387
6388
6389
6390
6391
6392
6393
6394
6395
6396
6397
6398
6399
6400
6401
6402
6403
6404
6405
6406
6407
6408
6409
6410
6411
6412
6413
6414
6415
6416
6417
6418
6419
6420

032442

MACY1l

30A(1052)

000162

000014

15 MAR 84

15:51

15 MAR 88, 16: 281 POBE A2 Locu
S$:

JMP

LY
SEQ 0121

14(R2)

tRETURN FROM

032446
032450
032452
032454
032456

032460
032464

1 INSTRUCTION TRAPPED

012600
012605
104000
000471
002013
000167

TEST

508 :

MOV
MOV
ERROR

. WORD
. WORD

177756

032464

JMP

HOP18:

(SP).,R0
(SP)+,RS

1 SAVE PC

1 SAVE PS

tALL ERRORS TO TRAP TO EMT VECTOR
IUNIQUE ERROR NUMBER

471
FPPERR

s ADDRESS OF ERROR MESSAGE

1t INSTRUCTION WASNT SUPPOSE TO TRAP
s CONTINUVE

MLCD:
110060000 040004400000000808000080000000800000000000000

1 ¢TEST

105

11808200

032464
032464
032470
032474
032500
032506
032510
032512
032514
032520
032524
032532
032534
032536

032540
032544

032550
032556
032560
032562

032564
032570
032574
032602
032604
032606

005267

146314

004767

000264
000000
000000

00008000000860806

INC
1/LONG=0
JSR
. WORD
.WORD

007304

040200

000245
000001
0C0000

007757

007740

004767
040000
043600

000214
17777

007617
007600
004767
140000
143600
007600
007610

032610
032614
032620
032626
032630
032632

007757
007740

032634
032640

04767
000000

004767
040000
047600

12/INT=0

000144

000120
000001

ITESTN

s INCREMENT TEST MMBER

R7,LCOSUB
0,0
0,0,0,0

+FSRC
tRESWLT

. WORD
. WORD

7313
7304

1 TESY fFPS
IRESULT FPS

JSR

gviLcosue

. WORD
. WORD

40200.0.0,0

. WORD
. WORD

7157
7740

JSR
. WORD
. WORD

R7,LCDSUB

1 3/INT=40000

Im
. WORD

000170
177777

0600088040800008

LDCLD

000400008008 040004000000000000000000000480000000

757105:

007313

004767

TEST LOCID,

;47 INT = -40000

JSR
. WORD
'm

. WORD
.WORD
3 S/LONG=40000
JSR
. WORD
. WORD

7617

7600

100 TESY

IRESWLY

TEST FPS

tRESWLY FPS

1DO TEST
1FSRC
sRESWLY

40000,
-1
43600,0,0.0

1+ TEST FPS
IRESALT FPS

RZ.LCDSUB

100 VTEST

1FSRC

iRESWLT

s TEST FPS

IRESULT FPS
R7,LCOSUB
40000,0
47600,0,0,0

. WORD
. WORD

7757
1740

JSR
.WORD

R?7,.C0SUB

s6/LONG=}

1FSRC

100 TESTY

0,1

1FSRC
1

s00 TEST

sRESWL T

TESTY FPS

IRESWLY FPS

1FSRC

100 TEST

LLOBAL AREAS
KDJ11A, MAC

6431
6432
6433
6434
6435
6436
6437
€438
6439
6440
6441
6442
6443
6444
6445
6446
6447
6448
6449
6450
6451
6452
6453
6454
6455
6456
6457
6458
6459
6460
6461
662
6463
6464
6465
6466
6467
6468
6469
6470
6471
6472
6473
6474
6475
6476
6477
6478
6479
6480
6481
6482
6483
6484
6485
6486

MACY 1}

SOA(%?SE)

032644
032652
032654
032656

040200
000000
000300
000300

000000

032660
032664
032670
032676
032700
032702

004767
172777
140400
000000
007300
007310

000074

032704
032710
032714
032722
032724
032726

004767
123456
143661
000000
000200
000210

000050
176543
122000

032730
032734
032740
032746
032750
032752

004767
123252
147652
000000
000300
000310

000024
125252
125252

15 MAR-84

15 MAR 84

16:"

1105 " tesr PAC8E18%%22 ocLo

000000

. WORD

40200,0,0,0

.WORD

300

.WORD

000000

JSR
.WORD
.WORD

R7,LCOSLB
-1,-2
140400,0,0,0

1FSRC

.WORD
.WORD

7300
7310

s+ TESTY FPS
sRESILT FPS

JSR
.WORD
.WORD

R7,LCOSUB
123456,176543
143661,122000,0,0

.WORD
200
. WORD
210
1 9/LONG=PATTERN
JSR
R7,LCOSUB
126000

TEST FPS

tRESULT FPS

18/INT=PATTERN
000000

tRESUL
T

300

: 7/7LONG=
-2

177776

SEQ 0122

100 TEST
sRESULY

100 TEST
1FSRC

sRESULT

s TEST FPS
sRESULT FPS
00 TESTY
sFSRC

.WORD
. WORD

125252, 125252
147652,125252,126000,0

LHORD
LMORD

300
310

i1 YESY FPS
sRESWLY FPS

HOP19

sGET OVER SUBROUTINE

IRESWLY

032754

000167

000126

H
teaXa)XeXeXaXaXeXsXo
X0 X0 XoXoX0XeX
XaXoX
0XoXoX0Xo
oXaXo
X0X0X0X
Xe

1eXaXaXaXoXaXoXoXaXa
XXX XXX
XAX0X
Xa X0 X0 X0
OXEXO
X0 XXX 06X

1LDCID, LOCLD
]

:
3

FSRC
RESULY

FPS BEFORE EXECUTION

;

FPS

AFTER

EXECUTION

:NO TRAP CAN OCCUR

jeXeXaXeXaXoXeXe
X oo
XoXo
XoXeXoXo
XaXo
XoXoXo
XoXo
X0 X0 XAXOXOX
Xo

jeXeXaXeXaXaXsdsXoXoXoXoXaXoXaX2YaXaXaXoXoXoXoXoXeXoXeX0X0X

032760
032762
032770
032774
033000
033002

012602
012737
012701
016200
170100
010204

033004

177014

408:

033006
033010
033014

170203

2%:

012700

17C100

033070
001126
000014

000244

LCOSuUB: MOV
MOV

1 RETURN ACDRESS TO USE AS POINTER
1REDIRECT TRAP VECTOR

L Qv

ORECOST,R1
14(R2),R0
RO
R2,R4

1GET TESTY FPS
1LOAD TEST FPS
+POINT TO TEST DATA

LOCID

(R4),ACO

1¢TEST INSTRUCTION (ACCORDING TO MODED

MOV
LOFPS
MOV

s VERIFY STATYS

000200

(SP)e ,R2
%504 ,DOFPVEC

STFPS
MOV
LOFPS

R3S
#200,R0
RO

sPOINT TO RESULT AREA

1SAVE FPS

1SET FPP STATUS TO DOUBLE

GLOBAL AREAS
KDJ1.1A
MAC
6487
6488
6489

6490
6491

6492
6493
6494
6495
6496
6497
6498
6499
6500
6501
6502
6503
6504
6505
6506
6507
6508
6509
6510
6511
6512
6513
6514
63515
6516
6517
6518
6519
6520
6521
6522
6523
6524

15"1AR 805

SOA(
15

033016
033020
033024
033026
033030
033032
033034

174011
016200
020003
001403
104000
000472
002013

033036
033040
033044
033030
033054
033056
033060
033062

010204
062704
004767
005767
001403
104000
000473
002013

033064

000162

033070
033072
033074
033076
033100

012600
012605
104000
000474
002013

033102

000167

(]
052)

15 MAR 84

7105

16 v8s1 08 1673 LocLo
STD
MOV

000016

147076

as:

145764

000020

Ss:

ACO.(R1)
16(R2),RO

cHP
8EQ
ERROR
WORD
.WORD

472
FPPERR

MOV
ADD
JSR
TSt

R2,R4
04 .R4
R7.DATVER
COUNT

BEQ
ERROR
WORD
‘WORD

473
FPPERR

20(R2)

474

177756

(SP)+.RO
(SP)«.RS

FPPERR

033106

HOP19:

033106

MLXP:

TEST

RESULT

INTO RECDST

iGET EXPECTED STATUS
iVERIFY STATUS
$BRANCH

1BAD FPS

GOOD

tALL ERRORS TO TRAP TO EMT
tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

sPOINT

TO EXPECTED DATA

sBRANCH IF GOOD

sALL

1BAD ACO

ERRORS

TRAP

TO EMT

tUNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

033106
033106

$SAVE PC
1 SAVE PS
sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s ADDRESS 07 ERROR MESSAGE
s INSTRUCTION WASNT SUPPOSE T(O TRAP
s CONTINUE

EST LDEXP DOUBLE

1100800000000 0000080800000004800000000000000000000008060000080000806

005267

033112
033116
033122
033130
033132
033134
033142
033144
033146

000010
142056
171717
007757
007750

033150
033154
033160
033166
033170
033172
033200
033202
033204

005037
004767
023456
000001
000177
077656
000001
067700
007700

005037
004767

123456
171717

187106

145672

INC

STESTN

sNO INTERRUPTS
R7,LXPSUB
100 TESY
123456,67012,25252,171717
tACO
10
1EXP
142056,67012,252%2.171717

s IMCREMENT TEST NUMBER

$117EXP=10 - AC=NEG
CLR
SFLAG

001042
001140
067012

025252

JSR
.MORD

067012

025252

.WORD
LMORD

MORD

LWORD

12/7EXP=177

001042
001102
070123

100000

CLR
JSR
LWORD

070123

100000

LWORD
LMORD

. WORD

7757

77%0

ACO~POS

sRESWLY

VESY FPS

sRESULTY FPS

SIFLAG
R7,LxPSUB
23456, 70128%,100000,1

iINO INTERRUPTS
;D0 TEST
t1ACO

177
1ExP
77656, 70128, 100000 1

IRESWLTY

7700

VECTOR

sRETURN FROM TEST

1100000080008 00000085008000000000400000000004800000080800000000048000880

1oTEST 106

VECTOR

sVERIFY DATA

MOV
MOV
ERROR
WORD

'WORD

$SAVE

RO,R3
33

:INSTRUCTION TRAPPED

S08:

SEQ 0123

TESY FPS

tRESULY FPS

LLOBAL AREAS
KDJ1.1A
MAC
6543
6544
6545
6546
6547
63548
6549
6550
6551
6552
6553
6554
6555
6556
6557
6558
6559
6560
6561
6562
6563
6564
6565
6566
6567
6568
6569
6570
6571
6572
6573
6574
6575
6576
6577
6578
6579
6580
6581
6582

6597
6598

033206
033212
033216
033224
033226
033230
033236
033240
033242
033244
033250
033254
033262
033264
033266
033274
033276
033300

15 ngnlé4 15&&1 <
MACY

30A(105¢)

005037
004767
055555
022222
000056

001042
001044
044444

053555
022222
007757
007740

044444

005037
004767
100077

001042
001006
1777?27

CLR
JSR
.WORD

177777

1717777

.WORD
.WORD

001042
000750
1771777

1717117

.WORD
.WORD
1S/EXP= 177
CLR
JSR
.WORD

86FLAG
R7,LXPSUB
177,-1,-1,-2

17717717

117717

.WORD
.WORD

-177
377.-1.-1,-2

177776

177623
104677
177776
007757
007750

033302
033306
033312
033320
033322
033324
033332
033334
033336

007700
007700

033340
033346

012737
004767

033352
033360
033362

033364
033372
033374
033376
033400

005037
004767
000177
177776

177601
000377
177776

000001
000710

MAR

033333

.WORD
.WORD

56
tEXP
53555,44444 33333, 22222

.WORD
. WORD

7757
7740

14/7EXP=-151,

001042

177600
g?gégl
1

032334

035363

007740
107744
000012

002200
102200
000012

033444
033452
033456

012737
004767
111111

100000

7757
7750

s TEST FPS
tRESULT FPS

sRESULT

sNO INTERRUPTS
:D0 TEST
sACO

IEXP

7740
107744
12

&1 ,80FLAG
RY,LXPSUB
0,12%,456,1

s T/EXPLARGEST NEGATIVE

. WORD

100000

40000,123,.456,1

. WORD
2200
.WORD
102200
. WORD
12
s8/EXP=-200, NEG. ACO
MOV
JSR
. WORD

sRESULT

1 TEST FPS
sRESULT FPS

. WORD
. WORD
. WORD

.MORD

100000

sEXP

- 200
tEXP
131,32334,35363, 73031

000456

RESULT

-155
104677,-1,-1,-2

.WORD
. WORD

000123

001042

1,-2

30131,.32334,35363, 73031

000456

INTERRUPTS
TEST
$1ACO

sNO INTERRUPTS
sDO TEST
1ACO

.WORD

MOV
J
LORD

001042

ACO~UV

80F LAG
R7,LXPSUB
100077,-1,

itNO
;100

1 TEST FPS
tRESULT FPS

. WORD
7700
. WORD
7700
$6/EXP=-200, UNDERFLOW
MOV
81, 00FLAG
JSR
R7,.LXPSUB

000001
000646
000123

000001
000604
100000

SEQ n124

(033333

035363

83838?

80F LAG
R7,.LXPSUB
55555,14444,33333 020022

032334

012737
004767
38888?

1 3/7EXP=56
CLR
JSR
.WORD

8;3%;{

033402
033410
033414
033422
033424
033426
033434
033436
033440
033442

PAGE 124
T?O6 16 EST LDEXP
SOUBLE

1 INTERRUPTS
100 TESY

sACO
sRESWLT

s+ TESY FPS
IRESWLT FPS
123

IEXPECT
100 TESY
1ACO

1EXP

INTERRUPTS

tRESWLY

: TEST fFPS
(RESULT FPS
iFEC

&1 ,B0FLAG
R7.LXPSUB
11111}1,100000,100000, -1

1 INTERRUPTS
100 TESTY
1ACO

GLOBAL ARE AS
KDJ11A MAC

6599
6600
6601
6602
6603
6604
6605
6606
6607
6608
6609

033464
033466
033470
033476
033500
033502
033504

MACY11

15-MAR 84
177777
177600
100111
17727727

30A(1052)

15:51

100000

15 HARtGA
106

100000

002217

102214

000012

6613
6614
6615
<616

033506
033514
033520
033526
033530
033532
033540
033542
033544
033546

6618
6619
6620
6621
6622
6623
6624
6625
6626

033550
033556
033562
033570
033572
033574
033602
033604
033606

012737
004767
000377
000001
161162
074577
000001
047700
147700
000012

000002
000500

033612
033616
033622
033630
033632
033634
033642
033644
033646

005037
004767
100177

001042
000440

000177
177777
177777
007700
007710

033650
033654
033660
033666
033670
033672
033700
033702
033704

005037
004767
000200
000300
000150
072000
000300
007717
007700

001042
000402
000100

000200

000100

000200

033706
033714
033720
033726
033730
033732

012737
004767
177777

000001
000342
177777

001042

000200
10C177

1727777

1777717

6010
6611
6612

0617

[

6628
6629
6630
6631

033610

16:58_
EST

012737
004767

123456

000123

000002

000542
012346

176035

000000
000000
005700
005704
000012

177777

001042

012346

000000

001042

123456

065432

123456

065432

19/EXP=

PAGE 125
LDEXP DOUBLE

SEQ 0125

. WORD
.WORD

200
1EXP
100111,100000,100000,

.WORD
. WORD

2217
102214

1743,
MOV

FIU=0
22,80 LAG

. WORD

JSR

.WORD
. WORD
.WORD

+ _TEST FPS
+RESULT FPS

1FEC

iNO

R7,LXxPSUB

123456,12346,12346,123

1743
0,0,0,0

sRESULT

INTERRUPTS

100 TESTY

sACO

1EXP
1RESUWLT

.WORD
5700
1 TEST FPS
.WORD
S704
tRESULT FPS
. WORD
12
1FEC
$10/EXP »-16616, FID-1
MOV
02,80FLAG
sNO INTERRUPTS
JSR
R7,LXPSUB
;100 Testy
WORD
377,123456,65432,1
sACO
.WORD
. WORD

-16616
tEXP
74577,123456,65432,1

WORD
.WORD
LWORD

47700
147700
12

JSR

R7,LxPS\B

LORD
-m

177
"1. '1-“.‘1

sRESULY

s _TEST FPS
lgfiSfl.T FPS
yFEC

t117EXP=177, ACOSUNDEFINED VARIABLE
CLR
SFLAG
1NDO INTERRUPTS

177777

177717

177777

WORD

s00 TESTY

100177,-1,-1,.-%

s1ACO

1EXP

I“S\‘.'

LHORD
7700
s TESY FPS
LMORD
7TN0
sRESWLT FPS
:127EXP=150 ACO-PQS
CLR
SFLAG
iND INTERRUPT
JSR
R7,LXPSUB
100 YESY
.WORD
200,100,200,
300
tACO
LMORD

150

LWORD
7717
.WORD
7700
1137EXP=200, ACO=NEG
MOV
JSR

o1, 00FLAG
R7,LXPSUB

.MORD
. WORD

2C0
100177,-1,-1,-2

. WORD

s TEST FPS
1RESULT FPS
100 TEST

'1-'10‘10"‘

tflCO
1EXP

tRESWLY

GLOBAL ARE AS
KDJ11A.MAC

6655
6656
6657
6658
6659
6660
6661
6662
6663
6664
6665
6666
6667
6668
6669
6670
6671
6672
6673
6674
6675
6676
6677
6678
6679
6680
6681
6682
6683
6684
6685
6686
6687
6688
6689
6690
6691
6692
6693
6694
6695
6696
6697
6698
6699
6700

6701
6702
6703
6704

6705

6706
6707
6708
6709
6710

033740
033742
033744
033746

033750
033756
033762
033770
033772
033774
034002
034004
034006
034010
034012
034020
034024
034032
034034
034036
034044
034046
034050
034052
034060
034064
034072
034074
034076
034104
034106
034110
034112

MACY1l 30A(105¢2)
15 MAR 84 15:51

15 MAR 84

106

177777
007705
107716
000010
012737
004767
000555

177775

000400
040155
1772775
047700
147702
000010

012737
004767
177773

1777715
011011
000000

000002
000300
177777

001042

177777

177776

LDEXP

:14/EXP«400,

MOV

JSR
.WORD

126

SEQ N126

DOUBLE

7705

FID

3+ TEST FPS
tRESULT FPS

107716
10

{FEC

42, 80F LAL
R7,LXPSUB
555,-1, 2,-3
400

40155,-1,-2.

1 INTERRUPT
:+00 TEST
1ACO

WORD

000236
177777

001042

115/EXP=11011 FIUs=0

177776

#0,80F LAG
R7,LXPSUB
177773, 1,-2.-3

000000

.WORD
.WOROD

11011
0,0,0,0

000100

001042

007740
107752

000010

WORD
6700
.WORD
6706
1 16/7EXP=LARGEST POSITIVE
10V

JSR

.WORD

005037
004767
123456
000444
000050
152056
000444
007500
007510

034152
034160
034164
034172
034174
034176
034204
034206
034210

012737
004767
000333
000666

000001
000076
000444

001042

000133
000666
007500
107504

000444

000555

023465

s TEST FPS
sRESULT FPS
sFEC
iNO INTERRUPT
;00 TESTY
$ACO

sEXP
tRESULY

s JEST FPS
(RESWLT FPS

01, 80FLAG

1 INTERRUPT

R?7,LXPSUB

123456,100,100,200

1ACO

LHORD
LMORD

7740
107752
10

FEC

SFLAG

1ND INTERRUPY

CLR

iRESULT

1 TEST FPS
tRESULT FPS

000555

JSR
LWORD

R7,LXPSUB
123456,23465,555,.444

000555

.WORD
.WORD

S0
1EXP
152056,23465,5%5,444

000555

100 TESY

TIIM?
1EXP
137656,100,100,200

s17/FLOATING

034114
034120
034124
034132
034134
034136
034144
034146
034150

tRESULT

MWORD
.WORD

LWORD

001042
000136
023465

147702
10

MOV
JSR
.WORD

000001
000176
000100

tEXP

47700

006706

177600

EST

J1U
PAGE

.WORD
.WORD
. WORD

000000
006700

012737
004767
123456
000200
077777
137656
000200

16:58

100 TEST

:ACO
tRESLT

WORO
7300
s VEST FPS
LWORD
7510
tRESWLY FPS
s 18/FLOATING UNDERFLOW
MOV
21,00FLAG
1 INTERRUP
Y
JSR
R7,LxPSUB
:00 TESTY
LMORD
333,444,3555,666
1ACO
WORD
.WORD

-200
133,444,555,666

1EXP

.WORD
LWORD

7500
107504

i TEST FPS
tRESWLT FPS

IRESWLY

GLOBAL AREAS
KDJ11A
. MAC

6711
6712
6713
6714
6715
6716
6717

6718
6719
6720
6721
6722

6723
6724

6725
6726
6727
6728
6729
6730
6731
6732
6733
6734
6735
6736
6737
6738
6739
6740
6741
6742
6743
6744
6745
6746
6747
6748
6749
6750
6751
6752
6753
6754
6755
6756
6757
6758
6759
6760
6761
6762
6763
6764
6765
6766

MACY1l

15-MAR-84

034212

000012

034214
034222
034226
034234
034236
034240
034246
034250
034252
034254

012737
004767
012346
000456
000400
040146
000456
007400
107402
000010

30A(1052)

15:51

15-MAR -84

T106

000001
000034
000123

000345

000123

000345

001042

16:58_

PAGE

127

SEQ 0127

EST LDEXP DOUBLE

.WORD
12
iFEC
$19/FLOATING OVERFLOW
MOV
1,80FLAG
JSR
R7,LXPSUB
.WORD
12346,1°3,345,456

.WORD
WORD

400
1EXP
40146,123,345, 456

.WORD
. WORD
.WORD

7400
107402
10

JMP

HOP20

s INTERRUPT
100 TEST
$ACO

sRESWLT

i _TESY FPS
tRESULT FPS

+FEC

034256

000167

000250

1GET OVER SUBROUTINE

seXaXaXa
X0 X0 X0 X0XXAXAXSE
XaXa
XOXEXSXAXS
XaXa
XEX0XOXEXO
Xa
XSX0X
jeXeXaXeXaXX
XaXaX
X0XOXNS XXX
aXaXa
XOXEXEXEXEX
X6X0
OX2X0X0X

;LDEXP

ACO
EXPONENT
RESULT
FPS BEFORE EXECUTION

H
3
3
¥

FPS

AFTER

(FEC)

EXECUTION

isXaaXaXeXaXoXoXoXaX
X0 X0XOXOXOX
eXaXa
AXOXAXAXE
XOXAX
X 00X e
6X

ieXaXaXaXaXo X0 XOX0Xa
X0
XOX
X0 XX o X0
AXG
XX OXOXEXSX
XEX
AXeXoX0X
0

034262
034264
034272
034276
034302
034304
034306
034310
034314
034316
034322
034324
034326

012602
012737
012701
012700
170100
010204
172414
016200
170100
016204

034352
001126
000200

000244

LXPSUB: MOV
MOV
MOV
MOV
LDFPS

000022

000010

40%:
1%:

176404
170327
000000

032737
001426
104000
000475
002013

000001

034346

000167

000042

034352
034360

032737
001005

000001

001042

10(R2).R4

sPOINT TO ACO DATA
1L.OAD ACO
1GEY TEST FPS
tLOAD TEST FPS
1POINT TO TEST DATA

LOEXP
STST
.WORD

R4 ,ACO
(PCH»
O

soTEST INSTRUCTION (ACCORDING TO MODE)
tWAIT FOR POSSIBLE FPA TRAP,
1STORE STATUS HERE

:INSTRUCTION DIDNT TRAP
8IT
QI.OOFLAG
8EQ
ERROR
LWMORD
.WORD

475
FPPERR

JHP

s INSTRUCTION TRAPPED

50%:

R2,R4
(R4),ACO
22(R2).R0O
RO

034330
034336
034340
034342
034344

s+ RETURN ADODRESS TO USE AS POINTER
sREDIRECY TRAP VECTOR
sPOINT TO RESWLT AREA
1SET FPS TO DOUBLE

MOV
LDD
MOV
LOFPS
MOV

(SP)+,R2
0308, 80FPVEC
ORECDST ,RL
#200,R0O
RO

8IT

BNE

#1,80FLAG

S1s

sVERIFY A NO TRAP CONDITION

;BRANCH IF GOOD

;ALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER
s RDDRESS OF ERROR MESSAGE

t INSTRUCTION SHOWRD HAVE TRAPPED
+REJOIN COOE
1SEE IF EXPECTING A TRAP

$BRANCH IF EXPECTING A TRAP

GLOBAL AREAS
KDJL11
. MAC
A

6767
6768
6769
6770
6771
6772
6773
6774
6775
6776
6777
6778
6779
6780
6781
61782
6783
6784
6785
6786
6787
6788
6789

6790

6791
6792
6793
6794
6795

6796

6797
6798
6799
6800
6801
6802
6803
6804
6805
6806
6807
6808
6809
6810
6811
6812
6813
6814
6815
6816
6817
%818
6819
6820
6821
6822

MACY11

15-MAR-84

034362
034364
034366

104000
000476
002013

034370
034374
034376
034400
034404
034406
04410
034412

000167
012604
005726
022704
001403
104000
000477
002013

30A(1052)

15:51

15 MAR 84

Y106

16:58

PAGE

EST LOEXP DOUBLE

ERROR
.WORD
000020

S1$:

034324

L1y
128

.WORD

476
FPPERR

JMP
MOV
TST

24
(SP)+,R4
(SP)+

cHP
8EQ
ERROR
.WMORD
.WORD

477
FPPERR

016200
020003
001403
104000
000500
002013

034444
034446
034452
034456
034462
034464
034466
034470

010204
062704
004767
005767
001403
104000
000501
002013

034472
034476
034500

005737
001002
000162

000026

034504
034510
034512
034516
034520
034522
034524

012704

001106

021462
001403
104000
000502
002013

00NN26

0345¢0

000162

000030

170314

VECTOR

1 INSTRUCTION WASNT SUPPOSE TO TRAP
iREJOIN CODE
1SEE IF PC = INSTRUCTION
1CLEAN UP STACK

:
1BRANCH IF GOOD COMPARE
1ALL ERRORS TO TRAP TO EMT VECTOR
;UNIQUE ERROR NUMBER
s ADDRESS OF ERROR MESSAGE

tPC WAS INCORRECT

;COMMON CODE FOR TRAP AND NO TRAP
:VERIFY STATUS

034414
034416
034422
034424
034426
034432
034434
034436
034440
034442

170100
174011

1ALL ERRORS TO TRAP TO EMT
JUNIQUE ERROR NUMBER
1 ADDRESS OF ERROR MESSAGE

218.R4
2t

170203
012700

SEQ 0 o128

000200

2s:

00004

000012

145470
144356

STFPS
MOV
LOFPS
STD

MOV
cHe
BEQ

3s:

as:

500
FPPERR

MOV
ADD

R2,R4
@12,.R4

JSR
ST

BEQ

034532

MSCOD:

1POINT

R7,.DATVER

YO EXPECTED DATA

sVERIFY DATA

COUNT

1BRANCH IF GOOD

;ALL ERRORS TO TRAP TO EMT VECTOR

SOFLAG
73
26(R2)

MOV
STST

SRECFEC,.RA
(R4)

iPOINT TO FEC AREA
1SAVE FEC

8EQ

1BRANCH IF GOQOD

. WORD

502

tUNIQUE ERROR NUMBER
. Acosnooaess OF ERROR MESSAGE
[

(R4),26(R2)

. WORD

FPPERR

JMP

30(R2)

HOP20:;

ST
BNE
P

ERROR

034532

;ALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
BAD FPS:‘DORESS OF ERROR MESSAGE

501
FPPERR

n, 4

8s:

sGET EXPECTED STATUS
{VERIFY STATUS
sBRANCH IF GOOD

. WORD
.WORD

sVERIFY FEC

$SAVE FPS
$SETUP FPS
1FPS=200
1GET RESWLT

24(R2),.RO
RO,R3
3

ERROR
.WORD
.WORD

ERROR

001042

RS
€200,R0
RO
ACO,(R1)

1SEE IF NEED TO CHECK FEC
1BRANCH IF NEED TO CHECK
tRETURN FROM TEST

tVERIFY FEC FOR OVERFLOM

tALL ERRORS TO TRAP TO EMT VECTOR

1UNIQUE ERROR NUMBER

taflggflggg OF ERROR MESSAGE
|

IRETURN FROM TEST

1500464040840 00008404000800000000808000080003840000000002000000000020

soTEST 107

TEST STCOI,

STCOL

§50004000884400500084030004088000000000000000000000000000000200000

GLOBAL AREAS
KDJ11A. MAC
6823
6824
6825
6826
6827
6828

6829
6830
6831
6832
6853
6834
6835
6836
6837
6838
6839
6840
6841

6842
6843
6844
6845
6846
6847
6848
6849
6850
685)
6852
6853
6854
6855
6856
6857
6858
6859
6860
6861
6862
6863
6864
6865
6866
6867
6868
6869
6870
6871
6872
6873
6874
6875
6876
6877
6878

15 MRléqBOA(éOSZ) 15 MAR ?07 16:?EST ?Eoi?gsrcoL

034532
034532

005267

144246

034536
034542
034546
034554
034556
034562
034564

005037
004767
000177
000000
000000
007640
007644

001042
000610
000000

034566
034572
034576
034604
034606
034612
034614

005037
004767
100177
177777
000000
007700
007704

001042
000560
177777

034616
034622
034626
034634
034636
034642
034644

005037
004767
020000
000000
000000
000300
000304

001042
000530
000000

034646
034652
034656
034664
034666
034672
034674

005037
004767
140177
000001
000000
007700
007704

001042
000500

034676
034702
034706
034714
034716
034722
034724

005037
004767
047667
167773
055675
007717
007700

001042
000450
075757

034726
034732
034736
034744
034746
034752
034754

005037
004767
046400
000000
001000
007700

001042
000420
000000

034756
034764
034770
034776
035000

012737
004767
077607
000000
000000

000001
000366
000000

TST107:

177777

JSR

80FLAG
R7,5CDSUB

iNO INTERRUPTS
100 TEST

.WORD
.WORD

0,-1
7640

1RESULT
1+ TEST FPS

JSR
.WORD

R7,SCOSUB
100177,-1,-1,-1

. WORD
.WORD

0,0
7700

3 INCREMENT

JSR

000000

1 S/LONG

157737

173757

sRESULT
i TEST FPS

;RESULY FPS

iNO INTERRUPT

100 TEST

20000,0,0,0

.WORD
. WORD
.WORD

0,0
300
304

CLR
JSR
. WORD

SFLAG
s INTERRUPT
R7,SCOSUB
100 TEST
1401727 ,277777,.1.1
1ACO

.MORD
. WORD
.WORD

0,0
7700
7704

tRESULY
s TEST FPS
sRESWULT FPS

CLR
JSR

DWFLAG
R7,S5C0SUB

t INTERRUPT
100 TEST

INT,

sACO

ROUND

001042
000000

s 7/LONG,

iRESUWLT
t+ JEST FPS
sRESULT FPS

l7667 757%7.,1577%7, 167773

.WORD
55675.173751
. WORD
. WORD
7700
16/7LONG, EXPs2aa32
CLR
SFLAG
JSR
R7.5C0suUB
. WORD
46400.0.0.0

007700

sACO

.WORD

. WORD

000000

s INTERRUPT
;00 TEST

R7,S5CDSUB

;4/EXP=200, BAISED O,

000001

TEST NUMBER

iRESULT FPS

.WORD
7704
3/EXP-100 LONG
CLR
SOFLAG

000000

$TESTN

.WORD
7644
:12/ARC0=-0, LONG
CLR
80F LAG

000000

177717

SEQ 0129

INC

:17AC0=0, INT
CLR
000000

MLO

. WORD
. WORD
. WORD

1000,0
7700
7700

MOV
JSR
WORD

41 ,80FLAG
R7.SCDSUB

.WORD

n,0

EXP>24432

IRESULT
1 TEST FPS
tRESWL.T FPS

iNO INTERRUPT
:D0 TEST
1ACO
sRESULTY
3 TEST FPS
1RESULT FPS
s INTERRUPT
100 TEST
1ACO

17607,0,0,0
tRESWLT

:ACO

GLOBAL AREAS
KDJ11A. MAC

6879
6880
6881
6882
6883
6884
6885
6886
6887
6888
6889

6890
6891
6892
6893
6894
6895
6896
6897
6898
6899

6900
6901
6902
6903
6904
6905
6906
6907
6908
6909
€910

6911

6912
6913
6914
6915
6916
6917

6918

6919
6920
6921
6922
6923

6924
6925
6926
6927
6928
6929

6930

6931
6932
6933
6934

035004
035006
035010
Q035014
035020
035026

MACY11l

15 MAR-84

30A(1052)

15:51

15-MAR-84

T107

007700
107708
001042
000336
000000

035030
035034
035036

005037
004767
043200
000000
010000
007600
007600

035040
035046
035052
035060
035062
035066
035070

012737
004767
0?7777
177777
000000
007600
107605

000001
000304
17

035072
035100
035104
035112
035114
035120
035122

012737
004767
043300
000000
000000
047700
047700

000000
000252
000000

035124
035132
035136
035144
035146
035152
035154

012737
004767
143300
177777
177777
007300
007310

000000
000220
177777

035156
035164
035170
035176
035200
035204
035206

012737
004767
050100
000000
000000
047700
147705

000002
000166
000000

035210
035216
035222
035230
035232
035236
035240

012737
004767
050377
177777
000000
007300

000000
000134

007305

035242
035246
035252
035260
035262

005037
004767
100200
177777
000000

001042
000104
177777

16:58
PAGE 130
TEST STCDI, STCDL

18/7INT,
000000

177777

001042

177777

1777717

001042

000000

014000

001042

1777717

163741

001042

000000

177777

001042

177777

000000

177777

197INT,

N1O

.WOPD
7700
. WORD
107705
EXP=2xs15
CLR
BOFLAG
JSR
R7,SCDSUB
.WORD
43200,0,0,0

.WORD
. WORD
.WORD

10000,
-1
7600
7600

JSR
.WORD

R?7,SC0OSuUB
77?777,-1,-1,-1

EXP>24415
MOV
#1,80FLAG

.WORD
7600
.WORD
107605
;i 10/7INT, EXP>24ea 15, FID
MOV
JSR

90, BOFLAG
R?7,5C0SUB

.MORD
LWORD
.WORD

0,14000
47700
47700

MOV
JSR
.MORD

20, 80FLAG
R7,SCOSUB
143300,-1,-1,-1

.WORD
.WORD
LWORD

-1,16374}%
7300
7310

MOV
JSR
.WORD

92, 00FLAG
R7,5C0OSLUB
50100,0,0,0

.MORD

SEQ 0130

TEST FPS

tRESULT

iNO INTERRUPTS

;D0 TEST
1ACO

;RESULT

1 TEST FPS
iRESULT FPS

s INTERRUPT
100 TEST
:+ACO

sRESULY
;s TEST FPS
tRESULT FPS
iNO INTERRUPT
;00 TEST
$ACO

43300,0,0,0

;127LONG, EXP>2s432, FID

FPS

tRESULT
: TEST FPS
;RESULT FPS
sNO INTERRUPT

;00 TEST

1ACO

sRESULT
; TEST FPS
sRESULY FPS
;sINTERRUPT
;00 TEST
;1ACO

.WORD
0,0
LWORD
47700
.WORD
147705
s13/7LONG, EXP>2se32, FIC=0
MOV
80, B0FLAG
JSR
R7,5CDSUB

sRESULT

.WORD
.WORD
.WMORD
:14/7LONG, EXP<O
CLR
JSR
.WORD

0,0
7300
7305

IRESULT
3 TEST FpS
1RESWLT FPS

SOFLARG
R7,5C0suB
100200, -1,-1, -1

tNO INTERRUPTS
;00 TEST
1ACO

0,0

sRESULTY

.MORD

TEST FPS

;RESULY FPS

iNQO INTERRUPY
:1D0 TESY
1ACO

GLOBAL

AREAS

KDJ1.1A
MAC

005037
004767
037700
177776
000000
007600

035316

035320
035322
035326
035332
035340
035342
035346
035350

001042

CLR
JSR

000054
177777

177777

.MORD
. WORD
.WORD
1167INY, EXP-10
CLR
JSR

007604

005037
004767
004377

001042
000024
1772777

000000
007600
007604

117277

172717

5EQ 0131

1757
7744

1 _TEST FPS
1RESWLT FPS

S6FLAG
R7,5C0SUB

tNO INTERRUPTS

O,-1
7600

sRESULT
1 TEST FPS

100 TEST
1ACO

7604

tRESWLT

80FLAG

iNO INTERRUPTS
100 TEST

R7,5CDSuUB

FP3

sACO

.WORD
.WORD
. WORD

O,-1
7600
7604

1RESWLT FPS

JHP

HOP21

1GET OVER SUBROUTINE

1IRESWLY
s TEST FPS

035352

000167

000244

(oXeXeXoXaXoXoXoXoXOXOXOXOXAXOXOXOXOXOXOXXOXOXAXOXOX
XXX

joXeXoXaX
o XOXONAXO
oXa
XOXOXONO
XaX
XOXOXOKE
eX0
XOXOXOXO
XO
XOXSX

STCOL,

STCFI,

STCFL

ACO
T
RESWL

$STCOI,

6956
6957
6958
6959
6960
6961
6962
6963
6964
6965
6966
6967
6968
6969
6970
6971
6972
6973
6974
6975
6976
6977
6978
6979
6980
6981
6982
6983
6984
6985
6986
6987
£988
6989
6990

035272
035276
035302
035310
035312

. WORD
. WORD
115 7INT, EXP<O

FPS BEFORE EXECUTION
FPS AFTER EXECUTION

6950
6951
6952
6953
6954
6955

007757
007744

16:58
PAGE 131
TEST STCDI, STCOL

6940
6941
6942
6943
6944
6945
6946
6947
6948
6949

035266
035270

15:51

15 M 84
T1v?

(FEC)

6939

15-MAR 84

30A(105¢2)

6935
6936
6937
6938

tJ1
4

MACY11l

tTRAP ON CONVERSION FAILURE

1eXeXoXaXa
X0 X0 XXX X0 XXX
XeXoX
X XOXOXOXOXOXOXOX
oXO
ONOXSX
jeXeXeXaXa)aXeXeXaXoX0XOXOXOXe
XX XoXoXoXaXoXoXoXoXoXoXoX0X

035356
035360
035366
035372
035376
035402
035406
035410
035412
035414
035420
035422
035424
035426

012602
012737
012701
012711
012741
012700
170100
010204
172414
016200
170100

035452
001130
177777
177777
000200

000244

SCOSUB: MOV
MOV
MOV
MOV

000014

(SP). ,R2
0508
. BOFPVEC
ORECOST2,RY
8-1,(R1)

40¢:
1%:

000000

032737
00142¢
104000

000001

001042

#200,R0
RO
R2,R4
(R4),ACO
14(R2),RO
RO

STCDI
STST

ACO,(R1)
(PCH

1oTEST

.MORD

1STORE STATUS MERE.

035430
035436
035440

tPRELOAD RECEIVE DATA BUFFER

MOV
LOFPS
MOV
LOD
MOV
LOFPS
:

175411
170327

s RETURN ADDRESS TO USE AS POINTER
IREDIRECT TRAP VECTOR
tPOINT TO RESWLT AREA

s INSTRUCTTON DIDNY
BIv
BEQ
ERROR

1SET FPS TO DOUBLE
3

tPOINT 10 ACO DATA
1GET

tLOAD ACO

TEST FPS

1LOAD TEST FPS
INSTRUCTIONCACCORDING

tWAIT FOR POSSIBLE FPA TRAP,

1O TM~ODE

TRAP

o1 .36FLAG
2t

tVERIFY A NO TRAP CONDITION
{BRANCH IF GOOD

tALL

ERRORS

TRAP

TQ EMT

\WEC'OR

ROOVIR ARETM>
6991
6992
6993
6994
6995
6996
6997
6998
6999
7000

7001
7002
7003
7004
7005
7006

7007
7008
7009

7010

7011
7012
7013

7014
7015

7016
7017

7018

7019
7020
7021

7022

7023
7024
7025
7026

7027
7028
7029

7030
7031
7032
7033
7034
703S
7036
7037
7038
7039
7040
7041
7042
7042

7044

7045
704¢

1s"R
e SpELAYN
A)

035442
035444

000503
002013

035446

000167

~ i1

15 MAR B4, 16: 985 1P8%k0t 3251 cny

000042

. WORD
. WORD

503
FPPERR

JMP

SeQ o132

tUNIQUE ERROR NUMBER
ADDRESS OF

sREJOIN CODE

035452
035460
035462
035464
035466

032737
001005
104000
000504
002013

000001

035470
035474
035476
035500
035504
035506
035510
035512

000167
012604
005726
022704
001403
104000
000505

000020

001042

s INSTRUCTION TRAPPED

508 :

S1¢:
035424

BIT

BNE

01,80FLAG

S04
FPPERR

JMP
MOV

28
(SP)+.R4

8EQ
ERROR

TST
cMe

035534
035536
035542
035546
035552
035554
035556
035569

010204
062704
004767
005767
001403
104000
000507
002013

sREJOIN CODE
1SEE IF PC » INSTRUCTION
sCLEAN UP STACK
}

1BRANCH IF GOOD COMPARE
sALL ERRORS TO TRAP TO EMT VECTOR

508
FPPERR

IUNIQUE ERROR NUMBER
1ARODRESS OF ERROR MESSAGE

1PC WAS INCORRECT

;COMMON CODE FOR TRAP AND NO TRAP
i VERIFY STATUS

000016

000010
144362

143266

2%:

STFPS

RO,R3
3%

cp
BEQ
ERROR
LHORD
.WORD

16(R2),R0

$SAVE FPS
sGET EXPECTED STATUS

506
FPPERR

tALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
sADORESS OF ERROR MESSAGE

MOV

R2,R4

JSR

R7,.DATVFR

BEQ

MOV

ADD
TSY

ERROR
LHWORD

035562
035566
03557¢

005737
001002
000162

035574
035600
035602
035606
035610
035612
035614

012704
170314
021427
001403
104000
000510
002013

001106

035616

000162

000020

035622

sUNIQUE ERROR NUMBER

1ADODRESS OF ERROR MESSAGE
1 INSTRUCTION WASNT SUPPOSE TO TRAP

(SP).
e1%.R4

170203
016200
020003
001403
104000
000506
002013

1SEE IF EXPECTING A TRAP
$BRANCH IF EXPECTING A TRAP
tALL ERRQRS TO TRAP TO EMT VECTOR

S1¢

ERROR
.MORD
. WORD

LMORD
. WORD

002013

035514
035516
035522
035524
035526
035530
035532

001042

ERROR MESSAGE

IINSTRUC*ION SHOULD HAVE TRAPPED

000020

153
BNE
JHP

B0FLAG
]
20(R2)

8s:
F

HOF21
:

SRECFEC, R

STSY

(R4)

BEQ

8¢

cHe

1BAD FPS

(R4), 86

ERROR
LWORD
JWORD

510
FPPERR

JMP

20{R2)

sPOINT TO EXPECTED DATA
IVERIFY DATA

COUNT

507
FPPERR

MOV

$BRANCH IF GOOD

910, ,R4

.WORD

iVERIFY FEC

7%:

sVERIFY STATUS

sBRANCH IF GOOD

sALL ERRORS TO TRAP TO EMT VECTOR
sUNIQUE ERROR NUMBER

1BAD ACO

sADDRESS OF ERROR MESSAGE

+SEE IF NEED TO CHECK FEC
1BRANCH IF NEED TO CHECKX
1RETURN FROM TEST
tPOINT TO FEC AREA

1SAVE FEC

sVERIFY FEC FOR OVERFLOM

1SRANCH IF GOOD

tALL ERRORS TO TRATM

TO EMT VECIOR

tUNIQUE ERROR NUMBER
1ADDRESS OF ERRPOR MESSAGE
18AD FEC

1RE TURN FROM TEST

‘\Hi. A

KBLETH CMAC

L/ L

15 PhA '8 M1ELAYN)

15 MARBY. 16:58 PRKRLES3
|y

SEQ 0133

7048

"QQCF:

035622

~049

H ‘“0“"0““““‘0.“‘“““‘0““.‘0...“‘.“0‘.

7050
7051

7052
~053
7054
~05%
7056
7057
7058
7059
7060
7061
7062
7063
7064
706S
7066

7067

7068

7069
7070
7071
7072
7073
7074
7075
7076
7077
7078
7079
7080
7081
7082
7083
7084
7085
7086
7087
70&8
7089
7090
7091
7092
7093
7094
7095
7096
7097
7098
7099
7100
7101
7102

1sTEST 110

035622
035622

TEST STCFI,

.“.‘...000‘“

STCFL

3 ;0..““““0‘“““““0“‘0‘0““‘0.“..“

005267

143156

035626
035632
035636
035644
035646
035652
035654

005037
004767
044541

001042

000003
007517
007500

102525

035656
035662
035666
035674
035676
035702
035704

005037
004767
002300
1?7777
000000
007400
007404

001042
177470
17777

035706
035714
035720
035726
035730
035734
035736

012737
004767
070000

000001

000000
007540
107545

035740
035744
035750
035756
035760
035764
035766

005037
004767
052000
177777
000000
047000
047005

177777

177520

052525

“.‘.“‘...‘.‘..“.0

TST110:

1772777

INC
1 1/LONG EXP =30
CLR
JSR
. WORD

S$TESTN

8OFLAL
R7,5CDSUB
44541,525%25,

s INCREMENT TEST NUMBER
INO INTERRUPTS
1,

100 TEST

. WORD
.WORD
.WORD

3.102%25%
1517
7500

JSR
.WORD

R?7,SCDSLB
23%00,-1,-1,-1

BOFLAG

iNO INTERRUPTS
sD0 TESTY
sACO

. WORD
. WORD
.WORD

0,-1
7400
7404

sRESWLT
; TEST FPS
1RESWLT FPS

MOV
JSR
. WORD

81 ,80FLAG
R7,SC0SUB
70000, -1,-1,-1

000000

.WORD
.WORD
.WORD

0,0
1540
107545

sRESWLY
s TEST FPS
sRESULY FPS

001042

CLR
JSR

SFLAG
R?,SC0SuUB

iNO INTERRUPTS
s00 TESTY
sACO

.m
LWORD

o. ‘t
47000

sRESWLY
s TEST FPJ
IRESWLT FPS

s27INT, EXP<O
CLR
177777

177777

177436
177177

177406

000000

001042

:3/LONG, EXP>>20e32

177777

177727

.WORD

177777

JHORD

$2000,0,
-1, -1

47005

135770

sACO

sRESWLT

s TEST FPS
sRESWLT FPS

s INTERRUPT

100 TEST
1ACO

MSXP:
1364088008088 540808000000080040000000000800000000000000080000

1¢TEST

035770
035770
035774
036000
036006
036010
036012
0356014

111

80000

TEST STEXP

1100080080 0080400000800008300R0808000480000000000008600

005267
004767
020000

177700
007740
007750

143010
000154
000000

TSTi11:

00008000800000

INC

STESTN

1 INCREMENT TEST NUMBER

JSR
.WORD

R7,5XPSUB
20000,0,0,0

100 TEST
1ACO

;1/7EXP=100

. WORD
-100
. WORD
7740
. WORD
T7%0
12/7EXP=201 FLOAT, NEG

IRESWLT

1 TESY FPS
tRESWLT FPS

7103

7104
7105

7106

710?

7108
7109

7110

7111

7112

7113

7114

7115

7116

T117
7118

7119
7120

7121

7122
7123
7124

7125

7126

7127
7128

7129
7130
7131
7132
7133
7134
7135
7136
7137
7138
7139

7140

036016
036022
036030
036032
036034
036036

036040
036044
036052
036054
036056
036060

036062
036066
036074
036076
036100
036102

036104

036110
036116
036120
036122
036124

036126
036132
036140
036142
036144

036146

MACY1l 30A(10%2)
15 MAR 84 15:51
004767
140377

000000
000001
007500
007500

004767

000177

177?277
177600
007700
007710
004767
020000
177777

1S MAR B84
T111

000132
772727

. WORD

1777?27

17717

004767
040000
000000
000000
007700
007704
004767
000177

177717
177600
000000
000010

000044
000000

JSR
. WORD

000022
17?2777

1717177

sRESULT
s+ TEST FPS

177600

7700

1710

tRESWLT

R7,SXPSuUB

20000,0,

R7,SXPSUB
40000,0,0,0

.WORD
.HORD
. WORD

sRESWLT
s TEST FPS
1RESULT FPS

-100

7700
7704

000167

000120

100 TEST
sACO

sRESWLY
s TEST FPS

tRESWLT FPS

R7,SxPSUB
177,-1,-1,-1

120 TEST
. ACO

. WORD
.HORD
. WORD

177600
0

IRESULY
s TESY FPS
(RESULT FPS

HOP22

1GEYT OVER SUBROUTINE

036150

FPS

$100 TEST
sACO

'..‘1

JSR
. WORD

. MORD

:D0 TEST
$ARCO

1771‘10’1.’1

40200
40210

:6/7EXP
0
JSR

;00 TEST
1ACO

1,0

tRESULT
: TEST FPS
sRESULT FPS

. WORD
. WORD
. WORD

1S/7EXP =200
000000

140377,

R7,5XPSUB

;87EXP-100

177700
040200
040210

R?,5xPSuUB

JSR
. WORD

177777

5EQ

1
7300
7500

. WORD
.WORD
.WORD

000065
000000

Fexb>

. WORD
.WORD
.WORD

13/EXPe-177

000110

joXeXaXeXaXoXaXeXoXoXoXaX0X0X0XAXOXOXOXORONOXOXOXOXOXOXOXOX

;eXeXaXoXoXo
XN XoXoXOXON
XoXa
AXEXE XX XoXo
OXOXO XXV Xo
XOXoX

:STEXP

7143

ACO
EXPONENT RESWLT
FPS BEFORE EXECUTION

7144

7145
7146
7147
7148
7149
7150
7151

7153
7154
7155
7156
7157
7158

JSR

s1777

7141
7142

7152

16:58
PA
TEST S

—

LLOBAL ARE AS
KDJ1.1A
MAC

FPS AFTER EXECUTION

H
:

sNO TRAPS CAN 0CCuR

jeXaXoXeXoXa
XX
XaXo
XAXOXOXO
XsXe
XOXAXOXO
XaXo
XOXOXANONSXAX
Xa
jaXeXaXe XXXt Xa X X0 XA X0 XXX XXX e XXX XA XAXOXOXO
XEXAXEX

036154
036156
036164
036170
036174
036176
036200

012602
012737
012701
012700
170100
010204
172414

036256
001126
000200

000244

SXPSUB:

MOV
MOV
MOV
MOV
LOFPS
MOV
LOD

(SPY. ,R2

0508 ,80FPVEC
ORECDST,RL

9200 ,RO

RO
R2,R4

(R4),ACO

+ RETURN ADDRESS TO USE AS POINTER
1REDIRECT TRAP VECTOR
tPOINT TO RESWULY AREA
tSET FPS TO DOUBLE

tPOINT TO ACO DATA
iLOAD ACO

0134

ol OBAL AREAS
KDJ11A JMAC

7159

7160
7161
7162
7163
7164
7165
7166
7167
7168
7169
7170
7171
7172
7173
7174
7175
7176
7177
7178
7179
7180
7181
7182
7183
7184

7185

7186
7187
7188
7189
7190
7191
7192

7193

7194

MACY11l

30A(1052)

036202
036206

016200
170100

000012

036210

175011

408 :

036212
036214
036220
036222
036224
036226
036230

170203

2%:

15 MAR 84

016200
020003
001403
10400C
000511
002013

15:51

15 MAR 84

16:58

PAGE
i1 Mo rBsPETE
N 135
MOV

LOFPS

12(R2).RO

1GET TEST FPS
tLOAD TEST FPS

STEXP

ACO,(R1)

1#TEST INSTRUCTION(ACCORDING 10 MODE)

STFPS

cHP

RO,R3

ERROR
JWORD
'WORD

s SAVE FPS
1GET EXPECTED STATUS
tVERIFY STATUS
1BRANCH IF GOOD

S11
FPPERR

IVERIFY STATUS

000014

MOV

B8EQ

036232
036236
036242
036244
036246
035250

016204
020437
001403
104000
000512
002013

000010
001126

036252

000162

000016

33:

Ss:

14(R2),RO

MOV
cHe
BEQ
ERROR
.WORD
"WORD

10(R2),R4
R4, BORECDST
S

S12
FPPERR

JMP

16(R2)

036256
036260
036262
036264
036266

012600
012605
104000
000513
002013

036270

000167

036274

SEQ 0135

sALL ERRORS

TO TRAP

sUNIQUE ERROR NUMBER

1BAD FPS

$BAD ACO

TQ EMT VECTOR

1tADDRESS OF ERROR MESSAGE
sPOINT

TO EXPECTED EXPONENT

sVERIFY EXPONENT
$1BRANCH IF GOOO
sALL ERRORS TO TRAP TO EMT VECTOR
tUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE

sRETURN FROM TEST

; INSTRUCTION TRAPPED

SO$:

177756

HOP22:

MOV

(SP)+ RO

MOV
ERROR
.WORD
'WORD

FPPERR

(SP)+.RS
S13

:SAVE PC

1SAVE OLD PS

sALL ERRORS TO TRAP T(O EMT VECTOR

tUNIQUE ERROR NUMBER
;ADDRESS OF ERROR MESSAGE
sWILD TRAP DURING STEXP
;REJOIN CODE

GLOBAL AREAS
KDJU11A.MAC

MACY11

15-MAR 84

30A(1052)

15:51

15-MAR 84

T111

7195

.MCALL
.SBTTL

7196
T197

7198
7199

7202

7210
7211

7212

7213
7214

7215

7216

7217
7218
7219

7220

7221

7222
7223
7224
7225
7226
7227
7228
7229
7230
7231
7232
7233
7234
7235
7236
7237
7238
7239
7240
7241
7242
7243

7244
7245
7246
7247

7248

7249

7250

136

SEQ 0136

IDMSG,ENDPAS
END OF PASS ROUTINE

139000000000000000000000000000000000000000000000000000

7203

7206
7207
7208
7209

PACE

TEST STEXP

080008
004004

s ¢ INCREMENT THE PASS NUMBER ($PASS)
1 *INDICATE ENO-OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM
;¢IF THERES A MONITOR GO 7O IV
1oIF THERE ISN'T JUMP TO RESTART

7200
7201

7204
7205

16:58

036274
036274
036300
036302
036306
036306
036312
036320
036322
036324

036326
036330

036332
036334
036340
036344
036346
036352
036356
036360
036362
036364
036366
036370
036372
036372
036374
036376
036402
036410
036416
036424
036432
036440
036446
036454
036456
036464
036472
036500

005767
001002
104401

005267
042767
005327

000001
003022
012737
000001
036322
104401
016746

104405
104401

013700
001405

$EOP:

142506
036402

142474
100000

SKIPID
K
:

142466
SEOPCY:

$SENDCT:
036456
142442

036376
000042

SGETA2:

000005
004710
000240
000240

$ENDAD:

036402

005015
026514
042113
046106
043516
052116
047107
000103
005015
041114
050040
000043

TYPE

INC
8IC
DEC

.WORD

8GT

$PASS

$D0AGN:
SRTNAD:

S$ENULL :

377

8842,R0

RESETY
JSR
NOP

PC.(RO)

LSG2

« SENULL

$ODOAGN

.gvés

FIRST PASS

ID MESSAGE

iID MESSAGE

13RESTORE COUNTER

1 $SAVE S$PASS FOR TYPEQUT

13160 TYPE--DECIMAL ASCII WITH SIGN

1:GET MONITOR ADDRESS

1 1BRANCH IF NO MONITOR

1:CLEAR THE WORLD
13GO TO MONITOR
1 $SAVE ROOM

s1FOR

NOP

LEV

THE

$3YES

MOV

.WORD

TYPE

$DOAGN

$PASS, -(S5P)

JHP

sELSE

AT END OF

THE

s 1 INCREMENT THE PASS NUMBER
ssDON‘'T ALLOW A NEG. NUMBER
3:LOOP?

MOV

B8EQ

TYPE MESSAGE

>0 THEN SKIP

$PASS
100000, $PASS
(PCH.

(PC)+,8(PC)H.

TYPDS
TYPE

s IF

+MSG1

MOV

.WORD
SEOQPCT
TYPE

sONLY

SKIPID

NOP

000240
000137
002410
377

BNE

11ACT1

HKPLH

; 1 RE TURN

-1,-1,0

s iNALL CHARACTER STRING

RESTARY

055103
026502
030512
040517
050040
042040
051517

042113
020060
020061
044524
044517
040511
044524

M5G1:

+ASCIZ

<CR><LF>/C2K0OL
-8-0 XDJ11 FLOATING POINT DIAGNOSTIC.

055103
042430
051501

042113
042116
020123

MSG2

«ASCIZ

«CR»<LF>/CZKOLB END PASS @/

.EVEN
.SBTTL

TYPE ROUTINE

§30000000000008000000000000400000000000000000000000000800000000000

1¢ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUSYT TERMINATE WITH A O BYTE.
1#THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.

LLOBAL

ARE RS

KOJU11A
. MAC

MACY

ROA

15 MAR'A. 1o 4]

Q%
)

MaR

7251

i41) USING A TRAP INSTRUCTION
1 e

1 ¢0R

7259

7260

7280

7281

7282
7283
7284
7285
7286
7287
7288
7289
7290
7291
7292
7293
-

[

7295
7296

7297
7298
7299
7300
7301
7302
7303
7304
7305
7306

CONTAINS

THE

CHARACTER

TO BE

USED

THE

FILLER

CHARACTER.

THE NUMBER OF FILLER CHARACTERS REQUIRED.
THE CHARACTER TO FILL AFTER.

:oCALL
:

7258

1274
7275
7270
7277
7278
7279

SNULL

SEQ 0137

SFILLS CONTAINS
$FILLC CONTAINS

1 oNOTES:

7257

7273

P08 17

i oNOTE2:

TaTR
7254
7258
7256

7271
7272

;1 NOTE
L:

7252

7261
7262
7263
7264
7265
7266
7267
7268
7269
7270

TYPE

+MESADR

TYPE

1 e

MESADR

1 1MESADR IS FIRST ADDRESS OF AN ASCIZ STRING

036502
036506
036510
036512
036514
036516
036522
036530
036532
036540
036542
036546
036552
036554
036562
036564

105767
100002

000000
0004 30
010046

017600
122767
001011
132767
001405
010067
004767
000000
132767
001003
112046
001005
005726
012600
062716
000002
122716

036566
036570
036572
036574
036600
036602
036606
036610
036614
036616
036620
036622
036624
036630
036632
036636
036642
036644

000755
004767
126726
001350
016746

036650
036654
036656
036662
036666

105366
002770
004767
105367
000770

001430
122716
001006
005726
104401

002077
105067

000343

$TYPE:

1STB
8PL

HAL
T

000002
000001
000100

1%:

000040

142261

142237

MOV

MOV
cMP8
BNE
-394
8EQ
MOV

142270

001034

B8R

61%:
624

JSR

112716

RO, -(SP)

82(SP),RO

OAPTENV, $ENV

624

QAP TSPOOL
, SENVM

624

RO,618

gc.snrvs
SAPTCSUP, $ENVM

608
(RO)+, -(SP)

2%:

(SP)»

000002

60s%:
L1
N

®2.(SP)

000011

::r.(SP)

(SP)s,RO

000200

OCRLF ,(SP)
S
(SP).

000202
000056
000206

SEHARCNY

S$:

6%:

000176

000001

78:

000032
000144

crPg

PC,HTYPEC
5:!LLC.(SP)0

MOV

SNULL, -(5P)

DEce
BLY

JSR
DECB
8R
;HORIZONTAL

036670

$TPFLG
1

000040

8¢:

“Ove

1(s5P)

PC.STYPEC
SCHARCNT
74

1:IS THERE A TERMINAL?

11BR IF
s sHALT

1 1LEAVE

YES

MERE

TERMINAL

1 sSAVE RO

1 3GET ADDRESS OF ASCIZ STRING
1 IRUNNING IN APT MODE
$13NO,GO CHECK FOR APT CONSOLE

11SPOOL MESSAGE TO APT
1 1NO,GO CHECK FOR CONSOLE
s sSETUP MESSAGE ADDRESS FOR APT

$3SPOOL MESSAGE Y0 APT
s sMESSAGE ADDRESS

1 sAPT CONSOLE SUPPRESSED
11YES,SKIP TYPE OUT
5 1PUSH CHARACTER T0O BE TYPED ONTO STACK
$iBR IF IT ISN'T THME TERMINATOR
11
IF TERMINATOR POP IT OFF THE STACK

s iRESTORE RO
1 1ADJUST RETURN PC
1 s RE TURN
1 1BRANCH TF <NT>»

1 $BRANCH IF NOT <CRLF>

11POP

1iTYPE

«CR>
<« LF> EQUIV

A CR AND LF

11CLEAR CHARACTER COUNT

1 1GET NEXT CHARACTER
1360 YYPE THIS CHARACTER
3318 IV VIME FOR FILLER CHARS.?
13IF NO GO GET NEXT CHAR,

11GEY @ OF FILLER CHARS. NEEDED
1:AND THE NWLL CHAR.,
131DOES A NULL NEED TO Bt TYPED?
1188 IF NO--GO POP THE NULL OFF OF STACK
1160 TYPE A NULL
1300 NOT COUNT AS A COUNT
1:1LOOP

TAB PROCESSOR
&

,(SP)

1 tREPLACE

TAB WITH SPACE

LLOBAL ARE AS
KDJ11A, MAC
7307
7308
7309
7310
7311
7312
7313
7314

7315
7316

7317
7318

7319

7320
7321
7322

7323

7324

7325
7326
7327

7328

7329

7330
733}
7332
7333
7334
7335
7336
7337
7338
7339
7340
7341
7342
7343
7344
7345
7346
7347
7348
7349
7350
7351
7352
7353
7354

7355
7356
7357
7358
7359
7360
7361

7362

036674
036700
036706
036710
036712
036714
036714
036720
036722
036726
036732
036736
036740
036740
036744
036746
036752
036756
036762
036764
036764
036766
036766
036772
036774
037002
037010
037012
037016
037020
037026
037030
037032
037034
037036
037040
037042
037044
037046
037047
037050
037051
037052
037053

ISH:

lxs‘xfggéfse)

004767
132767
001372
005726
000724

000014
000007

105777
100022

000116

017746

042716
122716
001012

105777
100375
117716
042716
122716
001366

HAR'QQE

000124

122766
001003
105067
000406
122766
001402
105227
000000
000207

177560
177562
177564
177566
000
002
012
000

077
012
V37056

s$TYPEC:

000112
177600
000023

101¢;

000072
000066
177600
000021

1028

005726

105777
100375
116677

AB@??N&pAGE

108

000050

000002
000015

000042
000002

000014

000012

000002

1s:

JSR

PCLSTYPEC

13 TYPE

SPACE

@7, $CHARCNT
9

TS18
8PL
MOV

83 TKS
104

s sCHAR IN KYBD BUFFER?
1 1BR IF NOT
s 1GET CHAR
1:STRIP EXTRANEOUS BITS

1024

;38R IF NOT

83 TKS
101¢
817k8, (SP)
9177600, (SP)

1 iWAIT FOR CHAR

8IC
cP8
BNE

1ST8

ePL
MOve
8I1C
cMP8
8NE

1 1BRANCH IF NOT AT
11 TAB STOP
1 1POP SPACE OFF STACK
$3GET NEXT CHARACTER

(SP).
4

847TkB, -(SP)
#177600,(SP)
SIXOFF ,(SP)

1 i WAS CHAR

XOFF

11GEY CHAR
11STRIP IT

®IXON, (SP)

13WAS

TSTY

11FIX

STACK

TST8

s sWALT UNTIL PRINTER

aPL
MOvVH
cMei3
BNE
CLRB
8R
c8
2zQ
INCS

$TKS:
$TKB:

. WORD
. WORD

$TPB:
SNAL:
$SFILLS:
SFILLC:
STPFLG:
$QUES:
SLF:

WORD
.BYTE
.BYTE
.BYTE
.BYTE
_ASCII
LASCIZ

.SBTTL

SEQ 0134

8ITB
BNE
ST
BR

$CHARC
: . WORD
NT
$TYPEX: RTS

$TPS;:

138

. WORD

101¢

XON?

1318R IF NOT

1S READf

11LOAD CHAR TO B8E TYPED INTO DATA REG.
1315 CHARACTER A CARRIAGE RETURN?
1 sBRANCH IF NO
8l£§§i‘CLEflfl CHARACTER COUNT
'

owF, 2(SP)

$11S CHARACTER A LINE FEED?
1 1BRANCH IF YES
1 3COUNT THE CHARACTER
1 1 CHARACTER COUNT STORAGE

STYPEX

(PC).
0
PC

177560
177562
177564

3317y XDB STATUS
33TTY XBD BUFFER

1 sCONTAINS ML CHARACTER FOR FILLS
1 1CONTAINS @ OF FILLER CHARACTERS REQUIRED
11 INSERT FILL CHARS. AFTER A ~LINE FEED"
11 "TERMINAL AVAILABLE~ FLAG (BIT<07>=0=VES)
1 1QUESTION MARK
13LINEFEED

1:TTY PRINTER STATUS REG.
1377Y PRINTER BAFFER REG.

177566

2
12
0

u? [

12>

.EVEN
CONVERT BINARY

:1MJDO001
1 MJD001L

ADDRESS
ADDRESS

TO DECIMAL AND TYPE ROUTINE

1108888000800 008844500000000008000000008080000000000000000008008000

1#THIS ROUTINE

IS USED

TO CHANGE

16-BIT BINARY

NUMBER

TO A S-DIGIT

1*SIGNED DECIMAL (ASCII) NUMBER AND *YPE IT. DEPENDING ON WHETHER THE
s sNUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED

1«BEFORE THE FIRST DIGIT OF
1 sREPLACED WITH SPACES,
ssCALL
;
]

MOV

NUM, -(SP)

THE NUMBER, LEADING ZEROS WILL ALWAYS BE
11PUT THE BINARY NUMBER ON THE STACK

GLOBAL ARE AS
KDJU11
. MAC
A

MACY11l

15 MAR 84

30A(1052)

15:51

14
15 MAR 84

7363

7364
7365
7366
7367
7368
7369
7370
7371
7372
7373
7374
7375
7376
7377
7378
7379
7380
7381
7382
7383
7384
7385
7386
7387
7388

7389

7390
7391
7392
7393
7394
7395
7396
7397
7398

7399

7409

7401
7402
7403
7404
7405
7406
7407
7408
7409
7410
7411
7412
7413
7414
7415
7416
7417
7410

16:58
PAGE 139
CONVERT BINARY TO DECTMAL
i 4

037056
037056
037060
037062
037064
037066
037070
037074
037100
037102
037104
037112
037114
037120
037124
037126
037132
037134
037136
037140
037142
037144
037146
037150
037152
037154
037156
037160
037166
037172
037176

037200
037202
03720€
037210
037212
037214
037216
037220
037222
037230
037232
037234
037236
037240
037242
037244
037250
037256
037260
037262
037264
037266
037270

010046
010146
010246
010346
010546
012746
016605

100004
005405
112766
005000
012703
112723
005002
016001
160105
0°2402
005202
000774
060105
005702
001002

$TYPDS:

020200
000020

000055

13:

037272
000040

28:

037262

105716

100407
106316
103003
116663
052702
052702
110223
005720
020027
002746
003002
010502
000764
105726
100003
116663
105013

012605
012603
012602
012601
012600
104401
016666
012616
000002
023420
001750
000144
000012

Ss:
000001
000060
000040

177777

TYPDS

MOV
MOV
MOV
MOV
MOV
MOV
MOV

8PL
NEG

000001

64:
7¢:

MOve
CLR
MOV

177777

037272
000002

177776

SUB
BLT
éNC

R1.RS
41
§2

ADD

R1,RS

MOV

TST
BNE
TSTH
8MI

$OTBL:

$OTBL(RO),R1

THE

ROUTINE

1 1PUSH RO ON STACK
1 1PUSH R1 CON STACK
3 1PUSH R2 ON STACK
11PUSH R3 ON STACK
11PUSH RS ON STACK
$1SET BLANK SWITCH AND SIGN
1sGET THE INPUT NUMBER

1:BR IF INPUT IS POS.
;s sMAKE THE BINARY NUMBER POS.
$ IMAKE THE ASCII NUMBER NEG.
131ZERO THE CONSTANTS INDEX
$13SETUP THE OUTPUT POINTER

$11SET THE FIRST CHARACTER TO A BLANK
1 sCLEAR THE BCD NUMBER

$1GET THE CONSTANT

1 :FORM THIS B8CO DIGIT
1;8R IF DONE
1 s INCREASE THE BCD DIGIT BY
;1 sCHECK IF BCD DIGIT=0
ssFALL THROUGH IF O
s sSTILL DOING LEADING 0°5S?
11BR IF YES

8CC

11BR IF NO

8IS
8IS
MOVB

®'0,R2
o R
R2,(R3)«

RO, #10

ASLB

MOVB

(SP)

1(SP), -1(R3)

1 1ADD BACK THE CONSTANT

R2
S
(SP)
7

s sMSD?

tsYES--SET THE SIGN

s 1MAKE THE BCD DIGIT ASCII
13MAKE 1T A SPACE IF NOT ALREADY A DIGIT
$1PUT THIS CHARACTER IN THE QUTPUT BUFFER

(RO)»

8Ly

1160 OO0 THE NEXT DIGIT

MOV

RS.R2

$:GET

1518
ePL
MOV

{(SP)»
9
-1(SP), -2(R3)

33WAS THE LSD THE FIRST NON-ZERO?
138R IF NO
t11YES--SET THE SIGN FOR TYPING

MOV
MOV
MOV
MOV
MOV

(SP)+ RS
(SP). RS
(SPYe .R2
(SP)s A1
(SP)+ RO

3 :POP STACK
11POP STACK
11POP STACK
11P0P STACK
1:POP STACK

MOV

2(SP) 4(SP)

1 ADJUST THE STACK

CLRB

TYPE

000004

1
RS

MOv8
CLR

867

8s:

RO, -(SP)
R1, -(SP)
R2, -(SP)
R3, -(SP)
RS, -(SP)
920200, -(SP)
20(SP),RS

SEQ 0139

TYPE ROUTINE
1:GO

o' -,1(SP)
RO
#3DBLK,R3
& ,(R3).
R2

1ST

000010

AND

MOV
RTI
10000.
1000,
100.
10.

(R3)

, $DBLK

(SP)+,(SP)

ST INCREMENTING

11CHECK THE TABLE INDEX

5360 TO EXITY

TME (LSD

1160 CHANGE 10 ASCII

11SET THE TERMINATOR

INTO RS
INTO R3
INTO R2
INTO R}
INTO RO

13NOW TYPE THE NUMBER
1 sRETURN TO USER

GLOBAL AREAS
KDJ1.1A
MAC
7419
7420
7421
7422
7423
7424
7425
7426
7427
7428
7429
7430
7431
7432
7433
7434
7435
7436

7437
7438
7439
7440
7441
7442
7443
7444
7445
7446
7447
7448
7449
7450
7451
7452
7453
7454
7455
7456
7457
7458
7459
7460
7461
7462
7463
7464
7465
7466
7467
7468
7469
7470
7471
7472
7473
7474

037272

MACY11l

15 MAR 84

30A(1052)

15:51

cld

15-MAR 84
16:5
:58
PAGE 140
CONVERT BINARY TO DECIMAL

000004

$DBLK:

.SBTTL

.BLKW

BINARY

AND

SEQ 0140

TYPE ROUTINE

TO OCTAL (ASCII) AND TYPE

11908800000 0000000000400000000000000000000000000000titttissst

itioss

1#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT

;#0CTAL (ASCII) NUMBER AND TYPE IT.

;oé;YPOS---ENTER

t1oCALL:

X
X

HL
i

MOV
TYPOS

.BYTE
.BYTE

HERE

SETUP

NUM, -(SP)

SUPPRESS

ZERQS

AND

NUMBER

DIGITS

TYPE

1 tNUMBER TO BE TYPED
1 :CALL FOR TYPEOQUT

N
TMM

isN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE
3sM=1 OR O
131=TYPE

LEADIMG

ZEROS

1 $0=SUPPRESS LEADING

ZEROS

;#$TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST

;1+$TYPOS OR

1 oCALL:

ie
1s
1

$TYPOC

MOV
TYPON

NUM, -(SP)

;‘EXEPOC---ENTER HERE FOR

16
i8

037302
037306
037314
037320
037324
037326
037334
037342
037350
037352
037354
037356
037362
037364
037370
037374
037400
037404
037406
037410
037412
037414
037416
037420
037422
G37424
037430
037432
037436
037440

017646
116667
112667
062716
000406
112767
112767

112767

010346
010446
010546
116704
005404
062704
110467
116704
016605
005003
006105
000404
006105
006105
006105
010503
006103
105367
100016
042703
001002
005704

000207
000002
000001

000005

000211

000171
000165

000154

16 BIT NUMBER

MOV
TYPOC

NUM, -(SP)

s tINUMBER TO BE TYPED
:iCALL FOR TYPEOUT

$TYPOS:

MOV

8(SP). -(SP)

1 IPICKUP THE MODE

$TYPOC:

$TYPON:

000145
000132
000125
000012

MOVB
MOV
ADD
BR
MOVB
M0ve
MOVB
MOV

1(SP),SOFILL
(SP)+,30MODE+1
*2,(SP)
STYPON
1, 80FILL
€6, 30M0DE + L
&5, SOCNT
RS, -(SP)

M0V
&0&8

RS, -(SP)
;?flbfid.fll

31 1SAVE RS
13GET THE NUMBER OF DIGITS TO TYPE

ADD
MOVE

6, R4
R4, $OMODE

1:SUBTRACT IT FOR MAX.
13SAVE IT FOR USE

MOV
CLR
ROL

12(sP).RS
R3
RS

11PICKUP THE INPUT NUMBER
11CLEAR THE OUTPUT WORD
1 1ROTATE MS8 INTO “C*

ROL

1 1tFORM THIS DIGIY

MOvVe

1%:
2%:

177770

TYPEOUT

MOV

000076

3 iNUMBER TO BE TYPED
1 :CALL FOR TYPEQUT

3s:

B8R

R4, -(SP)

SOFILL R4

ROL
ROL

RS
RS

ROL

MOV

DEC8
aPL

8IC
BNE
TST

R5,R3

s3LOAD ZERO FILL SWITCH
; NUMBER OF DIGITS TO TYPE
s sADJUST RETURN ADDRESS

$3SET

THE ZERQO FILL SWITCH

$3SET FOR SIX(&) DIGITS

313SET THE ITERATION COUNTY
1 1SAVE RS

11SAVE R4

$1GET THE ZERO FILL SWITCHW

1160 DO MS8

11GET LSR OF

THIS DIGIT

$OMODE
74

11 TYPE THIS DIGIT?
118R IF NO

44
R4

11 TEST FOR O
$ 1SUPPRESS THIS 0?

2177770,.R3

ALLOWED

11GET RID OF JuNk

GLOBAL AREAS
KDJ11A.MAC
7475
7476
7477
7478
7479
7480
7481
7482
7483

7484

7485

7486

7487
7488
7489

037442
037444
037446
037452
037456
037462

037466
037472

037474

037476

037500

037502

037504
037506
037510

7490

037516

7492

037522

7491

7493
7494
7495
7496
_7,497
498

037520

037523
037524
037525
037526

MACY1l 30A(1052)
15-MAR 84 15:51
001403
005204
052703
052703
110367
104401

105367
003347

15 MAR-84
16;58
PAGE 14%
BINARY TO OCTAL (ASCII)

q%:

000060
000040
000040
037522
000032

5%:

74:

002402

005204

012605

012616

63:
000002

000004

000

8s%:

000
000
000
000000

$OCNT:
SOFILL:
$OMODE:
.SBTTL

7499
7500

B8R

$1G0 DO

MOV

(SP)+,RS

MOV
MOV
MOV

.BYTE

DONE

TO DO

1 3 INSURE LAST DIGIT ISN'T A BLANK
THE LAST

1 1RESTORE RS

DIGITY

(SP)+,R4
(SP)+,R3
2(SP),4(5P)

1 tIRESTORE

t 1RESTORE
$1SET THE

R3
STACK FOR

1 sSTORAGE FOR ASCII OIGIY

(SP)+,(SP)

RTI

1 1COUNT BY 1
18R IF MORE

.BYTE
0
.BYTE
0O
.BYTE
O
.WORD
O
TRAP DECODER

RETURNING

1 sRETURN

1 s TERMINATOR FOR TYPE ROUTINE
$30CTAL DIGIT COUNTER
$3ZERD FILL SWITCH
5 sNUMBER OF DIGITS TO TYPE

:#AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS
1¢0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL

;"_5582

7510
;g}é

1sBR

131BR IF YES
1100N' T SUPPRESS ANYMORE 0O'S
1 1MAKE THIS DIGIT ASCII
1 sMAKE ASCII IF NOT ALREADY
1 1SAVE FOR TYPING
11GO TYPE THIS DIGIT

P30080004000400000000000080600000800000000486040060880000800488800
:#THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP~ INSTRUCTION

7501
7502
7505
7506
7507
7508
7509

SEQ 0141

TYPE

eLT

DECB
BGT

MOV

000002

AND

St
R4
4'0,R3
e’
,R3
R3,8%
.83
$OCNT
2
63

INC

000744

012604
012603
016666

B8EQ
INC
8IS
8IS
MOVE
TYPE

L1l

;3G0 TO THAT ROUTINE.

037530
037532
037536
037540
037542

037544
037550

010046
016600
005740
111000
006300
016200

000200

$TRAP:

000002

037564

MOV
MOV
TS7
MOVe
ASL
MOV

RO, -(SP)
2(SP),RO
-(RQ)
(RO).RO
RO

$ TRPAD(RO) RO
RO

RTS

1 :SAVE RO
3:GEY TRAP ADDRESS
1 tBACKUP BY 2
1:GET RIGHT BYTE OF TRAP
$:POSITION FOR INDEXING
1:INDEX TO TABLE

$36G0 TO ROUTINE

7513

;g%g
7516

i THIS IS USE TO HANDLE THE “GETPRI“ MACRO
037552

7517

037554

?’gig

037562

011646

016666

000002

000004

000002

$TRAP2:

MACRO

7522

.NLIST

7523
7524
7525

7526
7527

7528
7529

7530

(SP),-(SP)

4(SP),2(SP)

RTI

7520

7521

MOV
MoV

1 1MOVE
1 1MOVE

THE PC OOWN
THE PSW DOWN

3 iRESTORE

THE PSW

SETTRAP A,8,MSG

$8SET

A,B,\<TRAP
,\$TRP,
.$TRP
<MSG>
>

$TRP=$TRP+1
.LIST
.ENDM

SETTRAP

.SBTTL

TRAP

.MACRO
$$SET
IF EQ $TRP-%

A,B,C,0,COMNT

TABLE

i#THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED

GLOBAL

ARE RS
KDJ11A. MAC

MACY1

30A(1052)

15 MAR é4 §5¢49°2)

15-MAR

-MAR_84

7331
7532
7533
7534
7535
7536
7537
7538
7539
7540
7541
7542
7543
7544
7545
7546

PAG

1#BY THE

“TRAP“

Be. BRagBeRPAGE 142

SEQ 0142

INSTRUCTION.

ROUTINE

$TRPAD: .WORD

$TRAP2

.ENDC
IIF NDFAGNS..NLéST

.IIF NDF GNS..LIST
B
1 1CALL=A
JENOM
$$SET
.MACRO
TRMTRP

TRAP+D(C)

COMNT

$ TER
, - $TRPAD
M=

.ENDM ~ TRMTRP
"SBTTL
TRAP TABLE

7547

7548
7549
7550
7551
7552
7553
7554
7555
7556
7557
7558
7559
7560
7561
7562
7563
7564
7565
7566
7567
7568
7569
7570
7571
7572
7573
7574
7575
7576
7577
7578
7579
7580
7581
7582
7583
7584
7585
7586

14 THIS TABLE CONTAINS

;sBY

0.57564
037566
037570
037572
037574
037576

037552
036502
037326
037302
037342
037056

THE

;

ROUTINE

‘

-------

$STRPAD:

.WORD
$STYPE
$STYPOC
$TYPOS
STYPON
$TYPDS

.SBTTL
037600
037606
037614
037616
037624
037624
037626
037630
037634
037636
037644

037646
037654
037656
037662
037670
037674
037676
037702
037704
037706
037712
037714
037720

112767
112767
000403
112767
010046
010146
105767
001450
122767
001031

132767

001425
017600
062766
005767
001375
010067

105720
001276
166700
006200
010067
012767

"TRAP"

THE STARTING ADDRESSES OF

INSTRUCTION.

THE ROUTINES CALLED

$TRAP2
1;CALL=TYPE
;CALL=TYPOC

TRAP+1(104401)
TRAP.2(104402)

TTY TYPEOUT ROUTINE
TYPE OCTAL NUMBER (WITH LEADING ZEROS)

;;CALL=TYPON
;;CALL=TYPDS

TRAP.4(104408)
TRAP.5(104405)

TYPE OCTAL NUMBER (AS PER LAST CALL)
TYPE DECIMAL NUMBER (WITH SIGN)

;;CALL=TYPOS

TRAP.3(104403)

TYPE OCTAL NUMBER (NO LEADING ZEROS)

APT COMMUNICATIONS ROUTINE

3 '.““..“.‘.“‘.““..“““.““..‘.‘.““0‘..“00.“0‘.““.‘

000001
000001

000236
000226

$ATYL:
$ATYS:

MOVB
;gva

#1,$FFLG
:ki;gFLG

1170 REPORT FATAL ERROR
11TO TYPE A MESSAGE

000001

000220

::;;3:

MOVE

@1,$FFLG

11TO ONLY REPORT FATAL ERROR

mov

RO, -(SP)

+1PUSH RO ON STACK

TSTB

$MFLG

1 :SHOULD TYPE A MESSAGE?

"
000206

000001

141154

000100

141145

000004
000002
141104

000004

141112

141107
141076
000004

141052

MOV

BEQ

CMPB

8NE

R1, -(SP)

OAPTENV, SENV

11PUSH R1 ON STACK

1:IF NOT:

13IF NOT;

WAIT

+ tOPERATING UNDER APT?

13;

BITB
BEQ
MOV
ADD
ST

@APTSPOOL,$ENVM
3
84(SP),RO
02,4(5P)
SMSGTYPE

2s:

MOV
;age

RO, MSGAD
ggo:«

11PUT ADDR IN MAILBOX
11FIND END OF MESSAGE

SuB
ASR
MOV
MOV

$MSGAD, RO
RO
RO, SMSGLGT
04, SMSGTYPE

11SUB START OF MESSAGE
11GET MESSAGE LNGTH IN WORDS
11PUT LENGTH IN MAILBOX
1iTELL APT TO TAKE MSG.

BNE

;;SHOULD SPOOL MESSAGES?
11IF NOT:
BR
1 1GET MESSAGE ADOR.
: 1BUMP RETURN ADDR.
11SEE IF DONE W/ LAST XMISSION?

GLOGAL

AREAS

KDJ11A . MAC

MACY11l

15-MAR

7587
7588
7589
7590
73591
7592

037726
037730
037736
037744
037750
037754

000413
017667
062766
016746
004767
000000

7594
7595
7596
7597
7598
7599
7600

037756
037762
037764
037770
037772
037776

105767
001416
005767
001413
005767
001375
017667

7593

7601
7602

7603
7604
7605
7606
7607
7608
7609
7610
7611
7612
7613
7614
7615
7616
7617
7618

037756

040000
040006
040014

040020
040024
040030
040034
040036
040040
040042
040043
040044

062766
005267

105067
105067
105067
012601
012600
000207
000
000
000
040046
000200
000001
000100
000040

30A(1052)
15:51

000004
000002
140026
176526

15-MAR-84
APT

000016
000004

000062

7624

7625
7626
7627
7628
7629
7630
7631
7632
7633
7634
7635
7636
7637
7638
7639
7640
7641
7642

3%:

141030

141002

000004
000002
140760

11%:

140774
000004

000020
000013
000006

PAGE

143

COMMUNICATIONS

4s:
S§$:
10$;

12¢:

SMFLG:
SLFLG:
$FFLG:

5%
84(SP),4s
#2,4(SP)
177776, -(SP)
PC,$TYPE
O

7578
BEQ
ST
B8EQ
TST
BNE
MOV

$FFLG
12
$ENV
123
$MSGTYPE
114
84(SP), $FATAL

ADD
INC

CLRB
CLRB
CLRB
MOV
MOV
RTS
.BYTE
.BYTE

SEQ 0143

ROUTINE

BR
MOV
ADD
MOV
JSR
.MORD

.BYTE
.EVEN
APTSIZE=200

92,4(SP)
$MSGTYPE

13PUT

MSG ADDR IN JSR LINKAGE
1 1BUMP RETURN ADDRESS
$3PUSH 177776 ON STACK
1 sCALL TYPE MACRO

$ 1SHOULD REPORT FATAL ERROR?
s1sIF NOT:
BR
1 ;RUNNING UNDER APT?
1:IF NOT:
B8R
3 s FINISHED LAST MESSAGE?
ssIF NOT:
WAIT
3 1GET ERROR @

s ;BUMP RETURN ADDR.
s1TELL APT TO TAKE ERROR
1 tCLEAR FATAL FLAG
13CLEAR LOG FLAG
1 1CLEAR MESSAGE FLAG
1 :POP STACK INTO R1
$:POP STACK INTO RO
$ sRETURN
3 sMESSG. FLAG
$3LOG FLAG
1 :FATAL FLAG

$FFLG
SLFLG
$MFLG
(SP). ,R1
(SP)+,RO
PC
0
O
0

APTENV=001
APTSPOOL =100
APTCSUP=040
$1000848484800444008400000800080880080000000000884000844804008508000088
s THIS ROUTINE WILL INCREMENT THE ERROR COUNT AND THEN PASS THE UNIQUE

;258
7621
7622
7623

16:58

N1l

:ERROR NUMBER TO THE APT ERROR ROUTINE TO BE REPORTED TO THE APT SYSTEM.

040046
040052
040054
040060

040064
040066
040074
040100
040104
040106
040114
040120
040124
040132
040134
040136
040142
040146
040152
040154
040160
040164

005267
001775
005267
021627

101010
012767
012637
012637
000430
017667
011667
062716
017637
104401
000000
062716
104401
016746
104402
104401
016746
104402

141000

$ERROR:

140764

001002

000106

000000
000072
000002
000000

000066

1$:

040134

100%:

002062
000026

SERFLG
$ERROR
ERRCNT

BHI
MOV
MOV
MOV
B8R
MOV
MOV
ADD
MOV
TYPE
.WORD
ADD
TYPE
MOV
TYPOC
TYPE
MOV
TYPOC

13
*7777,
3%
(3P)+«,805AVSP1
(SP)«,80SAVSP2
-4 )
8(SP),
33
(5P),101%
e,
(SP)
8(SP),po1023

cHP

007777
001062
001064

000002
002046
000030

INC
BEQ
INC

102%:

(SP),

€1002

O
#2,.(5P)
LERR1
3%,-(SP)
+ERR2
1014, -(SP)

s INCREMENT ERROR FLAG
sDON'T LET IT GO TO ZERO
. NCREMENT THE ERROR COUNT

1IS ERROR FROM VECTOR AREA

1IF YES THEN
1REPORYT AN UNEXPECTED TRAP
1 SAVE UNEXPECTED TRAP DATA
;AND RESTORE sSp
;ELSE
(REPORT UNIQUE ERROR NUMBER TO APT
sSAVE ERROR PC
sGET OVER UNIQUE ERROR NUMBER FOR RETURN
1 TYPE ERROR MESSAGE
1GET OVER ERROR MESSAGE
H
;1PUSH UNIQUE ERROR NUMBER ON THE
sTYPE OCTAL ERROR NUMBER
3
;PUSH ERROR PC ON THE STACK
tTYPE THE ERROR PC

STACK

GLOBAL ARE AS
KDJ11A, MAC
7643

7644

T645
7646
7647
~648
7649
7650

651
7652

Y653

040166
040174
040176
040202
040204
040206
040210
040212
040214
040214

L
S 8

MACY11

SOA(
éosa)

122767
001004
004767
000000
000777
000000
000002
000000

000001

140624

15-HAR 84

000010
000001

177414

MAR

16:58

144

PAGE

PT COHHUNICAIIONS ROUT INE
2s:

3s:
44
Ss:

101¢:

SPATCH:
;

.END

cMPB

QAPTENV, SENV

BNE
JSR
. WORD
BR
HALT
RTI
. WORD

.BLKW

54
PC,
0

$ATY4

SEQ N144

1CHECK TO MAKE SURE WE'RE

tIF

YES

THEN

IGO REPORT ERROR

IN APT MODE

TO APT

STORAGE FOR ERROR NUMBER

ILOOP HERE AFTER REPORTING ERROR
1+ IF NOT APT THEN MALT
$ALLOW RECOVERY FROM HALT

T0Q APT

PN CMAC

LN TN

A
ARt

ABASE

ACDWY =
ACOM. =
ACPUOP
=
ADDTY
ADDWO =

ADOWY

ADDW10=
ADDW11»
ADDuW12»
ADDW1 3~

»
ADDW14

ADDU1S=
ADDMW2 ADDW3 =
ADDWA =
ADDWS
ADDWE
ADDM?
ADDMWS

ADDW9

ADEVCTa=
ADEVM =
AENV
=

AENVM

=
AFATAL

ALLCTR

AMADR]
=
AMADR?
AMADR3
=
AMADRA4
=
AMAMS])
=
AMAMS2
=
AMAMSS
=
AMAMS
Y =
AMSGAD
=
AMSGLG=
AMSGTY=
AMTYP]1
=
AMTYP2s
AMTYPS
=
AMTYP4
=
APASS =
APRIOR=
APTCSy=
APTENY
=
APTSIZ=
APTSPQO=
ASWREG=
ATESTN=
AUNIT =

AUSHR

AVECTL=

AVECT2=
BEVENT=

8FA

—
4

15 MR da Y1 4Y>)

1N MA1R
RA
PBae REFE
S.
| AQC:

USER SYMBOLS

547
547
547

547
1083
547
547
547

562
1091

1099

1107

76140

7643

1116

11320

1110

1119

S47

547
547
547
547
547
547
547
547
547
547
547
547
547
547
S47
547
547
5890
547
547
547
547
547
547
547
547
547
547
547
547
547
547
547
S47
547

7276
7269

867

7271

547
547
S47

4660

547
547

553
558
559
550

555
556
549

552
76160
7572
76130
7574

76150

551
554
547

561

1085

1093

560

4580

1077

1101

11380

SEQ 0145

Ofi Ay

A“

KOJ11A
MA

BFAC1
BF AC2
BFAC3

EWN

003352
003376
003422

BFAC4H
B8FACS

003446
003474

B8F8

003646

BF AE

003650

BITO
= 000001
BITO00 = 000001
B8ITO01 = 000002
81702 * 000004
8IT03 = 000010
BIT04 = 000020
BITOS = 000040
8IT06 = 000100
B8IT0” = 000200
B8IT08 = 000400
8IT09 = 001000
8IT1
= 000002
8IT10 = 0C2000
8IT11 = 004000
8IT12 = 010000
BIT13 = 020000
BITi4 = 040000
8IT1S = 100000
81T
= 000004
B8IT3
= 000010
BIT4
= 000020
BITS
= 000040
8IT16
= 000100
BIT7?
= 000200
8118
= 000400
BIT9
= 001000
BOARDT= 000001
6PTVEC= 000014
BTER
002650
BTEXP
001066

BTGO
BTRES

BYTST
BTISTE
8T1

002450
001076

003150
003176
400888

CACHET= 000001

CCR
=
CHECK7
CHEC10
CHEC26
CHEC27
CHEC30
CHEC32
CHEC2IZ

177746
005132
005366
010616
011162
01130
012166
(12464

15 MAaBa 1534y
1078
1086
1094
1102
1111

1120
1139
2798
269¢
268¢
267¢
2668
2650
2640
2630
262¢
2618
260¢
2788
259¢
258¢
257¢
256¢
255¢
¢
254
277¢
2760
275¢
2748
2730
272¢
271e¢
270¢
10
<86¢
934
596¢
1058+
1130+
902¢
5970
980e
1118+
954
1026
883
1¢
7497
452¢

1474
1545
2321
2441
2549
2701
2788

15 MARCBS . 1aepB
REFE Re
1A
1083¢
10910
10992
1107¢
11160
1125
1141

11484
1143

1145¢

509

606

761

936

938
913
1060+

9410
916

SEQ 0146

USER SYMBOLS

279

278
277

276
275
274
273

272
271
270

897
1059«
1132+
1017
898
990e

1133
9144
1000+
1140

1061
11340
917

919
1062

1135
920

1027
1144

1030

1025
1142
981
1032¢

156

159

832«

875
1486

1138

953
1028

1478

1549

2332
2459
2567
2712
2799

972

1557
2343
2477
2585
2723
2810

922

1065
1138
928

925

1068
1140
933

1029

103}

991

1001

10250

177

509

594

609

1490

1496
15670

1561

23856
24899
25960

27340
28210

2367

2%814

929
1070

1142
935

933
1072

935
1074

937
1127

939
1128

1056
1129+

93?7

1144

1057

1076«

939
1084.

953
1092«

962
1100

1109+

752

161

as1

874

194

7245

971

ARE AY

KDJUL11A
. MAC

CLRD
CLRI
CMPD

=*
=
=

CMPRIN

COUNT

CPEREG=
CPUTST=
CR
=
CRLF
=
DATRAM:=
DATVER

005136
005404
005150
005372
seessae
eeseee
sessee

001040

15:

15680

1= MAR 84

16'? 8
PAGE
48
CROSS RE ERENCE TABL
E

USER

SYMBOLS

2964
3332
3651

3004

SEQ n1s8°

1503
15744
15030

1574

5809
5840

4039
4047

581¢
3211
3512

3868
5506

77766
000001
000015
000200
000001
002146

G0C4236
004250
004252
004270
004304
004314
004320
000030
002126
001044
002124
001766
000514

30A( é?SE)

14972
1569
1498

017730

DATVFR
002130
DAT1
002160
DCOUNT
001054
DOISP = 177570
DISPLA
001050
DISPRE
000174
DIVD
= esesas
DIVF
= seesse
DSWR
= 177570
DvDSUB
022000
DVFSUB
021002
01
De
D3
D4
DS
D6
07
EMTIVEC=
ERR
ERRCNT
ERRFP
ERRMSG
ERRNUM=

15 MAR 84

cCC

CHEX
C10
CHx?
CH10

MACY11

4559

18
1940
19%5¢

10
8200
3281
3596
3967
815#
818
5880
201¢
585¢

ccC

LLOBAL

4950
4381
4133

2000

4389
4141

4056
817

3229
3550
X906
5517

166
752
7286

874
2918
3312
3618

4005
4360

823¢

585
848s
856

4401
4151

4250
1275¢
1278+
12806
1288¢
1289
1293
1294
2898

4258
1291
1279¢
1304
1325
1292¢
12956
1297¢
836+

583¢

7623»

993
1115¢
1254
13440
1429
1619¢
1708
18010
1873

9964
1121
1257¢
1364
14320
1623
1712¢
1805
1876

7940

7930
7520
4650

785

4065

822+
3263
3575
3938
5622

509
7344

2963
3331
4029

4778

826

4073

823»
3282
3597
3968
5762
603

40954

2919
3313
3619

4006

5824

4030
6191

761

156
763

877

3003
3356
3669
4121
5205

3039
3370
3696
4559
5216

3069
3402
3710

4424

4435

766

4986

3357
3670
4122

6369
7233
7233

3105
3414
3741
5505

3040
3371
3697

4351

3070
3403
3711

3106
3415
3742
4779

3144
3431
3780

4987

3175
3444
3805

5206

3194
3476
3843
5217

6498

4560
6797

7241

7332

7344

3174

3193
3475
3842
5823

3210
3511
3867
6190

3228
3549
3905
6497

3262
3574
3937
6796

4209

45060
4217

4225

4233

4241

%8¢
1095
1231¢

1098¢
1236

983

1407¢
1570
16889
1761
1833¢
1925

1412
1573¢
1692
1765¢
1858
1928¢

9862
1112
12492
1340

1581¢
1699
17949
1865
19352

1616

3143

3443
3804

3779
5516

5621

4480

5761

6368

4446
4185

4457
4193

4468

9590
1087
12110
1314
1384¢

965

7025

7026

848

856¢

847

4413
4160

4267
1296

4168
4276

4177

4285

43070

4201

1332

837«

788¢
1003
11246
12684
1367¢

1448

16268
1737
1808¢
1880

941

10064
1175
1287¢
1371
1452¢
1652
1740¢
1813
18834

9454

1079
1178¢

13740

1499
1655
1745
1816¢
1889

1661¢
1752
1823¢
1919

1228
1317¢
1404
1510
1685
1755¢
1829
1922¢

974

1330@

9779

1103
1239¢
1333
1415¢
15727
1695¢
1791
1861¢
1932

11062
1246
1337¢
1421

14242

17022

1798
18682
1940

LLOBAL ARt AS
KDJ11A . MAC

MACY11 30A(1052)
15-MAR 84 15:51

19430
2017
20890

2185
22760
2351
24576
2562
26600
2792
28878
2966
30456
3139
3208¢
3284
33764
3478
3539¢
3613
3702¢
3782
38480
3932

40038
4332
45344
4759
4970¢

5199
548806
5630
5779¢
5880
5936¢
6011
60718
6144
63740
6776
ERRTN =
ERRVEC=
ERR1

ERRZ2

EXPDAT
FACU

000000
000004
002046

70110
4630
282¢
761@

001034

5790

002062
ssssse

763¢

003742
005450
005560
006004

1169
1565
1630
1706

FIN1S

006400

1827

FIN16
FIN1?
FIN2

006160

006572
007006
004044

MAR-84
16:58
PAGE 149
CROSS REFERENCE TABLE

1947
<c021e
2115

2189¢
2281
23548
2463
2565¢
2664
2795¢
2906
29690
3063
31420
3213
32876
3397
348192
3543
361606
3713
3785¢
3862
3935¢

4008
43350
4540
47620
4980

5202¢
5499
5634¢
5796
S5883¢
5941
6014¢
6089
6147¢
6380
6779¢
7019

845
7637

7640

1040

FINL
FIN1O
FIN11
FIN13

FIN1s

1759

188/
1954
1199

1180¢
15960
16364
17150
1768#

18360

18960
19632
12130

19506
2048
21186

2216
22840
2362
24660
2571
26678
2803
2909¢
2992
30668
3146

321606
3308
34004
3489
3546¢
3621
37164
3799
3865¢
3940
40110
434}
45430

4772
49838

S208
5502¢
5726
5799¢
5886
S944¢
6017
60920
6152
63834
67%
70220

846+

1956
2051¢
2123

2219¢
2289
23650
2472
2574¢
2674
28068
2912
299506
3072
31490
3224
3311¢
3405
34920
3552
36244
3736
3802¢
3870
3943¢

4024
434490
4553
A775¢
4989

Se11e
5508
5729¢
5802
5889¢
5964
60200
6095
6155¢
6491
67930
7028

857

196046
2055
21266

2223
22920
2372
24750
2580
26784
2814
29150
2998
3075¢
3168

32274
3315
34080
3498
3555¢
3645
37390
3807
38732
3953
4027¢
4354
45560
4781
4992

5219
S5i1e
5735
3805¢
5892
5967
6025
60980
6176
64949
6799
7031¢

USER

1985
20584
2130

22260
2296
23756
2481
25834
2705
2817¢
2922
30016
3094
31716

3231
3318¢
3417
3501¢
3569
36480
3744
3810¢
3883
39568
4032
4357¢
4562
476844
5001

322260
5519
S738¢
5826
389%¢
5970
6028¢
6101
6179¢
6500
68028
1040

SEQ 0148

SYMBOLS

19884
2062
21336

2229
22994
2384
24840
2589
27086
2825
29250
3006
3097¢
3177

32340
3326
34208
3505
3572¢
3653
3747¢
3820
38860
3962
4035¢
4363
A4565¢
4793
50048

5230
35226
S744
5829¢
S900
S973¢
6048
61040
6183
65030
6811
70430

1993
20654
2139

22326
2316
23876
2493
2392¢
2716
28280
2945
30094
3100
31800

3257
3329¢
3433
3508+
3577
36560
3757
3823¢
3894
3965¢
4112
43660
4573

47964
Si67

5233¢
5330
S747¢
5833
5903¢
S976
605106
6109
61860
6509
6814¢
7169

19964
2069
21434

2236
23196
2437
24960
2600
27190
2871
29480
3028
31034
31689

326006
3334
34360
3514
3580¢
3664
376006
3829
3897¢
3970
4115¢
4374
4576¢

4949
S1708

Sa467
5533¢
5755
38360
5921
59790
6054
611206
6193
6512¢
6990
1720

2001
20724
2169

22393
2377
24400
2545
26030
2727
28740
2951
3031¢
3108
31920

3265
3337¢
3446
3517¢
3591
36674
3766
383206
3900
3973¢
4124
4377¢
4741

49528
S:76

54708
S615
57580
5853
59248
5984
6057¢
6132
61968
6758
69938
7176

20044
2076
21726

2245
235300
2445
25484
2650
27300
2878
29540
3034
31110
3196
32684
3359
34490
3527
35940
3672
3769¢
3836
39030
3984

4127¢
4522
47440
4958
S179¢

5476
56180
S764
58568
5927
S987#
6060
6135¢
6362
6761
6999
71792

2008
20794
2176

20110
2085
21794

3276
33605
3470
35300
3599
36750
3773
38390
3908
3987¢
4323
45256
4750

32794
3373
34730
3535
3602¢
3699
3776
3845
3911¢
4000
43269
4531
47530

22499
2338
24484
2553
26530
2738
28810
2957
3037¢
3131
31990

49610
5185

S4798
5624
5767¢
5859
59306
6005
60630
6138
63652
6767
7002¢
7185

2273
23410
2454
255640
2657
27419
2884
29600
3042
31340
3205

4967
5188¢

5485
5627¢
5776
58620
5933
60082
6068
61412
6371
67708
"008
71882

LLOBAL

ARt 1S

MACYL

Z0A(105%2)

FIN24

007206
007430
007616
007754

010156

2015
2083
2137
2183

V24
e
20920
2146¢
2191¢

FIN2G
FIN27
FIN3O
FIN31
FINS2

010720
011264
011632
011774
012270

2379
2487
2594
2672
2732

FINA
FINS
FING
FIN?
FLAG

004444
004554
004760
005214
001042

KOJ11A . MAC
FIN2O
FIN21
FIN22
FIN2S

FIN3Z

15 MAR 84 15 8%

2243

012566

2819

1302
1378
1437
1494
5820

42082+

4388+
4595«

4702¢
4906+

FPPERR

002013

FPTIS1 =
FPTS10=

sssees
sseese

U
J

PALE

USER SYMBOLS

SEQ Mma

2252¢

24150
2523
2630¢
26810
27680

28556

13460
13864
14540
1525¢
4046+

4216+

4400
4603+

4739
4947

405S5e¢

42244

4412+«
4611+«
4748
4956

4064+

4232«

4423
4619+
4785
4993

4116

4240«

44344«
4627+

4806+
5014+

4140¢

4249«

4445
4635e
4817
S023¢

Siide
5351.
5678+
6607«
6803
6922¢

5123+
3364.
6618+
6826
69300

5165
5378+
5724
6629¢
6834¢
6938+

5174
5391+
5733
6639
68420
6946

1114
1343
1618

1123
1366
1625

1177
1373
1654

1210
1383
1660

12%0
1406
1687

1238
1414
1694

787

944

1800
1942
2088

1807
1949
2117

1815
1959
2125

2456

2465

2474

2659

16;¢

5105«
5338+
56708
6596+
6765
6914¢

22715

ssecsss

R8s RéPERe
REEY 1ABC

5096+
5325¢
5662+
65858
6756
6906+

7560

FPPTST«

MAR

2283

2666

2291

26717

958

1822
1987
2132

2298

2483

2707

976

4150¢

4257

4456
46430

4828+
S032¢

5223
5405¢
5768
6649¢
6850+
6988
985S

1248
1423
1701

4159+

4266+

4467+
4651+

4839+
S041s¢

5247«
S5419¢
6524«
6660¢
6858¢
6997
995

1256
1431
1711

1832
1995
2142

1860
2003
2171

1867
2010
2178

1875
2020
2168

2495

2547

2555

2564

2318

2718

2329

2129

2340

2740

2353

2794

4167¢

4176¢

4°84+s

4850+
S050s¢

4861¢
S060s

4872+
5069«

4883+
SO078s

4479+
4659+

5260
S465
65344
6671
6866¢
7032
1005

1286
1451
1739

4520
4667+

4529
4675+

5273¢
5474
6544+
6681s
6874¢
7055

S286s
5523
65544
6692+
6882+
7063+

1081

1089

1308
1501
1747

1316
1509
1754

1097

1105

1329
1572
1764

1336
1580
1793

1934
2078
2248

2573

2582

2591

2602

2652

2364

2805

2374

2816

2386

2827

2968
3141
3286
3480
3615
3784
3934
4334
4761
5201
5633
Sa82
6013
6146
6778

2994
3148
3310
3491
3623
3801
3942
4343
47174
$210
5728
5888
6019
6154
6792

3000
3170
3317
3500
3647
3809
3955
4356
4783
5221
5737
S89%4
6027
6178
6801

3008
3179
3328
3507
3655
3822
3964
4365
479%
5232
5746
S902
6050
6185
6813

166

509

596

609

610

756

761

782

ar?

1233

1152
1527

5312
5654 +
65744«
6713e
68986
7079+

1927
2071
2238

2959
3133
3278
3472
3601
3778
3910
4325
4752
S187
5626
S861
6007
6140
6769
7187

5299¢
5646
6564+
6702¢
6890+«
7071

1921
2064
2231

2953
3110
3267
3448
3593
3768
3902
4126
4743
S178
517
5855
5986
6134
6760
7178

4895
SO087+

1892
2057
2225

2947
3102
32%9
3435
3579
3759
3896
4114
4575
5169
5532
5835
5978
6111
6511
771

43167

1882
2050
2218

2924
3096
3233
3419
3571
3746
3885
4034
4564
S003
5521
S828
5972
6103
6502
7042

4587+
4693+

4330

2914
3074
3226
3407
3554
3738
3872
4026
4555
4991
5510
S804
5966
6097
6493
7030

4566
4684+

4321

2908
3065
3215
3399
3545
3715
3864
4010
4542
4982
5501
5798
5943
6091
6382
7021

4200

4284+

2886
3044
3207
3375
3538
3701
3847
4002
4533
4969
5487
5778
5935
6070
6373
7010

4192+

42756

2439

2873

3030
319,
3356
3516
3666
3831
3972
4376
4951
5469
5157
5923
6050
o195
6392

2447

2880

3036
3198
3361
3529
3674
3838
398¢&
4524
4960
5478
5766
5929
0062
6364
7001

%%h.nn&
ARE

FPTIS11=
FPTS12+»

15 M nlhsxs(:él
MACY

eeseee
esssss

OA(

}OS52)

FPTS13=

sesses

1665

sceses
seaese
sssees
sssese

U
Y

FPTIS2 =
FPTS20=

sesees
sseese

U
U

1717
1770
1838
1898
1182
1965

FPTS21*
FPTS23=
FPTS24=

FPTS2S=
FPTS26=

seesas
sssees U

eessse
ssssss

2148

2254

2302

sesses

2417

ssasee

FPTS30=

sassse

FPTS31=

121%
2525

ssssee U

2632

asaens

2683

FPTSA

sssase
sessss

FPTSS
FPTS6
FPTIS?

=
=
=

essees
essses
sseses

2770
1261

U
U
U

1348
lsgg
14

FPVEC = 000244
FSRCMO=
GNS
=

HITMIS=

HOP10
HOP11
HOP12
HOP13
HOP14
HOP1S
HOP16
HOP17
HOP18
HOP19
HOP20

sessss y
ssseas Uy
177752

021244
022242
023304
02433%
025436
027136
027456
030144
032464
033106
034532

HOP21
HOP22

035622
036274

HYBRID=

000001

4490

5150
6475«
2857
494

3485»

6725

6955
7139

5916

7553

7554

7555

7556

7557

a74

7208

7221

172362
172364

KDPAR3=

172366

KDPAR4=

172370

431¢
432¢
4338

4340

3877

4308

6043+

6084+

7233

71246

7497

7560

T7046¢
7192¢

1380¢
13044
13400
871s

XKDPAR1:=
KDPAR2+

3852«

6000+

6817¢

1356
1270
1274
2870
4304

3814.

5959¢

4380¢
45794
4798¢
5006¢
52384
55364
S637¢
S5782¢
6385¢
6515¢

IiL
ILLOPL1
ILLOP2
IOTVEC=

172360

3789

S875e

KDPARO=

3754

S71ls
7153s

1920
‘1900
10

3561

5599«
6971e

4549

4294
4492
4712
4919
5133
5434
5585
5695
6329
6459

3521

5450
6740+

n
o]
=L 000011
a0ers
004544
004340
004434
000020

SEQ 0150

2193

FPTS27=

FPTS33=

USER SYMBOLS

2093

FPTSE

FPTS32=

16:58

2026

sesees
seasens

PAGE
151
CSOSS SEFERENC
E TABLE
84

1598
1638

FPTS14=
FPTIS1Ss
FPTS16=
FPTS17«

FPTS22*

15 MAR

471

732
604

872+

4507«

6127+

4726+
6168«

4934

6£346s

UREA

Lalal Sie I ]

KDJ11R MAC

TRLTLL

15 MAR 84

KDPARS
= 172372
KDPARG= 172374
KOPAR7
» 172376
KDPORO= 172320
KDPDR]
= 172322
KDPDR2
» 172324

KIPARO«

KIPAR]
=
KIPAR2

KIPAR3
KIPARS
KIPARS«
KIPARG
=
KIPAR7=

KIPDRO=

KIPDR]=
KIPDR2=
KIPDR3
=

172326
172330
1723382
172334
172336
172340
172342
172344
172346
172350
172352
172354
172356
172300

LDC
LDC2
LODM2
LDOM3
LDOM4
LDOMS
LDOM6
LDOM7
LOM27
LF
LOOPIN
LOST
LS1
LS2
LS3
LS4
LSS
LS6
LS7
LXpP

LXPSUB
MACE
MACO

YYYYY)
Y YYYYY

YYYYYY
LYYYYYY

sssses

LYYYYYS
Y YYY
Y

sss00s
ssssss

seosss

2548888

44008
XYY YY)

s40888
824044

s68464

034262

002610
002500

16:58

PAGE

152

SEQ 0141

CROSS REFERENCE

TABLE

USER

SYMBOLS

6401

6408

6415

6422

6429

6436

6443

6450

64740

6214
6292

6220

6226
6304

6232
6310

6238
6%16

6244
6322

6250
63450

6256

6262

752

756

761

706

723%

241

7336

7344

1162

1164

1166

11710

6535
6672
918
9130

6682
921

6545

6555
6693
924

6565
6703
9330

6597

6608

6619

4210
4220

4232
4249
4258
4260

3970
398¢
399
4000

401¢
4029
4030
4040

000012
001060
003722
stsbhas

MAR

4190
4200

172302
172304

172306
KIPDR4= 172310
KIPORS
= 172312
KIPDRG
= 172314
KIPOR?= 172316
LCO
= [YYYYY
LCDOSuB
032760
LCF
= asasse
LCFSuUB
032336

411¢
412¢
4130
4140
415¢

cCccccgcecc

KDPDRS
=
KDPDR6
=
=
KDPDR7

15:51

435¢
4360
4370
4084
4099
410

cCcccccCccc

KDPDR3
-

XDPDR4
-

JUAL 10O

6387
6394
6201
6208
6286
3915
6159
2891
2928
2972
3012
3048
3078
3114
1934
5904
1160
5866
5907
5948
5991
6032
6075
6116
6517
6525
6661
915
911

6575
G714

6268

6274

6280

LLOBAL AREAS
KDJ11A.MAC
MACOA
MAC1
MAC2
MAC3
MAC4
MACS

002504
002514
002530
002544
002560
002574

MBTE
“8T1
M8T2
MBT2A
M8T8
MBTBA
M8T88
MBTBC
M8T80
MBT8E
MBT8F
MBT8FG
M8T8I

MCLRD

003200
002422
002430
002442
002656
002712
002740
002766
003014
003044
003074
003110
003134

030214

MCLRI
MCMPD
MODSUB

030306
017542
026636

MDFSUB

025126

MOIVD
MOIVF

021244
020056

MFA
MFACU

MFSRCH

M CO

MLCF

003206
003200

012566

032464

031626

M DC
M.DCe
MLODM2
MLDDM3
MLDOM4
M_DDMS
ML.OOM6
MLDDM7
M.DM27
MLDSUB
MFSUB

017120
031506
012656
012764
013124
013250
013360
013460
013566
024074
023042

M S1
M.S2
M.S3
LS4
MLSS
MLS6
MS7
ML xP

030356
030474
030612
030746
031066
031222
031346
033106

MM000

MMODF
MDD

025436

024336

023304

MACY11l

15 MAR 84

L
Wy ¢

30A(1052)

15:51

9142

15 MAR 84
16:58
P\t 153
CROSS REFERENCE TABLE
928

9160

919¢
9220
9250
9290
1021
883¢
8964
8992
940
950
%1
970
979
988
998

USER

SYMB(.

SEQ 0152

932

1037¢

1022

9470
952
964
973
982

992

955

969¢

9600

9784

987¢

9979

1002
10122
10192

10070

5248
5420
5015
5149¢
4381¢
41330
10540
10404

5261
54490
5024

5274

5287

5300

53138

5326

5339

S35,

5365

5379

5392

5406

5033

5042

5051

5061

5070

5079

5088

5097

5106

5115

5124

4807
4588
4694

4818
4596
4703

4829
4604
47250

4840
4612

4851
4620

4362

4873

489

4907
4560

49332
4668

4676

4685

1010
1016
S5809¢
58402

4039¢

28574
6387¢
6201
3915¢
61592
28910
29286
29720
3012¢
30480
30784
311490

58660
590706
59484
5991¢
60320
6075¢
61160
65170
52404
50074

47990

4628

4636

4652

LLOBAL

AREAS

KOJ11A.MAC
MMULF

MMUTST=
MMVEC =
MNGOP
MNNRM1
MNNRM2
MNNRM3
MNNRM4
MNRM
MODD
=
MODF
=
MODGAR
MSB
MSCD
MSCF
MSOF
MSER
=
MSFD

MSFDI

022242

000001
000250
015104
013700
014164
014342
014510
016066
ssasear U
sssesa U
025426
015720
034532
035622
027456
177744
027136

036402
036456
035770

=
=

sssse2 VY
sssees U
016212

MXDF 1
MXVDEL=

014634
000001

ssasss

NGOP

NNRM1 = sesess
NNRM2 = sss0ss
NNRM3 = ssssess
NNRM4 = a2ss80e
NRM
= ssssss
PARRAM= 000001

PIRG

PIRQVE=
PRO
=
PR1
=
PR2
=

PR3
PR4
PRS

PR6

PR7
PS

PSuW

=
=
=

177772

000240
000000
000040
000100

000140
000200

000240

= 000300

=
=

000340
177776

= 177776

PWRVEC=

RECDAT

RECDST

RECFEC

=
=

30A(1052)

15:51

10
298¢
3454¢
31524
3238¢
3291¢
33412
36790
5240
5007
5154
3629¢
68190
70480
56392
4532
S5537¢

7207
7217
70892

PAGE

154

TARL
Lt

SEQ 0153

USER SYMBOLS

166

509

52364

5414

595

752

756

761

78,

2978
3494
3888

301P
3
3928

>054
3565
3958

3C34
3587
3996

3120
3609
4020

877

7233

7497

3159
3638
4108

3160
3693
4350

3172
3708
4549

72332
72410

3380¢
1¢
U

U
U
U
U
U

3454

3152
3238
3291
3341
3679
1¢

199¢

293¢
2160
217¢
218¢

219¢
2200

2210

2220
2238
196¢

197¢

4606
4590

001106

16:58

4799
4580
3719¢

177562
177560

001126

CROSS REFERENCE

5783¢

288¢

001036

15 MAR

45800

000024

QBUSEX= 000001

RBUF
RCSR

15 MAR 84

030144

MSG1
MSG2
MSXP

MUD
MRAF
MUVAD

MACY1l

197

602

5800

6000
3297
3762

2897
3351
3795

2934
3389
3825

2962
3466
3858

5984

2865

5772

5603

5715

6807

7036

4976

5194

5494

481

61J8

6347

6476

6741}

6972

7154

3244
X732
708
174

LLOBAL AREAS
KDJL11
. MAC
A
RECST

MACY1l

15 MAR-84

001116

YYY YY)

LYYy

027712
172260
172262
172264
172266
172270
172272
172274
172276
172220

172222

172224
172226
172230
172232
172234
172236

HWwN

SOPDR7=
SFD
= sasaas
SFDI
= L YYY LYY
SFOSuUB
027336
SHMOO = 000001
SIPARO= 172240
SIPAR1= 172242
SIPAR2= 172244
SIPAR3= 172246
SIPARA
= 172250
SIPARS= 172252
SIPAR6
= 172254
SIPAR7= 172256
SIPDRO= 172200
SIPDR1= 172202
SIPDR2= 172204
SIPDR3= 172206
SIPDR4
= 172210
SIPDRS= 172212
SIPDR6= 172214
SIPDR7= 172216
SKIPID
036306
SLOCOO
001030
SLOCO1
001032
SRO
177572
SR1
177574
SR2
177576
SR3
172516
H

ccC

SCF
s
SOF
=
SOF suB
SOPARO=
SDPAR1
=
SDPAR2=
SOPAR3=
=
SOPAR4
SDPARS
=
SOPAR6G
»
SDPAR7
=
SOPDRO=
SOPOR1
=
SOPDR2=
SOPDR3
=
SOPDR4
=
SOPDRS
=
SDPDR6=

ccC

002410
000010

SAVSP1
001062
SAVSP2
001064
S8
= TYYYYY
SCD
= sssses
SCDSuB
035356

15:51

5990

RESTAR
RESVEC»

30A(1052)

6058
8740
2830
591¢
S92¢
3629
6819
6827
6931
7048

5639
5647
%86¢
-S7¢
3882
3890
390¢
391¢
392¢
3932
3649
365¢
3660
3674
368¢
3692
3700
371
5537
5783
5544
10
3754
3769
377¢
378
3790
3800
3814
382¢
353¢
3549
355¢
3569
357¢
3584
3590
3604
7206
575¢
5769
302¢
3034
3040
305¢

15 MAR 84

o
16:58

PAGE

155

CROSS REFERENCE TABLE

5874

SEQ 0154

-- USER SYMBOLS

5884

5890

5915

5925

5931

5958

5974

5999

6009

6015

6042

6835
6939

6843
6947

6851
69700

68359
7056

6867
7064

6875
7072

6883
7080

6891

6899

6907

6915

6923

5652

5663

5671

5679

5687

57104

5552
536

5560
7233

5568

5576

5598

7230
7627+
76284+

72084

ol OBAL AREAS
KDJ11A.MAC

STACK =
START
STBOT =
STKLMT=

SuUBT

001000
002200
001000
177774

003524

SWR
SWRFG
SWO
SW00
SWO1l
SW02
SW03
SWO4
SWOS
SW06
SWO07
SW08
SW09

=
=
=

001046
000176
000001
000001
000002
000004
000010
000020
000040
000100
000200
000400
001000

SW10
SW1l
SW12
SW13
SW14
SW1S

=
=
=
=
=
=

002000
004000
010000
020000
040000
100000

000010

SuW1

SuW2

SW3

SuWa

SWS
SWé

SuW?

Su8
SW9
SXP

SXPSUB
TAB1

TAB10O

TAB11
TAB11A
TAB12
TAB12
TAB138
TAB14
TAB1S
TAB16
TAB17
TAB18
TAB2
TAB21
TAB22
TAB23
TAB24
TAB2S
TAB26
TAB27
TAB28

=
=
=
=
=
=
=
=

MACY1l 30A(1052)
15-MAR-84 15:51

= 000002

187¢
492
4700
198¢

1064

5840
4964
251¢@
2410
2400
239¢
238¢
237¢
2366
235¢
2340
2338
2326

2500

2490

= 000020

247¢

= 000200

=
=
-

000400
001000
seases U

036154
001176

001326

001336
001346
001356
001366
001376
001406
001416
001426
001436
001446
001206
001456
001466
001476
001506
001516
001526
001536
001546

834
498

1067

847s
855

S
--

USER

SEQ 0155

SYMBOLS

a3ia

1069

1071

1073

11274

7110
2910

7117
2916

7124
3020

7131
3038

3055
3520

3246
3637

849

855»

869»

251
250
249
248
247
246
245
244
243
242

231¢e
230¢
229¢
2284
2270
2268

= 000004

= 000040
= 000100

15 MAR-84
16:58
PAGE 156
CROSS REFERENCE TABLE

248¢

2460
245¢

24490

43¢
2420
7089

7096
6100

6524

6564
6600
662¢
664¢
6684
6700
6744
678¢
682¢
6850
6140
689¢
6919
6930
6954
6970
699¢
701¢
7036

7103
2898

3390

3388
3401
3409
3412
3422
3423
3437
3442
3330
2936
3462
3474
3484
3510
3558
3557
3573
3605

3429

3657

3948

2961
3483

3519
3548
3582
3583
3595

71528
3086

3104

3299

GLOBAL

ARERS

KDJ11A.MAC

TAB29
TAB29A
TAB3
TAB30
TAB31
TAB32
TAB33
TAB34

TAB4

TAB4O
TAB41
TAB42

TAB43
TAB4S
TAB46
TAB47
TAB47A
TABAS
TAB49
TABS
TABSA
TAB6
TAB6A

TAB?7
TAB8
TAB9
TAGRAM=
TBITVE=
TIMEQU
TKVEC =
TPVEC =
TRAPVE
=
TRPFLG

TRTVEC=

TSD31
TSFP1
TSFP10
TSFP11
TSFP12
TSFP13

TSFP14

TSFP15
TSFP16

TSFP17

TSFP2
TSFP20
TSFP21
TSFP22
TSFP23
TSFP24
TSFP2S
TSFP26

TSFP27

0013556
001566
001216
001576
001606
001616
001626
001636
001226
001646
001656
001666
001676

001706
001716
001726
001736
001746
001756
001236
001246
001256
001266
001276
001306
001316
000001
000014
004424
000060
000064
000034
002122
000014
011662
003650
005214
005450
005560
005634
006004
006150
006400
006572

003742

007006

007206
007430
007616
007754
010156
010320
010720

15 MAR 84

30A

15 MAR 84
CROSS

15
7050
7070

618¢
7102

712¢
714¢
7160
7182

6220

7200
722¢
7240
7260
7286
730¢
7324

7342
7360
738¢
6260
6300

6342

4028
638¢
642¢
6464

650¢

10
284¢
1272
2912
2920

2900

792¢
1778«
2689«

285¢
26430
1152¢
1527¢
1598¢
1638¢
1665#
1717¢
17700
1838+
1898¢
1182¢
1965¢
20260
2093¢
2148¢
2193¢
22540
23024
24174

3604
3617

2979
3688
3687
3703
3704
3695
3261
3727
3791
3854
3904
3924
3936
3991
4004
3966
3121
3841
2980
4118

6187
3349
3350
3355
874

PAGE

157

'Ré FERENCE TABLE

N1¢
-

USER

SEQ 0156

SYMBOLS

2996

3002

3280
3728
3816
3879

3751
3853

3752
3878

3930

3947

3951

3992

3158
5822

3245

3298

3649

3668

3740

3778

3803

3866

3925

4015

3790
3363

3815
3364

839
1188»
1906+

1221«
1971«

1267«
2032«

1354+
2099+

139%4s
21S4e¢

1462¢
2199e

1533«
2260+

23082

1604+

1644»
2423+

1673
2531

172Ss
2638+

5815
4016

13330

838+
1158+
18462
2776»
2654

GLOBAL

AREAS

KDJ1.1A
MAC

ISFP3
TSFP30
TSFP31
TSFP32
TSFP33

004044
011264
011632
011774
012270

TSFP4

004164

TISFP6
TSFPT

004554
004760

TSFPS

ISF10
ISF13

TSF14

TSF1S
TSF16

ISF1~
TSF2

1SF20
TSF21
1SF22
TSF23

TSF24
TISF31
TSF6
TSF7

TSTLOC

TST1

TSTI0
TST100

TST101
TST102
¥ST103
IST104
TST105
TST106
TST107
IST11
TST110
TST111
IST12
1ST13
IST14
IST1S

1ST16
IST17

75712

75120

004444

005410
005774

006150

006370
006562

006776
004014

007176
007420
007606
007744

010146
011764
004750
0C154

001136

002422

004554
031066
031222
031346
031506
031626
032464
033106
034532
004760
035622
035770
005214
005450
005560
005634

006004
006160

003200

006400

MACY11l

15-MAR 84

30A(10>2)

15 :51

1215¢
2525¢
26320
26830
2770¢
12610
13480
1388¢
14560
1537
1672
1724
1777
1845
1905
1190
1973
2034
2101
2156
2201
2640
1399
1466
6088
1680
1853
2042
2209s
2466
2697»
2934»
5913
6039«
6123e
8930
1392¢
60360
6079¢
61200
61630
6205¢
6391¢
65216
68238
14600
70522
70950

1531¢
16020
16420
1669¢
1721¢

17740
10480
18420

15 MAR-84
16:58
PAGE 158
CROSS REFERFNCE TABLE

1577¢
1708¢
1761¢
18290
1889¢
19560
1192
2017¢
2085¢
21390
21850
2245¢
26740
14480
1506¢
1417
1683
1856

2045

2211
2469
2699
2935
5919
6040
6124

1194

1196

12010

1419
1729
1910
2051
2220
24718
2708+
2936
5954
6041
612%

1472

1478
1735
1914
2105
22€
.
2539
2719e

1732

1913
2264
25338
2710

2937
5955

6042
6126+

5956¢

6046

6130

USER

SEQ 0157

SYMBOLS

1488
1782
1923
2109

2276

2780
3019
3958
6081
6142

1543
1785
1977
2111
2427
2559
2784¢
3020
6082e

1546

1786
1980

2160
2431
2786
3032
5968
6083

1555
1789
1983
21630
2434
2574
2795
3086+
5997
6087

1559

1795

1989
2166
2448
2577

2797
3089

5998+
6093

1611
1796
2038
2205
2451
2583
2806+
S872
6003
6099

1677

1850

2041
2208+
2457
2693
2808
5878
6038
612

KBOTTR ARETMTM
ISl
TST22
TST23
1ST724
TST2S
IST26
IST27
TST3
TST130
TST31
TST32
TST33
TST34
TS13S
1ST36
1S7137
TST4
1S740
TST41
157142
TST43
TST44
75745
TST46
15147
TSTS
TST50
TS151
TSTS2

15753
TSTS4
TSTS5S
TSTS6
TSTS7

TST16

15760
TS761
TST62
75763
TST64
15765
TST66

75767

TSrIrv
157170
TST71
TST72
TST73

1ST74
YST175
75176
1S177
151001
151002
751004

~51101

572
007006
007206

007430
007616
007754
010156
003650

010320
010720
011264
011632
011774
012270
012566
012656
003742
012764
013124
013250
013360
013460
013566
013700
014164
004044
014342
014510
014634
015104
015720
016066
o16212

017120

004164
017542
020056
021244
022242
023304
024336
025436
027136
004444
027456
030144
030214
030306
030356
030474
030612
030746
0C5420
005430
005440
005550

1o RA g SpBL4pS

1o "ARC
. 1RePBRe
R8
REE 1 AR
.

13680

9020

20300
2097¢
21520
2197¢
22584
11560
23060
24210
2529¢
26360
26870
27740
28610
28959
1186¢
29320
29760
30160
30520
30820
3118¢
31560
3242¢
12190
32954
33450
33840
34580
36330
36830
37230
39190
1265¢

40430
4137¢
4385¢

45840
48030
S011¢

52440
55410
13520
564306
5787¢
5813¢
58440
58700
59119
59520
59954
1538
1540
1558
1607

1550
1547
15920
16320

15840
15880

USER

SYMBOL
&

SEf

195

Ll 08AL ARE AY
KDJ11A MAC
152600
TS26D1
152602
152603
152604
752605
152700

1S2701

152702
1SS 703
152704

752705

753000
153001
753002
TS3003
TS3004
TS3005
153200
153201
753203
1753204
753205
153300
753301
153302
753303
153304

753305

TS6DA
TS6DAT
TS7DA1
TS7DA2
TS7DA4
TIPDS =
TYPE
=
TYPOC

TYPON
TYPOS

=
=

010640
010650
010660
010670
010700
010710
011204
011214
011224
011234
011244
011254
011552
011562
011572
011602
Ollél2
011622
012210
012220
012240
012250
012260
012506
012516
012526
012536
012546
012556
004730
004740
005164
005174
005204
104405
104401
104402
104404
104403
177660
177662
177664
177666
177670
177672
177674
177676
177620
177622
177624
177626
177630
177632
177634
177636
177640

MRCY11

15 MAR 84

ROA(105)

15:51
2311
2322
2333
2320
2331
2342
2428
2503¢
2S07¢
2440
2458
2476
2536
26100
c6l40
2548
2566
2584
2694
27480
2700
2711
2722
2781
28356
28392
2787
2798
2809
1408
1400
1467
1469

1487

7219
7207
75549
75560
75. @

3420
3430
3440
345¢
3460
3470
348¢
3490
3200
3210
3220
3230
3240
3254
3264
327¢
3310

15 MAR 84

2
16:58

PAGE

CROSS REFERENCE

2319
2330
2341
2355
2366
c411e
2499

2346
2357

2368
2403506
24074

160

TABLE

2354
2365

23910
23954

1289

7411

23990

S
SEQ 0159

USER SYMBOLS

25116
25150
2519¢
26064
26180
26220
26260

27440
271560
27604
27640
28310
28430
28470
2851¢
1425
1402
1479
1476

1521¢

75578

7217
7639

1439¢
14430
1513¢
1517
7220
7642

7480

75535¢

7634

7637

1640

)

GLOBAI

AREAS

KDJ11A.MAC ~
UIPAR;=

UJTTM~AR2=
VIPAR3=
UIPAR4=
UIPARS=
UIPAR6=
UIPAR?=
UIPDRO*
UIPDR1=
UIPDR2=»
UIPDR3:
UIPDR4=
UIPDRS=
UIPDRG=
UIPDR?=

UVAD

WLOTRP

MACYL]

15
MAR B4 15 49>

177642

002106

XBUF
- 177566
XCSR
= 177564
XDFL
= ssesee
SAPTHD
000204
SASTAT= esssss U
SATYC
037624
SATYY
037600
SATYZ
SAYY4

037606
037616

SCHARC
037032
SCKSWR= ssssss U

SCMTAG=
SCPUOP
SCRLF
$DBLK

$DEVCT
$OD0AGN

sesasa U
001026
002077
037272

001010
036372

sDTBL
SENDAD
SENDCT
SENULL
SENV
SENVM
SEOP
SEOPCT
SERFLG

037262
036362
036330
036376
001020
001021
036274
036322
001052

783¢

4620
4610
3380
518
7594
7565
7563¢
7274

756649

7291«
7560

834
5628
7668
7377

553¢
7213

7308

840

842

7290
7411

7351
74190

7222

1228

841+
5860
836
557¢
530
550¢

7212¢
842e
871

7348¢

000204
037053

5250
7351¢

040043

7645

7301«

72240
7215¢
72310
7269
867

$HIBTS
SLF

SLFLG

75640

505
841
7220
558¢
559¢
72040

7294
7347¢
72210
7559

7563+

3852

5240
7609
7567

74150

037050
037047
036352
sesess U

= 000003

3789

7380

SFILLC
$SFILLS
SGET42
SGTSWR=*

s$HD

16:58

3719

040046
001020
001030
001002

040044

cR0ss 'REPEReRPAGE
CEETABLe

3330
33490
335¢
3360
337e¢
3382
309¢
310¢
3110
312¢
313¢
3140
315¢
316¢

SERROR
SETABL
SETEND
$FATAL

$SFFLG

15 MAR

3320

177644
177646
177550
177652
177654
177656
177600
177602
177604
177606
177610
177612
177614
177616
esssesa

30A(}052)

S69¢
76008

7566

175

176

7604+

76100

7572
727}

7334

1339«

7596
7276

7643
1574

7216
7621e

76214

7622

7594

7603¢

76114

User svmeoLS

SEQ £Q 016
0160

GLOBAL ARE AS
KDJ11A.MAC
SMATL
$MBADR

SMFLG
$MSGAD

001000
000206
040042

$MSGLG

001016

001000

SNWTST=

526
5260
7564+

001014

$MSGTY

SNULL

MACY11 30A(1052)
15 MAR 84 15:51

530

5484

859

555¢

7570
7580

7605+
7583

76094

S49¢

7578

7586+

7598

5560

037046

7296

000001

8840

1639¢
24180
315386

45810

SOCNT
SOMODE

60338
7452«
7447«

037524
037526

$PASS
$PASTM

001006
000212

SPATCH

040214 G

SQUES
037052
SRDCHR
= ssssee U
SRDDEC= ssssss Y
SROLIN=

ss0ses

SROOCT>

essese Uy

SRTNAD

SR2A

SSAVRE*

036374
sseses

sseees U

SSETUP=
SSTUP =

000126
177777

=
=

000204
160000

$SVPC
$SWR

5529
S528¢

STKB
$TNS

STN

037040
037036

= 000112

73460

886

16664
25264
32396

4800¢

60760
7481
7451«
840«

10410

1043

SEQ 0161

SYMBOLS

7269

7602+
11530

11830

12164

12624

17180
26330
32928

17710
26844
3340¢

18392
2771
33810

18990
28580
3455¢

19660
28926
36300

202760
29294
36800

61170
74940
7456

61600

62020

63880

65180

68200

866+

7459
7205

7470
7209«

74960
7210a

7218

7231

838

840

842

843

7209

1050

1158

1188

1221

50080

52410

55380

S6400

57840

58100

13490

20940
29738
37200

S8410

70490

13894

21490
3013#
39160
S867¢

70900

14574

21940
30499
40400
S908¢

15280

22550
3079¢
41340
59490

1599¢

2303e
31156
43820
5992¢

7651¢

7560

7560
72300
7560

7560

471¢
4718

835

836

503¢
175
1604
2308
3120

508
176¢
1644
2423
3158

1671
2531
3244

1723
2638
3297

1776
2689
3347

1844
2776
3386

6038

6081

6122

6165

6207

5997
001022
001004

758%
.

USER

7350¢
7560
7560

4387

SSWREG
$STESTN

15 MAR 84
16:58
PAGL 162
CROSS REFERENCE TABLE

7223
S60¢
551¢

1643+
24224
3157«
4585«
6037+
7315
7313

1750

1349
1671¢

2094
25310
2973
32440
3720
4805¢
5841
60814

4586

7229
869
874«

1670+
2530
3243+
4804+
6080+
7322
7320

884

1354¢
1718

2099¢
2633
29786
3292
3725¢
5008
58466
6117

843

4805

7231

895

5013

5246

5543

1904
2863
3460
5645

6393

1971
2897
3635
5789

6523

1267

2032
2934
3685
5815

6825

8%94e¢

1049s

1157+

1722+
2637
3296¢
5012s
6121

177Se
2688¢
3346¢
5245s
6164+

1187

1843.
2775
3385«
5542¢
62064

1220+

1903
2862+
34%9.
S6Ads
6392«

12662

1970
2896«
36340
5788¢
6522+

1353¢

2031
2933e
36844
S8l4e
6824

2098+
2977
3724¢
S845s
70530

895¢

1041

1050¢

1183

1188¢

73430
7342¢

1389
1723¢

2149
26380
3013
3297¢
3916
50134
5867
61228

13940
1771

21540
2684
3018¢
3342
39218
S241
5872¢
6160

1457
17760

2194
26890
3049
5347¢
4040
52460
5908
61650

1153

1462¢
1839

21996
2111
30540
3381
4045¢
5538
59136
6202

1158¢

1528
18440

2255
27768
3079
33864
4134
55434
5949
62070

1533¢
1899

<260¢
2858
3084¢
3455
41390
5640
5954¢
6388

1599
19048

2303
28636
3115
34600
4382
S6450
5992
63930

1354

2099
2978
3725
5846

7054

13932

1394

1462

2199
3054
4045

5872

2260
3084
4139

5913

5954

7095
1461+

7201

1532e

2153»
3017«
3920¢
S5871¢
7094+

2198+
3053+
40A4s
S912¢

2259
3083.
4138
59538

1216

12219

1262

16040
1966

230860
2892
31200
3630
43874
5784
59972
6518

1533

2154
3018
3921

163¢
1971

2418
28978
3153
3635¢
4581
57898
6033
65232

16442
2027

242332
2929
31588
3680
45862
S810
0038&
6820

7209
1603

2307s
3119e
4386
5996

12672

1666
20322

2526
2934%
3239
3685%
4800
58152
6076
63258

o OBAL ARE AY
KDJ11A MAC

$TPB
037044
$TPFLG
037051
$TPS
037042
S TRAP
037530
$TRAP?2
037552
$STRP
= 000006
$TRPAD
037564
$TSTM
000210
STSTNU
- 000001
$TYPBN-= TYYYYTY
$TYPODS
037056
STYPE
036502

STYPEC
S$TYPEX
$TYPOC
$TYPON
$TYPOS
SUNIT

036714
037034
037326
037342
037302
001012
SUNITM
000214
SUSHR
001024
S$XOFF = 000023
$XON
= 000021
$$5ETA= 000000
SOF TLL
037525
$40CAT
000000
E3

040234

30A \éObe)
15 MAR 84 15 :51
MACY11

7049
7331
7263
7329
7516¢
75459
7510

4640
7558
7365¢
72630
7293
7335
7450¢
7449
74459

7357
7545
7300
7337
7554
74520
7555

S27e

SS54¢
529¢
S6le

7317
7324
72238
7446+
489
4740

5360

.SASTA-

006204

MAR

70542
73450
73490
73440
75050
7552
75544
1552

838

7344
7564
5148

PAGE
CROSs REPERENCEE
1 A8’
16:58

7090

70950

75550

75568

7553
7307
73400

7591
73120

USER

75570

75580

S04e
5980

506¢
599¢

SEQ N162

SYMBOL
S

7556

1344
7344

7450+

7460

490

4940

5372

5968

74950
503

5970

7345
7567

7386

7347

519

531

s36

7348

7349

5080
6000

7350

514
6090

7351

S515¢
7684

73520

S17¢

7231
74190

519¢

72320
76120

5310

7342

76529

5322

7343

w UBAL

KDJ11A

B8GNMOD
BGNSUB
BONTST

CxLOoP
COMMEN

DEFPRG
ENOCOM
ENDMOD
ENDPAS
ENDSUB
ENDTST

ERRDEF
ERRDF

ARE AN

1602
1610

1600
1774
2861
3683
$870
160¢
2940
1¢e
2940
1602

71952

1612
160¢
1825
2889
3718
5905
1592
160¢
117S
1404
1699
1880
2062
2245
2463
2705
2951
3139
3315
3514
3699
3870

4112

4750

5208
57448
AN4
6089
6500
ERROR

MACY11l

15-MAR 84

MAC

7176

1880
1175
1404
1699
1880
2062
2246
2463
2705
2951
3139
3315
3514

30A(1052)

15:51

15 MAR 84

16:58

PAGE

165

CROSS REFERENCE TABLE

SEQ 0163

MACRO NAMES

876

893
1842
2895
3723
5911

1156
1969
2976

1048
1902
2932
3919
5952

4043
5995

1150
1952
2971

1167
2013
3011

1186
2030
3016

4137

6036

1219
2097
3052
4385
6079

4584
6120

4803

1258
2135
3077

1300
2181
3113

1376
cedl
3151

1265
2152
3082

1352
2197
3118

6163

1392
2258
3156
5011
6205

1460
2306
3242
S244
6391

1531
2421
3295
5541
6521

1602
2529
3345
5643

1563
2484
3339
5584
6724

1087
1333
1623
1820
2001
2185
2372

1642
2636
3384
5787

1669
2687
3458
5813

1721
2774
3633
5844

1627
2592
3378
5694
6954

1662
2670
3452
5807

1704
2730
3626
5838

1757
2817
3677
5864

1095
1340
1652
1829
2008
2216
2384
2650

1103
1364
1658
1858
2017
2223
2437
2657
2912
3100
3276
3489
3653

i112

1121
1380
1692
1873
2055
2236
2454
2674
2945
3131
3308
3505
3672
3862

6823

7052

7093

7194
7217

1038
1885
2926
3913
S946
785

1208
1412
1708
1889
2069
2273
2472
2716
2957
3146
3326
3527
3713
4124
4759

5219
5755
5933

6095

6509
7185
785

1208
1412

1709
1890
2069
2273

2472
2716
2957
3146
3326
3527

4037

5989

941
1228
1421
1737
1919
2076
2281
2481
2727
2966
3168
3334
3536
3736

3894

4131

6030
956

1236
1429
1745
1925
2085
2289
2493
2738
2992
3177
3359
3543

3744
3900

4323
4772
5230
5764
5941
6101
6758

5776
5964
6109
6767

942
1228
1421
1737
1919
2076
2281
2481
2727
2966
3168
3334
3536

1236
1429
1745
1925
2086
2289
2493
2738
2992
3177
3359
3543

4332
4781
5467

1197
2081
3047
4293
6073

965
1246
1448
1752
1932
2115
2296
2545

2792

2998
3189
3373
3552
3757
4341
4793
SA76
3796

5970
6132
6776
965
1246
1449
1752
1932
2115
2296
2545
2792

2998
3189
3373
3552

4491

6114
974

1254
1499
1761
1940
2123
2316
2553
2603

3196
3397
3569

3766
3932
4354
4949

5485
5802
5976
6138
6790

4711

6157

983
1284
1506
1791
1947
2130
2327

814
3028
3205
3577
3773

4918

6199
993

1306
1570
1798
1956
2139
2338
2571
2825
3034
3213
3417
3591
3782
3953

2884
3072
3257
3470

4374
4967

4540

3265
3478
3645
3829

4000
4553

3167

5833
6048

6811

5176
5630
S892

2445

2664
2922
3108
3284
3498

3845

4024
4573

5185
5726
5900
6380

1095

1103
1364
1658
1858
2018
2223
2437
2657
2912
3100

1112
1371
1685
1865
2048
2229
2445

2123
2316
2553
2803

2216
2384
2650

3196
3397
3569

3094
3265
3478
3645

3599

4562

1371
1685
1865
2048
2229

6371

1341
1652
1830

1940

3836

7138

6362

7019

974
1254
1499
1762

7087

7028

3276
3489
3653

7040

2922
3108
3284
3498
3664

4032
4741
5199

5735
5921
6068

6491
7169

1121
1381
1692
1873
2955
2236
2454
2675
2945
3131
3308
3505
3672

wOBAL

ARt AN

KDJL11A
. MAL

3699
3870

4112
4750

MACY11

15 MAR-84
3713
3883

4124
4759

5219
5755
5933
6095
6509

ESCAPE

5208
S744
S927
€089
6500
7176
<942

FPP2MS

8839

10409

886
1043

FPPLMS
FRONT

FRONT1

1¢

GETPRI
GETSWR
IDMSG
MULT

2940
2940
71952
2940

POP

1717
2770
3630
5841
2940

NEWTST

PUSH
REPORT
SCOPE
SETPRI
SETTRA

SETUP

SKIP
SLASH
SPACE

STARS

159¢

2948
2940
1892
2942
75208

159¢

2948
2940
2949

2949
1185
1639
2029
2633
3015
3381

4136
5784

SWRSU

6035
7049
29498

TRMTRP
TYPBIN

75428
2946

TAIL

TYPDEC
TYPNAM

2944
2%40

T YPNUM
TYPOCS
TYPOCT

29448
2944
2949

$SESCA

2944

TYPTXTY

294¢

7185

30A(1052)

15:51

3736
3894

4323
4772

5230
S764
5941
6101

15 MAR 84
16:58
PAGE 166
CROSS REFERENCE TABLE
3744
3900
4332
4781
5467

3757
3908

4341
4793

3766
3932

4354
4949
3485
5802

6758

5776
5964
6109
6767

5476
5796
5970
6132
6776

5976
6138
6790

884
1838
2892
3720
5908

1041
1898
2929
3916
5949

1152
1965
2973
4040
5992

1182
2026
3013
4134
6C33

7569

7590

3773
3940

MACRO

3782

3953
4374

3799
3962
4522

4363
4958
5499
5826
5984
6144
6799

5508
5833
6005
6152
6811

5519
5853
6011
6176
6990

1215
2093
3049

1261
2148
3079

1348
2193
3115

4967

SEQ 0164

NAMES

4980

3807
3970

4531
4989

5530
5859
6017
6183
6999

3820
3984
4540
5001
5615
5880
6025
6193
7008

3829

4000
4553

5167
5624
5886
6048
6362

7019

3836

4008
4562

3176
5631
5892
6054
6371
7028

3845

4024
4573

5185
5726
5900
6060
6380
7040

3862
4032
4741

5199
5735
5921
6058
6491

7169

156¢
7205

2942
1770
2858
3680
5867
7406

7365

7606
7567

7607

7545
294

7554

7555

7556

7557

501
1216
1641
2094
2635
3049
3383
4382
5786
6076
7051
8439

S11
1218
1666
2096

513
1262
1668
2149
2686
3079
3457

520
1264
1718
2151
2771
3081
3630

546
1349

7195

7218

833

3051
3455
4384

5810
6078
7090

4581

5812
6117
7092

4583

5841
6119
7198

1720
2194
2773
3115
3632

4800
5843
6160
7248

4382
6076

4581
6117

4800
6160

1351
1771
2196
2858
3117

1389
1773
2255

886

892
1391
1839

4802

5867
6162
7355

3153

5869
6202
7422

2257

2892
3155

3720

5010
5908
6204
7499

1388
2254
3153
5008
6202

1041

1457
1841
2303
2894
3239
3722
5241
5910
7562

1456

2302

3239
S241
6388

1043
1459
1899

2929
3241
3916
5243
5949
6390
7617

1527
2417
3292
5538
6518

1598
2525
3342
5640
6820

1638
2632
3381
S784

1665
2683
3455
5810

1047
1526
1901
2418
2931

1153
1530
1966

1155
1599
1968

1183
1601
2027

3918
5538
5951
6518

2420
2973
4040

5540

5992

€520

7049

2975
3342

4042

5640
5994
6820

7090

2528
3013

3344
4134
5642
6033
€822

GLOBAL AREAS
KOJ11A.MAC
$SNEUT

$SSET
$SSETM
$ $SKIP

.EQUAT
.HEADE
JKT11
.SFTUP
.$ACT)
. SAPTB

. $APTH

. SAPTY
. SEOP
. SERRO

- $READ
. $TRAP
.$TYPD

. $TYPE

.$TYPO
. $40CA

ABS.

MACY1l

15-MAR-84

2948

1771
2858
3680
5867

75260
859¢
2940

159
161¢
1592
161¢
1612
159¢

1619

162¢
159¢
162¢

1629
1610
160

1609

1628
159¢

040234

ERRORS DETECTED:

884
1839
2892
3720
5908
7545
866

30A(1052)

15:51

1041
1899

<929
3916

5949
7554

15 MAR-84

16:58

PAGE

CROSS REFERENCE

1153

1966
2973

4040

5992
7555

1183

2027
3013

4134

6033
7556

1216
2094
3049

4382

6076
7557

167

TABLE
1262
2149
3079

4581

6117

DOCUMENT PAGES:

1349
2194
3115
4800
6160

1389
2255
3153
5008
6202

1457
2303
3239
5241
6388

471
499

544
509
7560
7196
7497
7353
7246
7420
472

000

CZKDLB/EN:ABS,CZ
/DOC/SOL
KDLB
/NL : .SEQ
TOC=SYSMAC
/CRF
. SML /ML
S2K

SEQ 0165

-- MACRO NAMES

184
166
294

RUN-TIME: 249 141 10 SECONDS
RUN TIME RATIO: 539/400=1.3

CORE USED:

(103 PAGES)
165

+CZKOLB .MAC/ML ,KDJL1A . MAC

1528
2418
3292
5538
6518

1599
2526
3342
5640
6820

1639
2633
3381
5784

7049

1666
2684
3455
5810

7090

1718
2771
3640
5841