MAINDEC 11 D0QD_T17_SYSTEM_EXERCISER_Feb71 D0QD T17 SYSTEM EXERCISER Feb71

MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71 MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71

User Manual: MAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71

Open the PDF directly: View PDF PDF.
Page Count: 72

DownloadMAINDEC-11-D0QD_T17_SYSTEM_EXERCISER_Feb71 MAINDEC-11-D0QD T17 SYSTEM EXERCISER Feb71
Open PDF In BrowserView PDF
IDENTIF"ICATION

pRODUCT CODE:

MAINDEC"11-DI1'JQD

pRODUCT NAME:

T17 SYSTEM EXERCISER
(WITH CORE EXPANSION)

DATE CREATED:

rEB. 1971

MAINTAINER:

DIAGNOSTIC GROUP

AUTHOR:

JOHN HITTELL

,MAINOEC ...
PAGE 2
ABSTRACT
THIS PRCGRAM IS A CORE EXPANDABLE INTERACTIVE 8U~ EXERCISER FeR A PAPE~ TAPE ORIENTED 1'01'-11/20. IT PERrORMS A
TEST or INSTRUCTIONS AND CONCURRENT OPERATIONS or 1/0
EQUIPMENT SIMU~TANEOUSLY. IT MAY ALSO PERFORM T~E
SAME OPERATION INDEPENDENTLY. THIS PROGRAM IS NOT
TO 8E CONSIDERED A TOTAL CHECK or THE SYSTEM. If AN ERROR
IS DETECTED INAN 1/0 DEVICE, IT WILL PROBABLY BE NECESSARY
TO CORRECT THCMALFUNCTION WITH THE RESPECTIVE DIAGNOSTIC
FOR THAT DEVlcr.
REQUIREt-IENTS
EQUIPMENT
1'01'-11/20 STANDARD COMPUTER

OPT I ONAl HARDWA;RE THAT THE "ROGRAM WILL EXERC 1SE
MM11

RFll
Tell
KE11
KW11l
PCll
KLll
lPl1

uP TO 2!8KW or MEMORY
DISK (256K)
OECTAPE-TRANSPORT lERO
£XTENDED ARITHMETIC UNIT
LINE CLiOCK
HIGH SPEED READER/PUNCH
ASR33 OR ASR35 TELEPRINTER
LINE PRINTER

STORAGE
PROGRAM STORAGE • THE ROUTINE USES
rROM 0000 TO 17476.

~EMORY

LOADING PROCEDURE
METHOD
PROCEDU~[

rOR NORMAL ABSOLUTE TAP[S SHOULD

~E

FOLLOWED.

MAINDEC ..
PAGE 3
4.

STARTING PROCEDURE

4.1

CONTROL SWITCH SETTING
STARTING AT SA

4.2

20~

ALL SWITCHES SHOULD BE SET AS INDICATED.

STARTING ADDRESS OR ADDRESSES
(A)
(8)
ec)
(D)

200:: SR = 000777
200 = SR = 001777
CORE EXPANSION
200 = SR : 002XXX
200: SR = 000000
1/0 DEVICES

TEST PROCESSOR ONLY-WITH CORE EXPANSION
TEST PROCESSOR ONLY-4K-INHIBIT
TEST 1/0 ONLY
-CORE EXPAND AND TEST ALL AVAILABLE

Sw0 = 1 INHIBIT TTY OUTPUT
SWl : 1 INHIBIT lTY INPUT
SW2 : 1 INHIBIT HSP
SW3 = 1 INHIBIT HSR
SW4 = 1 INHIBIT L, I NE CLOCK
sw5 : 1 INHIBIT P.Fl1 0151( (256K)
SW6 = 1 INHIBIT ,'Cl1 DECTAPE
SW7 II: 1 INHIBIT L,INE PRINTER --- IF" LINE PRINTER IS USED,
MUST RESTART AT 400
IF EAE EXIST IT WILL BE AUTOMATICALLY SELECTED
4.3

PROGRAM ANDIOR OPERATOR ACTION
LOAD PROGRAM INTO MEMORY.
SET SWITCH REGISTER TO STARTING ADDRESS.
LOAD ADDRESS.
SET SWITCHES TO INHIB1T NDN'rXISTANT-oEVICES
PRESS START.
THE PROGRAM WILL LOOP AND
BEll WILL RING ONCE PER PASS OF THE PROGRAM.
A MINIMUM OF TWO PASS£S SHOU~D
ALWAYS BE RUN.

MAINOCC.
PAGE 4
5.

OPERATiNG PROCEDURE

5.1

OPERATIONAL SWITCH SETTINGS

5.1.1

AT SA 20~
THE INSTRUCTION AND LOGIC TEST. WITH ALL SWITCHES
DOWN THE PROGRAM WILL TEST ALL DEVICES AND PRINT OUT ON ERRORS
AND CONTINUE IN TEST. (BELL WILL RING AT COMPLETION OF A PASS)

5.1.2

SWITCH SETTINGS ARE

I.

SW15 :: 1 OR uP
SW14 :: 1 OR uP
SW13 :: 1 OR UP
SW12 :: l OR UP
SW11 :: 1 OR UP
SW1~ :: 1 OR uP
SW09 :I 1 OR UP

IoIALT ON ERROR
SCOPE LOOP
INHIBIT PRINTOUT
INHIBIT TRACE TRAPPING
INHIBIT ITERATION LOOP
INHIBIT PROCESSOR TEST
INHIBIT VARIABLE CORE EXPANSION

5.1.3

5.2.

SUBROUTINE ABSTRACTS
BEGIN

5.2.2

SA 200

SCOPE
THIS SUB~OUTINE CALL IS PLACED BETWEEN EACH SUBT£ST IN THE
INSTRUCTION SECTION. IT RECORDS T~E STARTING ADDRESS OF EACH
SUB-TEST AS IT IS BEING ENTERED. IF A SCOPE LOOP IS REQUESTED,
IT WILL JUMP TO THE START OF THE SUBTEST THAT THE SCOPE LOOP
IS REQUESTED FOR.
IF SCOPE LOOP IS NOT REQUESTED, THERE WILL
BE EITHER A FIXED OR RANDOM NUM8ER OF ITERATIONS ON THAT SUBTEST BEFORE THE NEXT SUBTEST IS ENTERED. SWITCH 11 ON A 1
INHIBI·TS ITERATION OF SUBTESTS.

"5,2.3

HLT
IS A ROUTINE THAT PRINTS-OUT AN ADDRESS T~AT TAGS THE FAILING
SU8t[ST, AND THE STATUS REGISTER AT THE TIME DFTHE FAILURE.

5.2.4

TRTRAP
THIS ROUTINE WILL ALLOW THE TRACE BIT TRAP TO BE SET AFTER
FIRST LOOP OF THE PROGRAM. UNDER NORMAL TESTING THE TRACE
BIT WI~L BE SET ON ALTERNATE LOOPS OF THE PROGRAM. WHEN
SET IT CAUSES A TRAP AFTER EACH INSTRUCTION. THE FIRST
INS TRU:CT ION EXECUT ED UP 0 N TRAP PIN GIS AN" RT I" W1,,11 CH RET URN S
TO THE INTERRUPTED SEQUENCE OF INSTRUCTION. THIS SEQUENCE
IS CONTlNUED TILL THE END OF THE PROGRAM LOOP IS REACHED.

MAINDECPAGE 5
(5. OPERATING PROCEDURE CONT'D)
5.2.5

TRAPCATCIo4ER
THIS IS A SERIES OF INSTRUCTIONS STARTING AT LOCATION
0, DESIGNED TO DETECT, AND ISOLATE UNEXPECTED TRAPS AND
INTERRUPTS TO THE TRAP AND INTERRUPT VECTOR AREA OF
MEMORY.
THE PRINCIPAL OF THIS ROUTINE IS: THE VECTOR ENTRANCE
ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH CONTAINS A ~ALT (00000). (THIS LOCATION IS ALSO THE STATUS FOR THAT VECTOR ENTRANCE, BUT THIS HAS NO EFFECT ON
IT ALSO BEING THE NEXT INSTRUCTION).
IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA,
REGISTER SIX SHOULD BE EXAMINED TO DETERMINE ITS CONTENTS, T~EN USE REGISTER SIX CONTENTS AS AN ADDRESS TO
DETERMINE THE LOCATION WHERE THE PROGRAM WAS AT, W~EN
THE INTERRUPT OR TRAP OCCURRED. (MEMORY AS SPECIFIED
BY R6 CONTAINS T~E PC OF THE INSTRUCTION FOLLOWING THE
INSTRUCTION WHERE THE TRAP OCCURRED).

5.2.6

TTYINl (TTy INPUT)
THIS ROUTINE OPERATES IN THE INTERRUPT MODE
AND CHECKS FOR A COUNT PATTERN IN THE READER
OF THE TTY. THE ROUTINE WILL ACCEPT AN tNFtNITE
NUMBER OF ~ERO BYTES (BLANK TAPE). BUT THE
FIRST ByTE THAT IS NOT A ~ERO MUST BE A ONE
AND ALL SEQUENTIAL BYTES MUST BE ONE GREATER.
IF THE ROUTINE DETECTS AN ERROR IN THE COUNT
PATTERN, IT CHECKS TO SEE IF IT IS A
207 (BELL). IF SO IT IS IGNORED, IF NOT A
COMPARSION ERROR IS FLAGED.

5.2.7

TYOUT (TTY OUTPUT)
THIS IS A ROUTINE THAT OUTPUTS A COUNT PATTERN IN
THE INTERRUPT MOOE TO THE TELEPRINTER. IF A PAPER
TAPE IS'PUNCHED IT MAY 'HAVE 201'S (BELLS) IN IT.
PUNCHED WHEN THE BELL FOR PASS COMPLETE RINGS.

5.2.8

RFSTART (RF-i1 DISK)
THIS ROUTINE PERrORMS A WRITE AND A WRITE CHECK OF THE DISK.
THE DATA THAT IS WRITTEN ON THE DISK IS PART OF TEST PROGRAM
CODE THAT IS NEVER MODIFIED. THIS SEGMENT Or CORE IS WRITTEN
IN CONTIGUOUS BLOCK THRU T~E DISK MEMORY, AFTER THE TOTAL
DIS~(S) ~AS BEEN WRITTEN, A WRITE CHECK IS USED TO VERIFY THAT
THE DATA HAS BEEN ~RITTEN CORRECTLY ON THE DISK, NOTE T~AT NO
"DATI" ARE USED IN EXERCISING THE DISK (DATA IS NOT TRANSFERRED
INTO CORE>. THERE IS A LOCATION IN THE PROGRAM THAT IF MODIFIED
wILL ALLOW ExERCISING UP TO EIGHT DISKS.

MA1~pEt­

PAGt" 6

5.2.9

rEND~

,(TCll FORWARD END 20NE)

IS THE FIRST ADDRESS IN THE DECTA~E INTERRUPT
(214). THIS ROUTINE wILL READ· :~ REVERSE, BLOCK
~UMBERS UNTIL THE REVERSE END tONE IS FOUND.
AT THIS
POINT THE INTERRUPT VECTOR AND COMMAND REGlSTER ARE MODlrIED
TO READ ALL BLOCK NUMBERS I~ THE FORWARD DIRECTION, EACH
BLOCK NUMBER READ IS COMPARED WITH THE EXPECTED BLOCK NUM"
8ER COUNT AND MI5COMPARISONS REPORTED. WHEN EACH BLOCK IS
FOUND (WITH THE EXCEPTION OF BLOCK 0) A BLOCK (400 WORDS)
OF TEST DATA IS WRITTEN ONTO TAPE. AFTER ALL BLOCK NUMBERS
HAVE BEEN READ THE TAPE IS DRIVEN INTO THE FORWARD END tONE.
HERE THE DIRECTION IS REVERSED AND ALL BLOCK NUMBERS ARE READ
IN REVERSE. STARTING WITH BLOCK 1100 THROUGH BLOCK 1 THE
DATA IS READ FROM TAPE. T~E SAME BUFrER IS USED FOR BOTH READ
AND WRITE OPERATIONS. THE DATA IN THE BUFFER IS CHECK~
SUMMED DURING THE READ OPERATION. IF THE DATA-BUFFER IS
DESTROYED DURING A READ OPERATION IT MAY BE NECESSARY TO
RELOAD THE PROGRAM.
FENO~

VECTO~

5,2,10

LCLK (LINE CLOCK)
THIS TEST OF THE LINE CLOCK IS IN THE INTERRUPT
MODE. IF OPERATING CORRECTLY THE SYSTEM I/O
wILL RUN A FULL SPEED rOR '5 SECONDS THEN ALL
1/0 AT LEVEL FOUR OR LESS WILL STALL FOR 5 SECONDS.
THIS IS BASED ON 6~ CYCLES AS THE LINE FREQUENCY,

5.2.11 LPl (LINE PRINTER)
THIS ROUTINE OUTPUTS TO THE LINE PRINTER IN
THE rLAG MODE WHILE rILLING THE BurF£R IN
THE INTERRUPT MODE WHILE THE BUFrER IS BEING
PRINTED,
5.2.12

HSRINl (PCll INPUT)
THIS ROUTINE OPERATES IN THE INTERRUPT MODE AND CHECKS FOR A
COUNT PATTERN IN THE PCll READER. THE ROUTINE WILL ACCEPT
AN INFINITE NUMBER OF lERO ByTES (BLANK TAPE). SUT THE rIRST
BYTE THAT IS NOT A ~ERO MUST BE A ONE AND ALL SEQUENTIAL BYTES
MUST 8E ONE GREATER. IF THE ROUTINE DETECTS AN ERROR IN THE
COUNT PATTERN, A DATA ERROR IS FLAGED.

5.2.13

HPOUT (PCll OUTPUT)
THIS IS A ROUTINE THAT OUTPUTS A COUNT PATTERN IN THE INTERRUPT MODE TO THE HIGH SPEED PUNCH.

5.2.14

CORE EXPANSION (OET1)
THIS ROUTINE IS CONT~OLLED BY SWITCH 9. THE PROCESSOR
MAINLINE CODE WILL 8E EITHER 4KW OR EXPANDS TO THE MAXIMUM
CORE THAT IS AVAILABLE. THE ROUTINE DETERMINES THE
MAXIMUM CORE SIlE BY DOING A "DATO" TO A LOCATION IN EACH
BANK. IF THE BANK DOES NOT EXIST, A TIME OUT WILL OCCUR.
WHEN CORE SIlE IS DETERMINED AN IMAGE OF BANK 0 IS TRANS·
FERRED TO EACH EXISTING BANK. THEN THE CODE IN EACH BANK
IS MODIFIED SO THAT, WHEN THE LAST SUB TEST IN A MEMORY
BANK IS EXECUTED THERE IS A JUMP INSERTED TO THE FIRST SUB
TEST OF THE NEXT BANK. WHEN IN THE LAST BANK THE MODIFIED
INSTRUCTION WILL TRANSFER yOU TO BANK 0.
THE LISTING SHOWS ONLY THE CODE OF BANK ~ERO. WHEN AN
ERROR OCCURS THAT IS NOT IN BANK ~ERO, IGNORE THE BANK
BITS OF THE PRINT OUT AND USE THE LISTING FOR BANK ~ERO.

5.3
5.3.1

PROGRAM AND/OR OPERATOR ACTION
LOADING AND STARTING AT 200 WITH ALL SWITCHES
DOWN IS WORSE CASE TESTING. IF AN ERROR IS
DETECTED HERE. THERE WILL 8E A PRINTOUT. WHEN
AN ERROR IS DETECTED AND IT IS NECESSARY TO
SCOPE ON IT, PLACE SW15 UP TO HALT ON ERROR,
THEN SW14 UP TO LOOP ON ERROR, THEN SW13 UP TO
DELETE PRINTOUTS. WHEN TESTING THE HSR OR TTY
READER THE TAPE ~UST HAVE A COUNT PATTERN AND BE
LOCATED ON THE LEADER PORTION WHEN STARTING TEST,

M.A I N.00456
000460
t'e046?

0327i'7
0014ei l
1040e0
1044eeJ

0146 4

~12706

~~47~

0rr10005

'~472

052777
032777

lC50l

177556

016756
3001r0

17 7 524

000100

177516

START:

MOV
*l,ICOUNT
#BUFF,%6
;SET UP
MOV
.START2,RETURN
MOV
CLR
SCOPEF
#341fJ,STAT"US
MOV
CLR
PRF"LAG
SCOPE
#100,\lTTCSR
START2: 8IS
RESET
#100,tlTTC5R
8IT
BEQ
.+4
HLT
SCOPE
:00[5 "RESET" ON THE BUS LAST TOO LONG
MOV
#8UFF,"6
RESET
81S
#100,tlTTCSR
BIT
tt100,6ITTCSR

STA~K

JLO~K OUT INTERRUPTS
,PRINT ROUTINE BUSY

'INTERRUPT

E~ABLE

'RESET DID NOT CLEAR INTERRUPT ENABLE
,SET UP STACK
,SET A BIT
lIS IT SET

""L

x'il1

~~0'5,f~

00'~51~
000'51,2

v0i3~

000532
000536
00'0'54 '4
00055 2
00056:0
00056'6
1

0~H2'5 i4

00060!2

0006~16

0157;)0
0e021l4

#8EGIN,RETUR\J

v.C v'
TST

~MQ

00~0'H

~00540

~OV

000000
000001
000000
016756

000600
00121656
000752

MOV
MOV
MOV
MOV
CLR
""OV
BIT
BNE
SIS
BIT

ekH~746

00011('1
177354

177344

176702

000004

000100
177324

177334

176656

00'0010

"12767
052777

000100
000101

000'634
177276

0121073:2
00074'0
00074'2
00074 6
000754
100076;2
00e764
01210'772
00077'6
0010,,4
00HH2
001020
e121026
;101030

036727
001005
005067
052777
036727
IiHh016
012767
10'5277
016777
01677/
116777
,,36727
0e1011
012767

176632

000020

000732
00010[.;1
176610

177264

~~01036

HI 4' 4

ST1:

BNE

ST2:

BIS
TST
8MI
BIT
BNE

ST3:

0121~040

043503
171264
001172
001162
001152
176544

12101176

012771

002176
002206

~01052

012777
036727

176512

00'1146
177254
177234
00'0200'

~~

00'4H~3

010 6 ~

001~3e:

001062
vJ01071?

a127b7

~'01142

~12"1t-7

'v.0~·137

~~~h17

012707

000117

n

" av
"'OV
"10V

17724~

177234

177366
000'0'02

0~

J R'ES£T

IS ON S'US TO'O: LONG

~ESET

(;1037521
((00366
177526
000006
000002

000100
176726

1

• +4'

SCOPE

177156
00121001

(~1006

1-4*

~Lr

000342J
176744

i

PAtGe

BNt:

112l44~00

00061:2
00062:0
00062'6
0121063 '0
00063 6
00'0644
00064:6
00065 i4
000660
000662
000670
000672
00070'0
00070''4
0121070'6
0~0' i'4f'
00121716
00072A

e0052;4

1 J":'iti'

~0H~:01
104~"0 0

0e0005
012767
e!12} Yl
005777
i.127 6 7
012'16'1
012767
0'12767
012767
012767
012706
121:05067
0'12767
036727
001003
052777
036727
001003
052777
005777
100'407
036727
001003
052777
005777
100412
036727

01tH~514

200516

1.(-rrEf.. 7f

5T4:

BIS
TST
8MI
8IT
8NE
MOV
8IS
SIT
8NE
CLR
815

ST5:

BIT

8NE
MOV
n~C8

17725e
177244
177240
000100

"10V
MOV
MOV8
S'!'6:

81'
9NE

"10V
~OV

S"'7:

,~tl4

#6,4
#2,6
#1,DATA1
#0,OATA2
#1,DATA3
#0,DATA4
#8UFF,%6
DELAY
#341Zl,STATUS
SR,#l
STl
#100,'TTCSR
SR,#2
ST2
#101,@TRCSR
lilHPCSR
ST3
SR,#4
ST3
#100,'HPCSR
ttHRCSR
ST4
SR,#10
ST4
#100,DELAY

;TES'" "OR EAE
;TRAP I I=' ~::NEXISTANT
; • +2=~AL. r
J A'~ RTI
rOR NON EXISTENT 1/0
ISASE DATA rOR TTV READER OR KEVBOARD
ISASe: DATA F"OR TTV PUNCH OR TE LEPR t NH"R
,BASE DATA F"OR HSR
lSASE DATA F"OR HSP

#11'1"~HRCSR

5R,#20
ST5
TIME
#100,'LKCSR
5R,#40
ST6
#43503,FUNCTION
~RF'CSRH
WORDCT,~RFWC

LL I MIT ,(ilRFCAR
FUNCTION,ilRFCSR
SR,#100
ST7
#TCFIRST,TCEXPE
ttFENDr.'TCIV

~OV

#R+IE+RB+DO.~TCCM

aIT

SR,#2Ql0
ST8
#ST8,4
#137,SOLI'AT
#79 •• CLINCT

8NE

176714
000752
000746

tfNOEAE

~OV
~av

>,10 V

;F"OR READER STALL ... HSR
ILOCK OUT INTE:RRUPTS

-

,TTv OUT
'TTV IN
,'rEST FOR OUT OF TAPE

'I-IS?
.TEST F' OA' OUT

or

TA!'!:

Jr.-OR STAL.L HSR
;I-ISR

ILINE CLOCK 50 OR 60 CYCLES
:WRITE C~IECK/WR I n:
,INJTIA:"ltE 'j ISK"'OAR', DAF
iLENGTH OF' T~ANSF'ER
;CORE ADDRESS or START C"F' 'o,A\SFFR
;TELL DISK TO READ OR WRITE
J2ND NPR TEST CR
IFIRST Bl.OCK Sf-IOULO BE trR2
IGO TO END H'I"lE ON I fI.!TERr:;UJ:
lMOVE REVERSL
I LINE PRINiER
iDON'T
IRESET
'- T

"-iE

C~UNGE
~CP

('OUf"

2 p; :.~.~

START OF

L

I '"

;, ~\I

PAL Xli

V003

~tH104

012767

00e137

001112
e:e1120

012737
012777

001726
e00014

l01126
;"0113 4

012731
012777

0002~0

000734
000200
17 7 116
000202

00~11~

1771e0

;'e1142
Ze1146

005~67

176643

012767

~0~:076

005"3}

015542

004737

016762)
015572

,~01204

004767
042767
016767
000401

e01206

000001

e012H~

036727

;?~H216

001373

001220

000167

eliH224

00012100

;)01154
e01160
e01164
001170

001176

F'AGE 1-5

14-F"EB-71

176630

000340

176600

176366

~HHHl20

176354

0020210

002524

MOV
MOV
MOV
MOV
"IOV
5T8:
CLR
MOV
CLR
JSR
JSR
SIC
MOV
BR
MAINLINE:
BIT
ANE
jMP.
REG1:
"

tH37, CURPAT

#LPiNTR,,*200
#14,@LP09R
#200,'#22'2
tt100,~LPCSR

6

#6,4
~#TRP9

"7,~#USER

%7,OETl
t;t340,STATUS
SR,REG1

,INTERRUPT VECTOR
JLINE FEED TO POSITION BuF"FER
JPROCESSQR LEVEL 4
:INTERRUPT ENABLE
:HALT F"OR BUS ERROR
,SET UP TIME OUT
iNO "T" BIT F"IRST PASS
JF"OR USER 1/0 PROGRA~
,CHECK FOR CORE EXPANSION
:ALLOW INTERRUPTS
,SAVE SWITCIoI

,+4

WAIT
SR,#2000

,WAIT HERE FOR INTERRUPTS
:INHIBIT PROCESSOR TEST

~AINLINE

BEGIN
,STATUS OF SELECTED DEVICES

iTTY RECEIVER VALUES 0 TO 377
e01226

001234

012767
005277

e~1240

000,~e2

001242

105177
100401

e;01246
001250
001252
elZ1256
e01260

00r2!064

176752

TTYIN1: MOV
TTYIN2: INC
RTI
TTYINR: TS T9
8MI

105 7 77
201 7 66

176744

127 7 67

176736

000032

0002(n

176124

TST9
8EQ
CMPS
SEQ
CMP
BEQ

001405

022:7 77
11'01403

~e1300

104'~00

e01302

005267
022/67

~01314

001:547

e01316

011HP 4 3

IltTRCSR
,TRDR
TTYIN2
,TROR,DATA1
TTYIN3
.207,'TROR
TTYIN4

~LT

000012
00040-0

0~H?l~HH

TTYIN3: INC
TTY!N4: CMP
8NE
8R
DATAl:

,BASE DATA
,START READER
,RETURN TO MAINLINE
,IS DONE SET

,+4

~LT

104'~e0

ekH 266
001270
001276

001306

00e'0211

176760

DATAl
#400,OATA1
TTYIN2
TTYIN1

,FALSE RETURN FROM MAI~LINE
,TEST DATA FOR LEAOER
JIF LEADER GO BACK
'NOT LEAOER TEST rOR DATA
,BELL?
.DATA COMPARISON ERROR
'INCREMENT DATA
,TEST FOR UPPER LIMIT

240

iTTY TRANSMITTER PRINT VALUES 0 TO 377
001322

012i67

ee1330

016}77

012'1336

~HHHH~2

e01340
e0134 4

105777

?e1346

le4w~f0
005,~6 7

~0e(i!12

022 7 c7

Ql01C' 4

,;:e1350

101354
;21362
L'

~

13 6 4

0000(?13
000C32

176660

1~,,"!J4e1

001 ~'5 7
0007t-l

~~

V'

000036

176670

TYOUT: MOV
TYOUT1: MOV
RT I
TYOUTR: TST8
8MI
HLT
INC
CMP
BEQ
8R

#0,DATA2
DATA2,lITTD8R
caTTCSR
,+ 4

OATA2
#4~e,!)ATA2

TYOUT
T y Ol' T1

JINtTAL OATA
,OUTPUT TO DEVICE
,RETURN TO MAINLINE
JTEST FOR DONE
,BRANCH IF FLAG rou~o
.FALSE INTERRUPT RETURN
J INCREMENT DATA
JTEST DATA F"OR UPPER ~I~IT
;AT UPPER LIMIT START OVER
JFINISH REST o~ OATA

767

2e1370

~12

?e137~

~F?27/

;'21402
,;..e1404

~e

1
1766'26

I-ISRY\il: '-OV
I-ISRI\J2: INC

17662Q!

>4 SRI \ R:

0~H?2'~

U~1410

001 4 12

10400~

01211414
?01420

105777

176612

ZiZ1 4 22

001766
127767

176604

v'01430

0~1401

e01434

1040Q!\!l
005267

0~~012

0'2"2~7

e·~04e,",0

221434
l'Ht.4"0"
0e1446
'H?1450

:nr

0e'.""' 2

105777
100401

67

T5 r 8
8MI

#l,D.6oTA3

I 8"A SE

~HRCSR

JSTART READER
'RETURN TO MiINLINE
; IS DONE SET

@lHRCSR
• +4

HL" T

T5T8
8EQ
CMPB

001353
000747
DATA3:

0 A T ,A

taHRDBR
HSRJ:N2

(i)HRDBR,DATA3

8EQ
~L T

,+4

INC
CMP
8NE
8R

D.6oTA3
#4"'h DA T A3>0
HSRIN2
HSRXNl

,FALSE RETURN FROM MAINLINE
'TEST DATA FOR LEADER
.IF LEADER GO BACK
'NOT LEADER TEST FOR DATA

.DATA COMPARISON ERROR
J INCREMENT DATt,
,TEST FOR UPPER LIMIT

24k'

005067

012l.0-~2-6

000024

201536

056777
005267

e'01542
001550

022767
0e1741

0004Z0

001552

000743

;HS PUNCH SECTION, VALUES 0 TO 377
;ENA2LE READER ON FIX COU~T OF PUNCH ONLY (14 TIMES)
HPOUT: MOV
#0,O.6oT.604
J INITAL DATA
HPOUT1: MOV
D.6oTA4,~HPOBR
.OUTPUT TO DEVICE
RTI
;RETURN TO MAINLiNE
HPOUTR: TST8
~HPCSR
JTEST FOR DONE
8MI
,+4
.BRANCH IF FLAG fOUNO
HLT
.FALSE INTERRUPT RETURN
BIC
DELAy,taHRCSR
~CLEAR HSR INTERRUPT ENABLE
INC
INTeNT
'COUNT INTERRUPTS
CMP
INTCNT,#14
lSAVE TO TURN READER ON?
8NE
HPOUT2
INO~NEED MORE TIME
CLR
iNTeNT
~YES R:SET C~UNTER
;SET REAOER tNT ENABLE
815
OELAY'~HRCSR
HPOUT2: INC
DAT,tt4
J INCREMeNT DAT,~
CMP
#400,OATA4
,TEST DATA rOR UPPER ~i~I;
BEQ
HPOUT
JAT UPPER LIMIT START OVER
8R
HPOUTl
IFINISH REST O~ DATA

001554
201556

2100240
2100000
00000121

OAT A4: 240.
INTCNT: ~
DELAY: 0

001454

001462
~~e1470
~01472

e01476

2112767
016777

000072
176546

000002

105777
100401

176536

?0150~

104000

00150~

046777

~0~052

001510

QHZl5267

000042

~12I1514

026727

0'HH~36

e01522

001005

001524

ee1530

l0156~

Qlk)5067
052777

000100

1il?2767
000002
105777

00C100

£2.1.~H~

c:' J

1612

."~1614

12142""'77
005267
022767

," 216 26

176472

~kHHH2

le1562
;:'01566
201574
?01602
;e1604

~'el~2i2

176520

iEQUAL 100

;TEST OF LINE CLOCK, INTERRUPT FOR 55 SELONDS THEN STA~L FOR 5 srCO~DS.
CLR
TIM E
J CL £' AR ~. I NE CL ~; ; ' TIM E C

LK1:

000112

815

#100,LiLKCSR

BIS
RT I
TST8

#100,STATUS
@)LKCSR

HH'l401

8MI

,+4

le400~

HLT

176444
176174
U1

0127;7

002610

e~26~2

H~5/77

17550eJ

~02606

000V02

r0261e
002616

2jr, n

0~2620

1~400~

002622
002624
002626
002634
002636
002642
002650
002652
0.02654
002656
002662

001001
1040e0
026777

175516

TeR2:

;FI~D

002664
002672
002700
002706
002714
002720
002722
002726
00273,0
002732
002740
002746

TCR3:

le0Zel

177344
177342
175444

105277

175424

17 7 334

T'CR4 !

000002
012777
012777
012777

1774"0

112777

~00105

004767

175402

002722
002750

175426
175414
175410
175372

000e02

1753M3

100r2!01
1~4Ql00

0127J7
112777
000743

INCa

175360
175340

#TCR3,tITCIV
taTCCM

T:

:(r'E~TIAL

BIT
BPL
HLT
BNE
HLT

CMP

175456

0~1662

005367
027767
0014"'1
104000
000403

005777

RTI
MOV
~

175470

1-1~

JWE rOUNO OUR rlRST BLOCK
JSET UP INTERRUPT TO TEST ALL BLOCKS
;5ET 00
JWAtT FOR NEXT BLOCK TO INTERRU~T

BLOCK IN REvERSE DI~ECTION
#100200,'TCCM
;TEST FOR READ AND ERROR
•• 4

JERROR READING SEQUENTIAL BLOCK IN REVERSE
,+4

TCFIRST"TCOT

BEQ
DEC
CMP
BEQ
HL:

XFENDt
rCEXPE

SR

TCRBK

INCB
RT I

~TCCM

~TCDT,TCEXPE

,+4

:FALSE D£CTAPE INTERRUPT
JoIO WE DO ALL THE BLOCKS
,YES - GO TO END lONE TO RESTART
JNO - DECREMENT BLOCK NUMBER
.TEST SFCUENTAIL BLOCK IN REVERsr
.TEST SEQUENTIAL READ BLOCK IN REVERSE FAILED
JTHIS ROUTINE READ A BLOCK
ISET DO
JLETS TRY A NEW BLOCK

;READ REVERSE ALL BLOCK EXCEPT BLOCK 11~1
t/TCRB1,IilTCIV
MOV
JSET UP INTERRUPT VECTOR
MOV
#-4~0,~TCWC
JREAO ONE BLOCK
#TCR8UF,~TCBA
MOV
JWH£RE BUFF"ER IS
#IE+RO+DO,II'TCCM 'READ THE BLOCK
MOV9
%7,TCl
JSR
'CHECK DATA BUFFER
RTI
JEXIT - ~ETURN W~EN BLOCK IS READ
@TCCM
TCRB1: TST
JAND ERRORS
.+4
BPL
HL T
JOECTAPE ERROR
MOV
#TCR3,"TCIV
JNEW VECTOR rOR BLOCK SEARC~
MOVa
JREAD BLOCK FUNCTION
ftIE+RBd'TCCM
TC·R4
JRETURN TO BLOCK SEARCN
BR
TCR8K:

:THIS WRITE BUFFER LOOK THE SAME

FO~WARD

OR

REvrR~~

TCWBUF ::
TCRBUF ::

N=l
.REPT
N

JOECTAPE WRI1E BUfFER

-N

N=N+1
.ENDR
002750
002752

000001
177777
000002

N

002754

0~HH'02

0~2756

177-'76

N
-·N

0~~~{'3

N=N+l

002760

00e ..~23

N

002762

177775

-N
N=N+l

o0 2 7 6 ~

13 e~ : ,,' 4
177 '74

~ 0 ~~,

002766

." 4

JDECTAPE WRITE BUFFER

-N
N=N+l

N

-N

JDECTAPE WRITE BUfFER
IDECTAPE WRITE BUFFER
;DECTAPE WRITE BUFFER

PALX11

V~H:'l ~,

14-fEB .. 71

13106

PAGE 1-11

0e~e06

N=N+l
N
-N
N=N+1

e22774

2e02~'6

N

ic277/.)

177i72

2e3~H"l

0e0e07
177771
0rcH,e10
000e10
177770
00eel1
000ell
177761

-N
N=N+l
N
-N
N=N+l
N

0e:;,e'e'5
1e!2770
e2!2772

0e-~e05

177773

[tJ002?7

ee3llZ2
e03~~4
~232~6

0e301~
~03212

0"H~e12
~e3e14
e03~H6

e03020
003022
e03e24
e03026

003030
01213032

e03e134
0213036

000112
177766
000e13
0fH"~ 13
177765
000e14
000e14
177764
rcHHH?15
000015
177763
000016
0121012116
177762
211211::')1317

0032140
003042
0~3044

02130,46
0e3e50
003052
003054
ee.3~56

003e62!
0eJ3062

000iC17
177761
00002121
012100,20
177760
000021
000021
177757
11J0eJeJ22
00121022
177756
121121121023
01210023
177 7 55
000e24

;z03~72

000024
17775 4
000025
000025
177753

;' 0 3 C' 74

~0~h~2b
0C~C2

003064
003066

v' 03072

Ck~3l7b

11'7/5
wH'002

.. N

N=N+l
N
-N
N=N+1
N

-N

N=N+l
N

JOECTAPE WRITE BUFFER
~OEC"APE

WRITE BUFFER

;OECTAPE WRITE BUfFER
;OECTAPE WRITE BUFfER
iOECTAPE WRITE BurFER
JOECTAPE WRITE BUffER
;OECTAPE WRITE BUFFER

-N
N=N+l
N

-N
N=N+1
N

-N
N=N+l
N

-N

;OECTAPE WRITE BUFFER
JOECTAPE WR I·T E BUfFER
.OECTAPE WRITE BUfFER

N=N+l
N

.. N
N=N+l
N

JOECTAPE WRITE BUFFER
JOECTAPE WRITE BUfFER

-N
N=N+l
N

JOECTAPE WRITE BurFER

-N
N=N+l
N
-N
N=N+l
N
-N
N=N+l
N
-N
N=N+l
N

JOECTAPE WRITE BUFFER
JOECTAPE WRITE BUFFER
JOECTAPE WRITE BUF"FER
;OECTAPE WRITE BUFFER

-N
N=N+l
N

-N
~=N+~

JDECTAPE WRITE

BurfE~

~LX11

V0~3

14-1="[8-71

13: 16

PkGe; :L-1a

.,J3100

00~~27

N

~H33'102

177/51

-N

~031~:4

~~

ei6

013003~
00~i130

1 ~. 7750

-N

~('e2:H

N=N+l

~103110

000(731

N

012'3112

17774J

-N

000~~32
000~32

f\=N+l
N
-N
N=N+1

012'31

013311~
~03116

0133120
0133122
003124
003126

177746
01313033
0131312133
177745
01210034
0~HHl34

177744
0~0eJ35

003130
003132
0133134
0133136
121133140
121133142
003144
01213146
eH2l3150
1211213152
Wk'!3154
0133156
13133160
121031b2
003164
12103166
00317121
12103172
12103174
121133176

00121035
177743
013012136
0130036
177742
013012137
012113037
177741
012101214121
0121012140
177740
013012141
0121012141
177737
012101342
00012142
177736
0130043
01313043
177735
00012144
01211312144
177734
00012145
~HH'045

177733
000046
012112112146
177732
0121012147

N;N+i

JOECTAPE WRITE 8UFI="ER
JOECTAPE WRITE BUFF"ER
JOECTAPE WRITE BUF"FER

N

JOECTAPE WRITE BUF"FER

-N
N=N.+ 1
N

;OECTAPE WRITE BUFF"ER

-N

N=N+1

N

JOECTAPE WRITE BUFFER

-N
N=N+l
N

:DECTAPE WRITE BUFFER

-N
N=N+l
N
-N
N=N+1
N
... N
N=N+1
N

-N
N=N+l
N

-N

N=N+l
N
-N
N=N+1
N

JOECTAPE WRITE 8UFF"ER
:DECTAPE WRITE BUFFER
IDECTAPE WRITE BUFF"ER
JDECTAPE WRITE 8UFP"R
;DECTAPE WRITE BUFfER
;DECTAPE WRITE BUFFER

-N
N=N+l
N
... N
N=N+l
N

:DEGTAPE WRITE BUFFER
iDECTAPE WRITE BUFFER

-N

003?00
003202

000e47

N=N+l
N

177731

-N

~e005~

e03?04

",O0050

N=N+l
N

003206

177730

-N

2100051

"J=N+1

~.00051

N

~~03?H~

iOECTAPE WRITE BUFF"ER

IDECTAPE WRITE BUFFER
iDECTAPE WR ITE 8UF"FER
:DECTAP[ WRITE BUFFER

PALXll

V00.3

0~3212

177727
000'~52

003214
003216
0032212l
003222

000052
177726
000'~53
'HHH~53

177725
000'~54

003224
003226

,,'H"'54
177724

003230
003232

000055
177723
000056
rlI00056
177722
,,00057
.000057
177721
000e160

12100~55

003234
003236
003240
003242
003244
003246
003250
0~3252

003254
003256
003260
003262
003264
003266
0~3270
0~3272

003274
003276
003300
003302
003304
003306
003310
003312
003314
12103316

"00~60

17772121
0002161
000061
177717
000062
000062
177716
000063
000063
177715
000064
000064
177714
000065
rlI~0065

177713
000066
000066
177712
000067
000067
177711
000070
000070
177710
000071
000071
177707
000072

12l03:~22

13"1.16

PAGE 1-13
-N
N=N+1
N
-N
N=N+1

.OEeTAPE WRITE BUpoER

N

;DECTAPE WRITE BurFER

-N
N=N+l
N

;OECTAPE WRITE BUFFE:R

-N

N=N+1
N
... N
N=N+l
til

N

N=N+l
N
-N
N=N+l
N

'OECTAPE WRITE BurrER
:OECTAPE WRITE BUFFER
JOECTAPE WRITE BUFFER

-N
N=N+l
N

JOECTAPE WRITE BUFFER

"N

N=N+1
N

-N

JOECTAPE WRITE BUFFER

N=N+1
BUFFE~

N

JOECTAPE WRITE

N=N+1
N

JDECTAPE WRITE BUFFER

... N

... N

N=N+1
N

... N

N=N+1
N
-N
N=N+1
N
-N
N=N+l
N
-N
N=N+l
N

-N

177705

JOECTAPE WRITE BuFFER

"'N

~HH:l072

012l12l"'7~

;OECTAPE WRITE BUrrER

-N
N=N+l

177706
01210073

00332121

14-FEB-71

JOECTA?E WRITE BUFFER
JOECTAPE WRITE SUFFER
JOECTAPE WRtTE BuFrER
JOECTAPE WRITE BUFFER
JOECTAPE WRITE BUFFER

N=N+l
N

-N

JOEeTAPE wRITE BUFFER

~LX11

v003

14-F~~-71

13: 0,Q

,If •.G,E

1-~4

00332':
~e3 3 216

000V174
PHHiHJ7 4
1.77704

N:;N-I'l
N

000~75

f.-J=N+l

?:03~3?

2100075

~

1;03332

177/03

00;:1076

-N
N=N+l

~QJ3334

~e0076

N

;OECTAPE WRITE BUFrER

003336

177702
000077
000077
177701
0eJ0Hl0
0k:HH00
177700
00eJleJ1

-N
N=N+1
N
-N
N=N+l

JDECTAPE WRITE BUrrER

N

.OECTAPE WRITE Bur FER

eJ03340
eJ03342
0eJ334,4
00334,6

0eJ010~

eJ03352
003354
1(J0335p
003360
003362
eJ03364
0eJ3366
003370
003372

003374
003376
003400
003 4 02
00340 4
003 4 06
0e3410
003412

00010eJ
177700
000 U?J0
000077
177701
000077
000076
177702
000076
000075
1777eJ3
rlJ0eJ075
000074
177704
000074
000073
177705
000eJ73
000072
177706
000072
O00071
177707
000071
000070
177710
00007121
0~0067

e03~14

177711

-N
N=N+l
.REPT
N=N-l
-N

100

IeEe TAPE WRITE eurrER

.ENOR
N=N-l

-N
N
N=N-l
-N
N

JDEe TAPE WRITE BurFER
IDEC TAPE

\rI~ITE

Bur FER

N=N .. 1
.. N
N

N=N-l
,..N
N
N=N .. 1
... N
N
N=N-l
... N
N
N=N"'l

JOEC TAP!: WRITE BUFFER
IDEe TAP£ WRITE BUFFEr:
JOEe TAPE WRIT: E'PC"t"ER
JOEC TAPE: WRITE BUFrER

... N

N
N=N-l
-N
N
N=N-1

"DEC TAP[ WRITE SUFFER

N

JDEC TAPE WRITE BurrER

N=N-1
-N
N
N=N-l
-N

;DEC TAPE WRITE Bur FER

-N

(~03415

000~67

ee3.:! 2;'

000066
177712
o ~ 0 ~~ 6 b

N

0ev'h';f)5

N=N-l

~'e3422

W,R t r E: BlJF" r ER

JDECTAPE WRYTE BUFFER

1

\'

N

00335e

IOECT~PE

i~

•

,DEC TAPE: WRITE BurFER

;OE(" TAPE

\~R

I TE BUFFER

PALX11

Vf2l 0 ~j

12103424
12103426

177713
210121065

14-I="E8-71

000Q164

210343121
eeJ3432

177714
00121064
e1~'kH163

e0343 4

1771'15

003436

000~'63
0~HH162

00344121

177716
01210062

e03442

0eJ0~161

e03444

ri303446
003450
01213452

177717
000~'61

000Ql60

0213460
003462
0213464
0213466
121121347121
003472
2103474
01213476
003500
01213502
0035214
003506

N

N=N-1
-N
N
N=N-l
-N
N
N=N-1

JOEC TAP!: WRITE BurF'ER
IDEe TAPE WRITE BurrER
JDEC TAPE WRITf BurrER

~N

N
N=N-1
... N
N
N=N-1

JOEC TAPE WRITE BUrF'ER
JOEC TAPE WRITE BurF'ER

-N

JOEC TAPE WRITE BurrER

177721

N
N=N-1
... N

IiH210~157

N

N=N-1
-N
N
N=N-1
.. N
N
N=N-1
... N

JDEC TAPE WRITE BurrER

2100056
177722
00e~156

JDEC TAPE WRITE BurrER

2100055
177723
2100055
Q"H.H154
1777'24
00121054
0121121053
1 7 7725
01210053
2100052
1,77726
rJ00e52
000e51
177727

N
N=N-1
.. N
N
N=N"l
.. N

.DEC TAP[ WRITE BurFER

000~51

N

JDEC TAP[ WR I n: BurrER

QJI1"H~ 4

4

lil0353f1

177734

0 3 '3 3?

eHhh' 44
0~0043

l~~3534

.. N

177i'20

2100e50
003510 177730
003512 . 000250
2100e47
003514 177731
003516 00"H~4 7
00li:H'46
003520 177732
003522 2100046
01210045
'103524 177733
000045
~03526
V'

PAGE 1-15

000060
000~157

003454
003456

13'06

177735

N

JOEC TAPE WRITE BurrER
.DEC TAPE WRITE BurF'ER

N=N-1

-N

N=N-1
.. N
N
N=N-1
.. N
N
N=N-1
... N
N

N=N-1
-N
N
N=N-l
-N
N
N=N-l
-N

JOEC TAPE WRITE Bur FER

.DEC TAPE. WRITE: BUF'rER
JDEC TAP£ WRITt: BurrER
;CEC

TAP~

WRITE BurrER

;OEC TAPE WRITE BUrF'ER
.OEC TAPE WRITE BurrER

~LXll
~3536

,,03540
~03542

003544
003546
003550
003552
""'3554
003556
0~3560

003562
00356~

003566
0"3570
003572
003574
003576
0036021
rHJ3602
003604
003606
0036H'l
003612
003614
003616
0036221
003622
003624
003626

003630
303632
003634
?e3636
V'~3640

l' e31, 4 2
.:.'.2'3644
,'~ 3646

V"03

14-FE8 ... 71

13:0~

PAGE 1-1.6

0"0043

N

,,01be42

N.:,N -1

177736
0"0042
000041
177737
000041
00004"
177740
000040
000037
177741
000037
000036
177742
000036
000035
177743
000035
12100034
177744
000034
12100033
177745
QJ00033
00"'''32
177746
QJ00032
QJ00031
177747

-N

~00031

QJ00030
177750
21001()30
000027
177751
000027
000026
177752
",00026
11)00025
177753
00"025
00"'024
177754
",0121"'24
""0023
177755
0021023
000022
177756

~,'

JDEC TAP[ WRITE BUFFER

JOEe TAPE WRITE BUFFER

"~=N-1

-N

N
N=N-l

JOEC TAPE WRITE BUFFER

N

JOEC TApt WRITE BUfFER

.. N

N=N-l
.. N

N
N=N .. 1
... N
N
N=N-l
-N'
N
N=N-l

-N

JOEC TAPe WRITE BUFFER
;OEC TAPE WRITE BUFFER
JOEC TAPE WRITE BUFFER

N
N=N-l
... N
N
N=N-l

JOEC TAPE WRITE BUFF"E:R

N
N=N-1
,..N
N
N=N-l
... N
N

.OEC TAPE WRITE BUF"FER

JDEC TAPE

b~R

I TE BUF"FER

.. N

N=N-l

JOEC TAP£ WRITE BUF"F"ER
IDEe TAPE WRITE BUFFER

pN

N
N=N-l

-N
N
N=N-l

JDEC TAPE WRITE BUFF'lR
iOEC TAPE WRITE BUrF'ER

-N
N
N=N-l

-N
N
N=N-l

-N
N
N=N-l

-N

000e22

N

000021
177757

N=N-l
... N

1Z!~0~~?1

N

JDEC

TAp~

WRITE BUFFER

JOEC TAPE WRITE BUFF"ER
JOEC TAPE WRITE BUFFER
'DEe TAPE WRITE BUFFER

lorc TAPE WRITE BUFrER

PALX11
,~el3650

0036:>2
003654
l-,e3656

"eel:s
12100"20
177'160
,HH"'20
el~HHH 7
177761
r21IlHHa 7
'H~0~H6

00366~

003662
0213664
003666

177/62
r210r21kH6
2100015
177763
o r2HHH 5
elfll0~H4

~03670

003672
003674
003676
003700
0037212
003704
003706
003710
0'13712
003714
003716
003720
2103722
003724
0'13726
IlH213730
0'13732
01213734
003736 .
003740
0133742
003744
0.03746

177764
12100014
000013
177765
00'H113
000012
177766
0021012
000011
177767
000~111

14-FES-71

13106

PAGE 1-17
N=N-1

-N
N
N=N-1
-N
N
N=N-l

JDEC TAP£ WRITE BUFFER
:OEC TAPE WRITE BUFFER

-~

N
N=N-l

-N
N

N=N-1
-N
N
N=N-1

;DEC TAPE WRITE BUFFER
JDEC T,APE WRITE BUFFER
.DEC TAPE WRITE BUFFER

-N
N
N=N-1

-N
N
N=N-1

-N
N
N=N-1

000010
177770
00 '1 el 1'1
900el07
177771
12100007
12100006
177772
000006
12100005
177773
12100005
0210004
177774
000004
12100003
177775

N=N-1
-N

0~HHH:'J.

N

0~0~132.

N=N-1

-N
N

iDEC

TAP~

WRITE BUFFER

,DEC

TAP~

WRITE BUFFER

JDEC TAPE: WRITE BUrFER
JDEC TAPP: WRITE BUFrER

N=N-1

-N
N
N=N-1

-N
N
N=N-1

-N
N
N=N-1

-N
N

;DEC TAP£ WRITE BUr FER
IDEC TAPE: WRITE BUFrER
IDEC TAPE: WRITE BUFFER
JDEC TAP£ WRITE: BUFFER
JDEC TAPE WRITE Bur.F"ER

177776

-N

"00~02

,DEC TAPE: WRITE BUFrER

000kHH
177777

N
N=N-l
-N

,,00~'01

N

JDEC TAPE WRITE BurFER

~PALX11

V003

14-FEB-71

Z0315e

012767

003750

012446

203156

1~4400

i'e'376l

~12737

::04~00

~16420

Zl3766
203772

"127l~

177770

026027

~'1662'2

?04ee~

0~14L:l

ee4?02

le400~

I;H~~2e4

10 44 00

e0 4 Ze6

012700
022760

?0 4 012

e~4~20
Z~4022

204:e2 4

177770
125252

PAGE 1-.18

;INDEX, AND INOIRt .. , TEST Or-PDP"11
#BEGIN,RETUf'~
BEGIN: 1'10\1
SCOPE
#4~'00, ~# 1COUNT
""OV
:TESl CJMPARE INSTRUCTION I ~,I i) EX ED
MOV

125252

016622

liHH4~1

1'04e;00
104400

CMP
BEQ
HLT
SCOPE

#--10,%0
AI( 0) , #125~?52
• -~ 4

MOV
CMP
BEQ
HLT
SCOPE

.-10,%0
#125252,A (0)

MOV
CMP
BEQ
HLT
SCOPE

#:LIi~ , ,%0
AI( 0) , #052525

MOV
CMP
BEQ
HLT
SCOPE

#:Lrll,%0
#052525,A(0)

MOV
CMP
BEQ
I-lLT
SCOPE

# ... 113,%0
AI(Z),A(0)

MOV
CMP
BEQ
HLT
SCOPE

#,"10,%0
A(0),A(0)

e0 4 i40
004042
ee4~4~

H~4400

004046
1t04eS2
00 4 060
004062
0041864

1i!112700
022760
001401
104000
104400

00001,0

004~66

012700
026060
001401
104000
104400

177770
016622

012700
026060
001401
104000
104400

00"010
016622

ee4~26

~127eJ0

00 4 132
004i36

177770
000004
016622

e04144
00 4 1.46
004i5C

012701
2126061
0014(2)1
104(2)0(2)
104400

eC 4 152

0261b0

CMP

A(1) , A«(2)

~~e4:'6el

",014~1

SEQ

.... 4

(' e 4: e 2

104000

HLl

2e4!.6 4

H?44d~

SCOPE

z04~32

004072
004100
0041fr~2

e134i04
0~Hl~6

004i12
e0 4 120
004122
0041.24

~52525

'H6622

Ze 4 :bC'

'" 12 ? I{" k'

177774

~'04:

0127[ll

?e~~[?Il(2)

-;-::?

052525

016622

016622

016622

016622

016622

MOV
MOV
CMP
BEQ
HLT
SCOPE

MOV
MOV

.FOR SCOPING

;ITERAlION

• -~ 4

• ,.. 4

• ·.. 4

• ·.. 4

#'-10,~0

#·.. 4,%1
A(12J) , A(1 )
• ,~4

#,.4, %0
#'''H'l,%l

COUNT

JMINUS 10 TO REG
J (A
INDEX BY MINUS

"

H~)

TO

ICOMPARE WI Hol INDEX fA,ILED

JrOR INDEX
INDEXED

JA

• -~ 4

012700
026027
001401
104000

~e4~26

00?:01.tl
016622

1,3 U'6

J

INOEX

1~1.25c5?

PALX11

V003

14-rEB-71

0e4176
0042e4
004206
0042121

226061
001401
104000
104400
012HI(t
0127 .:.; 1
2120160
001401
104000

016622

v.04212

004216
004222
e0423e

004232
004234

177774
000010
016622

016622

13:e6

PAGE 1-19
CMP
BEQ
Io1LT
SCOPE
h10V
!.10V

016622

CMP

BEQ

A(0),A(1)
.+4
#-4.%0
# UI), %1
A(1) • A(0'
,+4

HLT
SCOPE

H~4400

JTEST "1QVE INSTRUCTION rOR INDEX
MOV
MOV
CMP
BEQ
HLT
SCOPE

004236
004242
004250
01Z!4256
004260
004262

012700
016067
026727
0f2114el
104000
104400

177770
016622
012370

e12374
125252

004264
004270
004276
004304
004306
01214310

012700
016067
026727
001401
104000
1121441210

eHH'010
016622
012342

012346
12152525

12104312
004316
004324
004332
004334
004336

012700
01:2760
02:3727
00141Z!1
10400121
10<4400

17777121
125252
016634

016644
125252

004340
004344
01214352
004360
004362
004364

012700
012760
023727
201401
104000
10440121

000010
052525
016654

004366
004374
004400
004406
004414

01:n67
,U;nI:10

177777
177770
016622
012232

012250

177777
0r2H1010
''16622

012214
~122V'2

RIC

~~12176

125252

eMP

046067
026727

0~4416

00:L4~1
le400~

004420

104400

004422

01?767

~0443~

012700

00443 4
004442
~H;!445"

o4 ~10 6

7

026}27
00j 4'~1

016644
12152525

__ .. le.%eJ
A(0),TEMP
TEMP,#125252
,+4

MOV
MOV
CMP
BEQ
HLT
SCOPE

#+10,%0
AC0',TEMP
TEMP,#12I52525
.+4

MOV
MOV
CMP
BEQ
HLT
SCOPE

.... 10,%121
'125252,TEMP(0)

MOV
MOV
CMP
BEQ

.. #C,#125252
.+4

'+10,"0
*052525,TEMP(0)
,#TEMP+10,#052525
,+4

~LT

SCOPE

012236
052525

;TEST AND I~STRUCTION FO~ INDEXING
_-l,TEMP
MOV
MOV
#-10,%0
A(0),TEMP
BIC
CMP
TEMP,#052525
,+4
BEQ
HLT
SCOPE
MOV
~Ov

BEQ

#-l,TEMP
#10,"0
A(0),TEMP
TEMP.#125252
.+4

14-F"E8-71

13 :~06

:.P A~E

fAL~11

V.'303

004452
V104454

1040",e

~L"!

le440.6

SCOPE

004456
004464

012737
0127?0

177777

~04470

~42760

125252

Z16644

004476
004504
004506

023727

716654

{'52525

I?JriH4Vl
1040~0

~04510

104401?J

004512
004516
004524
004532
004540
004542
004544

0127~0

004546
004554

012767
0127 k:'0
166067
001401

12104560

004566
004570
0045'72

l16654

2erelZ

012767
042767
026727

177770
177777
052525
012076

0014~1

104000
1044N:'l
125252
177770
016622

e12070
2'12~56

1~4000

104400

004574
004602
004606
004614
004616
004620

012737
012700
166760
001401
104k.H30
104400

125252
171770

216644

~120e0

~16654

004622
004630
004634
01214642
004644
01214646

2112767
012700
166067
01211401
104000
104400

052525
000010
016622

004650
004656
004662
004670
004672
004674

012737
0127e.0
166760

2152525

004676
004704
00471121
004714
004720
004722

1Z112737
0127012J
00:>060
005737
0014 ..'1
104er0

e12Q!14
012002

~16644

016634

104000
104400
:TEST
~16654

?lc644

2116644

#1.0,,,2

MOV
MOV
SUB
SEQ
HLT
SCOPE

2I014~1

177777
177770

#--1, (i#TEMP+10
#125252,TEMP(0)
,#TEMP+10,#52525
• +-

4

....·10, "0
TEMP-lel
#052525,TEMP-10
TEMP-10,#125252
# ...·1,

, ... 4

;TEST SUBTRACT INSTRUCTION F"OR INDEXING
#1.25252, TEMP
MOV
#.,10,%0
MOV
A(0),TEMP
SUB
,+4
BEQ
HLT
SCOPE

00~H~1e!

011744

rv.(j V

MOV
BIC
CMP
8EQ
HLT
SCOPE
MOV
MOV
BIC
CMP
BEQ
HLT
SCOPE

012110
e12102
125252

1~20

#1.25252, ta#TEMP
#-1121,"~

B,TEMP+10(12J)
,+4

MOV
MOV
SUB
BEQ
HLT
SCOPE

#0!52525,TEMP
#10,%0
A(0),TEMP

MOV
MOV
SUB
BEQ
HLT
SCOPE

#0!52525,.#TEMP
#10,%0
A+10,C(I2J)

~JNARYS

MOV
MOV
CLR
TST
BEQ
HLT

,+4

,+4

INDEXED
#-l,Gt#TEMP
#-112l,"~

D(0)
~#TEMP

... 4

PALX11

V0~3

0~4724

104400

~~4726

012737

00473 4

0127~0

e.0474~

0(2:52100
005737
001401
1040l'eJ

004744
0~4750

004752
0.04754

14-I="(B-11

13&06

PAGE 1·21
SCOP(

177777
000.010

016644

e166~4

016644

1044Vjjl

MOV
MOV
CLR
TST
SEQ
I-lLT
SCOPE

# ... 1, tatHEMP
#+10,%0
C (")

@#TEMP
• +4

MOV
MOV
COM
TST
SEQ
HLT
SCOPE

*.. 1 d'#TEMP

016644

MOV
MOV
COM
TST
BEQ
HLT
SCOPE

#-l,@#TEMP
#10,%0
C(0)
8#TEMP
,+4

MOV
MOV
INC
TST
BEQ
HL T
SCOPE

004756
004764
004770
004774
005000
005002
005004

012737
0127e:0
005160
"05737
001401
104000
104400

177777
177770
016654
016644

~16644

005006
005014

012737
012700

177777
016634
016644

00001~

#-10,%0
De0}
(i#TEMP
.+4

005~20

0~516~

005024
005030
005032
005034

005737
104400

0051?l36
005044
005050
005054
005060
0050.62
005064

012737
012700
005260
,U'5737
001401
104000
104400

177777
177770
016654
016644

016644

005066
005074
005100

012737
012700
005260
,,05737
001401
104000
H!l4400

177777
000010
016634
016644

016644

MOV
MOV
INC
TST
BEQ
HLT
SCOPE

#-l,(I#TEMP
#+10,%0
C(0)
(I#TEMP
,+4

012737
01:?700

000001
177770
016654
016644

016644

MOV
MOV
DEC
TST
BEQ
HLT
SCOPE

#l,.#TEMP
#-10,%0
0(0 )
ta#TEMP
,+4

~16644

MOV
MOV
DEC
TST
BEQ

#l,lI#TEMP

~'05H~4

005110
005112
005114

0~1401
104~00

005116
0.05124
005130
005134
01215140
12105:142
1211215144

01215737
001401
112141210121
11214400

"0~;360

005146

~1;n37

e'00001

h~5

~4

01;~7~~1ZI

~l5

6~

d~5

64

12105360
1211215737

00CI2'H'l
016634
016644

01215 7121

00=.4C1

*.. l,.#TEMP

#-10,%0
0(0)
G'#TEMP
,+4

*1~,"1ZI

CO"

lI#TEMP
.+4

fA'LX11

ve03

0'0:'172
0e5174

104000

005i76

012737
kf127"'0
1.3:05460
022737
001401

70'520<1
~'05l>H?J

~05214

20522?

H~40(l:0

~05226

104400

~05230

312737
012700
005460

005~42

{

005246

~?2737

e~5254
e~5256

001401
104000

005260

1~4400

005262

012737
012700

005~70

~e5274

005276
005302
e05306

005310
005312
~05314

005322
005326
00533~

005334
005340

0~5342

005344

0~0261
0~5560

005737
001401
104000
104400
012737
IcU2700
000261
005560
005737
001401
104000
104400

?J0e01
~16654

177777

~16644

000001

016644

~~0010
~16634

177777

~16644

177777
177770

016644

177777
000el10

el2!5412!12!
0f2l5412!6

012737
0127()12I
0012!261
005660
(05737
121 e 14 i:.' 1

"'16644

016654
e16644

1~412!00

112!4400

112!4e00
1~44('iC

~OV

ti:L,~#TE"'1P

MOV
NEG
CMP
BEQ
HLT
SCOPE

11-10,%0
D (0)

#··1.
," 4

~#

TEMP

MaV
MOV
NEG

I'H, '#TEMP

CMP

#··l,ti#TEMF'

MOV
MOV
SEC
AOC
TST
BEQ
HLT
SCOPE
MOV
MOV
SEC
ADC
TST
BEQ

#+121,%0
Cn~)

, ~. 4

*..

l,~#TEMF'

#-·H!'l,%0

o (0)

(III#TEMP
• . .·4

# ..·1, fI#TEMFt

# . .·10,%0
C( " )

(a_TEMP
• ,,·4

SCOPE
f2l012!0~1

iJ05~26
~f2l543:1

1-'i2

I4L T

177770

F05424

016644

016634
016644

0127210
000261
0056612!
005737
001401

~e542?

fJ~(jE

SEQ
HLT
SCOPE

016654
016644

1112737

0~54i14

?16644

17 7 770

0053 4 6
005354
e05360
12!05362
12!05366
005372
005374
12!05376 .

e~5412

13':i6

HlT
SCOPE

le440(

"'~5~24

e~5~36

1

14 -':-£:8'-71

00012101
012!0010
~16634

016644

12!16644

MOV
MOV
SEC
SSC
TST
BEQ
HLT
SCOPE
MOV
MOV
SEC
SSC
TST
BEQ
HLT
SCOPE

#l,(;)#TEMP
.--10,"121
0(0 )
@~!TEMP

• ",4

#1., @#TEt-1P
#+,10,%0

con

@#TEMP
• +4

PAL Xli

V003

0~5432

0121700

005434
005440
005442
005444
005446

0627tl
00e112

(21215450
005452
005456
005460
005462
005464

21121700
062700
000110
104000
,,00240

10 4 4le

104400
2122737
001401
10 4 000

005516
005524
005526
005530

2123737
001,401
10 4 000

005532
005536
005542
005544
005546

2113700

e.05572
01?J560~
~05606

2I2,~700

001,401

CMP
BEQ
HLT
SCOPE

#125252,.#8
,+4

0,16612

016612

CMP
BEQ
HLT
SCOPE

.#8,li#B
,+4

,

I,'

~

;TEST MOVE INSTRUCTIONS
,#8,%0
MOV
CMP
*125252,%"
.+4
8EQ
HLT
SCOPE

016612
125252

125252
016612

016644
016644

MOV
CMP
BEQ
HLT
SCOPE

#125252 .... TEMP
.#8,li#TEMP
.+4

016512

1i'16634
016634

MOV
CMP
BEQ
HLT
SCOPE

@'B, .. ,C
eUB, (I#C

10400~

1044('10
~lb612

001401

005610
005612

104 itt:';.'

00561 4

12'7,';'
0437.:'::

(,~05620

016612

104~00

013737
023737
1~44~\i'

~

;TEST INDIRECT ADDRESSING
;TEST COMPARE INSTRUCTION
CMP
.#8,#125252
,+4
BEQ
HLT
SCOPE

125252

104400
012737
023737
0211401

#le,%0
0'''''

125252

101J4N~

H!J4400

%7,%0

e'16612

1~40e0

005502
005510
005512
005514

PAGE 1 .. 23

MOV
ADD
JMP
HLT
NOP
SCOPE

Z0ZelUJ

H~440~

CZl05476
005500

005550
,005556
005564
005566
005570

e0(.~121

104~e0

2123727
001401

13:06

:TEST JMP INDIRECT
MOV
%7,"0
#1O,%0
ADD
t'%eJ
JMP
HLT
NOP
SCOPE

000240

~05474

0~5466

14-F"E:8-71

177777
,'1" 612

• +4

;TEST BIC INSTRUCTION INDIRECT
#-1,%0
MOV
BlC

t8*8.%~

~ALX11

Vil03

14-rES .. 71

M"6'24
0056:30

020€2 7

l52525

~05632

01215634

0~1401
1£40t:~
1044L'~

13:0b

PAnt

1-24

CMf:!

"",#052525

SEQ

.+4

liLT

SCOPE
MOV
BIC
CMP
BEQ
HLT
SCOPE

#-l,(lt#TEMP
#125252,fiI#TEMP
t#052525,,#TEMP
.+4

177777
125252
052525

"'16644

177777
12116612

C!l16634
016634

~16634

~52525

005714

012737
2143737
023727
01211401
112141211210
1121440121

0057'16
12105722
12l12l5726
1211215 'f 32
12105734
1211215736

01271210
1637ell21
212121027
1lJI2I 14 I2l 1
1121 412l 121121
112144121121

125252
C!l16612
000012112l

12105740
1211215746
01lJ5754
005756
012l57612l

012737
166737
01lJ1401
112l412l121121
112144121121

125252
0112164121

O16644
016644

MOV
SUB
BEQ
HLT
SCOPE

#125252,'#TEMP
8,(il#TEMP
• ..·4

1211215762
1210577121
1211215776

012767
163767
01215767
01211401
1121 40ell2l
112144012l

125252
016612
010642

010654
010646

MOV
SUB
TST
SEQ

#125252,Tf.MP
'MB,TEMp
TEMP
, ~'4

005636
005644
01215652
012l56:60
012156 62
01215664
1

~056'6 6
1211215674
0057132
0057:10

0121~712

12112l6~02

12106004
006006
01216010
006012
Qll2l6016
006022
006024
Qll2l6026
~12l6030

006034
006042
?-06050
0121612152
006054
01216Ql56

~127.37

042737
022737
001401

016644
~16644

1~4(i"!l12l

11214400

12'050012l
0637012l
02271210

~#C,#52525

.+4

~LT

SCOPE
JTEST ADD INDIRECT
CLR
'''~
~~8,%12I
ADD
CMP
#125252, '''~
SEQ
• +4
HLT
SCOPE

12116612
125252

10400~

11214400
~16644

125252
125252

016644
016644

1~4400

012 7 ,~ 7

#-l,Qa#C
~#8,6)#C

;TEST SUBTRACT INSTRUCTION
#125252,,,O
MOV
~#B,%0
SUB
CMP
"O,#0
,+4
SEQ
HLT
SCOPE

01211401

12105037
062737
022737
2'01401
104000

MOV
BIC
CMP
BEQ
HLT
SCOPE

125252

e16644

CLR
ADD
CMP
SEQ
HLT
SCOPE
MOV

(I#TEMP
#125252,(I#TE"1P
#125252,(I#TE~P

• .. 4
#125252,~#TEMP

PALX11

V003

14-F"EB-71

006264
006072
006100

~67737

023727
0211401

2110540 Z16644
016644' 177777

~06122

10400~

7?61~4

le4 4 l l

e061~6

012737
005037
00';737
001401
104000
104400

177777
216644
e16644

e16644

125252
016644
052525

016644

006152
e06154
ee6156

012737
021!5137
022737
021:l401
HHe00
104400

e06160
006164
e06170
00617-{)
e06200
e06202

005037
a0!;237
022737
001401
104000
104400

0.16644
016644

006204
e06210
0e6214

00~j377

N~6114

e06120

0.06124
':H~6126

006130
Z06132
e06140
e06144

00e~01

216644

016644

016644
0121432
016644

177777

01,~737

0~H~0e.1

016644

"0~j437

2116644
177777

016644

005037

023727
00l.401
006224 .104000
006226 1044-~0
~06222

006230
006236
N'l6242
e062521
e06252
e06254

e~6256

1822737
01ll1.401
104000
104·400

~27727
~014~1

ee6264
ee6266
?1l6270

104000
104400

('l6272

022777

~e63l0

001401

.' ?t-~2! 2

104Cv1e

~

• .: ~ 3 ~ j

i.~ ~ ~ ~

r6

PAGE 1-25
ADD
CMP
BEQ
f1LT
SCOPE

91A+6.61#TEMP
.#TEMP,'-l
, +4

:TEST UNARYS INDIRECT
MOV
#-l,91'TEMP
,.TEMP
CLR
TST
.'TEMP
,+4
BEQ
f1LT
SCOPE
MOV
COM
CMP
BEQ
HLT
SCOPE

.125252,,#TEMP
(I.TEMP
#052525,.#TEMP

CLR
INC
CMP
BEQ
HLT
SCOPE

(It.TEMP
,'TEMP
#l,tIl.TEMP

CLR
DEC
CMP
BEQ
HLT
SCOPE

"TEMP
6ITEMP+2
•• TEMP" .. l

MOV
NEG
CMP
BEQ
HLT
SCOPE

#l,6I#TEMP
tII.TEMP
#-l,_.TEMP

,+4

,+4

,+4

,+04

;TEST INDIRECT ADDRESSING WITH INOEXING
;TEST COMPARE INSTRUCTION
CMP
(i1IB"2,#125252
,+4
BEQ
f1LT
SCOPE

010332

125252

125252

01~314

CMP
BEQ
f1LT
SCOPE

#125252,.8+2
,+4

211i'~~2

l: 1? 3~' 0

CMP

@lB+2.1I8+2

104400

027777

13:06

PALfX;ll

v e~Ql3

lil-F,E,8 -71

l3:;1:6

P;A.(;[

..... .

006;31 4

e~lA0l

SEGl

0.e6i~16
~_06:320

If:400e

,~LT

l~4400

SCOPE

006322
006326
006332
006334
006336

el177/.;0
222720
2101401
104000
1214400

iTES:

006~40

~12777

2106\346
006354

023737

ro06~56

!\STRUCTIONS

~OV

~B+2,%0

125252

eM?

#125252,~0

SEQ

,+4

!-ILT

SCOPE
125252
rc:l16612

01Y1300
2116644

MOY
CMP
SEQ
HLT
SCOPE

#125252,'TEMP+2
(il*B,(iI#TEMP
,+4

0H'J226
016612

01e'246

016634

MOY
CMP

1!D19+2,IIIC+2
@it#B ,G~#C

0~1401

006360
006362
006370
0216376
006400

2117777
2123737
2101401
104000

006~02

1~4400

006404
006410
006414
006420
006422
006424

012700
2147'100
2120027
001401
104000
1214400

177777
010200
052525

006426
006434
2106442
006450
006452
006454

2112737
,,42777
2122737
001401
104000
104400

177777
125252
2152525

006456
0216464
006472
006500
006502
006504

012737
047777
"26'737
0014'11
104000
1044r10

177777
2110124
0{0134

006$06
006512
006516
006522
006?24
006526

12J,1270~

125252
010076
00(:'000

006530

~12737

:125252

016644

006536

166777

010050

01~102

~20027

'

0H~266

12140il0
104400

167700

~2YE

1"'2~
~
j

SEQ
HLT
SCOPE

• -+4

iTEST BIC I NSTRuc'r I ON INDIRECT WITH INDEXING
#·-1,%0
MOV
BIC
'13+2,%0
CMP
'''~, #52525
SEQ
• ·.. 4
HLT
SCOPE
016644
010204
2116644

016634
010144
016634

IiH31401
104000
1~44~H~

~10V

BIC
CMP
SEQ
HLT
SCOPE

#,.. l,8t#TEMP
':L25252,tTEMP+2
.52525,ta#TEMP
• .~ 4

MOV
BIC
CMP
BEQ
HLT
SCOPE

#·-l,@#C
'B+2,6'C+2

MOV
SUB
CfoiP
8EQ
HLT
SCOPE'

#125252, ''''
fIIB+2,%0

~ov

suB

A·~10,'#C

• •• 4

'''' , #0
• .~ 4

#t25252,(J#TEMP
B" @lTEMP+2

PAL Xli

VIZlIO 3

0106544
0106546

0101401

~10655Q!

1044010

?0655?

012737
167777

00656l

006566
0106572
2106574
006576

14 ... r:-E8-71

125252
V'10030
e16644

016644
eHH~61O

10014?1
l1Z1400~

11044010

010661010
006602
006606
0106612
0106614
0106616

01050010
067700
022700
0101401
104000
1044010

10066210
0106624
0106632
01066410
1006642
0106644
10106646
1006654
0106662
10066710
0106672
1006674

QjlO51037
062777
022737
0101401
11040100
1104400
012737

006676
0067104
1006710
0106714
006716
1006720

PAGE 1-27
BEQ
HLT
SCOPE

H"4001O

~05737

13 H~J6

"'10V
SUB
TST
SEQ
HLT
SCOPE

eH~l0106

125252

010014
1016644

125252
0077521
016644

016644
007764
177777

012737
""5077
005737
0101401
110410010
111'4400

177777
007736
016644

016644

~1ZI6722

012737
~05117

125252
007712

016644

006730
006734
006742
006744
006746

022737
2e.1401
10401.:10
H'4400

~52525

016644

MeV
COM
CMP
BEQ
HLT
SCOPE

005~37

e'16644

005277

~1ZI7666
00~0el

e16644

CLR
INC
CMP
BEQ
HLT
SCOPE

(;06750
(.06754
;<06760
006766

023727
0101401
10410010
11044010

022737
~H:H401

;'06770

1k~4200

~H~b772

1~'44~~\~

#125252,,#TE"1 P
~8+2,@TEMP+2

(a#TEMP
,+4

:TEST ADO INDIRECT WITH INDEXING
CLR
%0
ea8+2,~0
ADO
#125252,,,e
CMP
,+4
BEQ
HLT
SCOPE

016644
125252
125252

~67777

.+4

CLR
ADO
CMP
BEQ
"'LT
SCOPE
MOV
ADO
CMP
BEQ
HLT
SCOPE

,#TEMP
#125252,titTEMP+2
#125252,.*TEt-1P
,+4
*125252,,'TEMP
ttA"'6,IIITEMP+2
@#TEMP,#-l
,+4

}TEST U-NARYS INDIRECT WITH INDEXING
j ... l",TEMP
MOV
CLR
"TEMP+2
TST
'I'TEMP
.... 4
SEQ

HLT
SCOPE
*125252.,.TEMP
@tTEMP+2
#052525,'#TEMP
.+4

~#TEMP

liTEMP+2
flIl,ea#TE,.,"
,+4

V~:03

14-FES-71

e06774

~0:5e37

016644

0e7~00

N'!7012!4

0e:5371
02:3727

~07l12
.20721 11

~014~1
H~40~0

ie7~16

le44iHj

121217023

012737
0eS477
022737

PAL

007~26

007el32
007e40
k~07042

C07244

01~737

000261
005577
00p737
00;1.401
104000
11214400

007H~2
Ql07H~4

007110
00711 4
007116
007120

177777

e0~.HH·l

016644

0t;!7614
177777

016644

177777

016644

1,~4e00
10440~

~07054

NP2J74

016644

00~401

0e7046

007056
007062
007066
007070
007072

~07642

012737
000261
005677
005737
001 4 01
104000

007564
12!16644

000001

016644

007536
016644

1044~0

007122
007126
01217134
007136
007140

012700
027027
0''1401
104000
104400

177772
016622

125252

007142
007146
007154
"07156
r0716e'

012710
02277""

177772
125252

016622

0014~1
1~4000

~'072""2

c07204

lk~44J~

~:e72i'6

~

'~07~ 66
?07172
~~e7200

CLR
DEC
CM.P
SEQ
HLT
SCOPE
MOV
NEG
CMP
SEQ
HLT
SCOPE
MOV
SEC
ADC
TST
SEQ
HLT
SCOPE
MOV
SEC
SSC
TST
BEQ
HLT
SCOPE

~#TEMP

'TEMP+2
.#TEMP,#~l

.+4

#1, (i)#TEM'P
~TEMP+2

j-1,1II#TEMP
.+4

#-l,QII#TEMP
IIHEMP+2
~#TEMP

.+4

#l.@#TEMI'
QIITEMP+2
8II#TEMP
.+4

JTEST OF COMBINEO INDEXING AND INOIRECT
MOV
#-6,~0
C'A(0),#12525?
CMP
,+4
SEQ
HLT
SCOPE
MOV
CMP
SEQ

#-6,%0
#125252,'A(0)
.... 4

SCOPE
177772
01£H~0Z2
~16622

12" ~~;;

V"0Jerl6

l07212

~n2"b7

C'e722~

~

177777
e'16622

4 7;~ b 7

P.(GE 1-28

~LT

104400
0127ee
0127.:'1
027371
0014.'1
1 e4 (l" ~

~~07162

13106

016622

0e7424
'H~7416

MOV
MOV
CMP
8EQ
HLT
SCOPE

'/1. .. 6,%0

#+2,%1
tilA(0) ,tlAI(l)
.+4

;TEST B!C INSTRUCTION
#+6,~0
MOV
MOV
#-l,TEMP
8IC

(ilA(0),TD~P

PALX11

V~213

14-FEB .. 71
125252

0e74121

177772
177777
125252
016634

016634
e16644
2152525

e~7226

022767

0217234
10217236
V'2172421

'H~1401

;,l7242

21127021
012737
21427721
023727
0211401

Z07246
707254
2217262
J2I72721
007272

104211O~

le4400

H~40021

~217274

121442121

21217276
0073214
02173121
21217314
21217322
21073321
21217332
21217334

012737
012700
012701
21472171
022737
0014211

177777
177772
1:77772
2116622
2152525

016634
2116644
016634

1214el2l~

12144210

01272121
1262127
0r2l1401
1r2l421e21
1214400

1777721
2116622

21127~0

177770
0021252

016622

01272121
1262127
0014"1
1040021
104400

210 210 H'J
2116622

212121125

0127021
122760
0211401
104000
1044(.110

0"21010
'-"00125

016622

eel7436

012700

~07442

126060
2101401
1 e 4 ~ ~~ 21

177770
2)16622

016622

0217336
21217342
~2173521

21217352
0217354
21217356
2107362
02173721
21217372
~217374

~HP376

0217402
0~7410

0217412
e'07414
e07416

e07422
l07430
e07432
007434

/07450
;'07452
•.~~745~

1227621
2101401
121421021
12144021

1e44~~~

0210252

13106

PAGE 1 .. 29
CMP
BEQ
!-ILT
SCOPE

#125252,TEMP
.... 4

MOV
MOV
BIC
CMP
BEQ
!-IlT
SCOPE

;;,-6,%0
#-l,lIt#C
#125252,'TEMP(0)

MOV
MOV
MOV
BIC
CMP
BEQ
IoIlT
SCOPE

# ... l,(I#C
#-6,,,21
#-6,,,1
'A(2I),(ltTEMP(l)
#052525,.#C

~#C,#2152525

.+4

.+4

;BINARY INSTRUCTIONS
:INDEX, AND INDIRECT TEST OF" PDP"'11
;TEST COMPARE INSTRUCTION INDEXED
MOV
1\1 .. 10,"21
A(21),#2100252
CMPB
.+4
BEQ
IoIlT
SCOPE

.MINUS 10 TO REG 21
j ( A INDEX BY MINUS 121) TO #125252
;COMPARE WIT'"' INDEX rAILED

MOV
CMPB
BEQ
lolL T
SCOPE

1\1 .. 121,"21
#21021252,A(0)
.+4

.fOR INDEX
J A INDEX£D

MOV
CMPB
BEQ
IoIlT
SCOPE

#10,"21
A(0),#21210125
.+4

J I NOE X

MOV
CMPB
SEQ
IoILT
SCOPE

#10,"21
#11J021125,A(0)
.+4

MOV
CMPg
SEQ
IoILT
SCOPE

#-121,%21
A(21) , A(0)
.+4

P A·L ~ V'0!t.j
...
0''''74'62

0~74:...

0l12'7~0'

@il0'~10'

! 2'60'6 0

016622

~07470

00t'4~1

007472
007474

1040C0

207476
007502
k1ftJ7506
007514
007516
007520
007522
007530
007532
007534
007536
01217542
007546
007554
007556
007560
007562
007566
007572
C07600
007602
007604

14'-r E ~-71

"'166'22

P'A·G;E

01270il

177770

012 7 ~11
126061
001401
104000
104400

00000.4

01:6622

016622

A· ( 0') , k ( 0' )
• +4'

MOV
MOV
CMPS
SEQ
SCOPE

016622

016622

CMPB
SEQ

104400

SCOPE

126061
0"H 401
1040021
104400
012700
012701
126160

#-10,%0
#,+4,%1
A( 0)', A(1)
.+4

HLT

HLT

012700

Ut"%0

ft+

C,"'PS;
BEQ

104'0~Hl

0127~1

l-:5~a

M'OV

HLT
SCOPE

1044~j~

12d160
121'0114" 1

13 f'Q1'6

177774
0000121
016622

016622

MOV
MOV
CMPB
SEQ

HLT

A(1) , A(0)
.... 4

# ... 4,%0

#+10,%1
A(0),A(1)'
• +4

SCOPE
177774
0210010
016622

016622

0014~~1

MOV
MOV
CMPS
SEQ

#~4,"0

#10,"1
A(l),A(21:~

.+4

HLT

104e0f2J
104400

SCOPE
JTEST MOVE INSTRUCTION

#-10,%0
A(0),TEMf)
TEMP, #0~"~252

MOV
MOV8
CMPS
SEQ

#+10,%0
A(0),TEMP

012700
116067
126727
001401
104000
104400

007634
12107640
007646
007654
12107656
007660

012700

~00010

11M~67

126 7 27
11HH4kH
1040(1'0
104400

016622
006772

00766?

012 7 CJ

17777'0

0~766f>

112;'6~~

007~74

123727

125252
016634

0077132
0077(14
,~e 7 l0 6

12J~14;'1

SEQ

1 It 4 ~11.' e
1 ~> 4.~? ,:

HLT
SCOPE

016622
007020

007~24

000252

006776
000125

HLT
SCOPE
MOV
"'16644
125252

INDEX

MOV
MOV8
CMPS
SEQ
HLT
SCOPE

007606
01217612
007620
007626
007630
007632

17777f!J

F'()R

1'10 V~I
CMPEl

.+4

TEMP,#00~125

• +4

*-10,\0
#125252,TEMP(0)
@I#e, #125:252
t

+4

PALX11

VeJI2I3

14 .. F"E8-71

0127e~

e0212110
e52525

e~7722

112760
123727

;?Z773Z

~HH4el

~e7732

le40e0

ee773~

104410

227 7 36

012767

2e7710
207714

2~P744

eJ127~iil

007750
~~7756
~Hn764

146067
126727
2101401

207766
207770

1044;00

007772
01021210
0UH304

e1ee12
eH~12I2e

e10022

e16654

177177
17777;1
'H6622
e06662

012767
012700
146067
126727
12101401

177777
0011121 1 121
e16622
~12I6626

e10026
l10034
eHHH0
01012146
010054
lle'056
e10eJ60

12112737
012700
142760
123727
"014kH
10412100
104400

177777
000010
125252
016654

eleJ062
01012166
e'10074

01271210
012767
142767
126727
0014e"1

1·7777121
1?7777

li'7777

eH~124

~127e,21

lle132

H'5060
1e5737
2101401

177770
"'16654
~16644

12!40e0

10442e

ZlZ146

012 7 37

177777

?ll 54
~' 17 63
,-. ... 64

eJ127.'~

177773

le5~~b0

~16654

023727

;'16644

.
~

~

(.

?

"- J.-~

..,~

/ t::

016644
12102525

104021~

012737

....

12116654

016644

e~;2525

llel16

2121142
':1t:144

006632
0'''652

21"6526

1044021

eH~14l

006644

21216540
006532
125252

~10114

eHH34

006666
177525

1040~0

1044e0

e1~110
el~112

121121671210

H~4~H~0

e10~24

eH~U~2

12116644
12152525

"01'~'1

13:1216

PAGE 1-31
MOV
MOVB
CMP8
BEQ
HLT
SCOPE

#+1121,"121
ti052525,TEi"1P(I2I)
~#TEMP+1121,#052525

.... 4

;TEST BIC INSTRUCTION F"OR l"JOEXING
# .. l,TEMP
MOV
MOV
#-10,"~
Id 21 ) , TE "1P
8ICB
CMPB
TEMP,#177525
BEQ
.+4
HLT
SCOPE
MOV
MOV
BICB
CMPB
BEQ
HLT
SCOPE

*-l,TEMP
#10,"0
A(21),TEMP
TEMP, #1211211652
.... 4

MOV
MOV
BICB
CMPB
BEQ
HLT
SCOPE

# .. 1,,,#TEMP+1121
#10,"0
#125252,TEMP(0)
tittiTEMP+10,#2525
.... 4

MOV
MOV
BICB
CMPB

*-10,"121
#-1,TEMP-10
#052525,TEMP-10
TEMP-H~, *125252
,+4

SEQ
HLT
SCOPE

,T£ST UNARYS INO£X£D
~-l,.#TEMP
MOV
MOV
10,%0
c:l (21)
CLRB
@~TEMP
TSTB
.+4
BEQ
HLT
SCOPE

*..

2'16644

MOV

~-1.@*TE"'1P

o (it"

1774021

MOV
CLR8
CMP

SEQ

• +4

~-10,"~
:III#TEMP,*1774~0

PAL~ v0e3

e1 0 1',
0H:'176

~LT

SCOPE

H~5060

12)23727

i'lt644

tH~£'377

012737
012,700
105060

177777

016644

10~737

~16644

MOV
MOV
CLRB
TSTB
BEQ
HLT
SCOPE

tj"l,@#TEMP
#+10,%0
C (")
@#TEMP
.+4

177777
177770
016654
2116644

016644

MOV
MOV
COMB
TSTB
SEQ
f.lLT
SCOPE

1,tD#TEMP
#-10,%0

012737
012700
105160
105737
2101412)1
104000
104400

177777
012)012!10
12!16634
12!16644

016644

012.737

177777
177770

010232
e10240
010244
e102512)
e10254
010256
010260
010262
01027"
010274
010300
01030 4
010306
010310

012 737
012700
105'160
105:737
(01412)1
1041c'HH'J
104400

eH~312

~H~1401

10~~H~0
1~4400

1

0127~0

11215260

~16654

1~5737

016644

010376
0H~400

104~e0

010 4 02

104400

el~404

12112737
012700
10526k1
le5737

210422
e10 4 26

0~kHH0
~H6634

'''H:401
104:12)012)
104:400

001401
104000
023727
001401

eH"416

~~1, '#TE~IP

216644

e10216
210?2 4
e10226
010230

?10412

MOV
MOV
CLRg
CMP
BEQ
HLT
SCOPE

177777
177771
":.6654

~14737

012700

~H0370

PAGE 1-32

1044e~

~10206
i'1~21?

e10342
010350
010354
e10360
010364
010366

13:~6

104000

eH~20e

0103212)
010324
010330
12)112)334
010336
010340

14-F"ES .. 71

016644

177777
er,HH~l

016644

17 7 40121

104eC0

eH"'43?

1044::'0

iH"434

('l12 7 37

*.

D(rzl)

Gt#TEMP
.+4

MOV
MOV
COMB
TST8
SEQ
HLT
SCOPE:

# ... l,@#TEMP
#10,%0
C (0)
ED#TEMP

MOV
MOV
INCS
TST8
SEQ
HLT
CMP
SEQ
HLT
SCOPE

# ... l,@#TEMP
*-10,%0

.+4

D ("')

lI#TEMP
.+4

@#TEMP,#177400
.+4

MOV
MOV
INCa
TST8
8EQ
HLT
SCOPE

#-l,(i#TEMP
#+10,%0
C (0)
(i#TEMP
.+4

r.lb644

MOV

#l,(Ol#TE~P

016634
016644

~0~e?1

#C!lriH~377

016644

J

0014Jl

01~43~

#-7,%12)
D(0)
t.iI#TEMP,
.+4

PALX11

V003

14-F"EB-71

010442

211270121
l1Z536eJ
11215737

2116654
""16644

~10446

0121452
010456
010460
010462

H~42~~
1044~it

2112737

~10472

0127~2l

010476

105360
105737
001401
1eJ4flel0

~1(l!502

010506
1211121510
12110512

00ilJ001
0121211211121

016644

~16634

2116644

eJ00~"H

016644

17777121
12116654
016644

000377

000001

016644

010546
010554
010560
010564
010572
010574
010576

012737
01270121
105460
023727
001401
lel40e'0
104 4 00

010600
010606
010612
010614
010620
010626
010630
010632

012737
012700
000261
105560
023727
210141211
112140e0
104402

177777
177770
~16644

177400

010634
010642
010646
12110650
eJ10654
010662
01121664
010666

012737
012700

177777
000010

12116644

016634
01.6644

0021377

,,12737
0127Jr.

0112'n~2

0002bl

010704

*l,~#TEMP

#10,"0
C( " )
,#TEMP
,+4

MOV
MOV
NEGB
CMP
BEQ
IofLT
SCOPE
MOV
MOV
NEGB
CMP
BEQ

~l,@#TEMP

#-10,%121
0(0)
61#TEMP,.377
,+4

.1,'.TEMP
.+10,"0
C( 0 )
,.TEMP,#'!;7
,+4

~LT

SCOPE
016644

016654

016634
016644

17741210

~0~4~1

~16644

H~44'~0

010£'712'
0112'676
~~10710

0rr"~010

Q"~0261

105562
023727
001401
le4000

,+4

~LT

1211121526
01121532
12110540
010542
12110544

~11121522

MOV
MOV
DECB
TST8
SEQ

*-lel,%~

0(0 )
(a#TEMP

SCOPE

leJ44e~

012737
012700
1121546121
2123727
2101401
10412100
10440121

010514

PAGE 1-33
MOV
DECB
TST8
8EQ
HLT
SCOPE

17777~

",,014Z1

010464

13:06

MOV
MOV
SEC
ADCB
CMP
BEQ
HLT
SCOPE
MOV
MOV
SEC
ADC8
CMP
BEQ
HLT
SCOPE
MOV

177771

MOV

le5t:::;'

"'16654

,,22/37

;"~ ;~

SEC
S8CB
CMP

'" ('11

~16644

#-l,(I#TEMP
#-10,"0
0(0)
,#TEMP,#1774eJ0
,+4

*-l".TEMP
#+10,"0
C (Ii!!)
6I#TEMP"17740~

,+4

.401,'*TEMP
#-7,"0
'J

(~,

#l,£i#TEMP

PAL,#"", V~0~
010716

,HH401

01"72~

104000

0HD22

14 ... rES;:'71

1044V';1t1

eHn24

(2112'737

~eer,0.1

~127e0
eH~0261

l~l01eJ

105660
(211215737
2101401
11214000
104400

016634
016644

~10744

01075121
010752
010754

PAGE 1-34
BEQ
f-lLT
SCOPE

c107,52

010736
wt0740

13106'

016644

010756
01121764
01121766
010770

123'727
01211401
104,00121
112144;10

016612

000252

01121772
011000

123727
0kH;401

12116613

000252

MOV
MOV
SEC
S8CB
TST
BEQ
f-lLT
SCOPE

.+4

#l,tiD#TEMP
#+1(21,%0

C ( eJ )
@#TEMP
, +4

;TEST INDIRECT ADDRESSING
;TEST COMPARE INSTRUCTION
,#8,#0121121252
CMPB
BEQ
.+4
HLT
SCOPE
CMP8
BEQ
HLT
SCOPE

(ittH~+l,

#2'2

,+4

~11002

104:~HH'

011~04

10440121

01101216
011014
011016
011020

122737
ml2l1401
104000
104400

125252

016612

CMP8
BEQ
HLT
SCOPE

IIl125252, .W8
,+4

011022
1£'11030
01H:l32
0111£'34

123737
00t'401
104,000
104400

016612

016612

CMP8
BEQ
HLT
SCOPE

,;fjI8,(I#8
.+4

011036
011042
011046
011050
011052

113:700
12,2:700

''16612
000252

011054
el1~62

011070
011072
011074
?11076
~11104
~~ 11112

01111 4
l11116

;TEST MOVE INSTRUCTIONS
(1#8,%0
MOVB
#9.100252, %21
CMPS
• +4'
BEQ
HLT
SCOPI:

001A ell

11214;00121
104400
016644
016644

MOVS
CMPS
SEQ
HLT
SCOP[

#125252,tI#TEMP
B', tafl!TEMP
.+4

~16612

~16634

005502

(?!16634

MOVB
CMPB
SEQ
HLT
SCOP[

tI#B,@#C
S,'#C

112737
12 6~7 3 7
'!J01401
1 ~ 40 ~~ 0
104'4!CIJ

125252

113'737
1267::;7
0014?1
1 kl4 0~' 0
1044,,1.1

el05524

.+4

PALX11

V003

14-F"EB .. 71

211120
VJ11132

012737
105037
023727

177777
016644
216644

~11140

rtH~1421

011142
011144

104e~:e
1~44~2

011146

125252
016644
125125

016644

011160
011166
011170
011172

012737
105137
022737
0014Qa
104000
104400

011174
011202
011206
011214
011216
011220

"12737
105137
222737
0014e1
104000
104400

125252
016645
052652

016644

011222
011226
011232
011240
011242
011244

005037
105237
022737
001401
104000
104400

016644
016645

011246
011252
011256

016644

011266
011270

2105037
105377
023727
001401
104000
104400

011272
011276
011304
011310
011316
011320
k111322

305037
112737
105437
022737
001401
104000
104400

016644

el1126

~11154

~11264

""11324
0.11332

127727
001401

f1L~34

104000

011336

10440~

~1113

011340
46

0014,' 1

01135~

1f'14 [I ..~k:}

122777

iH~0040el

016644
177400

'-HlJ0NH

;TEST UNARYS INDIRECT
#-l,til#TEMP
MOV
CI#TEMP
CLRB
(i#TEMP,#177400
CMP
,+ 4
BEQ
HLT
SCOPE
*125252, .. #TEMP
tII#TEMP
*125125,.#TEMP

MOV
COMB
CMP
BEQ
HLT
SCOPE

#125252,.#TEMP
tI#TEMP+1
#052652,.#TEMP

016644

CLR
INCB
CMP
BEQ
IoILT
SCOPE

(I'TEMP
_.TEMP+1
.400, .. #TEMP
.+4

000377

CLR
DECB
CMP
BEQ
IoILT
SCOPE

tI#TEMP
eITEMP+2
ta#TEMr:»,#377
.+4

016644

016644

016645

016645
1774~0

PAGE 1 ... 35

MOV
COMS
CMP
BEQ
HLT
SCOPE

00537~

016644

13106

016644

~05264

125252

125252

0e5246

CLR
MOVB
NEGB
CMP
BEQ
HLT
SCOPE

.+4

,+4

~#TEMP

iH, ta# TEM!'+ 1
.'TEMP+1
*177400,_'TEMP
,+04

JTEST INDIRECT ADDRESSING ~IHf INDEXING
;TEST COMPARE INSTRUCTION
1118+2,#125252
CMPa
,+4
8EQ
HLT
SCOPE
CMP8
8EQ
HLT

#125252 ... B+2
, +4

PAL.,..,., V0~3

14-FEB-71

le4~400

rl1354
011362
211364
",:11366

127777
001401
1044('iC

el137~

1177Z~

~05220

011374
011403

122700

125252

e!05?34

005232

104'e\:';~

~11402

e114e4

104'400

e:11406
011414
011422
011424

112777
126737
001401

~11426

104400

011430
011436
12111444
12111446
12111450

117777
126737
0'014 v; 1
104121'00

211452

3127~0

125252
2105172

005160
~05150

2105232
2116644

005200
016634

1'477~0

1202127
~01401
H~4000

011472

1~4400

011474
e11502
011510
r11516
011520
011522

012737
142777
122737
001401
104000
104400

177777
125252
12152525

011524
011532

012737
147777
126737
001401

177777
005056
"'05P!66

016634
005076
016634

177777

el16644

e11540

12116644
2135136
016644

104~HHlJ

~11552

104400

?11554
r11562

012737
1~5077

~05eJ60

~11566

~e5737

216644

i'115"/2

0e14~~1

;'1157 4
~'115 76

1 e4 4 k~ 0

1040~~0

MOV8
CMP8
BEQ
HLT
SCOPE

#125252,'TEMP+2
8,6t#TEMp

MOV8
CMPB

_B+2, "C+2'
8,(!II#C
,+4

BEQ

,+4

}TEST BIC INSTRUCTION INDIRECT WITH INDEXING
MOV
#-1,"0
_8+2,%0
BICB
CMPS
"0,#52525
,+4
BEQ
HLT
SCOPE

177777
005132
052525

~11470

011546
211'550

tIlIB+2,.8+2
.+4

HLT
SCOPE

1044~0

e.11456

CMPB
BEQ
HLT
SCOPE

;TEST MOVE I~STRUCTIONS
MOV8
1118+2,"0
CMPB
#125252.""
BEQ
.+4
I-ILT
SCOPE

1040~0

e11 4 62
011466

PAGE 1-36
SCOPE

~1135c

~01'401
1040~0

13:~6

MOV
8ICS
CMPS
BEQ
HLT
SCOPE

#-1, @#TE~IP
#125252,fIITEMP+2
#52525,GljTEMP

MOV
BICB
CMPB
BEQ
HLT
SCOPE

j-l,GI#C
f8+ 2 ,Gle. ~~
A+10,f#C
,+4

,+4

:TEST UNARYS INDIRECT WITH INDEXING
#-l,fI#TEMP
MOV
flTEMP+2
CLR8
~#TEMP
TST8
,+ 4
8EQ
HLT
SCOPE

PALX11

V003

14-I="E8-71

e11600
011606

2112737
1125177
122737
001401
1040e0
104400

125252
005034
052525

Qle5037
le5277
122737
01211401

016644
005010

~11612

C11620
~11622

;.:1162 4

e11626
C11632
011636
011644
1211646
011650
011652
12,11656
011662
011670
011672
011674
011676
011704
011710
011716
0117221

005~37

1rl5377
123727
001401
104000
104400
012737
105477
122737
001401

016644
004764
016644

012737
12100261
105577
022737
001401
1k14001i!!
1rd5737
001401

"10V

#125252,,#TEI-1P

CO~B

~TEMP+2

CMPS
8EQ
HLT
SCOPE

#052525,8I#TEMP
.+4

016644

CLR
INCB
CMP8
SEQ
HLT
SCOPE

177777

CLR
DECB
CMPB
BEQ
HLT
SCOPE

(I#TEMP
fIITEMP+2
,#TEMP,# .. l
.+4

MOV
NEGB
CMPB
BEQ
HL T
SCOPE

#l,(i#TEHP
lIITEMp+2
# .. l,@#TEMP
,+4

MOV
SEC
ADCS
CMP

tII-l,lII#TEMP

0210001
004736
177777

016644

177777

016644

016644

H~4~00

01172 4
011732
011734
011740
011746
011756
e11760
011762

"'16644

1044e~

1044QH!J

~11752

016644

1~4~e,0

~11722

~11750

~"'''~0e1

PAGE 1·37

13:06

004706
1"174-0-0 -13"16644

BEQ

HLT
TST8
8EQ
HLT
SCOPE

016644

1040~0

104400

~#TEMP

(lTEMP+2
#l,(i#TEMP
.+4

'T£HP+2
*177400,'#TEMP
,+4
.#TEMP
.+4

tII1,(i#TEMP

MOV
SEC
OEC8
TST

~#TEMP

~C1401

SEQ

.+~

~'12~1~

H'!40(;10
1 k'J 4 4 e' k.~

j.jLT
SCOPE

~~12?12

a127 J

177772

e12l16

1(27C 7
2t'14 1

~~16622

011764
e11772
e11774
0120~~

'~12 '-' ~ 4
012le6

012737
Ql00261
lk'J5377
Qle5737

0000"'1

016644

~04646

016644

;TES'" :Jr
~'12?

24
r: 12:';2 b
V12?.3?

1~4?

0

H:'44

~

I.ITEMP+2

CC~8INED INDEXING
# ... 6,%0

AND INDIRECT

~OV

125252

CMPg

~A(QI),#125252

8_EO

• +4

lolL;

_ S(,Dor

PAL-r. V003

14-r:EB-71

012032
012036
012044

0121700

~12eJ46

104eJv~0

V127'50

1~44i'~

012052
012056
012062
0122170
012072
012074

012700

177772

0127~1

e000e.2

12~071

016622

12277~

177772
125?52

~16622

"'01:4~1

016622

001471
104000
1~4400

012700

000006
177777
016622
125252

004534
004526
004520

2112700
012737
142770
123727
001401
104000
104400

177772
177777
125252
016634

2116634
016644
000125

012166
012172
-e12!/b
01221tl0
012202

2112700
023067
00t401
11tl4001tl
104400

016614
211tl4414

012204
012210
012214
012216
012220

2112700
025067
001401
112141210121
1044210

016616
004:376

012222
012226
012232
0122:34
012?'36

(2112700
125067

e16616
004360

0122176
012102
012110
'012116
012124
012126
012130

147067
122767
0ftH401
104000
104400

2112132
012136
012144
012152
012160
012162
012164

~12767

13106

PAGE 1-38
MOV
CMP8
8EQ
HLT
SCOPE:

#-6,%0

MOV
MOV
CMP8
8EQ
HLT
SCOPE

,;-6,%0
#+2,%1

MOV
MOV
BICB
CMP8
BEQ
HLT
SCOPE

MOV
CMP
8EQ
I1LT
SCOPE
MOV
CMP8
BEQ
HLT
SCOPE

00i4~1

012700

~16640

((112737

177777

016634

716634

177400

,+4

~A(0),~A(1)

,+4

;TEST BIC INSTRUCTION
#+6,%21
MOV
#-l,TEMP
MOV
GtA(0),TEMiP
8IC8
#125252, 'T'EMP
CMPB
,.4
BEQ
HLT
SCOPE

MOV
CMP
BEQ
HLT
SCOPE

104000
104400

#125252,~A(0)

MOV
MOV
CLR8
CMP

012240
012244
012252

105050

"~12?'54

12J237~7

V!12262

00141'1

SEQ

vJ12?64

H~4~h',~

HL:

#-6,%0
# ... l,.,#C

*125252, (!!!TEMP (21)
.*C, #21001.25
•• 4

#8+2,"0
,(0)+,8
,+4

tt8+4,"0

.- (0) ,8
.+4

j8·4,X0
,8

~- (e)

.+4

#C+4,"0
#-l,@#C
(it-(0)

~#C,#17740el

, +4

JADOII'ESS

or

ADDRESS OF" 8

PALX11

Ve03

012266

1~4400

e12270

012737
012700
0127;H

~12276
v123~2
e123~6

141~)1

14-F"EB-71

177777
177772
177772
016622
177525

r.12322
012324
012326
e.1233el

012700

052525

~12334

004767
000405
121627
001401
104000
000207
104400

000002

012340
e12342

012346
~12350

012352
012354
012356
012360
012362
012366
e12370

012372
e12374

012376
e124r210
012404
0124[2)6
e12410

rl!12412
012 4 14
012416
e1242r21
012422
e12424

00[2)257
004717
121627
001401
104000
005726
104400
000257
"'04767
1004[2)1
104000
001401
1040[2)0
H'J2401
104000
103401
104 Ii"?) 0

C!l16634
016644
CH6634

TJSR3:

012362

CCC
JSR
BMI
HlT
BEQ
HlT
BVS

004052

1044e0

000257
012767

123456

~124412l

H~6e167

~042~1

z12444

lrt3401

7012 4 46

le4~H30
H~2401

('12 52

104000
0227b7

;'12~62

"e14r1

;::'12464
:"12466

H~4~'~'0

1 ~ 4 4 ~~ 0

,,7, TJSR2
TJSR3
_,,6, #T JSFU

004204

,,7

ee 4 162

JINSTRUCTION UNDER TEST
JTEST THE STACK
.PC Or JSR 010 NOT GO TO STACK
JREPOSITION THE STACK

}ClEAR CONOyTION CODES
,+4

,+4
,+4

,+4
BCS
HLT
SCOPE
JTEST ROTATE ODD BYTE
SCOPE
CCC
#123456.TEMP
MOV
TEMP+1
RORB
• +4
8CS
HlT
.+4
BVS
CMP
8EQ
HLT
SCOPE

'INCORRECT PC ON STACK
JRETURN TO IMST AFTER JSR

"7,SuBR6

~lT

?51456

,PLACE PC ON STACK
IRETURN HERE ON RTS "19
:CHECK rOR CORRECT PC ON STACK

,+4

~lT

e12426

;"12454

JSR
BR
CMPB
BEQ
HLT
RTS
SCOPE

CCC
JSR
,,7,(1"7
CMPB
'''6,#TJSR3+6
,+4
BEQ
HlT
(6) +
TST
SCOPE
:TEST NESTED SUBROUTINES

104.4~0

;:11245~
4

#-l,@#C
MOV
#.-6, %0
MOV
#-6,%1
MOV
(lA(0) ,&!'TEMP(1)
BICB
#177525,II#C
CMP
,+4
BEQ
HlT
SCOPE
:TEST THAT R0 IS NOT DESTROYED BY rALSE SELECTION
MOV
JTHIS IS CHECK lATER IN PROGRAM
#52525,"0
:TEST JSR INSTRUCTION
TJSR1:
TJSR2:

012340

~1243e

i'12432

PAGE 1-39
SCOPE

el22737
001401
le4000
104400

e1231 4

13:"6

JJSR OR RTS FAILED
'JSR OR RTS F'AIlEO
JJSR OR RTS F'AIlED
JJSR OR RTS F'AIlED

.CLEAR "C"
JROTATE ODD BYTE
JC

NOT SET

JV

NOT SET

#051456,TE~P

.+4
.ROTATE F"AILED

PAL~ V0~3
e12470
~12472

i:125Z2
l1250 4
l125e6
~12'H~

212512
012514
012522
01252 4
e12526

0e0277
012767
le6267
1~2e21

le4000

000277
012767
:1.06167
103401
10400k'
102401
104000
022767
001401
104000
104400

012630
e12632
012640
012644
e12646

000257
012767
106267
Ul3401

~12650

t02001

~12662
~12664

e12666
e12670
e1267?
'" 12 700

004104

e041~1

12'47056

123456
004041

047456

177777

00412162

004044

00412122

004004

e~40"1

e'03764

177777

~'12710

102~r.l

1-40~

}SET C
#123456,1'E~P

TEMP+1
,+4
• +4

JC

NOT SET

JV

NOT CLEARED

#151456,TEMP
,+4
,ROTATE F'AILED

MOV
ROlB
BCS
HlT
BVS
HlT
CMP
BEQ
HLT
SCOPE
SCC
MOV
ROL8
BCS
HlT
BVS
HlT
CMP
BEQ
HLT
SCOPE
CCC
MOV
ASRB
Bes
Bve
HlT
CMP
BEQ
HLT
SCOPE

#123456. 'f,[MP
TEMP+l
,+4
.... 4

Ie NOT SET
JV

NOT SET

• 0 4 7 1215 6 , 'f' EMP
,+4

.ROTATE BYTE F'IQLED
.SET C
#123456.l'EMP
TEMP+l
.+4
• C NOT SET
.+4
IV

NOT SET

#047456, 'f'EMP
.+4
.ROTATE 000 BYTE F'AIlED
.CLEAR C
#-l,TEMP
TEMP+l
,+4

,+4

• C NOT SET
JV

NOT CLEARED

TEMP,#-l
• +4
JSHIF'T F'AILED

sce

0'0~277

r12706

MOV
ROR8
BCS
HLT
BVC
HLT
CMP
BEQ
HLT
SCOPE

~LT

1~4"00

026727
12!01401
1040k:10
1044'10

PAGE

eee
123456

104"~H"

012767
106307
103401
104000

?127e'4

004122

H~441t0

012570
012572
012600
012604
012606
0126H'
012612
012614
012622
e12624
012626

012652
012654

151456

104~HH'J

012566

~12562
~12564

~H2!4144

H~4e.f\e

022767
001401

13f06

sec
123456
704141

1~34Z1

000257
012767
1e6167
103401
1.04000
102401
104000
022767
001401
10401!:l0
104400

012530
e:12532
e12540
012544
012546
e12550
012552
e12554

14-r:E8-71

177777

"'03741

003744

MOV
ASL8
BCS
HLT
8VC

#-l,TEMP
TEMP+1
,+4
,+4

JC

NOT SET

PALX11

V003

012712

104000
026727
001401

~'12714

012722
\1:12724

V12726

PAGE 1 ... 41
QHI,3724

177377

H~4000

104400

I-lLT
CMP
BEQ
HLT
SCOPE

IV NOT CLEARED

TEMP,.177377
,+4

JSHIFT BYTE FAILED

JTEST COMBINATION OF N, C AND V
,MACR
TNCV
BPL
,+12
BCC
,+20
BVC
,+3""
HLT
8R

BCC
BVS
HLT

.+24
,+16
,+20

Jl=l
Jl=l, C=l
jl=C, BUT V=i

,l=0
ii!=0, C=1
Ii! NOT EQUAL C, V=i

BR
BVS

Ji!=i, C=0
ii! NOT EQUAL C, V-1

~LT

BR

ji!=0, C=rlJ
1i!=C, BUT V=1

BVC

HLT
SCOPE

012730

005037

012734

005000
005001
020001
001401
104000
020027
rll01403
005200
005201
000767
104400

e12736
fl12740
"'12742
el12744
012746
012752
012754
012756
012760
012762

.ENDM
CLR
'_ICOUNT
JNO ITERATION
JTEST ALL COMBINATIONS or NUMBERS WITH COMPARE INSTRUCTION
COMPAR: CLR
~0
JINIT X0
CLR
~1
JINIT %1
CMP
%0,%1
JARE THE EQUAL
CMP1:
BEQ
,+4
JR0 AND RiOlO NOT COMPARE
~L T
CMP
JAT UPPER LIMIT
"0,#-1
BEQ
JYES EXIT
CMP2
IINCREMENT TO NEXT NUMBER
INC
~0
INC
"1
CMF'l
BR
SCOPE
CMP2:

177777

;TEST ROTATING ALL NUMBEAS
SCOPE
#-1 d~EFF
MOV
REFF
TSROT:
INC
%7,ROTALL
JSR
CMP
R.EFF,#-l
BNE
TSROT
TSRT2A
8R

012764
012766
012774

104400

e13~00

004767

e02l((!12

V13710 4
e.13012

026727

000116

~~13~14

000446

r13~16

(' 13 e 44

016767
006067
006067
006067
006167
00616/

e00060

ROR
ROR
ROL
ROL

.:.' 13 ;;'5;;

~06161

e0~054

ROL

?13024
(,13e30

?1303 4
vj13~4~i'I

012767

177777

005267

~01ZJ126

001370

177777

e0~104

ROTALL: MOV

ee0120

ROR

e0~074

000070
~HH'I064

TNCV

REFF,TEST
TEST
TEST
TEST

TE.ST
TEST
TEST

JINITIALIi!E BASE NUMBER
.INCREMENT NUMBER
JGO TO COMPARE ROUTINE
JTEST ALL VALUES
INO TEST THEM ALL
,WE ARE OONE

PAL~ V003
013~:...-,

100004

013056

1~30e7

'~13V'60

14-FEB-.71

1:3 J.~,6

Pl\~E 1-4,2

8PL
BCC
Bve
!-ILT
BR

~113064

102013
104000
0kH'411

f~13?J66

1030~6

Bce

013070

1024(:,7
104000
000405
102404
104000
000402
102001
104000
104400
026767
001401
104000
ItHll0207
000000
000000

BVS
HLT
BR
BVS
HLT
BR
BVC
HL.T
SCOPE
CMP
BEQ
HLT
RTS
0

013;;:'62

013~72

013074
013076
~13100

013102
013104
013106
013110
~'13112
~'13120

013122
013124
013126
013130

000012

o 12HHH' 6

REF"F:
TEST:

013126
013132
013140
013144
013150
013154
013162
013164
013166
013174
013200
~'13204

013210
013214
"13220
013224
~13226
~13230
~13232
~13234

013236
'~1324 0
013242
013244
'H3246
013250
CH3252
'113254
l~13256

V'13260
r13~62

12112767
005267
004767
004767
2122767
2101366
000505
016767
106067
10612167
1136067
106167
106167
10~167

177777
177762
000016
2100122
177777

177766

177734
177730
177724
177720
177714
177710
177704

177734

177744

Jt=~

;t

,+14
,+12
.+6
,+4

C=l
NOT EQUAL C, V=l

J~=0,

J t =1, C:;:0
i i! NOT EOUAL. C, V=l
Jt=0, C=0
Jt=C, BUT V=l

TEST, REn.+4
JINITIAL NOT EQUAL TO VINAL
%7

g)

REF::REFF
;TEST ROTATING BYTE EVEN/ODD, ALL NUMBERS
# .. l,REFF
TSRT2A: MOV
REf"F"
TSROT2: INC
JSR
,,',RoTBE
JSR
"7,ROTBO
# ... l,REFF
CMP
TSROT2
BNE
ROTEN1
8R
REFF,TEST
ROTS£:: MOV
JROTATE BYTE EVEN
RORE!
TEST
RORE!
TEST
TEST
RORe
TEST
ROLE!
TEST
ROLE!
TEST
ROLE!

1044e~

177636

,+12
,'+221
.... 30

BPL
BCC
BVC
!-ILT
BR
BCC
BVS
HLT
BR
VS
a
HL f

.+24
.+16
,+20

SR

.+6

Bve

1040'~Z

177642

,+24
,+16
.+20

Ji!=l
J i! =1, C=l
Jt=C, BUT V=l

TNCV

100004
103007
102013
104000
000411
103006
102407
10il000
000405
102404
104000
0004r2
10 2 0l~ 1
026767

.... 12
.+20
,+30

HLT
SCOPE
CMP

Ji!=t
it=1,
J i!=C,

.+14
.+ 1?:
,+4
TEST,RU'"F

C=l
BUT V=l

it=0
Ji!=f;. C=l
J l NOT EQUAL C, V=l
C=21
NOT EOUAL

~i!=1,

J i!

1i!=0, :::~
J t=C. BUT V=l

e

I

V=l

PALX11

V003

013270
013272
013274
013276
013302
013306
013312
013316
013322

001401
104000
2100207
106067
106067
106067
106167
106167
106167

013326
013330
013332
013334
013336
013340
013342
013344
013346
013350
013352.
013354
013356
013360
013362
013364
013372
013374
013376
013400

100004
103007
102013
104000
01iH'J411
103006
102407
104000
2100405
102404
104000
000402
102001
10400121
104400
11126767
001401
HlJ400i2J
0021207
104400

013402
013406
013414
013420
013424
013432
013434
013436
013440
013446
013454
013462
013470
013472
013474
013476
013500
013502
e135v.l4
013510

,,11667
012767
005267
004767
022767
001370
000422
104400
016767
066767
166767
026767
001401
104000

:1.4-F'EB-7l

177627
177623
177617
177613
177607
177603

1775421

000072
01iHH!101
177506
0kHHH4
177777

177462
0"H~026

000020
177440

104411'0

000207

171534

177512
177474

177462
177454
177446
177440

13106

PAGE 1-43

BEQ
HLT
RTS
RCTeo: RORe
RORB
RORB
ROLB
ROLB
ROLB
TNCV
BPL
BCC
BVC
HLT
8R
BCC
BVS
HLT
SR
BVS
IoILT
BR
BVC
HLT
SCOPE
CMP
BEQ
IoILT
RTS
ROTENls SCOPE

,+4
"7
TEST+1
TEST+1
TEST+1
TEST+1
TEST+1
TEST+1

JROTATE BYTE 000

,+12
,+2111
,+321

.l=l
J l=l,

C=l
il=C, BUT V=l

,+24
,+16
,+2111

'l=21
'lee, C-l
il NOT EQUAL

,+14
,+12

'!=1,

c=e

'l·e,

C=0

.l NOT EQUAL C, V=l

,+6
,+4

.!=C, BUT V=l

TEST,REF'F"
,+4

'"

IADD AND SUBTRACT ALL NUMBERS AGAINST ·F'IXEO NUMBERS
IA+B=C, C.. A=B, BF' SHOULD EQUAL Bl
TST AR I I MOV
.. "6,NUMA
MOV
*l,REF'
REF'
ARITSTt INC
,,7,ADSU8
JSR
CMP
*-l,REF"F'
ARITST
BNE
ARIENO
SR
SCOPE
REF',TEST
AOSUB: MOV
NUMA,TEST
AOD
NUMA,TEST
SUB
REF',TEST
CMP
,+4
BEQ
HLT
SCOPE
RTS
~
NUMA:
ARIEND: SCOPE

'"

000000

104400
005067

ee3134

005e67

e~3134

JTEST COMPLIMENTING ALL
TEMP
CLR
TEMP+4
CLR

C, V=l

~UMBERS

IBASE DATA
'BASE REF'ERENCE

PAL"",

V0 i03

14-I="EB-71

~3:06

PAGE 1-44

l13: _
l13520
Z13524
:'13532

0e:5167
00,5367
02:6767
00 1401
112,4 :tl0i1
o e'51 b i

;'.03124

TeaM:

:Z3H~2

COM
DEC
CMP
SEQ
HLT
COM

~~"5261

.·e3~76

INC

~13534

;'13536
;'13542

~'03124

0123114

003116

1

113545

e~1362

BNE

':13550

1044e0

SCO~)E

213552
013556
i~ 13562
:?13566
213572
2:.3600

00'5067
005067

;~13602

213604
~13610

013614
l13616
0136221
;c13624
213630
e13634
213640
213646
e13650
013652
013656
013662
e13664
''113666
013672
013700
013702
~'13704
~~13706
~n371~

~'13712
~'13714

013722
~~13730

v~13732
~13734

Q:13742
~'13750
~:L3756

~'13

76 4

~:13772

10~167

1Z105367
126767
e01401
104000
105167
105267
001362
1044012

~03066
~03~66

e03056
003056
e03046

t1'Jk:'!3034
02)3030

005067
005067
105167
2l0p367

0032120
003020
0032111

12~767

02!3QJrll

0211401
104000
10f5167
105267

003050

~0~eH'J

003002

0212767
002763

00~362

104400
0215"'67
126767

002752
002746

0~2745

00~401

1042100
002001
104000
00:3401
104000
062767
02?767
001.360
104400
012737
052737
042737
ra52737
0 4 2737
052737

it004~1

177777
~0400e1
l~H'.3421

"100340
i'0fZ!3r0
"003~0

?

121 k.~ 2 4 0

002722
002714
016420
177776
177776
177776
177776
177776

TEMP
TEMP+4
TEMP,TEMP+4
,+4
TEMP
TEMP
TCOM

;TE5T COMB (EVEN BYTE)
CLR
TEMP
TEMP+4
CLR
TEMP
TCOM2: COMB
TEMP+4
DEC
TEMP,TEMP+4
CMPB
.+4
BEQ
HLT
CaMS
TEMP
INC8
TEMP
TCOM2
BNE
SCOPE
;TEST COMB (ODD
CLR
CLR
TCOM3: COMEI
DEC
CMP9
BEQ
HLT
COM8
INCa
BNE
SCOPE

BYTE)
TEMP
TEMP+4
TEMP+1
TEMP+4
TEMP+1,TEMP+4

JCOMPLIME:NT DATA
:DECREMENT REF"ERENC'[
;COMPARE
;TE5T
;COMPLIMENT OR DECRE~E'IlT F"AILED
;INCREMENT AND TEST I="CR DONE
JNOT FINISHEO GO LOOP

;BASE DATA
:REf"ERENCE DATA
JCOMPARE
JCOMPLIM£NT OR INCREMENT BYTE FAIlEO

IBASE DATA
JREFERENCE DATA
JODD BYTE

.+4

;COMPLIMENT BYTE FAILED
TEMP+1
TEMP+1
TCOM3

ITEST COMPARE ALL VALUE EVEN BYTE WITH 000
TEMP
CLR
IBASE VALUE
TEMP,TEMP+1
J COMPARE
T5CQMS: CMPEI
,+4
BEQ
HLT
,COMPARE FAILED
,+4
BGE
HLT
J V IS NOT = TO N
• +4
BlE
HLT
IV IS SET
#401,TE.MP
AOD
#-1,TEMP
CMP
TSCOMB
BNE
SCOPE
MOV
#40210,@#ICOUNT
#340, GUSTATUS
BIS
#340,4i#S'fATUS
SIC
#300,@#STATUS
BIS
#300,@#STATUS
BIC
#240, GlItiSTATUS
SIS

PALX11

V003

e1400~

2142737
2152737
2142737
2152737
12142737
12152737

~i4~1216

014014
12'14022
014030
014036
"'14044
014052
01406121
01412166

14-F"E8-71
~e0240

000200
00020121
~00140

I'0e140
~1001021

~42737

tHH31Q10

052737
12142737

'~00040
~eJ0040

13"'J6

PAGE 1-45
SIC
BIS
BIC
8IS
SIC
BIS
SIC

177776
177776
177776
177776
177776
177776
177776
177776
177776

81S

BIC
SCOPE

1'~4400

.24e,'#STATUS
#200,@#STATUS
*2G'Je,~·STATUS
#140,~#STATUS

#140,'.STATUS
tHe0, '.ST ATUS
#1G'J0,@#STATUS
#40dt#STATUS
#4121,tI#STATUS

;TEST THAT A WAIT INSTRUCTION IS TERMINATED BY A
;TRACE TRAP
014070
014076
01411210
01411212
014104
014106
014110
014112

~H~0020

177776

12112737" 2:121001121

016420

032737
1211211404
1211210001
021012101
01210001
0210001

WAIT3:

H~440eJ

'"
014120
014126
014130
014132
014134
014136
014140
014142
01415121
014156
014162
014164
014166
01417121
014172
014176
01421210
014202
014204
014206
014210
014214
014220
014224

123727
001404
1210121001
12102112101
Z0210el

0211224

000377

12100001
104400
2112737
2112767
02121367
1fZl0001
lfZl4000

01642121

000200

176752

176746

~HH4eJ1

10412100
0210367
10e4e1
104000

176732

12101001
104000
1044e0
'H~5037

'H6420

0C5l6i'

17671121
1'76702

12105067
000367

1767~0

e'14230

026767

176674

~14236

~e14~1

e:14240

1(2'4020

17667121

BIT
SEQ
WAIT
WAIT
WAIT
WAIT
SCOPE
MOV

#2e,ft.STATUS
WAIT3

JTEST OF TRACE BIT
'BRANCH iF NOT rOUND
,TRACE S~OULO PASS US
JTHROUGH THE WAIT INSTRUCTION

.10 , f l ' I COUNT

;TEST TO SEE IF 1/0 DEVICES WERE SELECTED
.,REG1,.377
,SELECTED DEVICES STORED IN ~EG1
CMPB
BEQ
WAIT4
JB~ANCH Ir NO DEVICES SELECTED
WAIT
'INTERRUPTS WILL OCCUR
WAIT
IIr OEVICES ARE SELECTED
WAIT
WAIT
WAIT4: SCOPE
MOV
,TEST SWAB
MOV
SWAB
BPL
HLT
BEQ
HLT
SWAB
BMI
HLT
BNE
HLT
SCOPE
CLR

."2"0,TE5T
TEST
•• 4
,.4

TEST
.+4
.+4

.. #ICOUNT

;TE51 ALL CO~8INATIONS OF SWAB
CLR
TEST
CLR
REF
SWABA: SWAB
TEST
CMf'
TEST.REF
BE Q
HLT

JNUMBER UNDER TEST
.REFERENCE NUMBER
'OPE~ATION UNDER TEST
,TEST SWAB INSTRUCTION

... 4

,SWAB F"AIlED

::~
1114246
i21 4 252
014256
21 4 26el

e14262

~~:~6

P4GE l-,\~

V~1~3

14-FE8-71

0~1~36 7

176662
176654
176653

SW413
INC
INCI3
8~E

TEST+1
SWABA

~QJ4000

SCOPE
MOV

#40r21eJ,tiD#ICOUNT

0~~267

i~§267

00:t,362
1014400
11'12737

016420

TEST
~EF

ij£FERENC£ NUMBER
I NO TEST NUMBER
JLOOjl) TILL !:lONE
'INC~EMENT

I

NOP=240
ce=177776

000240
177776

;MACRO FOR TESTING CONDYTION CODES
.MACR
8MI
HLT
8VS
HLT
BCS
HLT
SEQ
Io4LT
SCOPE
.ENOM

TSCC

.MACR
BPL
HLT
Bve
HLT
Bce
HLT
BNE
HLT
SCOPE
,ENOM

Tcec

,+4
,+4

'N IS NOT SET
J V IS NOT SET

,+4
,+4

Je

IS NOT SET

Jl

IS NOT SET

.+4

$N IS NOT CLEAREO
.... 4
JV

IS NOT CLEARED

,+4
f

,+4

0 IS NOT CLEAREO

Il IS NOT CLEARED

,TEST MOV
014270

012737

014276
014300
014302
tj14304
e14306
014310
e14312
014314
014316

100401
104000
102401
104000
103'401
10401210
00f401
104:000
104400

e14320

012737

014326

10001211
1040('121
102001

V'14330

014332

000017

00e000

177776

177776

CCT1:

MOV
TSCC
8MI
HLT
8VS
HLT
BCS
HLT
SEQ
HLT
seOPE

#17,GD#CC

MOV

#0,~#CC

BPL
HLT

,+4

,+4

iN IS NOT SET
.+4
I

V IS NOT Sri

I

C IS NOT SET

.+4

.+4

: i! IS NOT SET

TeGc

Bve

,+4

IN IS NOT CLEt,Rf:.LJ

PAL Xli

V131213

014334
014336
01434121
e14344
e:14346

113412100
113"312101
11214"-10121
012111211211
104121130
1044010

01435121
O14352

0013257
"-162737

01436121
O14362
eJ14364
014366
0143721
014372
014374
014376
e!14400

112121401
1121413121121
11212401
113413eJ0
103401
11340eJ0
121"-11401
121413021
121441313

0144"-12
0144"-14

0013277
162737

014412
12114414
014416
014420
014422
e14424
;;,14426
014430
014432

112102101
1214211210
10213"-11
12141210121
11213001
11214121021
121211001
11214121013
HH4013

014434
el14436

12113"-1257
162737

el14444
014446
014450
014452
014454
014456
014460
el14462
014464

100401

014466
01447eJ

01313277
042737

014476

10214211
10 41cHH~
102401
10400e
1133401
U'4000

~14342

e145~r2l

0145212
014504
0145136
014510

1~I-FE8-71

131136

PAGE 1 .. 41
IoILT
BCC
lolL T
8NE
HLT
SCOPE

JV

IS NOT CLEARED

JC

IS NOT CLEARED

J i!

IS NOT CU:ARED

,+4
,+4

cce
0"02117

eJ~"-I1317

177776

177776

ADD
TSCC
BMI
HLT
BVS
IoILT
BCS
HLT
BEQ
HLT
SCOPE
SCC
SUB

Tcce

BPL
HLT
BVC
HLT
BCC
HLT
BNE
HLT
SCOPE
1'17761

177776

H~40021

11324"-11
104"-1"-10
H'3401
H'J 4 "-1"-10
121014131
104"-100
10440el

CCC
SUB
TSCC
8MI
HLT
8VS
HLT
BCS
HLT
SEQ

#17 da#CC
,+4
; N IS NOT SET
,+4
,+4
,+4

177776

SCC
BIC
TSCC
BMI
HLT
BVS
HLT
BCS
HLT

IS NOT SET

JC

IS NOT SET

J! IS NOT SET

#17,..#CC
,+4

,+4
,+4
,+4

IN IS NOT CLEAREO

IV IS NOT CLEARED
IC IS NOT CLEAREO
Ii! IS NOT CLEARED

'-17,'#CC
,+4
IN IS NOT SET
.... 4

,+4
,+4

HLT
SCOPE
01aeJ000

JV

IV IS NOT SET
JC

IS NOT SET

J i!

IS NOT SET

JN

IS NOT SET

JV

IS NOT SET

JC

IS NOT SET

'lC!,li#CC
,+4

.+4
.+4

PAl~ V,,'Wl'
e'1451~

~"lt40l

'114514
~14516

104"00'0
104"4·00

e.14520

12100'277

014522

~4t3737

e14530

100001

014532
014534
014536
014540
014542
014544
014546
014550

H~4000

014574
014576
014600
014602

100401
104 0013
102401
1214:2100
103401
11340021
,,01'401
104'000
104400

014604
014606

"},00'277
052737

014614
014616
014620
014622
014624
014626
014630
014632
014634

U'J0:401
1214:0013
102401
104000
103'401
104000
0131:401
104'13013
104:4021

014636
014640

0210 i277
0215037

'-"14644
014646
014650
e1465a
014654

1~Hl'2101
104'rlH~0

~14660

177776

10~000

014562
014564
014566
014570

e14656

177757

0211001
1214000
104400
QJ~"~257

052737

'-HH~017

177776

104;000 ,
103,001
104;000
00HH!1

~314662

104;~00

~14664

10440'"

PAG€

sec
BIC
Tecc
BPL
HLT
BVe
HLT
BCC
HLT
BNE
HLT
SCOPE
cce
8IS
TSCC

BMI
HL.T
8VS
HLT
BCS
HLT
8EQ
HLT
SCOPE

1

1212,0~1

13' 0'6

BEQ
HLI
SCOPE

102001
1134012'0
103ftHH

014552
014554

01~572

144-F'EB-1f

12100000

177776

sec
8IS
TSCC
BMI
HI..T
BVS
Io4I.. T
BCS
HLT

SEQ
HLT
SCOPE

177776

sce
CLR
lCCe
BPL
HLT
BVC
HLT
BCC
HLT
BNE
HLT
SCOPE:

:t:"4'~

..... 4·

ti.' 1 7 7 7 5 7 ,

J2

IS NOT s;£r

IN

IS NOT CLEARED

JV

IS NOT CLEARED

,. # CC

.+4

,+'"
• +4

I C IS

NOT CLEARED

.... 4
I~

IS NOT CLEARED

IN

IS NOT SET

JV

IS NOT SET

#17,tt#CC

.......
.... 4
.... 4
IC IS NOT SET
.+4
Jl

IS NOT SET

IN

IS NOT SET

JV

IS NOT SET

JC

IS NOT SET

Jl

IS NOT SET

IN

IS NOT CLEARED

#0,lt#CC
, ... 4
.+4
.+4
,+4

~#CC

,+4
.+4
J

V IS NOT CLEARED

.+4
JC

IS NOT CLEARED

J i!

IS NOT CLEARED

.+4

PALXll

V~~3

/14666

210'0257
2100261
2105337

7:467~

1':4672

?1 4 676

z

;':.4 7 2

:'147e2
l147e4
2'14706

104~00

2101001
104000

l1472Z
e14722
e14724

2100257
000261
005637

e1473~

100001
104000
102001
104000
103001
104000
001001
104000
104400
2112737
2113767
2126727
001401
104000
005037
104400
005737
100003
2152737

~14736

e14740
e14742
l14744

e1 4 746
214750
r1 4 752
::'14760
e1 4 766
e14774
014776
e15200

e15e04
215226
215e12
e15e14

2112767
000261
105567
(?15~32
e15736 ' 103401
715042 10 4 000
022767
~'15042
;.-150:,e JIZI1401
11505? 104000
~15e54

H~4400

(15~56

~00402
~e0167

,'152'6 ~

..

"-, 1 ;'6 4

177776

10440~

(,15e22
015232

177776

177357
177776
001652
'

177776
001656
000357

'

177776
015542
000020

177776

177777

001614

e01607

000377

001574

000.362

ll44~~0

163172

~e5071

• J.

:'66
,,- -:.?

~127l1

12~252

;'1

•.J..k',n (.....

~12777

177760

,

PAGE 1-49

cce

1030~1

e147H~

13=06

SEC
DEC
TCCC
BPL
HLT
8VC
HLT
BCC
"'LT
BNE
HLT
SCOPE

1000e1
104000
1020el
HH000

214712
214714
e14716

214732
2,14734

14-F'EB-71

163166
163174

CCC
SEC,
SSC
TCCC
BPL
HLT
BVC
HLT
BCC
IoILT
BNE
HLT
SCOPE
MOV
MOV
CMP
8EQ
HLT
CLR
SCOPE
TST
8PL
8IS

~#CC

,+4
IN IS NOT CLEARED

.+4
,.4

JV

IS NOT CLEARED

; C IS NOT CLEARED
,+4

; i! IS NOT CLEARED

I!b#CC
,+4

•• 4
,+4

IN IS NOT CLEARED
J V IS
JC

NOT CLEARED

IS NOT CLEARED

,+4

Ii! IS NOT CLEARED
#177357,'#STATUS
Ci.STATUS,TEMP
TEMP,#357
,+4

l!t#STATUS
I!b#TRP8
,+10
#20,(iI#STATUS

#-l,TEMP
MOV
SEC
TEMP+1
ADC8
.+4
8CS
!-ILT
ti377,TE~P
CMP
.+4
SEQ
HLT
SCOPE
.+6
EAESRT: SR
JMP
ENDEAE
;TEST LEF"T SHIFT
SCOPE
(ilMQ
CLR
#125252,~AC
MOV
MOV
#-16. , @LSH

JT

BIT F'LAG

.SET THE T BIT

JNOP IF" NO EAE
ITEST
JLOAC
;LOAD
'LOAD

OF" LOGICAL SHIF"T
MQ WITH 0
AC WIT~ 125252
SHIF'T COUNT (LSH) wyT!-I -16

P'At.f\

V003

14-rEB-71

i0151~b

0~i5777

163154

1ST

~AC

015112
015114
1015116
015124
015126
17151.3;;'
1015L3b
015140

~014k11

BEQ

.+4

le:4000

WLT

015142
1~15144

~2:2'!71

125252

13:06

163140

0e14~1

1 e:4 0 e 12)
122777
001401
le i4000
104400
12105077
012777
0f2777
005777
10:0401
10'4000
005777
rlJ01412l1

163114
177777
000020
163076

12'2777
210'1401
10'4000

015216
015220
015226
015234
0152421
.015246
015250
015252
015260
015262
015264
015272
015274

U3A400
01'2777
012777
0e;5077
022777
00:1401
104000
02:2777
001401
10'4000
12~2 777
00·1401
1(2)40(2)0

#125252,~MO

•+4

015276
015300
015306
015314
1015322
015324

104400
2112777
012777
022777

tZ15~~26

00:5777

162732
NH~300

015344

104000
122777
001401

~15346

015350

163110
163120

163064

H~l40012l

000110

CMP!3
BEQ
HLT

1.63134

163060

#20,(tilSRE
• +4

;TEST RIGHT SHIFT
SCOPE
~MQ
CLR
#-1 diAC
MOV
MOV
#16.,'AS~
@AC
TST
,+4
8MI
HLT
GH1Q
TST
,+4
BEQ
HLT
CMP(3
#110,flSRE
BEQ
• +4
HLT
:TE5T

y)15336

C~P

BEQ
~LT

e00~20

1015150
1015156
015164
015170
015172
015174
015200
015202
015204
015212
015214

015332
v115334

PAGE 1""5,2
.COMPARE AC ,\II I T~
;CO "'0 HLT IF BAD

"

.COMPARE MQ wITH 1252~;2
,GO TO ~LT r F BAD
JCOMPARE SR WITH 2
.5KIP HLT IF" GOOD
JHALT ON ERROR CLEFT SHIF"T)
,TEST OF' ARITHMETIC SHIFT
.LOAC MQ WIT~ 0
JLOAD AC WITIoI -1
JLOAD SHIFT COUNT (ASH) WITH 16.
J COMP'ARE AC wITH 1000el0
• SK IP HLT IF' GOOD
JI-lALT ON ERROR
JCOMPARE MQ WITH 21
;SKIP HLT IF' GOOD
:HALT ON ERROR
.COMPARE SR WITH 1(2)
JSKIP HLT IF" GOOD
.HAlT ON ERROR (RIGIolT SHIrT)

NORMALl~E

;TEST OF' NORMALli!E
JlOAO MQ WITH 125252
)LOAD AC WITH 1700(2)0
JSTART NORMALI~E
.COMPARE AC WITH 1000~5
.SKIP HLT IF" GOOD
• HALT ON ERROR
:COMPARE MQ WITH 52520
JSKIP HlT IF' GOOO
:HALT ON ERROR
,COMPARE SC WITH 3
;SKIP HLT IF GOOD
• HALT ON ERROR (NORMALIrE)

1e4~~0k."l

SCOPE
#125252,t.aMO
MOV
MOV
#170000,'AC
{iNOR
CLR
CMP
#101210e15,taAC
,+4
BEQ
HLT
#52520,rIIMQ
CMP
,+4
BEQ
HLT
#3,~SC
eMPB
8E'Q '
• +4
I-jLT
;TEST MUl T !'PL Y
SCOPE
#125252,(JIMQ
MOV
#40000,CfMUL
MOV
CMP
#165252,@AC
,+4
BEQ
HLT
@;MQ
TST
, ... 4
8MI
HLT
CMPg
~312!0,~SRE
,+4
BEQ
HLT

JTEST OF MULTIPLY
ILOAD MQ WliH 1252~;:
JLOAD MUL WY T f-: 4 17)0f2J 0
;COMPARE AC IoJ I "1 H 1652
JSKIP IF GOOD
JHALT ON ERROR
;COMPARE MQ wITH HHH'H~
;SKIP ~LT IF GOOD
JHALT ON ERROR
,COMPARE SR HTTI-! 30i?
ISKIP HLT IF (('00
IHALT ON ERR0~1 (MULTyPLY)

H~'4400

;TEST DIVIDE
SCOPE

;TEST OF DIVIDE

125252
17002'0
1630421

163036
163032

HHH~05

1631320

052520

163004

000003

162776

125252
040000
165252

162756
162760
162744

12!~1401
H~4000

H~0401

162726

PAL Xli

VfZe!3

14-F'EB-71

PAGE 1-51

?1535::'

012777
012777
012777

125252

~e5777
t':?1 4 ;':1

162666

MOV
MOV
MOV
TST
BEQ
HLT
CMP
BEQ
HLT
SCOPE

015~60

015366
(115374
1': 15.: l2
~:, 15 4 Z2
,-' 154 e'4
~~ 15412
015414
r.15416

U!44ee

01542~

;?J12767

e15426
015430
?-15434
e15442
015444
015446
01545'11
015456

0~H~261

Ztleee2

~22777

152525

162652

177777

12'01216

21131211
177377

001202

~~14;)1
le4e~e

1e5667
022767

ee1 4 el

104e!e0
10442)0

012737

000024

012737

00~026

000401
000423
012737
H'J5777
100375

e:15504

012777
105777
1ee!375

177776

015530
015536

032737
001406
0 4 2737
000137

e15542

00e0ee

e15544
015552
015556
215564
215572
e15572
'-'15600

012737
005037
2142737

e"0016

~H!5137

e15542

100003
052737
00e167

177732

e15520

015526

162704
1627021
162702

12'4;:?Z

015464
015466
0154712'
015476
0155'112

215512
015516

177777

~15604

0~000e

~156e6
;'1561~

0e0~~f'

eee0e'2

;:'15612
~'1 5 t 14

e~e2ee
~eel2e

0:.0000

1775721

r"0360

177776

ek'3750

t'll5610
~'Hl360

0~,e020

liH'H?J2I14
177776
177776

MOV
SEC
S8CB
CMP
BEQ
HLT
ENDEAE: SCOPE
MOV
MOV
SKPBEL: BR
SR
MOV
TSTB
BPL

#125252,.MQ
#-l,"AC
#2diilOIv
(alAC
.+4

tt152525,'MQ
.+4

ILOAn MQ WITH 125252
ILOAC AC WIT~ -1
ILOAC DIV WITH 2 AND DIVIDE
;COMPARE AC WITH 0 (QUOTIANT)
:SKIP HLT IF' GOOD
:HALT ON ERROR
;COMPARE MQ WITH 152525
:SKIP HLT IF' GOOD
;OIVIOE ERROR

TEMP+l
#177377,TEt-1P
,+4

.PF AI L dI-#24
#3421,tI#26

,POWER FAIL VECTOR
:PROCESSOR PRIORITY

,+4

,SKIP OVER BELL-NOP ON CORE

TRPA
#200,tI#CC
taTCSR

JLOCK OUT TTY INTER~UPTS
,WAIT F'OR F'LAG; MAKE SU~E NOT BUSY

EXPA~SION

.-4

:8ELL ON PASS COMPLETE
#207,tlTDBR
BELL:
MOV
TSTB
'TCSR
.... 4
BPL
,ROUTINE TO CHECK FOR TRACE TRAP TO BE RUN WITH pROGRAM
*10000,tI#SR
,SHOULD WE RUN WITH TRACE T~AP
TRTRAP: BIT
BEQ
YESTR
JYES
#360,Iit#CC
:CLEAR TRACE TRAP
BIC
,#BEGIN
JMP
.START Of TEST wrTH TRACE orF'
TRPA:
TRPB:
o
;SAVE OLD CONTENTS, SET UP FOR TRACE TRAP
VESTR: MOV
#YESRT,@*14
'NEW TRAP VECTOR
CLR
~#16
iNEW CONOITION COOES
BIC
.360,,#CC
COM
li#TRPB
BPL
,+121
BIS
#20,f#CC
JSET TRACE TRAP
JMP
TRPA
JSTART OF' TEST WITH TRACE
YESTR1: 21
YESTR2: '"
YESRT: RTI
HALT
PRFLAG: 0

O~

,STORAGE FOR OOT PC
JSTORAG FOR ODT STATUS
,RETURN TO PROGRAM FRO~ TRAP
JRTI FAILED
,PRINT ROUTINE BUSY IF' NOT ~ER~

;ENTEREO WITH SYSTEM TRAP CALLCHLT)
SPRINT OUT THE ERROR PC AND STATUS REGISTER

\/003

14-~E8·-71

13:06

.1561,6

~"~5767

177772

PRINT:

e1562~

21e14el

~lXl1

015624
e15626
[15632
015640
015642
315644
01565~

015654
015656
015664
·015670
015672
~1!5700

k115704
(0)5706

015714
015720
01572~

0r572~

177762
161732
l02166
e00140
02H~215

eee130
000212

~00074

2'00072
l00074

000074
000240
0002154

015762
015766
015772
015776

0167e2

e1600~

0167e4

~0e022

016006
016012
016014
016016
016022

005767
100001
000000
005067
0000e2

161556

016024

0e0000
000000
000000
177566
177564

016030
016032
016034
016036
0162140
016042
016046
016052
016056
016064
016072

000116

200e16

01~467

~16026

000132

00~114

0167e2
1104767
012777
105777
100375

e157'~

162112

700144

01573t>
01574~

020000

002164

0'1573~

01574(>
015754

0047Q7

20e052
2(30050

0167~2

e0Z026

016703

00e024

00£ll2l56

177572

~00000

005067

~0e252

10(?244

01271.'4
012767
012 7 67

~16324

~12767

2 01
1:773J

H~5777
10~375

.... 4

BEQ
8R
MOV
MOV
CMP
BIC
TST8
BPl
MOV
T5T8
8Pl
MOV
TST.8
8PL
MOV
MOV
MOV
MOV
JSR
MOV
1ST8
BPL.
MOV
JSR
MOV
MOV
MOV
PRINT1: TST
BPL
HALT
CLR
RTI

PRF"LAG
SR,#20300
• + 4
PRINTl
(6)+,SAVPC
(6)+,SAVCC
-(6),-(6)
1i140,STATUS
GliCSR

J

70~>~7'5

~'h~??7

?

eJ~'

PRTA8:
001236

00Ql220
0vH~214

WA I T1 :

IS ROUTINE BUSY

;YES EXIT
SET F'lAG
.TEST FOR IN~li3['T' PRINf OUT
JBRANCH TO PR I I\lT
JINHIBIT. RETUI:{N TO "1AIN STRIEA~
IPC OF' FAllING ROUTl~E
.CC OF' ERROR CONOITION
JREPOSITION TIo1E STACK
INO

n~A

I T FOR FLAG

.-4

#215,.TD8R
,TCSR
.-4
#212,

~tTDe~

(laTCSR

.CR
JlINe: F'Ee:D

,-4

"2,SAVR2
"3,SAVR3
~4,SAIJR4

SAVPC,"2
,,7,PRTAB

#240,.TDBR
dHCSR
, ... 4

SAVCC,X2
"7,PRTAB
SAVR2,X2
SAVR3,"3
SAVR4,X4
SR

'SAVE R2
'SAVE R3
.SAVE R4
,PRINT OCTAL. NUMBER
SSPACE Be:TWEEN WORDS
,PRINT OCTAL NUMBER
'RESTORE REGISTERS
,TEST FOR HALT

SWITC~

,+4

PRF"l.AG

'I-fALT ON ERROR SET
.CLEAR FLAG WHEN OONE
'RETURN TO MA I ~J STREAM

0
0

0
177566
177564

.DATA
,STATUS

IZ'
III

;ENO OF

8UFF"=FIN

005067

V'16HH

PRF'L ... "

INC
BIT

SAVR2:
SAVR3:.
SAVR4:
T08R:
TCSR:
SAVPC:
SAVCC:

000ee0
016756

e16HH.,

TST
SEQ

RTI

210~HH"2

005267
2136727
0014el
~H"?J 4 61
2'12667
012667
024646
0 4 2767
HlJ5777
100375
2112777
le5777
100375
012777
105777
100375
2110267
010367

PAGE 1-52

CLR
CLR
MOV
MOV
MOV
MOV
TSTB
BPL

BINeT
WGTCT
#LIST,%4
*5,ASCNT
'117, SE VE\J
#l,DECt-1L
~TCSR

IoiA ITl

PI~OGRA"'I-S~'

JGET lIST ADDRESS

AREA.

FALX11

V003

14-rE8-71

2161~6

ae5702

01611~

H~0404

l16112

2112777
"e0403
012777
0167;: 3
e10267

:-H6122
216122
~161..32

21613 4
21614~

e16144
~~

1615 klJ

e16152

2116160
e16164

;216170
Wl.6172
016200
016204
016212
016216
016222
e16226
e16230
~16234

016242
016244
016246
016250
016256
2116262
016264
016270
016274
016276
016300

0e5167
0 4 67e3
2"~ 14 H~
066767
005267
026703

062767
016724
066767
005067
0e5067
2105367

0 Z 1:' 6

~02150

202144
~0e14J

~0e136

000126
000260
0001~2

000076
000074

066767
Qle532\3
1301373
",00730
1312767
105777
100375
014477
2105367

000e52

0e0050

000005
177552

eeel"'44

177542
e0~026

00141~1

177530

000000
rz"HH"~0

Ql0001~0

0000'~0
"f,H~0'~0

ee ~H:~ I~ e
,,0 ~H:"~ 0
"e 012!,~e

/

,PUT MASK IN R3
.GET READY TO DOODLE NUMBER IN TOODLE
:COMPENSATES FOR COMPLEMENT DURING BTC
JAND IN OCTAL C~ARACTER
J~ERO, WRITE 0 IN LIST
.COUNT UP TO
JAND RECORD
iSAME BINARY WEIGI-IT
JKEEP COUNT~
.ADD ASCII PREFIX
.WRITE ASC I I CHAR I~ LIST
.EXPAND BINARY WEIGHT

J 5 CI-IAR IN LIST
JSET X3 fOR ADD LOOP
'MAKING SEVENTY BY SEVEN

'NX SEVEN SE:T GET NX OCTAL
.SEND 5 CHAR TO TTY

JfINISH PRINTING GET NXT NUM

JI-IEAD fOR HOME

"0
'"

161432

0e~H:'

;,el~(,5

:1635.~

eJ27b7
7

;NEG SIGN PRINT 1
'POS SIGN PRINT 0

:(
0
;SCOPE LOOP ROV TINE ENTE~ED 8Y USER TRAP
(6)+,"6
!REPOSITION THE STACK
SCOPEB: CMP
(6) +, CC
:J:OR ~~HEN TRACE IS ACTIVE.
MOV
~RETuRN
;SCOPE RETURN
JMP

000ekH~

oe 1.3 c'

TST
"2
8MI
MINUS
#260,€lT09R
MOV
8R
STAR
_261,~TD8R
MINUS: MOV
MOV
SEVEN,%3
STAR:
MOV
%2,TOOOLE
COM
TOODLE
TOODLE,%:5
BIC
BEQ
wRToe
OECML,WGTCT
MKNUM: ADD
INC
BINCT
CMP
WGTCT,%3
MKNUM
BNE
*260,BINCT
WRToe: ADD
BIN CT., ( 4 ) +
MOV
SEVEN,DECML
ADD
CLR
WGTCT
CLR
BINCT
DEC
ASCNT
BEQ
XLIST
MOV
.3,"3
SEVEN,SEVEN
MOADD: ADD
DEC
"3
BNE
MOAOD
STAR
BR
*5,ASCNT
XLIsr: MOV
~TCSR
WAIT2: TSTB
WAIT2
BPL
-(4),aaTOBR
MOV
ASCNT
DEC
BEQ
IoIDF'~M
WAIT2
BR
HDFHM: TSTB (ITCSR
,-4
BPL
RTS
"7
TOODLE: 0
SEVEN:
OECML: 0
WGTCT: 0
BINCT: 0
.. .
-,
ASCNT: I2J
-'e;
LIS T:
~

0~HH300

:'

PAGE 1 .. 53

'"

0000,?'0

7'16344

355

000102

000H~0

(l!226C6
0126 c'-:

~'16

0e0120

00e114

2'1634~

~16336

000136

ee.2134

e~eee3

0002e7

0163321
?16332
016334

177702

~.

0127Z3

016306

~16326

l0~261

~01410

e16304

016312
01631 4
016316
016320
016322
r16324

177712

0~H370

2100767
105777
100375

Z163H~

Z0e26J

13=06

;' 4

L'

4

L.' 'll

161212

;SCOPE ORlAND ITERATJ:J\I LOOF' rOR EACH TEST 4000 TIMES
#4l~0~,SR
,TEST SR fOR SCOPE
SCOPEC: BIT
,YES SCOPE
8NE
SCOPES

-i(L Xlii

V003

14-FES-71

,163610
01636!6
101637i0
eJ 16 3 7i6
01641Oi0
216401 4
~ 16 4 0:6
016412
016416
eo 16 4 2:0
016422
016424

,,32767

r.:1040,~0

016426
016430
016432
016434
016440
016442
016446
016 4 50
016454
016456
016462

13:06

16122'2

'H~1~el7

026767
001433

000026

~eJ5267
~H:HP:;4

k'07016

0105067
011667

000022

SCOPEG:

e00010
e.(2l00e6

0~00j{'2

ICOUNT:
SCOPEF:
RETURN:

004000
000000
00375k1

~04767

177766

el0el207
004767

177766

#40"' .... ,SR

SCOPEG
SCOPEF, I COUNT
SCOPEG
SCOPEF
SCOPES
SCOPE.F"
~%6,RETURN

177766

"7

~002eJ7

-

TEST F"OR ITERATION
.NO
.INIo4IBIT ITERATION

-

i EX I T
nONE
iINCREMENT COUNT
iLOOP SOME MORE
;ClEAR COUNT
,SAVE SCOPE RETURN POINTER
;RETURN INLINE-NEXT TEST
JCOUNT LOCATION paR ITERATION LOOP
.ADDRESS OF" LAST TEST

"7

0002107

177770

SIT
BNE
CMP
BEQ
INC
8R
CLR
MOV
RTJ
4000
el
BEGIN

iGROUP OF NESTED SUBROUTINES
~7
SUBR1: RTS
SCC
SUBR2:
RTS
X7,SUSR2
JSR
SUBR3:
RTS
%7
X7,SUBR3
SUBR4: JSR
RTS
,,7,SUBR4
JSR
SUBR5:
RTS
%7
,,7,SUSR5
SUBR6: JSR
RTS
%7

2I0el207
0k'H3277

004767
"O0207
004767
00el207

PAGE 1-54

JaNE INSTRUCTION
JONE OEEP
JTWO DEEP
JTHREE DEEP
;F"OUR DEEP
;F"IVE DEEP

;ENTER HERE OR PQWEIR F"AIl
016464
016466
016470
016472
016474
016476
016500
016504
01651l?
016516
016522
e.1652~

01653l
01654~

016542
016544
016550
016554
e16560
~16564

~'16570

r16574
~~ 16576>

010046
010146
010246
010346
010446
010546
2116746
012737
(2113746
013746
'1113746
010667
012767
000000
000000
0167e'6

1Z112637
012637
012637
C1J05037
1Z112667
2112605
0126Vi4

~166~0

0126r~

C16602

0126':~2

r166~4

21126J1

6 VI 6

01261'10

~'16

PF"AIl:

161320
0kll0002
0011'266
000264
000270
000010
016544
177772
000270
000264
00~266

000"'06
161?30

000006

161264
SAVR6:
RESTART:

to1DV
to1av
Mav
MOV
Mav
MOV
Mav
Mav
Mav
MaV
Mav
Mav
MOV
HALT

"0,,-(6)
"1,,-(6)
"2,,-(6)
"3"-(6)
%4,,-(6)
%5, ,- (6)
24,,-(6)

,SAVE REGISTER OR STACK
JWHEN POwERING DOWN

*RTI,~#6

J

I1t#AC,-(6)
@#MI~,-(6'

@#SC,-(6)
%6,SAVR6
#RESTART,24

121

MOV
MOV
MOV
MDV
CLR
MaV
Mav
MOV
MOV
MOV
MOV
MOV

IN SAVE OF NE EAE

SAVR6,%6

JSTORE STACK POSITION
; H ! T ON POWER DOWN NORMAL
J S ': ACK IS SAVED ~ERE
:RESTORE REGIS'rER OFF" STACK

(6)'·,~#sc
(6)·~,tit#MQ

(6)··,tit#AC
~#6

(6) ,10,24
( 6 ) " , %5
(6),', %4
(6),', %3
(6);', %2

(6H·, %1
(6) .... %0

JMQ MUST BE

L.O~'OEO

JRESTORE. TIME our
IWI.fEN POWERING UP

BEF"ORE AC

13:216

PAL Xli

VI(l~3

~16610

l2I~el002

016612

125252

e16614
~16616

0166t2
052525

016622
016624

016622
177777
016626

.=B+10
A:

12116626
125252

.=A+4

016626
016630
016632
016634
016636
016644
016646
016652
016654
016756
~1676el

0.16762
016770
016776
01.7004
0170,06
0170lr~

017014
10171212113
01,7026
e!17034
017042

017050
v)17056
1017064
'11 7072

14-rE8-71

RTI

1210ell2lel0
12116634
016644

.=C+1~

012l000~

TEMP:

2116644

21ri.H~000

r17102

(2112 61~2

021375121
121121121401
0k'Jl~00

16077121
16121766
017102
000340
C?37770
057770
077770
117776
13777eJ
157770

7;26

[17104

~05

~~171f216

02 2 71~ 2

~'1711(>

ill i£h 4;~ Ql

(' 1 7114

022?02

to' 1712 k-;

12101463

JADD~ESS

0
TEMP

TEMP+lk'J
~
D:
.=.+100
FIN:
0
RTS
USER:

21k'J0207

000442

JAODRESS OF" A+l21

OF" C

.ADDRESS OF" TEMP

.=TEMP+6

12116652
016654
00k'Jel00
2116756

1:.:171100

lADDRESS OF 8

-1
A+4

125252
A+10
2152525
JFOR STORAGE
0
C:
C

052525

0137,37

:RETURN TO MAIN LINE

125252
B:
iFIXEO VALUES FOR USE I r..J TEST
B
052525

~16632

12116762
012767
012767
12132767
2101401
0121121207
016746
016746
012767
012767
013737
013737
013737
013737
12113737

PAGE 1-55

e1774J
" 1 J i' 4 6

176550
176466
16121564

160756
16~752
~3771el
~57771O

e.77770
117"770
137770

15 7 77121

JADDRESS OF" TEMP ... 10 OR

~7

"0"

JBUF"F"ER F"OR SP
;OVERLAY USER ROUTINE HERE IF" 4KW, USE BANKl yr 8KW

;PDP-l1 MEMORY DETERMINATION AND SETUP
iUSE WITH VARIABLE CORE QUANTITY SYSTEMS
.=FIN + 4
JAPPLICABLE TO SYSTEM JEST 21
MOV
#8EGIN,TRPA+2
DET1:
.401,SKPBEL
MOV
JaR .'" 4
BIT
#100el,SR
JCHECK VARIABLE CORE SWITCH
BEQ
DET4
JUSE VARIABLE CORE ROUTINE
RTS
;4K ONLY
~7
4, - (6)
MOV
;SAVE TRAP VECTOR
OET4:
6, - (6)
MOV
JSAVE TRAP STATUS
#OET2,4
:TRAP VECTOR SETUP
MOV
#340,6
MOV
.TRAP STATUS SETUP
•• 37770,.#37770 JCHECK F'OR 8K
MOV
E I GI·n:
,#577710,.#057170
HoJELVE: MOV
JCHECK F"OR 12K
~#0777T0,'#07777~
SXTEEN: MOV
JCHECK FOR 16K
~#11777e.,'#117770
TWENTY: MOV
.CHECK F'OR 20K
~#137770"#137770
,CHECK FOR 24K
TWOF"OR: MOV
~#157770,~#15777eJ
TWOEIG: MOV
JCHECK FOR 28K
STRT28
8R
(6)+,%2
MOV
JRETRIEVE TRAP PC
OET2:
(6) +
TST
IDISCARD TRAP STATUS WORD
CMP
#EIGHT+4,%2
8EQ
J4K
DET3
CMP
#TWELVE+4,%2
8EQ
STRT8
J8K

~LX11

..,17122
017126
017130
017134
017136
v)17142
et17144
017150
017152
017154
017160
e17164
017166
017170
017172
017176
017200
017202
1211721214
12117206
017212
12117216
017220
017224
017230
017232
017236

14-FE8-71

13:06

022702
001453
",22702
",O1443
022702

e17054

CMP
8EQ
CMP
8EQ
CMP
8EQ
CMP
BEQ
SR
MOV
!JET3:
MOV
RTS
CLR
"lOVE:
MOV
ADD
MOV
CMP
8NE
RTS
STRT28: JSR
JSR
8R
ST~T24: JSR
JSR
8R
STRT221: JSR
JSR
8R
STRT16: JSR
JSR
BR

~17242

~210744

"'214767
004767
000737

017256
017262
017266
017270
017274
017300
017302
017306.
"'17312
017316

017346
017352
017356
~H 7 362

2104767
2104767
2100732
21e4767
G!H2l4767
",00725
012701
",O4767
012701
k!l04707
2112701
004767
012701
004767
012721
004767
01271'1
",04767
000207

~17326

017332
017336
~17342

O17762
017070

~01433

022702
00142.3
0"'0415
012667
012661
000207
005000
01(1)102
062702
012021
020201
001375
12100207
004767
,,04767
,,012l756
004767
004767
000751
21214767
21214767

017244
017250
017254

~17322

PAGE 1-56

V"'03

017076
160626
160620

016760

00121070
12100146
"'00066
I2l 0 fi315 0
0210064
21210152
00~062

000154
0f2!12!060
000156
000056
00016'"
140000 '
177654
120000
177644
112!0000
177634
~60000

177624
040000
177614
0200('10
1776C114
116146

2112767

143756
o 0 ~12 4 0
123756

~12767

0~W240

~76e50

v.17364

~12767

(' 1 7372

~12767

V174~0

v: 1 7 4 ~ 6

116~64

r;-76132

STRT12: JSR
JSR
8R
STRT8:
JSR
JSR
BR
XFER28: MOV
JSR
XFER24: MOV
JSR
x~ER20: MOV
JSR
XFER16: MOV
JSR
XFER12: MOV
JSR
MOV
XFER8:
JSR
RTS
MOV
-.1002 4 :
MOV
MOV
~OD2.:':
MOV

#SX"' t.t.t'II+4, Xt?
STRT12
#TWENTY+4, %t?
STRT16
#TWOFOR+4,%2
STRT20
#TWOEIG+4,%2
STRT24
STRT28
(6) +,6
(6).~, 4
%7
%0

%1,"2
#FIN+2,X2
on •• , (1)+
%2,"1
... 4

%7
,,7, )(FER28
%7, ~10D24

1121(
1161(
J201(
;241<
J28K
;RESTORE TRAP VECTOR
;RESTORE TRAP STATUS
JCOMMENCE: PROGRAM
ISET UP MAIN CORE CURRENT
.SET UP ~AX CORE MOVE
JMOVE WORD
JMOVE COMPLETE?
;MOVE ANOTHER WORI()
JMOVE COMPLETE
JSTARr 281< TRANSF[R
JSTART 24K MODIFY

DET~5

%7,XFER24
%7,~10D212!

DET3

JSTART 241< TRANSFIER
.START 2"'1< MODIF"Y

"7,XFER2~
"7,~10D16
DE T~~

.START 201< TRANSF"IER
JSTART 161< MOOIF"Y

"7, )'FER16
"7, ~WD12

;START 16K TRANSF"IER
.START 12K MODIFY

DET~I

,,7,XFER12
%7'~'OD8

OEnl
%7, )(FER8
"7,~10D4

DEn)
#140000,"1
"7,~10VE

JSTA~T 12K TRANSFER
JSTART 81( MODIF"Y

JSTART 8K TRANSF"EI~
;START 4K MODIFY
JSET UP MOVE START LOCATION
JGO TO MOVE SUBROUTINE

#1200210,%1
"7, ~'OVE
#HH'000, %1
%7, ~10VE
#60~'00, %1
%7,~IOVE

#40~'00, %1
%7,MOVE
#221000,%1
%7,~10VE

%7
:RETURN I="ROM TRANSFERS
#BEGIN+140006,TRPA+120002
#NOP.SKPBEL+120000
#BEGIN+120006,TRPA+le0002
#~ap,SKPBEL·1000~0

PAL Xli

V003

017414
V17422
V,17430

012767
012767
012767
012767
012767
012767
012767
012767
0002e7
000001

~~17436

?17444
j'17452
Z1746~

v)17466
017474

14-rE8-71

13:""6

PAGE 1-5'

MOD16:

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

1213756

2156116

~0e240

~56~34

?63756

036102
eJ36e.20

MOD12:

e0~';?43

l43756

~16e66

MOD8:

N:P~40

2!162!eJ4
17612152
175770

1"23756
00e240

MQD4:

RTS

.END

#8rGIN+1~0006,TRPA+60~02

#NOP,SKP9EL+621000
#8EGIN+6~0~6,TRPA+40002

#NOP,SKPSEL+40000
~8EGIN+4021e.6,TRPA+20~02

#NOP,SKPBEL+20000
#BEGIN+221006,TRPA+2
#NOP,SKPBEL
%7
JRETURN rROM MODIfY

~LX11

A

AC
I
AOSU Bi
AR IE Nio
ARITS:T
ASCNT
ASH
8

BEGIN
BELL
sINeT
SR
BUFF
C

cc

CCT1

CLI~CT

CMPl
CMP2
COMPAR
CURPAT
0

l)ATAl
DATA2
OATA3
QATA4
OECML
DELAY
OETl
DET2
OET3
oET4
DIV
DO
EAESRT
EIGHT
ENDEAE
F

FEND1
!="ENOZ!
FIN
FUNCTI
HOFHM
~LT

HPCSR
HPDBR
HPOUT
f-iPOUTl
HPOUT2
r-iPOUTR
i--1RCSR
rlRD8R

V0e!3

14-FEB-71

e!16622
2100266
2113440

~SRINl

~13502

ICOU\!T
IE
!NTCNT
IRF
LIST
LKl
LK2
LK3
LK4
LKCSR
LLIMIT
LP1
LP2
LP3
LP4
LP5
LP6
LPCSR
LPDBR
LPINTR
LSH
MAINLI
MINUS
MKNUM
MOADO
MOO12
M0016
MOD2eJ
M0024
MOD4

2113414
2116322
r2!003~4

2116612
003750
12115504
12116320
itH'le!002
0167?6
2116634
177776
12114270
0022152
012740
2112762
012734
002046
016654
2HH32e!
001366
001452
12101554
016314
12Hi)15 6 0
2116762
017102
12117154
017010
000276
0021001
,,15056
017034
11'15446
00210210
0flJ2230
~02206

016756
002170
016300
104000
0021234
000236
001454
0211462
001536
0211472
000230
12l0r?l232

~SRI\J2
~SRI"JR

M008

Movr
MQ
MUL
N
NOEAE
NOP
NOR
NUMA
PFAIL
PRFLAG
PRINT
PRINTl
PRTAB
R
Rtl
RO
REF
REFF

13106

210137121
001376
001404
016420
2112112110121
21211556
01212104
016324
01211562
00161212
2101604
0211622
00121240
01212172
21121171212
12101710
2101770
1212120021
00212136
211211736
21021242
000244
211211726
210121302
12'01206
12116122
016152
016234
017430
017414
017400
017364
017460
017444
12117166
0021264
00121274
0002101
000366
2100240
21003210
013500
~H6464

015614
015616
016006
01612142
~040eJ0
eJeJ21~02

00001214
013126
013126

!'AGE 1 .. 5e
REG1
RENOl
REN02
RESTAR
RETURN
RF1
RFCAR
RFCSR
RFCSRH
RFOAE
RFDAR
RFOBR
RFSTAR
RFWC
ROT ALL
ROTBE
ROTBD
ROTEN1
SAVCC
SAVPC
SAVR2
SAVR3
SAVR4
SAV!R6
SC
SCOPE
SCOPEB
SCOI=>EC
SCOPEF
SCOPEG
SEVEN
SKPBEL
SOLPAT
SR
SRE
STl
ST2
ST3
SJ4
5T5
5T6
ST7
ST8
ST Af~
STAf~T
STAI~T2

STATUS
STRT12
STRT16
STRT20
STRT24
STRT28

01211224
002434
002404
2116544
016424
e!eJ2e!6~

000256
~e!eJ26e!

000262
012121246
0121121252
00212521
212122154
00121254
2113016
013166
013276
01340121
016!2!40
016036
016~24

2116026
016030
016542
0210270
104412'0
016336
016350
016422
2116406
11'16312
015464
"02050
177570
"00272
0210"636
0210654
00217210
"210732
12100754
001020
01211052
001142
2116130
e!21040e!
0e10440
177776
017256
017244
017232
~17;?2e!

017206

STRT8
SUBR1
SUBR2
SU8R3
SUBR4
SUBR5
SU8R6
SWABA
SXTEEN
TC
TCl
fC2
rCBA
TCBlK
TCCM
TCDT
TCEXPE
TCF1
TCF1A
TCF2
iCF3
TCF4
TCFIRS
TCIv
rCLAST
TCOM
TCOM2
TCOM3
TCRl
TCR1A
rCR2
'fCR3
TCR4
TCR81
TCRBi<
TCR8UF
TCSR
TeST
reW81
iCWeK
TCWBUF
TCWC
TD8R
TDSR
TEMP
TEST

TIME
TJSRl
TJSR2
'TJSR3
TOODLE
TRCSR

~1727e!

2116426
2'16430
2116434
Q'16442
QI16450
2116456
12114224
211705121
1.77340
0121121322
0100342
021121316
121022212
01212131216
12112121312
0121221214
21022621
m02252
0212312
211212326
0212374
21212176
0121121320
002200
1313514
013562
2113630
002532
211t'l2566
"02574
002610
"'02656
002722
0"2664
002750
016034
000310
002504
002452
02'2750
000314
016032
0162134
'H6644
e!13130
e!I2l1700
C?J12340
012342
012354
016310
0002221

PALX11

V003

TRDR
TRPA
TRPB
TRTRAP
TSCOM8
TSROT
TSROT2
TSRT2A
TSTARI
TTCSR
TTDSR
TTYIN1
TTVIN2
TTVIN3
TTYIN4
TTYINR
TWELVE
TWENTY
TWOEIG
TWOFOR
TYOUT
TVOUT1
TVOUTR
USER
WAIT1
WAIT2
WAIT3
WAIT4
wD
WGTCT
wORDeT
wRTOC
xFENDi!
xFER12
xFER16
xFER20
xFER24
xFER28
xFER8
XLIST
vESRT
V[STR
vESTR1
VESTR2

000222
01-5536
015542
015520
e13672
2112774
01314~

013132
211341712
000224
0021226
2101226
0"'1234
2101302
12101306
12101242
12117042
2117056
12117072
017064
001322
l2!eJ1330
21"'1340
01676'"
01610121
(lJ16256
211411'"
014140
210012114
2116316
1211212174
016172
002402
2117342
017332
017322
017312
017302
017352
016250
1211561'"
015544
0156i'4
0156116

[RRORS OETECTECI 0
FlU~-TIME:
~)

K

22

C0 .~ E USE D

SECO~I)S

14-r[8-71

13106

PAGE 1-59



Source Exif Data:
File Type                       : PDF
File Type Extension             : pdf
MIME Type                       : application/pdf
PDF Version                     : 1.3
Linearized                      : No
XMP Toolkit                     : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37
Create Date                     : 2013:11:27 20:37:16-08:00
Modify Date                     : 2013:11:27 20:47:19-08:00
Metadata Date                   : 2013:11:27 20:47:19-08:00
Producer                        : Adobe Acrobat 9.55 Paper Capture Plug-in
Format                          : application/pdf
Document ID                     : uuid:d2eb6217-11d0-43a2-95b5-9df8eebff5db
Instance ID                     : uuid:c5857baf-4b94-4f01-804f-184f112ac0e9
Page Layout                     : SinglePage
Page Mode                       : UseNone
Page Count                      : 72
EXIF Metadata provided by EXIF.tools

Navigation menu