Digital PDFs

MAINDEC-12-D7CD-D

February 1972

124 pages

Original

3.0MB

Document:	System Exerciser
Order Number:	MAINDEC-12-D7CD-D
Revision:	0
Pages:	124
Original Filename:	http://bitsavers.org/pdf/dec/pdp12/diagnostics/MAINDEC-12-D7CD-D_System_Exerciser.pdf

OCR Text

..... .......... .

IOE:NTlF'IC:ATION
,.,

..,

PRODUCT COOEI

MA!NOEC·12•07C:D

F'RODUCT NAMEI

F'OF'•12 SYSTEM EXERCISER

DATE I

F'URUARY 11 1972

MA!NU!NERI

DlAGNOSTtg GROl:!P

A\JTHORI

RAYMOND SHOOP

<n
-<:

q:,....
1\)

~\\V'fRIGHT © T9/;
~\. tnU\PM£/IT COHPOfl.4;;

"!.\~\\

7U,f'

MAINDEC CHANGE

NOTICE
AUTHOR

PROGRAM DATE

PRODUCT LINE

2/1/72

?DP-12

Ray Shoop
DATE

EXT.

12-D7CD-2
CHANGE NO.
Sheet

MAINDEC NUMBER
1'1AL'4"u SC-12- D 7 CD

3958

PROGRAM NAME PDP-12 System I.:xerciser

DEVICE

PDP-12 System

ITEM

la.

Probl2m:
TU10/TC58 Mastape running and EO'l' is encountered; the
program does not wait for TUR.
Correction:

. ""' runnin'] 'l'CS8.
be toggled in only lL

·.L'C

::Cield 0:

lo.

V1\LUE

2761
27G7
2770
2771
2772
2773

5367
6721
5367
3057
1365
5362

.Problem: OHLY if KW12 is inoperative and the TC58 ~1agtapc: is
running; a 'l'C58 error will occur approximately ev2ry 10 min.
Correction :
B.

2.
/22/2

LOCI\ T I.:Jh

~epair inoperative KW12!!!
Hait for M-12-D7CL when available.

2roblem and Correction: The following locations should be
changed only if the program is running with the API (KF12B)
enabled (changes are in memory field 0').
TOUTINE
'.:ij=' 08 /,J:? 3 2

IT'P-12
8

AIP-12
TC:JB

LOCATION

OLD VALUE

NEW VALUE

1023
1737
2427
2614
7 5

6772
6772
6772
67 72
6772

7200
720!3
72f30
7 2)Jf)
72f50

ABSTRACT

-·---"'··
POP•12 SYSTEM EXERCISER IS A COMBINED TEST OF THE PDP•12 AND
ITS COMMON OPTfONS, lTS PURPOSE IS TO TEST THAT TME POP~12
CAN ACCURATELY ANO CONSISTENTLY PASS DATA BETWEEN THESE DEVl~ES~
BOTH OATA BREAKS AND PAOGRAM INTERRUPT~ ARE us;D EXTENSIV!LY
THROUGHOUT THIS PROGRAM, TWO BACK•GROUNO PROGHAMS ARE RUN
TO EN$URE THAT THE C,P~U 1 OVERHEAD REMAINS HlGM,
THE LINCTAPE IS HANDLEO IN SUCH A MANNER THAT A DR!VE
MAYBE OE·~tLECTED OR WRITE•LOCKEO WITHOUT CAUSING AN ERROR:
THIS WILL CAUSE THE TAPE PROCESSOR TO HANG IN NO•PAUSE
WAITING ~OR AN INTERRUPT THAT WILL NEVER APPEA~ 1 IT WAS
NECESSARY DUE TO PROLONG RUNNING OF A !APE W!~L WEAR
OUT THE TAPE,

REOUIR£MENTS
.............
-.....

2,1

EQUIPMENT
-·~-----

STANDARD PDP·12 COMPUTER
BK OF MEMORY WORDS
KW12A REAL TIME CLOCK
KF'12B A,Ptl 1•
FPP•12 FLOATING POINT PROCESSOR•
AIP•12 LABORATORY DATA PROCESSOR•
RK08 DISK CARTRIDGE•
RF'08/DF32 DISK MEMORY•
TC58 MAGTAPE MEMORY•
LP08/LP12 LINE PRINTER•
PR12 HIGH !PEED READEH•
OC02•F' TELETYP~ CONTROL•
•OPTIONAL

2,2

STORAGE
......
"'.
THIS PROGRAM OCCUPIES MEMORY LOCATIONS 0 0000 !HRU 1 7777~

213

PREL!M!NARY PROGRAMS
···--··--··--·~---·~

ALL POP•12 ANO OPTION OlAGNOSTtC TEST MUST HAVE 9EEN RUN
SUCCESSF'Ul.1.Y,
3,

LOADING PHOCEOURE
-··--·---~----~--

PROCEED WITH THE LOADING or A STANDARD BINARY ~ROGRAM~
IT MAY ALSO BE LOADED BY OIAL V2 OR DIAL MS,
41

STARTING PROCEDURE
•R••••••••••••••-~

THE PROCEDURE TD SETUP THE POP•12 SYSTEM JS CRITICAL, ANY ERROR
!N THE STARTING PROCEDURE WILL RE~ULT IN AN ER~OR,
A,

TAPE TRANSPORT
1,

MOUNT A CERT!f?ED PDP•12 !APE <MARK 1600 BLOCKS) ON ALL DRIVES
TO BE TESTED,

SET THE UNIT SELECTOR ON EACH TRANSPOR! TO AN !NCRE•
MENT?NG NUMBER STARTING WITH UNIT 0,

:5,

SET THE LOCAL/REMOTE SWIT~H TO REMOTE ON EACH OR!VE,

SET TM[ WRITE ENABLE SWITgH ON EACH DRIVE,

RK08 DtSK CARTRIDGE
MAKE SURE THAT THE READY LIGH! IS ON AND ALL WRITE LOCK
SWITCHES A~E RESET~

Rr0a1or32 OISK MEMORY
UNtT 0 IS SELECTED AND THE WRITE LOCK SWIT~HES ARE RrSfT~
ANY ADDITIONAL UNITS SET TO AN tNCREMENTIN~ UNIT NUM9E~
STARTING WITH UNI! 1 1

TC58 MAGTAPE MEMORY
UNIT 0 SEL£CTED ANO TH£ WRITE•ENABLE RING IS INSTALLED~ THE UNIT
MU5T BE ON ~lNE1 AODITIONAL UNITS ~ET TO AN !N~REMENTING UNIT
NUMBER STARTING WIT~ UNIT 1 1

oc~2r

TELETYPE CONTRO~

ALL TERMINALS oN~LINE, Ir A KEYBOARD rLAG rs SENSE~
!T IS IN ERROR,

~LACE

LP08/~P12 ~INE

PRINTER

MAKE SURE THAT IT !S ON•LINE ANO READV 1
G1 PR12 HIGH SPEED READER
INSERT BINARY COUNT PATTERN TEST TAPE CMAINDEC•00•02GJ•PT)
INTO THE READER ANO PLACE READ£R ON•LlNE,
H,

SCOPE CVR1•l
PLACE CHANNEL SELECTOR TO 1 & 2,
Ir A VR201 PLACE THE COLOR SWITCH TO THE REMOTE POSITION~

Ad 1 P,

INSERT KW12A CLOCK OUTPUT CABLE INTO SLOT C15 or THE
TH!S tABLE MUST B~ INSTALLED TO OP~RATE TH~ A 1 f,P~
J,

A:I~P~

COMPUTER
1,

SET THE SWITCHES, CRErER yo SE9TION 4,~)
1r THE DEVICE rs NOT ON THE SYSTEM, IT IS NOT NECESSARV
TO SET THAT INHIBIT SWIT0~ 1 <REFER TO ~ECT!ON 6)

SET TH£ MOOE ~WITCH TO 8•MOOE 1

DEPRESS t/0 PRESET~

'•

DEPRESS START 20 1

AT THIS POINT NO OEVIC£S HAVE BEEN START£0 1 THE WORD "REALLY"
WILL A~PEAR ON THE VR1' DISPLAY (IN RED 1r A VR20)~
THIS IS TO G!Vt THE OPERATOR A StCOND CHANCE, Ir THE DISK
AND/OR TAPES CONTAIN IMPORTANT DATA, SAVE IT NOW OR KISS !T GOODBYE,
51

TYPE " Y " ON THE CONSOLE TTV TO CONTINUE,

AfTER THE PRO~~AM IS STARTED, 9HECK TH~ DISPLAVED MESSAGE
TO INSURE THE OEVICES ARE RUNNING,

4,1

CONTROL SWJTCH SETTINGS
-~--~··--··"··~--~~--~·

RIGHT

SW!TCHE~

RSW 0 II 1

INHlBIT STARTING Kr12B

RSW 1 • 1

INHIBIT STARTING A1 I,P 1 CRErER TO 6,Dl

RSW 2 • 1

INHIBIT STARTING Or THE TC58 MAGTAPE~

RSW :5

INHIBIT STARTING or THE rPP•12,

RSW 4 • 1

INHIBIT STARTING Or Rr~8·0r32,

RSW !5

INHIBIT STARTING Or THE RK08

RSW 6 " 8

NUMBER OF EXTRA LINC•TAPE TRAN~PORTS GREATER TMAN UNIT

RSW

NUMBER OF EXTRA MEMORY BANKS GREATER TMAN

9 "

4K~

L.ErT SWITCHES

l.SW ~

NOT USE:D I

l.SW 1 • 2

NUMBER OF EXTRA TU10 DRIVES

LSW 3 • 4

oc~2r

LSW !5 • 1

INHIBIT STARTING or THE OC02F,

LSW 6 • 0

80 COLUMN LP08 OR AN L.P12 1

LSW 6 1 1

1~2

l.SW ' • 1

INHIBIT STARTING L,PZB•LP12 1

LSW e • 0

KW12A CLOCK CABLE CONNECTED TO CHANNEL 44.47 or THE A,t,P,

LSW 8 • 1

KW12A CLOCK CABLE CONNECTED TO CHANNEL 43,,43 or THE A,J,P,

LSW 9

NOT USED

LSW 10•11

NUMBER Or EXTRA RK0S DRIVES,

OROUP

<T~58

CONTROLLER!~

ca LINES PER GROUP),

COLUMN LP08,

SENSE SWITCHES

SNS 0 • 1

DELETE RECOVERABLE ERROR LOOP, RESTART CURRENT PASS

SNS 1 " 1

DELETE ERROR MESSAGE

SNS 2 11 1

BVPAS? CP BACKGRO~ND (MAINTENANCE ONLVl

SNS ::! • 1

BYPASS DISPLAY

BACKGRO~ND

CMAJNTENANCE ONLY)

DUE TO THE FLEX!B!l.ITY OF THE INTERRUPT LEV£LS OF THE KF12B CA~P 1 I 1 l IT
BECOMES NECESSARY (IF THE KF12B !S !NS!ALLED ANO ENARLEOl TO TCGGLE SEVERAL
CHANGES INTO THE PROGRAM, FIRST DETERMINE WHAT DEVICES ARE ON
THE SYSTEM ANO WHAT INTERRUPT 1.EVtCs IN OCTAL !HEY ARE ASS!GNED TO~
SECONDLY PLACE THE DEVICE NUMBER IN THAT LEVEL. 1
AFTER THE DEVICE NUMBER IS OEPOS!!E01 !HE PROG~AM WILL NOT HALT
IN LOCATIONS 3000•3037~
FAIL.URE TO EXECUTE THJS CORRECTLY WILL CAUSE A PROCRAM HALT,
INTERRUPT VECTORS ARE DOCUMENTED AND LOCATED A! LDC, 300~•3037
nr Fl~l.D 0 IN THE L!S!JNG~ T~ERE ARE TWO LOCATIONS FOR EACH INTERRUPT
VECTOR, ONLY T~E f?RST LOCATION t5 CHANGE0 1
DEVICE
~·---·

Rf11J810P32
RK08
AJP•12
FPP•12
1.P08/LP12
Plh12

oc02.r
TC58

DEVICE NUMBER
....................
4570
4571
4572
4573
4,74
4575
4576
4577

EXAMPLE! RF0e AT LEVEL 121L.P11J8 AT LEVEL 131DC02•F AT LEVEL 14

4,2

LOCATION
........
., ..

.VALU!
.....

3024
3025
3026
3027
30321
3031

457eJCRF0!!)
7402
45?4(1.P08)
74212
4576(0C212•F')

11.EVEL 14

741!!2

COMMENT

···-···
/LEVEi. 12
I

ll.EVEL 13
I

STARTING ADDRESSES
•P••~p••-~•·•~•·~•

POP•8 MOOE1 START 20 IS THE ONLY VALID STARTIN~ AOOR£SS O~ THIS
PROGRAM, NO SWITCHES ~~OULO BE CHANGED AFTER S!ARTJNG THE PROG~AM~
WHEN AN ERROR rs DETE~TED1 IF" OESlREO, THE PRO~RAM WILL ~E~T4RT
ITSE~f AND USE THE SWITCHES AGAIN 1

e'.RRORS
.......
,,
ALL PROGRAM MALTS OR !YPE•OUTS ARE ERRORS,
MESSAGE CONSISTS QFI

THE ERROR TYPE.OUT

THE CURRENT PROGRAM RUN TIME,

THE ADDRESS Of

THE GOOD DATA OR

THE BAD DATA OR STATUS VALUE OBTAINED,

THE MEMORY FIELD IN WHICH THE DEVICE DETEC!ED AN ERROR

TH~

ERROR IN FIELD

~TATUS

VALUE

EXPE~TED,

IN~

IF THE GOOD VALUE WAS ~000 1 THERE WAS A STATUS ERROR~
IF NON•tERO A DATA ERROR OCCURRED 1
THE LISTING MUST BE CONSULTED TO FIND THE TYPE OF ERROR,
ALL ERROR HALTS AND TYPE•OUTS REFER TO MEMORY [IELO p~
61

RESTRICTIONS
.............
,. ..
A1

STANDARD POP·12 COMPUTER,

THE TAPE TRANSPORTS MUST BE SELECTED SEQUENTIALLY 1 STARTING
WITH UNIT 0 AND WRITE ENABLED,

THE SWITCHES SET ro ONLY THE EXISTING
ANO MEMORY FIELDS AVAILABLE,

THERE IS AN !OT CONFLICT BETWEEN THE A, l 1 P 1 AND THE CC'l INTERFACE,
THERErORE IF A cc01 INTERFACE !S INSTALLED, !NH!BI' A.!,P, MUST BE SET~

DATA ON TA~E BLOCKS 7Y0 TO
DRIVES USED,

ALL DATA ON RK08, RF08 OR DF321 TU10 MAGTAPE WILL BE

1~27

TRAN~PORTS

WILL BE

DE~TROYED

ON ALL TAPE
D~STROVED,

EXECUTION TIME

.................
COMPLETION or ONE PASS or THIS PROGRAM WILL TAKE A?PROX!MATELV 1 HOUR
AND 20 MIN, TMIS IS TME MINIMUM AMOUNT or RUN TIM~ EXFErTED~
AT COMFLETION Or A PASS THE ~ROGRAM WILL TYPE THE FASS NUMPER
roLLOW~D BY A TOTAL NUMBE~ OF ERRORS SINCE THE-START or THE PR~GRAM,
DURING THE r1RST PASS OF THE PROGRAM, THE DISK ADDRESSING WILL BE
AN INCREMENTING PATTERN, DURING THE SEtOND PAS~ !T WILL BE RAN~OM~
Ir THE PASS NUMBER IS OD0 1 THE ADDRESSING IS !NCREMENTINl. 1
Ir THE PASS NUMBER IS EVEN 1 THE 40DRESSING IS RA~DOM~

PROGRAM DESCRIPTION
~·~------·~--~"~~--

POP•12 SYSTEM EXERCISER IS A COMPREHENSIVE PROGRAM TO EXERCISE
THE POP•12 DATA BREAK SYSTEM, ALL COMMON DATA BREAK DEVICES
ARE USED TO TEST TME ABILITY TO EXCHANGE DATA BETWEEN THE
DEVICES AND THE PDP~12~ WHILE THE PROGRAM IS RYNNING, THE VR14
WILL O!SPLAV TME CURRENT DEVICES AND TME MEMORY FIELOS RUNNING~
THE NUMBER 0 ArTER A DEVICE INDICATES '.HAT THE DEVICE IS
NOT RUNNING, A NON•~ERO NUMBER AFTER A DEVICE, l~DICATES THE
MEMORY FIELD THE DEVICE IS EXERCtSjNG DATA IN,
IF A DATA BREAK DEVICE ONCE STARTED, STOPS,THE PROGRAM W!LL DETECT
THAT AND REPORT IT AS AN ERROR,
8 11

ROUTINE OESCRIPT!ON
···-·~---ff•··~~--··

DISPLAYED MESSAGES <IN GREEN IF VR2~l
CPI

A CENTRAL PROCESSOR BACKGROUND PROGRAM TO TEST SOME OF THE BASfC
POP•12 INSTRUCTIONS, AT THE START OF THE PROG~AM1 !F THE MACHINE
HAS GR~ATER THAN SK OF CORE, THIS PROGRAM WILL BE RELOCATED TO
ALL EXtSTING MEMORY FIELDS~ DURING THE EXECUTION OF THE EXERCISER
A RANDOM MEMORY r!ELD IS SELECTED AND IF !T EXISTS THE BACKGROUND
PROGRAM I~ RUN IN THAT FIELD~

RK06!

THIS IS A TEST OF THE OATA HANDLINE CAPA9tL!TY OF THE RK08 D!SK
CARTR!OGE 1 THIS PROGRAM EXECUTES A WRITE • READ OPERATION OF 400
OCTAL WOROS LONG ON AN INCREMENTING DISK SECTOR, SURFACE AND D!SK
ADDRESS, BOTH THE DATA PATTERN AND MEMORY FIELDS ARE Or RANDOM
NATURE~

RF0BIDF321 THfS IS A TEST or THE DATA HANDLINE CAPABl~ITY OF THE RF?BI
Dr32 OISK MEMORY, THIS PROGRAM EXECUTES A WRITE • REAO O?ERATfON
or 1000 O~TAL WORDS LONG ON AN IN~REMENT!NG Dl~K EXTENMEn ADDR~SS~
THE DlSK ADDRESS, CATA PATTERN AND MEMORY rlELDS ARE RANDOM,
rPP•121 THIS ROUTINE EXECUTES A SERIES or FPP•12 INSTRYCT!ONS, UPON COM·
PLET!ON THE ANSWER IS COMPARED TO KNOWN RESU~T~, If NO ERROR
HAS BEEN MADE1 THE INSTRUCTIONS ARE REPEATED, THE ALGORiT~M
USED WILL TAKE ABOUT FIVE SECONDS TO EXECUTE BEFORE COMPLETION~
THE MEMORY FIELD THE ANSWER WILL BE STORED INTO !S RANDOM, THE
CORRECT fPP•1Z ANSWER !St

EXPONENT

0015

M,s,w,

2000

L1 S,W,

0000

A,!,P,1 Ti-i!S ROUTINE WU.L. PERFORM A EXTERNAL SYNC: SAMPLE PROM
THE A1 TOD, CMANNELS OF TME A,!,P, THE MEMORY FIELD THE
RESUL.T W!L.L. BE STORED INTO IS RANDOM,
THE KW12A CL.OCK C:ABLE MUST BE INSTALLED TO OPERATE THE A~l~P~
TC581

THIS IS A TEST OF THE TC58/TU10 MAGTAP~ MEMORY, A ~00 WOPD wRITE
RECORD IS WRITTEN rIVE TIMES, THIS IS THEN FOLL.OWED BY A SPACE REVERSE
AND A READ/COMPARE OVER THE FIVE RECORDS, ANOTHER SPACE REVERS[
IS EXECUTED AND THE FIVE RECORDS ARE THEN READ AND THE PATA IS
COMPARED TO THE EXPECT~D VALUE~ !F EDT <END OF TAPE) IS DETECTED
THE DRIVE IS RESET TO BOT (BEGtN!NG OF TAPE> AND THE PROCESS IS REPEATED,

KF12BI

!F THE MESSAGE SAYS "0Ntt THIS INFORMS THE OPERATOR THAT THE
KF12B (A~P~l~) IS HANOL.ING TME INTERRUPT SERVl9E~ !F THE MESSAGE
SAYS "OFF" THIS INFORMS THE OPERATOR THAT THE KF128 IS NOT
HANDLING THE INTERRUPT SERVICE~
D!SPL.AYED MESSAGES CIN RED Ir VR20)

T!MEI
-

THIS IS A 4 DIGIT OCTAL. NUMBER or THE RUN•TlME or THE PROGRAM~
THE SECOND 4 DtG!T OCTAL NUMBER INDICATES THE TOTAL. NUMBER OF ERRORS,
NON•D!SPL,AYED ROUTINE~

LP08/LP121

THIS ROUTINE WILL OUTPUT A "SLIDING" PATTE~N ON THE LINE PRINTER,

TCt2!

THIS ROUTINE WILL. WRITE • READ FROM ALL EXISTING TAPE DRIV£S~ A
BUrFER Or 400 OCTAL. WORDS IN MEMORY rJELD 0 IS USEO, THE TAPE
INSTRUCTIONS ARE EXECUTED !N NO•PAUSE1 EXTENDED ADDRESS MOOE:
THE L.INCTAPE IS HANDLEO IN SUCM A MANNER THAT A DRIVE
MAYBE OE·SELECTEO OR WRITE•L.OCKEO WITHOUT CAUSING AN ERROR:
THIS W!L.L C:AUSE THE TAPE PROCESSOR TO HANG IN NO•P4USE
WAITING roR AN !NTERPYPT THAT W!L.L NEVER APPEAR, !T WAS
NECESS4RV DUE TO PROL,ONG RUNNING or • TAPE WILL WEAR
THE TAPE our:

PR12!

THIS ROUTINE WILL. READ A 8!NARY COUNT PATTERN !APE (MA!NDEC•00•
D2G3•PT) THROUGH THE HIGH SPEED PAPER TAPE READER, THE ROUT!Nr
WIL.L POS!!lON THE PAPER TAPE IN THE CORRECT PO~IT!ON~

KW12AI

THIS ROUTINE WILL HANDL.E TME CLOCK rLAGS AND UPDATE THE PUN•TI~E
INDICATOR ON Tl-IE VR14 OISPLAY~

DC02FI

THIS ROUTINE WILL. HANDL.E A GROUP (UP TO 6) or TTY TERMINALS
CONNEC?ED TO A DC02•F TELETYPE CONTROL. 1
Ir A KEYBOARD rLAG IS OETECTEO, IT IS CONSIOER~D AN ERRQP,

B,2

VR14 (VR20) DISPLAY MESSAGE
···--·---~·--···-~·--··---~·~--W••-•••••~••P••-••••••••••••••••••••••••••••

.
•

RK08

Rroe

F'PP12

A lF'

TC5B

KF'l.28

OF'F'/ON

Tl ME

xx xx

YYYY

··---·---~·--··---·--~·-··---····~·--·---··--··-·

N•0
NsX
XXXX

YYYY
B,J

DEVICE NOT BElNG TESTED
DEVICE MEMORY rIELD
PROGRAM RUN TIME
TOTAL NUMBER or ERRORS

INDICATORS
..LIGHT...........
___ _
,.

Rf081 DISK ADDRESS SHOULD BE INCREMENTING STARTING WITH

~ UNTIL
AN ttNXD" ERROR OCCURS 1 THE DISK "FIELD" BITS WiLL RE THE P!ELD
BEING WORKED ON, THE OfSK ADDRESS AND DISK MEMORY ~UF'F'ER WTLL RE RANDOM,
THE BO,TOM ROW or LIGHTS WILL HAVE "CIE"ElE" SET~ ADDITIONAL
LIGHTS IN THIS ROW WILL ALSO BE OFF'/ON DEPENDING UPON THE ~!SK OPERATION,

RK081 DISK ADDRESS SHOULD BE INCREMENTING STARTING WITH ~ UP TO
AODRESS 6177~ OATA LIGHTS WILL BE RANDOM, COMMAND LIGHTS SHOUL~
READ 3~XY cx~MEMORY F'l£LD1 Y•ORIVE SE~ECTEDJ,

/POP•12 SYSTEM EXERCIStR

PAL.1C'J

V141

17•F"EB•72

11152

PA~E

/PDP·12 SYSTEM EXERCISER
I
I
I

I
I
I

I
I

RF~s,or32,RK~8,L.P06,TC121KW12,PR121L.P12,rPP•12

6 MOOE

AlP•12 1 TC561KF12B 1 VR20 EXERCISER FOR THE PDP•12A SYSTEM
0~20

IS THE

ON~Y

STAR!!NG

ADD~ESS

I
I
I
I

I
I

************** SK OF MEMORY IS REQUl~E~ ***************************

PA~11?l

/POP"12 SYSTEM EXERCISER
I

V141

17•fEB•72

11152

PAGE 2

CORE L.OCATIONS Of F'!EL.O 21

I 12112111J121•2777

MA!N PROGRAM

31210121•3:!!77

Kf128 (AP!l VECTOR5 ANO STACK

340121•3777

TAPE BL.OCK PATTERN TABLE

4121121121•6777

TAPE INPUT•OUTPUT BUF'F'ER

711Jt'!llJ11'1'7

TC58

720121•7377

DC1212•, TEL.ETYPE PROGRAM

740121•7577

MESSAG~

I 760121•777'/

P~QGRAM

OUTPUT BUF'F'ER

****** L.OAOER *******

CORE L.OCATIONS OF' F'lEL.O 1

2112100•2777

31210~J.3177

TC58

320flla3:!!77

MISC,

HIZJIZl.,3777

A1 l 1 P 1 ANO fPP BUfF'ER

4011J121•47i7

Rr0e,0~32

OATA WRITTEN

512111J121•5777

RF'0810~32

OATA READ

611Jl?JllJ•677'

OISPL.AY ROUTINE

711JU•7:!!77

RK08 DATA WRITTEN

'f41?JllJ•7777

RK08 OATA "EAD

/AUTO INDEX REGISTER
I

1llJ

RF'08

TC58

F'PP .. 1iZ

RKllJB

TC12

~ACKROUND

PROGRAM

B~F'F'ER

~OUT!NES

IN F'!EL.D 0 THAT ARE USED

/POP•12 SYSTEM EXERC!S~R

:!)llJ01
0002
012120
0021

012122
0023
11!12124
"1025
012126
0027
0030
11lllJ31
11llll32
0033
012134
11lllJ35
012136
0037

0011l1
5iH2

•1

~011l0

XXXAC I
•211l

11102121
6213
5562

111000

11100121
11!11Jl1l11J
12'12111llll
11J011llll
1110111121
l'011llll
12'121?Jlll
00011J
1110011J
11111J17
01210121
111100
02011J

PAL.HI

V141

JMP
00"10

TSTMOR•l

17•F'E8•72

11152

PAGE 3

/TYPE OUT POINTER

Cir CDF' 10
JMP I
L.REAL.

/THE ONL,V STARTING AnDRESS OF" THE PROGRA~
/WHEN "Y" IS TYPED, RETURN TD L,OCATION "WORL.O"

/STORAGE AREA roR SOME COMMONl.Y USED VARIAeL.ES
/MASTER WORD
MASTER I 0
/WORDl~
wD1,
111
TCT!ME 1 111
W03 I
11!
/WORD3
W04 I
l1l
/WOR04
/UNIT BITS CIN 6 1 7 1 8)
UN tT I
0
XOBWD I 111
IEXTENQED OPERAT!ONS BUF'rER WORD
Cl.OCK I 11Jlll011J
QNBN I
111
/QUARTER NUM8ER 1 BLOCK NUMBER SAVE
PASS,
121
/F'ASS gouNT
i<llJ21171

0017

Kt L.1.1 TI l1l
Klll1011l 1 111ll1l
K02fll11l1 211Jl1l
IL.INC INTERRUPT HANDLER

11lfll40
U41
1110~2

012143
11!044
00~5

3046
0047
111050
0051
111052

11111J411J
210011J
0flll1l2
7340
3057
1(1136
6151
5456
7200

1140
0

TSTMOR 1 F'OP
CL.A CL.I. CMA
OCA
tNTRPT
TAD

Cl.A
TAO
6151
CL.A

0054
0055

6151
7200
3057
6141
6055

Mt&GTAP I LJMP

31/l56
02157

0724
02'021

L,PATC21 1 PATCH0
INTRF'T 1 3

0053

TO PDP•8 ~ODE

/SET INTERRUPT F'LAG

1<2'100

6151
JM!"

IC~ANG~

OCA

I. INC

L,PATClll

/SKIP IP TAPE OONE SET
/NOT THE TAPE TRY OTHERS

K020fll
/CLEAR TAPE DONE
tNTRPT

/CL.EAR INTERRUPT f~AG
/CHANGE BAOK T~ LINC MOOE
/GO ON TO OHEC~ TRANSrER

/POP•12 SYSTEM EXERCISER

PAl..10

V141

17•F'EB .. 72

/CONSTANTS AND ADDRESS LINKS
11!1216121
l'l121~1

2!062

2!121~3

2J064

11!0~5

111066
0!0~'1
111070
11112171
0072
111073
11!0'14
111015
1110'16
11!0"7
!1lUl0
111101
11111212
U1213
11111214
111105
011216
0101
0110
111111
0!112
"-'113
lll114
111115
0116
"117
111120
111121
111122
0!123
111124
11!125
0126
lll127
11!130
llJ131
2!132
0133
OJ134

0135

3777
4717
2467
1025
111511!0
0532
001110
11!011!0
111000
7000
11101210
121011!0
001217
621211
141110
1201
0000
11100121
0000
1012
2417
111000
6203
3700
0011!0
20!56
0000
0011!0
0000
NH10
IZl011J0
0011!0
0000
'7'f'10
111000
001210
12101210
0000
7766
001210
2157
el726
4571
0733
45'16
4577

K37771
3777
4777
K.4777,
K206 1
WKRITE
START
K21115 1
111511!0
SrT AT I
RANGE:T
ORANG,
WKOl,
11101110
AKOD,
111011!0
CKNT,
111000
STAT I
7000
DOF'ELD I 001110
1210111121
F'XtL01
1(00071
11!01117
6201
PHC!51
KW12
CPRUN
PHC61
0000
Art: AI
NROt<,
01!11110
RKOllV I
121000
WL,02,
WAIT
Rl<E'.X
Wl.03,
CFrLO I
11!0H
KC I OF' I
621113
K37011! 1 3700
rrPELD1 111
LGt:TR,
GETRAN
0
APl1
AlPF'L01 121
OKF'EL0 1 0000
111
TC'DL1
BAOF'LD I 121
ERCNT1
0
TICKS,
111
M1121,
·10
RrT PH:, 121
RKT!ME 1 121
APTlME 1 121
F'PT I ME I 111
M12,
·12
121
TIC111!1
F'lNOP
F'lXNPi
PTCH2
LPTC21
KPT2 1
JMS I
PTCH6
LPTC61
KPTC9 1 JMS I
K,.IMPTC 1 JMS I

corx,

PHC2
PATC9
PATC10

11152

PAGE 4

/POP•12 SYSTEM EXERCISER
014121
014121
01~1

0142
0143
111144
111145
111146
111147
lll150
111151
0152
0153
111154
0155
0156
:iJ157
016111
01~1
1111~2
"'1~3
01~4

11117111
0171
i11172

111173
0174
111175
0176
Vl1'7

7'1210121
4152
4151
4116
653?
21?4?
410121
1512
t'1121111121

PAL,lC'I

012121121
STC
STC
STC:
L.JMP

00rlli21
9!00121
3211
12140121
HH'l7
3527
3534
3547
642111
7543
121?27
"117121

•1111711!

1021121
240121
260121
16'6
2206
1462
?20121
7113

17 .. fE8•72

11152

PACE 5

/TRAP L,OCAT!ON
•1421

ERROR 1 AERROR
10112RT I 410121
DF"32S I DF"ST
F' At LE:O I "'
GOOD,
r1Jl1llll121
8A0 1
0210121
11'
Df1
Ln,,P I
ST•l
K12140l111 'il4!/J121
V111!0? I 12111J7
F'SAPP1 APT•l
rSAPPL, 1 APT+4
BASE•l
L!RB,
LRE:AL.1 REAL.
HSRTS1 HSRST
L.PTCf.171 PTCH?

0011li21

Vl41

BAD
GOOD
8AOF'L.D

xxx

/A 1 P~I~

L.INKING ADDRESSES

PATC11
PATC21
PATC81
PATC7 I
PATC31
P4TC4 1
PATC91
P4TC1fll1

RF'8SA
RK8
AlP
! NTF'P
SETT?
HSR
DC212F'
TC58

/SAVE !HE AC
/SET LOC~ eooD TO 012111'121
/RESET ERR~R FIELD
/TRAP OCC~RRED 1 ERROR

/RF'08/0F'32
/RK08
/A!P•12
/1'1"P•12
/LP08•L,P12
/HIGH §PEEO READER
/OC1212•F"
ITC:5B MAGTAPE

/POP•12 SYSTEM EXERCISER

2lZ00
"l201
3202
11J211l3
0204
;il211J5
~2~6

0207
11l21"
11l211
11l212
21213
0214
~215

OJ216

f'Al..ll'l

C:'l211J0

•211llll

0011
4022
71641

DATUM,
!!!EST AR I

ei066

3317

111067
7577
1066
0227
6207
4023
6512
4'125
6512
4026

OHL.UP I

V14l

Cl.,R
STC
MASTER
L.OF' 1
SET+20 6
Bl..KTBL.•1
SET+211l 7
7577
STA.+20 6
XSK+20 7
L.JMP
,•2
STC
WD1
L.JMP
RANDOM
STC
lo/03
L.JMP
RANDOM
STC
\J04

17•F"EB•72

11152

/lNIT!AL.!~E

PAGE 6

MASTER WORO TO 0

/CL.EAR OUT BLOCK PATTERN TABLE

/SET UP WORD 1
/WORD J
/ANO WORD 4

/THIS SECTION Or CODING TAKES CARE OF" !HE EXTENDED UNITS (MORE THAN 1)
2121'?
0220
0221
0222
ill223
0224
0225
0226
022'1
0230
0231
11l2J2
0233
0234
0235
0236
0237
02421
~241

0242
0243
0244
0245
21246

6512
1560
4'177
71305
42127
22123
1560
7767

22127
42127
0516
1560
7'12!7
0017
2027
111471
6314
1flJ 0 0

111027
0J04

1560
7774

2511
4030

EXTUND1 l.JMP
BCl.+20
4777
ROR
STC
ADD
BCl.+20
7'167
ADO
STC:
RS\./
BCl..+20

RANDOM

/ADD WD1
/MASK IO EXTENDE~ UNIT

/~OS!TION

UNIT
wD1
UNIT
UNIT

TO NEXT TO "U" BIT

/GET WD1
/MASK IO 8 fT .,
/ADO TO CU!!!RENT UNIT
/RESTORE NEW UNIT
/READ THE i!!!GHT ~WITCHES
/Cl.EAR ALI.. BUT UNITS BITS

77'1J7

COM
AOD
AP0+20
L.JMP
L.OA
UN?T
ROR
BCl.+20
7.,., 4
ADD

STC

UNIT
!NCR

/COMPL.EMENT
/AOO C~RRENT UNIT NUMBER
/A.C: MINUS
/NO, BAO UNIT NUMBER, r.o TD INCREMENT WD1

/GET UNIT
/ROTATE 4 RIGHT
/CL.EAR-ALI.. BUT 2 L.SBIS

KXOBWD
XOBWO

/STORE IN XOB

WO~D

/POP•12 SYSTEM EXERCISER
0247
11l2511J
0251
0252
11l253
11l254
11J255
0256
111257
0260
ll!IU>1
02~2

11J263
0264
11l2~5
02~6
02~7

0270
0271

2026
25521
0471
6256
6512
4026
6247
101110
0026
1120
1377
0471
6253
1000
0025
1560
7740
2510
4032

EX '1'1,

EXT2 1

EX'1'4,

PAI.le

V1H

ADD
ADO
AP0+20
1.JMP
i.JMP
STC
i.JMP
I.DA
W04
AOA+20
1377
AP0+20
1.JMP
I.CA
W03
9Cl.+20
7740
ADO
STC

WD4
K411ll'Jl1l

/GET WORD 4

EXT2
RANDOM

/AC PO§ITtVE?
/YES, OK SO FAR
!NO, ADDRESS IS 3717 QR BEi.OW

17-FE8•72

11152

PA~E

lo/04

EX '1'l

/GET WORD 4 AGAIN
/ADD •70till'l

EXT2•3

/AC M!NUS1
/NO, ADDRESS IS ABOVE 7000
/MASK !O BITS e TO 11

l<IZl77rll
QNBN

/STORE !N ~NBN SAVE

/THIS SECTION OF CODING DISPATCHES THE PRO~RAM
/TO THE APPROPRIATE SECTION or CODING IO HANDl.E
/THE PARTlCUi.ARS RELATING TQ EACH MAG !APE INSTRUCTION
"1l272
llJ273
<1274
0275
:il276

inn

0300
11J301
031112
0303
lll304
12131215
12131216
121307
121310
0311
121312
0313
121314
11l315

llJ316
0317
0320
l'l321
0322
llJ323

0011
2023
1560
7770
1120
6302
431111
6301
6312
6H4
6312
6314
6372
6314
6372
6314
6324
6314

Dt SPCH 1 Cl.R
ADO
BCl.+211l

1020
11J001
2022
lil451
0011

?NCR,

100

!NCRA1

0"22
6212

/GET WORD i
WD1
/MASK !O FUNCTION BITS

1770

AOA+212l
i.JMP
STC
i.JMP
TABl.E1 1 1.JMP
i.JMP
1.JMP
i.JMP
I.JM?
I.JM?
i.JMP
1.JMP
RDSUB1 i.JMP
i.JMP
J,.OA+2"
1
AOO
APO
Cl.R
STA
MASTER
1.JMP

TABLE1
I

RD SUB
!NCR
RO SUB
!NCR
WRITE
lNCR
WRt T£
!NCR
READ
!NOR

/ADD IN qMASTER JUMP"
/STORE
/EXECUTE
/READ AND ~HECK

(111)

/READ

(2 l

/WRtTE AND C~EC:K

c 4)

/WRITE

c6)

/INCREMENT MASTER WORD
1'1ASTER

OAT I.UP

/POP•12 SYSTEM EXERCISER

PAl.12'

V14l

17•FEB•72

11152

PAGE 8

/TM!S SECTION OF' CODING HANDLES THE INSTRUCTIONS «READ"
/AND "READ AND CHECK BLOCK"
0!324
0325
0326
0327
0330
0331
0332
0333
0334
2'335
0336
:'.'1337
0340
0341

20i'J121

READ,

4371
1020
6342

6452
UIH!

ei032
06!211

ADD
STC
L.OA+2kl
L.JMP
L,JMP
LOA
ONBN

1.1r

L.JMP
L.JMP
STC
AOC
TMA
L.JMP

602121
6371
4363
212126
!'112123
6472

REXIT

/SAVE RETURN ADDPESS
/SET UP ~OR RETURN

RCMK
Mi SET

1rRoM FLAG HANDLING
/YES

IGE'.T QN.BN
1

WR I TEN
REX IT
TGOOD
WD4
MT INST

/HAS Bl.OCK BEEN WRITTEN?
/NO, EXIT
/YES, OK, SAVE PATTERN WORD
/GET EXTENDEO ADDRES~
/I.DAD THA SETUP REGISTER
/EXECUf E "ROE OR ROC SN«

/RETURN HERE IF F'L.AGS OK UPON INSTRUCTION COMPl.ETION
0342
0343
0344
k'l345
0346
3347
ii!35rlJ
0351
0352
0353
0354
0355
'!1356
0357
036rlJ
0361
0362

RCHK,

4015

L.OA
W04
LJMP
STC

"-077
7400

SET+2121
•40121

11211210

"'026
6601

POP
COF
OCA

12101212
6201

3365
1415

3J64
1364
70'41

TSTDAT 1 TAO
DCA
TALl
CIA

136J
7650
5:566

4545
Pl011!0

0363
0!364

11101110

0365
0366

000121
2017

03~7

'5353

037rl'
0371

6141
6371

TGOOLl1
TSAO,
TFl.D,

REXIT1

/SUBTRACT 1
/SAVE !ME STARTING AOD~ CF DATA TO BE WR!TTEO
/SET UP A 40P! WORD COUNTER

/OATA UEl.D "'

SUBT1
15

TF'LD
15

TSAO
TBAD

TAD
TGOOD
SNA Cl.A
JMP
, •5
JHS
ERROR

/GET A WORD READ FROM TAPE
/SAVE

/GET IT 8ACK
/NEGATE ! T
/ADD EXPECTED VALU~
/ARE THEY ~QUAI. ?
/YES
/NO, LINC•TAPE DATA ERROR

"'I Si!

JHP
I. I NC
L,JMP

TSTDAT

;rtNISHEn •LL WORDS ?
/NO, MORE TO TEST
/YES
/EX IT

/POP•12 SYSTEM EXERCISER

PAl.12!

V141

17•FEB 72
8

/THIS SECTION OF CODING HANDLES THE
/AND "WRITE AND CHECK BLOCK"
k'!372
t'l373

1020

eJ374

t'l375

6452
6512

i'l376
1'1371
i"400
0401

0470
6375
4444
2l011!2

0402

1026

0403
0404

7041
7040

"41!5

3015
1251
3016

WRITE,

6440

l.04+20
l.JMP
LJMP

1.JMP

CIA
CMA
DC!i

, .. 2
WPAT

15
Ml.40"
16

/SAVE IT
/SET UP A COUNTER
I l.OCAT!ON
/GET DATA WORD
/SAVE IT lN THE ~UFFER
/DONE 401'! WORDS ?
/NO, MORE TO DO

TAD

WPAT

;>l411

3415

DCA

0412

2016

I Si!

1'!413

5210
6141
2473
1120

JMP
LINC
AOD
!iDA+20

0414
0415

t'l416
0417
21420
0421
0422
21423
0424

7007

4424
2027

0242
1120

0000

H25
0426

1120

"1427
0430
11l431

0641

0447

t'l432
0433

1040

0434
?!435
0436
l'J437

3400
1040

/FROM rt.AG HANDLING
/GET A-RANDOM NUMBER
/MAKE SURE IT !S NON·~ERO
I !T WA~ i!ERO
/SAVE IT
/GET STARTING
/SUBTRACT 1

1244

DCA

qWR!TE"

W04

eJ411l6
11l4!!l7
11l 41fll

TAD

lN~TRUCT!ONS

/SETUP F"OR RETURft
WCHK
MTS ET
RANDOM

Ai!E:+20

1.JMP
STC
PDP
TAO

PAGE 9

11152

•3

ADDR~SS

MTtNST+l

/GET QNwBN
/SUBTRACT '70

C4TEMA
UNIT

/SAVE Bt.OCK NUMBER
/GET UNIT
/MOVE I.EFT 2
/ADD B~OCK NUMBER

7011l7

STC
ADD
ROI.
A0A+20
C4TOU 1 0
A0A+20
8L,KT81,,
I.OF
STA

UNBNSV
STC

4434

/ADD TAPE PATTERN ?QINTER
1
,+2

STA

0000

2026
11!023

l1l
ADD

WD4

1.JMP

t1TINST

TMA

6472

/SAVE !HE DATA WRITTEN ON UNIT X, BlOCK V
/STORE POR EXECUTION
/Cl.EAR STAT

/SAVE THE WORDUS WORD

/GET EXTENDED ADDRrss
/l.OAD TMA SETUP RE~IST!R
/EXECUTE

/RETURN HERE Ir FLAGS OK UPON INSTRUCTION ~OMPl,,ETION
0440

1000

0441

0473

0442
0443
11l444

4032
11320
0000

0445
0446
0447

1'?140

0641

1.DA
MT!NST•l
STC
QNBN
WCONT2 1 !.DA+20
wPAT,
el
l.DF"
l
WCI-II( I

/GET

QN•BN

/GET PATTERN

W~ITTEN

IN BLOCK

0450

0000
6314

UNBNSV 1 0
WEXIT 1 1.JMP

0451

7400

Ml.4i:!l1l 1

~4011J

!NCR

/STORE IN ~LOCK ~ATTERN INDICATOR
/EXIT

/POP•12 SYSTEM EXERCISER

!'Al.lt"

V141

17•F'EB•72

11152

F'Al".E 1111

/SUBROUTINE TO SET UP MAGTAPE INSTRUCTIONS
/SUBROUTINE IS ENTERED WITM "WMERE TO GO IF' INTEPRUPT OCCURS AS EXPECTED" !N AC
/SUBROUTINE EXITS WITH CONTENT§ OF XOB WORD IN AC AND !N XOB
2'452
iH53
;ii454
2'455
21456
3457
2'460
121461
1"46 2
11463
21464
21465
21466
;ii467
IJ4 70
ll471

4iZJ55
21(JQl0

MTS ET I

447~

2i1l23
1560
7760
2471
4472
2032
4473
2030
1560
01212'4
ei1211211
6470
2l7121i1J

MTEXIT 1
RDCCON 1

STC
ADD
STC
ADD
BCl.+20
7760
ADD
STC
ADD
STC
ADO
BCl..+20
12112104
AXO
LJMP
07121121

MAG TAP

/SAVE INSTRUCTION WHERE WE HOPE IT WILL STAY

MTEx IT
WD1

/SAVE RETURN ADDRESS
/MASK !O INSTRUCTION B!iS

RDCCON
MT INST
ONBN
MT!NST•l
XOBWD

/STORE
/MOVE ~N·BN INDICATOR
/GET XOB WORD
IL.DAD xoa
/EX IT

/EXECUTE THE FOLL.OWING MAGTAPE INSTRUCTIONS BY JUMF'!NG HERE
MT!NST, 121

2l51il7

i?l000
1210el0
121011
2112
0470
6;1213
051110
6771
0iil00
0416
6745
4152
4151
6537

1!510
0511

e'770
2'130

K077" 1 21770
KXOBW0 1 0130

:l472
2'473
21474
llJ475
111476
1'477
215021
2151211
2J502
t'l503
"151214
~505
~51216

/MAGTA~E

TDF'l.AG 1

CL.R
ADO
Ai!E+20
L.JMP
IOB
RES TOR
121000
STD
L.JMP
STC
STC
LJMP

INSTRUCTION

/QN•BN

AP!
iDF'l.AG

PATCHC
BAO
GOOD
xxx

/KF'12 DID NOT EXECUTE THE RESTORE COMMAND
/TAPE DONE CLEAR 1
/VES, ~O TO DISPLAY BA~KROUND
/N0 1 SAVE AC
/SET GOOD TO 000~
/NO•PAldSE rAIL.!'.D

/PDP•12 SySTEM EXERCISER

PAl.ll'l

V14l

17•FEB•72

11152

PAGE 1i

/RANDOM NUMBER GENERATOR • EXIT WITH RANnOM NUMBER
Z512
::1513
fl514
12l515
fl516
3517
'152121
el521
f'522
7'523
?l524
'1525
121526
?l527
?!53121
"J531

11211210

RANDOM 1 L.DA

?121~0

4531
2527
2530
9'263
453121
253121
2527
r"262
4527
253121
6531
?,121211
e:12101
5331

STC
ADD
AOD
ROL.+2121
STC

RANX ! T
HAl,,F"X
HAL,F"Y
3
HAL.F"Y

~.DD

11111,,F"Y

ADD

HAL,F'X
2
HAL.F"X
HAL.FY
I •3

~OL.+2121

HAL.Fl( 1
HAL.FY,
RANXJT 1

STC
ADD
L.JMP
0121211
012101
JMP

/EX IT

/GET A RANDOM NUMBER ENTER IN PDP MODE
"J532
3533
1534
?l535
'11536

!?12112l121

6141
6512
'."12102
5732

RANGET 1 0
L.l NC
l.JMP
F'OP
JMF' I

RANDOM
RANGET

I~J

/PDP•12 SYSTEM EXERCISER

PA\.lC'I

V14l

17•F"EB•72

1115?

PAGE 12

/COMMON ERROR HAL,T SUBROUTINE
3537
~54121

'1541
2'542
'1543
"1544
?1545
1546
"1547
255121
3551
'1552

21553

?l'.')54
CJ555
ci556
~:S57

?l560

215210
60:'12
01210121
156121
612121121
4621121
2461
6553
40?121

26210
66.H
'146121

~226

1215 73
21574
l'l575
l'l576
"577
2'6"0

XXRX,
K~01211111

XXR,

212166
7521121
0607
61212121
6557
"1607
6365
?1226
6563
6553
U2121

XXRE,

1211212121

2004
2'226
6573
~002

5777
1241
660121

?!601

4605

?1602
i1l6i::3
?l604

:i!011

012117
1220

i1l605

~0ellil

"606

6000

IDISABl.E INTERRUPTS

11570

il5~1

!08

I OF"
L.DA

10'10

>'1562
?1563
2l5f)4
>'15t>5
?1566
>'1567
?157121
'~571
~572

xxx,

XXXPC1

BCl,,+2121
61210121
STC
SNS+2121
LJHP
STC
ADD
LJMP
SNS+20
LJHP
SET+20
750121
l.I F"
LJHP
XSK+20
LJMP
L !I"
LJMP
XSK+20
1,,JMP
1,,JMP
l.DA+20
?1020
ESr
XSK+20
l.JMP
POP
JMP I
WORl.D
1...J"1P

XXXPC
1
XXR
XXXPC

xx
0

XXRE
6
7
DOISP
6

,•3

DXER
6

/INHIBIT HALT ** RESURToo
ERRO~, DtSPl.AY THE !NrORMATION
/SET UP A TIMER
/CHANG~ TO r?El.D 7 Ci.INC>
/OISPl.AY THE CURRENT TIME AND F"IELD NUM,
/DONE 112121 TIMES ?
/NO Dl~Pl.AV IT AGAIN
/YES1 NOW D!SPLAV "ERROR"

XXR

/COMPl,,ETED 2111121111 TIMES 1
/NO DO IT AGAIN
/TEST SNS 111 AGAIN
/RESTART THE PROGRAM
I !IO Cl.EAR

6
,•1

/OELAY

•3

,+1

/COMMON ROUTINE TO SUBTRACT
I 1 rROM T~E NUMBER IN T~E AC
SUBT11 STC
,+4
Cl.R
COM
LAM+20
(.JMP

/CELETE TY?E OUT
/NO, TYPE OUT THE MESSAGE

/POP•12 SYSTEM EXERCISER

PAl.lc>i

Vl41

17•FEB·72

11152

PAGE 13

/PDP-12 LINK MODE ERROR
/HANOI.ER
116fl7
ll610
::1611
"!612
"l613
2614
0615
0616
0617
?l620
~621

?l622
0623
?l624
?l625
?l626
?l627
i'.'!63'1'
11631
Vl632
?l633

66~1

xx,

412!'112
6634
2031
6647
66:14
?.002
(,647
6634
2151
6647
6634
~152

6647
6634
2116
C'l303
2663
67<:15
6671
6553

1.J'lP
STC
1.JMP
ADD
1.JMP
LJMP
ADD
1.JMP
1.JMP
ADD
1.JMP
1.JMP
ADD
1.JMP
LJMP
ADD
ROR
ADD

LJMP
i.JMP
LJMP

SUBTl
XXXAC
SPACE
Cl.OCK
OCT
SPACE
XXXAC
OCT
SPACE
GOOD
OCT
SPACE
BAD
OCT
SPACE
BADF'l.D
3
K121260
PR!NTR
CRL.F'
XXR

/SUcTRACT 1
/SAVE THE AC
II NSERT SPACF:S
/GET THE TIME
/TYPE 6UT ncT~ AC
/INSERT SPACES
/GET THE PC VAl.U~
/TYPE OUT OCT~ VALUE
/INSERI SPACES
/~ET THE GOOD VALUE
/TYPE OUT OCT~ VALUE
/%NSER! SPACES
/GET THE BAD VALUE
/TYPE 6ur ~CT~ VALUE
/INSERT SPACES
/GET ERROR F!El.D
/MOVE RIG11T
/ADD 121Z6?l
/PRINT IT
100 "CR"·"l.F"
/RETURN TO ERROR HANDLER

l!HIS ROUTINE Wil.I. SPACE B PLAgES
f'l634
/l635
0636
?l637
?l640
?l641
~642

"643
?1644
~645
~646

HHl0
'1:0"!0

SPACE1

I.DA

SPEX 1

STC
5ET•20
·11
ADO
l.JMP
XSK+20
LJMP
CL.R
L.JMP

4646
?1067
7767
27('!4
67"5
0227
6641
l'l011

6646

SPEX
7
K240
PR!NTR

/GET RETURN ADDRESS
/SAVE IT
/SET UP COUNT

/GET A SPAt:E
/PRINT IT
/DONE 1
/ND, DO MO~E

/EXIT

' •3

/PDP~l2

SY~TEM

EXE~C!SE~

PAL.H'

Vl41

17•FEB·72

1l 152

PAtlE 14

/Tf11S RO'IT!NE !S ENTERE:J wJTH THE NUMBER T'l RE TYPED
I AC
TYPE TME OCTAL NUMPER IN Tf1E AC

I~:

Tf1E

'.16 4 7

4 6'.> 7

~650

?0(10

i1651
1652
'1653
1654
il655
;1656
'.1657
'1660
~661

?-662
i6b3
?664
?665
~666
~667

il670

OCT,

467 ~

'f.,J.<, 7

7773
2657
i\243
1k'J60
r'·tlll i 1

1560
777121
1120
,°'260
6 7;15
:1227
IS654
·rn11
6!:170

TEMP,

~674

'.1675
'.16 76
1677
},70121
'.1701
r17e:2
17?3
~704

1000
f'f"J00

TEMP
OCTE
7

A O'.J

TEMP

ROL
ST A+2<:l

?l2 6ei

OCTE,

LJMP
XSK•20
LJMP
Cl.R
LJMP

CRi.F I

?R!'HR
7
TEMP•3

ROUTINE TYPES A "CR•i,.F" ON Tf1E TE1,.ETVPE
LDA
2

4703
102;:,
7215

SiC:
L:JA+20

67~5

LJMP
LD.\+20

CRl,.FE

eJ215

Hl2ii1
11212
4'7:'5

PR! NTl:l

~212

6733

CR1.FE 1

LJMP
C:i,.R
LJMP

"240

K240 1

7'240

:'011

PR!NTR

/TH Is

7J7Cl'7

:'0 2!2

6046
7220

7J7121

6041

2711

5310
"042
6141
6000

ni2
::l713
?714

/SAVE RETURN

r00.:i

K026?' 1

.H"5
L'l7 0 6

/SAVE. AC

PCL•20
7770
Ai)A•20

/T~!S
.~6 71
llo 72
?673

<;TC
AJrJ
STC
SET•20
7773

IS THE ALTUAL TYPE OUT ROUTINE, ENTER WITH TME CMARACTER TO
BE TYPED JN THE A C1 EXITS WITH A CLEARED AC~

PR!NT'l 1 "DP
6046
Cl. A CMI.
6041
JMP
6i2i 4 2
I.. I NC
LJMP

•1

/POP•12 SY3TEM EXERCISER

PAl.1f'l

V141

17,.FE8•72

11152

PAGE 15

/THIS IS THE DISPATCH ROUTINE FOR THE ~YSTEM BACKROU~D PROGRAMS
I THE PROGRAM WILL LOOP !N AND OUT OF !MIS ROUTIME
~715

002!2

7J716

73710
1112

~717

21720
'il721
3722
,H23
J724
3725
7J726
J727
"730
7J73l
?l732
J733
2734

7651)
5335

>1735

2057

?l736
?;737

5343
4545

;'1740

'10210

1'0216
c:;477
4476
4570

4571
4577

4573
4572
4574
4576
4573

;J741

7717

3742

0030

7J743
Ill 4 4
7J7 45

60711
5477
'71002

7J746

5335

PA TCl-11

PATCl-1'1 I
PTCH11
PTCH21
PTCH71
PTC'-131
PTCH41
PTCH51
PTCHtc. I
PATCHA 1

POP
CLA CLL.
TAD
AP!
5NA Cl.A
JMP
PATCHA
APjON
JMP l
PATC6
JMS l
PATC5
JMS !
PATC1
JMS !
PATC2
JMS l
PATC10
PATC7
JMS l
JMS I
PATC8
JMS I
PATC3
JMS !
PATC9
JMS !
PATC4
!Si!
INTRPT
JMP
PATCHB
JMS
ERROR

V1?54

7J755
7l756
Vl75'7
7l760

2'000

ION
JMP

PATC6

PATCHC, PQP
J"1P

PATCHA

PATClolB I

!OF'

ERCNT
'JOP
Cl.A Cl.I.
CDF
12!
TAD
AERROR
'.JCA
F'A!LEO
TAD
AERROR
DCA
GOOD
l Sr
AERROR
TAD
AERROR
DCA
BAO
I Si!
AERROR
TAD
AERROR
DCA
8ADFLD
TAD
FAILED
LINC
LJMP
XXRX

1347
3150

1747
3151

2347

r;J762

1747
3152

'1l7~5

'il766
376'7
?1770
'il771

l1J

2117

~761

V1763
C:l764

AERROR1

6002
70710
73?10
62211

2347

1747
3116

1150
6141
6545

/KW12 7

/RF'fll8 1 DF"32 '?
/RKfll8 7
/'fC51! MAGTAPE 7

/FPP•12 ?
/A,I,P 1 ?
/LP08, L"l2
/DC212F

/MSR 1
/INTERRUPT CLEARED ?
/VES

/UNEXPECTED INTERRUPT

2'
7777
71

/ERROR PRE•HANOLER
3747
7J7512!
7J751
3752
1,753

/AP! IS ON NOW
/EXIT io THE CP RQUT!NF

I Si!

/EXIT

TO TlolE DISPLAY AND CP ROUTINES

/PDP•12 SYSTEM EXE1:ISER
1J~kl

PAl.10

V14l

17•FEB·72

11152

PAGE 16

PAGE
/RF2l~ SYSTEM PROGRAM
/HI! S ROtJT l NE IS A RE.AD/WR l TE l<QUT I NE ~OR THE RF?8 1 J1'"32 0 ! SK
/THE DATA USFD IS RANDOM
/THE DISK ADORESS!NG IS ALSO RANDOM
/THE FIELD THAT THE TRANSFER USES IS ALS'J RA~D~M

l 2l l10

:•;n0

1..-Pl
1.:W2
l. 2l ?i 3
12lLl4
HJ ?i 5
1 il· 1 6
1.0% 7
101{1
1'111
Hl12
1"Jl3

7210

1 (114

1;;j15

1J16
12117
1J20
1.021
1~22

12123
1324
12125
U26
12127
1030
12131
12132
l,213 3
l,:334
HJ35
12136
1037
1'J 4 0
l2l 4 l
12142
UJ4 3
1J44
1i:J45
l.2J 4 6
1J47

RF8SA 1

: l. 5 6
744~

S~A

434l
6 ei2 2
5 6 ;10
<; 612
1025
2122
7J02l
7 2 -~0
3J57
1112
76S<i

JMS
6622
JMP I
JMP I
START
!S2

~772

fl 614

WAIT,
MU0?' 1

lil :14
6772
6771
4511
3[l72
'1465
3362
4465
3363

TAI)

START,

SNA CLA
JMP l
HO
C:E.TLEV
RESHlR
JMS I
DCA
JMS I
DCA
Jt-AS I
DCA

112135

TAI)

764.:l
5241
2U0
70'.'0

1214
3322
1072

Si!A CLA
JMP
I Si!
\JOP
JMP
JMS I
DCA
TAD
DCA
TAD
IJC A
TAll

UJ50

1075

TArJ

12151
1'J52

32"i2

'.:JC A
6211

5243

4465
31~21

106Z
301.3

6211

Vlk'.107
RF"8EX
RF8SA
,+1

;RAISE ~ACH!NE LrVEL
/REALJ STATUS
/MASK
/ERRORS ?
/YES, "'I~!'.J OUT W~HT "'l':D
;SK IP ON D".l~JE ?
/NOT DONE 1 EXIT
/YES, J MP l fl EXT LCl C,
;SET TO A WRITE !NIT!,

RFT I ME

~JOP

".:LA
'.lCA

"'6;Jfl

/ENTERED av A JM~ TO HERE

:'.?210

CLA
SETLEV
66 l. 4
Ail.J'.l

I f.JTRPT
AP!
RF8SA
K2HH 7
LGETR
DDFELD
DR ANG
OF ATA
DR ANG
AFDD
KI I.LIT
,+4
AFEA
,•3
ORANG
AF°EA
K3777
10
M10212'
SETUP
DDFEl.O
CDFX
,+1

/CLEAR INTERPUPT FLAG
I

/AP! 7
EXIT
/GET 0017
/LO~ER MACHINE L~VEL
/YES
/GET THE F!ELD
!SAVE IT
/GET A RANiOM NUMBER
/S4VE DATA WORD
/GET A RANiOM NUMBER
/SAVE DISK ADDRESS
/RANDOM DISK ACCESS
I ?
/YES, RANDOM D!SK rXTENDED AODRESS!NG
/NO, INCREMENTING ADDRESSING
!NO,

/GET A RANDOM NUMBER
/SAVE !HE RANDOM EXTENDED ADDRESS
/YES WE 00 1 GET CA POINTER
/SAVE IN l,OC', Hl
/SET UP A COUNT LOC,
/GET THE D!SK FIELD
/ADD A CHANGE DATA FIELD
/SAVE IN THE NEXT LDC.
/CHANGE r'JATA FIELD

/POP•12 SV5TEM EXERCISER
1J53
1054
1J55
l.J56
l,357

l.060
l.361
HJ62

1362
3410
2322
5253
1060
4322
6035
4212

PAl,,1~

STAR,

TAD
DCA I
I Si!
JMP
TAIJ
JMS
66>'l5
JMS

V141
DF ATA
10

SETUP
STAR
K3777
SETUP
WAIT

17•FE8•72

11152

PA.r.E 17

/GET THE DATA TO ar WRITTEN
/STORE IT IN THE NFW FIELD
/DONE 7
/NO, MORE TO DO
/GET THE CA VA6UE
/SETUP WC CA
/WRITE O~ THE DISK
/THEN EX! T

/THIS !S THE READ ROUTINE FOR '.HE DISK SERVICE
1063
1;J~4

l,J65
l,,1;66

1061
4322
6603
4212

RFEAt11

TAD
JMS
66:33
JMS

K4777
SETUP
WAIT

/SETUP FOR THE BREAK
ROUTINE
/READ THE DISK
/EX!T fO THE WAIT LOOP

/THIS IS WHERE TO RETURN TO WHEN THE READ lS COMPl.ETED
1067
1.i:J70
1071
1072
1073
1074
1075
1076
12'77
11"0
11'11
112'2
1103

1214
3322
1061
3010
1072
3315
1072
107:>
33"0

6211
1362
3313
1410

ll~l4

~314

1105
1106
11e7
1110
1111

1314
7 2'41
1313
7650
5316

1112
1113

l.114
1115
1116

4545
ei<J?lfi.I
;'fl::l0
00Cllil

1117

2322
5313

1120
1121

5225

421~

TAD
DCA
TAD
r:lCA
TA')
SCA
TAD
TAD

DCA
6211
TAD
'.JCA
CFHECK 1 TAD !
DCA
TAD
c IA
TAD
SNA CL.A
JMP
JMS I
RFGOOD1 0
RFBAl"l 1 0000
RFFLD1 V'!
I Si!
JMP
JMS
JMP

MUl00
SETUP
K4777
121
DDF"El.D
RF"F"LD
DDFELD
CDF"X
,+1
DFATA
RF' GOOD
10
RF'BAD
RF'BAO
RF' GOOD

/SET UP A eouNTER
LOCATION
/SET UP CHECK 1,,0CATIDN

I
I

/GET THE FIELD B!TS
/SAVE l T
/GET THE FIELD BITS AGAIN
/ADD CHANGE DATA FIELD
/SAVE IN THE N!XT LOCATION
/GET THE EXPECTEn DATA
/SAVE iN GOQ1 ~DC,
/GET THE DATA READ SAC~
/SAVE iT l"J SAD
/GET THE DATA READ
/NEGATE IT
/ADD THE DATA EXPECTtO
/ARE THEY EQUA6 ?

, +5

/YES

ERROR

/N0 1 R~09•~F'32 DATA ERRQR

SETUP
CF'HECK
WAIT
START

/F"INISHED 1
/NO, MORE TO TEST

/PDP•12 SY3TEM
U 22
1123
1,124
U25
1126
1,127
1130
1131

1132
1133
1134
1135
j,136
1137
1140

EX~RCISER

000111

62'11
3761
1214
3760
11"1/11
5337
1064
12'7 2
'S615
7300

1363
5722
'11~7

5332

P1U,rn

V141

17 .. F'ES•72

11~6

1147
115/11
1151
U52

:'11100

RF8EX 1

Si!L, C:U
JMP
RF8EXA

6614
DCA

JMS !

DF8AD1

?'02J/11

1153
1154
1155
1156
1157

662'1
6611
f-6211
5225

1160
1161
1162
1163

7750
7751
0000
0000

31lHl

RF1118~DF32

RTR

7012
7630
5353
6614
3351
4545
?l0C!10
002eJ

PAGE 11\

/THIS ROUTINE ~DADS THE WC CA LOCATION
SETUP, 11'J~/11
62Vl1
/CHANGE TO F!E~D J
DCA !
DCAA
/SAVE CA
TAD
M1i1HJ 0
;SETUP WC
DCA !
OWCA
TAD
AFEA
/GET DISK EXTENDED ADDRESS
F'UDG1, .JMP
SETUPS
/DXAL. IF' RF'08
TAD
SF TAT
/GET STATUS SETUP
SETUP A1 TAD
/ADD F"lELD
DDrEL.D
DP1L
/LOAD EXTE~DED ADDRE~S
CL,,A CL.L,
TAD
AF'DD
!GET DISK ADDRESS
JMP !
SETUP
!EX IT
SETUPS 1 AND
K37/11k'I
/MASK IO S!TS 1•5
JMP
SETUPA
I
/THIS ROUTINE TESTS THE ERROR ON
/NXD ERRORS ARE OK
/DRL ARE NOT ACCEPTIABL.E

1141
1142
1143
1144
1145

1115?

DFSAD
ERROR

/MOVE 2 RIGHT
/NXD ERR!'IR ?
/YES, NXO ARE OK
/NO, REAL !::RROR, READ RF08 STATUS
/SAVE BAD STATUS
/RF08wDF32 STATUS ERROR

e'
2
2J

RF8EXA 1 DCA
661111
6611
662'1
JMP
OWCA,
DCAA I

rJfATA 1
H"DD I

7750
7751
210210
OI

AF'EA

START

/NXD ERROR, CLEA 0 EXT~ DISK ADDRESSING
/Cl.EAR FLA~S
/Cl.EAR EXTENDED ADDR[SS
/Cl.EAR F'LAr.S A~A!N
/1'RV AGAIN

/PDP-12 SYSTlM EXERCISER
123'21

1200
l,201
1202
l,.243
12r~4

12215
l2Pl6
1207
t210
1211
1212
1213
1214
1215
1216
1217
t220
1221
1222
1223
1224
1225
1226
1227
123il
1231
1232
1233
1.234
1235
1236
1237
124'21

PAl.H'l

1l'15

P:JP
Cl.A CL.I.
SETI.EV
JMS I
DCA
TAD
SETL.EV
CLA Cl.I.
TA'.)

11?J6

TAD

CPRUN1

73<'10

3213
1"000

4177
7450
52?6
32?4
11f'l5

CPF'RN1

DCA
C'10tl'21
JMS
SNA
JMP
DCA
TAD

DCA

~2?5

4545

JMS l

?;.'l:lkl

CPGOOD I

'.'2'\J!i!I

CPBA'.J 1 i'
CPBF'LO I ~
CPDSP 1 LPJC
SNS+20
1.JMP
ADO
ROR
ADA+20
36i'.l3
STC
L!F'
LJMP
LJMP

70~0

t141
~463

721'1'21
' l 05

?3Jl
1120
7633
5236
~607

6020
72f'l'21

17•FEB•72

11152

PAGE 1'?

PAGE
/CP RUNNING PROGRAM
!THIS ROUTINE GETS A RANDOM NUMBER, AND !F THAT ~EMORY FlEl..O
I lS AVAii.ABLE IT WILL THEN RUN THE CP PROGRAM JN THAT FIELD

'~0?J2

73?J.J
6772
4511
3105
1034
6772

V141

/CHANGE TO PDP MODE
L.GETR
CPFLD
Kl'lQll 7
CPF'LD
KCIDF'
,+1
CPEXIT
CPOSP
CPBAD
CPF'LD
CPBF'l..D
ERROR

/RESET LEVEL
/GET THE F!ELD
/SAVE THE F'IEl.D
/GET '21~17
/LOWER MAC~!NE LEVEL
/YES, GET THE NUMBER
/ADD C~ANGE INSTRUCTION AND DATA FIELD
/SAVE IN THE NEXT LOCATION
/CH.ANGE F'!ELDS
/GO TO THAT F"!ELD AND RUN
/IT W!l.L RETURN HERE, CL.EAR AC !F NO ERROR
/NO CP ERRl'lR
/SAVE !HE 4C IN LOC,
/GET F!EL.D
/SAVE l T
/CP BAgKROUND ERROR, B4D rs THE P,C, AT ERROR

3
CPRUN•1
CPF'LD
1
,+1
7

DD!SP
CPRUN•l

/8YPAS~

DISPLAY ?

/YES

/GET CP FIELD
/MOVE RIGHT 1
/ADD I.IF' 3
/SAVE lT
/CHANGE TO LINC >!ELD X
/AND DlSPL.4Y THE MESSAGE

/PDP•12

SY~TEM

EXEqC!SER

PAL,lC'I

V141

17 .. F'E8•72

11152

PAGE 21i'

/START UP AND lNITIL!tE ROUTINE
/THIS ROUTINE CLEARS SOME LOCATIONS
1iND STARTS THE MOST COMMON OPf !ONS
I

1241
1242
1243
l.244
1245
l,. 24 6
t247
12~0

l.251
1252
1253
1254
1255
1256
1257
126£1
1261
1262
1263

76714
n74
7440

'5247

1121

TAO

31?0

DCA

1P6
3127
4771
6213
4770
4563
3102

TAD

~li11

3072
31910

3114

3066

30 6 7

3070
3112
3113
3105
3123
3122
3124
3125
3024
3057
4530

6212
4554

1306
1307

7604

1310
1311

7640

1312
1313

1314
1315
1316
1.317
1320
13Zl
'l.322

K0007

Si!A

~073

12~4

1303
1304
1305

LAS
AND

JMP
,+3
HLT
JMP
WORLD
R'fl. CLL
RAL. CL.L.
DCA
F'XELD

74:J,2
'52 41
7130
71'.'.14

l,265
1266
1267
l.2li/J
1271
1272
1273
1274
1275
1276
1277
1300
1301
1302

WORl.D1

2'036

5321
1132
3531
l:ll 7 l
6742

TICKS
M12
TIClZ
L.STKW

OCA
JMS I
CIF' car 10
JMS I
LTCP
JMS !
f.ISRTS
OCA
RKDAV
DCA
NRDK
~CA
D:lF'EL.D
OCA
AF'EA
DCA
DKF'EL.D
OCA
WKDl
OCA
AKOiJ
OCA
CKNT
DCA
AP!
DCA
A!PF"L.D
DCA
CPF'LD
l'JCA
RKTIME
RF'TIME
DCA
DCA
APT I ME
nCA
F"PTIME
DCA
TCTIME
DCA
INTRPT
JMS
F'IXNP
c IF'
lill
JMS
LiLP
LAS
ANO
Kill100
ScA CL.A
JMP
WORLD!
TAD
KPT2
'.:!CA
LPTC2
TAD
STAT
DCl.S

6732
6742
6735

Di.DC

7604
0037

WORLD11 LAS
ANO

DCL.S
DLDw

K0200

/MA~K

!O BITS 9M11

I! S !'!' tERt'l ?

/NO, I! WAS OK
OPERATOR ERRCR, BK OF' CORE REQUIRED
/DO NOT LET HIM CONTINUE
/ROIATE LEF'T INTO BITS 6•8

/SAVE IN THE NUMRER t'lF' F'IEl.DS AVAILIABLE
/SET UP A COUNT
I l.OCAf ION
/SET UP A COUNTER
I l.OCATION
!GO START THF CLOCK
/SETUP THE EXTEN~ED
/START HSR1
/SAVE THE NUMBER OF'
/CL.EAR SOME

RK~B

LOCAT!~NS

I
I
I
I
I

I
I
I
I
I
I
I
I

I
I

~EMORY

STAR! LP~8~LP12

/MASK TO BIT 05
/IS IT-SET ?
/YES
/START THE RK08
I
I
I
I
I
I

/READ RIGHT SWITCHES
/MASK !O B!T 04

F'IEl.DS

::)RIVES AVAILABLE

/POP•12

SV~TEM

EXE~CISER

PAl.H'

1323
1.324
1325
1326
1327
1330
1331

7450
4547
4B5
4766
4767
1063
3533

SN/\
JMS
JMS
JMS
JMS
TAO
OCA

1332

3l.10

DCA

1333
1334
1335
1336
1337
134<)
1341
1342
1343
1344
1345
1346

1062
35?!4
3115
4764
4763
6141

TAD
DCA I
DCA
JMS l
JMS I
1.1 r-.ic
L.DA+20
0130
AXO
WR!
rJ771<:l
i.D.\+20
LJMP
STC

13~7

1350
1351
1352
1.353
1.354
1355
1356
1357
1360
1361
1362
131:>3
13~4

13Cl5
1366
1367
1370
1371

FORG,

12'20

Cll30
~~01

'.'1706
0770

1020
6200
4055
7-517
?241
1560
7774
41n
12!20
1254

1.sw
ROI.

00914

f'll>4QI
~715

1543
2657
1752
2332
2722
?!042
2364

!
!
l
I

I.AP 1,
i.STA!P 1
L.STF?P 1
L.OCST,
L.ST59 1
I.TCP,
L.STKW 1

BCl.+20
7774
STC
L.DA+20
1254
ESF'
L.::JF"
L.JMP
AP!ST
A!?ST
ASTFPP
DCST
ST58
CPST
KWST

Vl41
DF32S
L.STFPP
1.DCST
L.ST58
K205
WI.De
FF'PEL.D
K206
Wl.03
TCFDL.
I.SHIP
I.AP l

17-FE8•72

11152

PAl':E 2:'J·1

/IS IT SET ?
/NO, START RF08•DF32
I START THE FPP·12
/START-DC0~·F

/START TC58 MAGTAPE
/PRESE! SOME L.OCAT!OMS
I
I

I
I

IS TART t,J P A', P', I '1
/CHANGE TO I.INC MODE

DATUM
MAGTAP
1

RKDAV
/I.DAD Ac WfTH 1254
/L.OAD

~PEC!AL.

(')

PATCH

/GO AND WAfT

FU~CTION

REG,

/PDP•12

SY~TEM

1400
14211
1402
14213
14214
14rl'5
14216
14217
141el
1411
1412
1413

EXEqCISER

PAl.121

V141

PAGE
/KWl2 SEf:lVICE
/UPDATE THE CLOCK LOCATION !F THE CLOCK FLAG IS SET

Nl210

KW12,

6131

5 6~1!0

JHP I

6135

6135
I Si!

?.120
5247

JMP

?.031
5231
2033
721r~0

I Si!

JMP
I Si!

KNOP,

KW12

TICKS
KW12C
CLOCK
KW12A
PASS

HJ20
71255

1423
1424

67?15
flli'J1l

CL,R

j,425
1426

2117

ADD
ERCNT
1.JMP
OCT
1.JMP
CRl.F
PDP
Cl. A Cl.I.
LINC

1416
1417
1420

7300
Hl35
7040
3035
12133
6141

6647

1432
1433
1434

6647
6671
21002
7300
6141
7'015
112121

1435

rl'001

rl'li'Jn

1436

212114
211i'J32
2127
5244

ATR
POP

1427
1430
1431

1437
1440
1441
1442
1443
1444
1445
1446

RTA

AOA+21i'J

5643
212175

73210

KW12B I

1121

1447

3120
73210

14~0

3057

1451
1452
1453

1112

1454
1455

KW12A1

7650
562121
6771
74:112

KW12C1

/KW12 Ft.AG ?
/NO, EXIT
/CLEAR CLOCK FLAG
/SECONDS OVERF"l.OW ?
/~;Q

/YES,

~PDATE

THE CLOCK, PASS COMPLETE ?

/NO

/YES, INCREMENT Hff PASS

·~OP

1421
1422

1415

PAGE 21

11152

14C'll:l

Cl.A Cl.I.
TAD
K!I.LIT
CHA
DCA
K!I.LIT
TAD
PASS
I. I NC
1.JMP
OCT
1.DA+20
21255
1.JMP
PR!NTR

1414

17•F"EB-72

I Si!
T!C10
JMP
Kl-1128
JMP l
,+1
CHEKF'I.
Cl.A CL.L.
TAD
MU
DCA
TICKS
Cl.A Cl.I.
DCA
INTRPT
TA'J
AP!
SNA Cl.A
JMP !
KW12
RESTOR
HLT

/T!ME TO CHANGE ADDRESSING SCHEME

I CH A~~ GE LDC AT I 0 N
I
"Kl~LIT"

/GET PASS NUMBER

;PRINT IT
/GET ''""
/PRINT IT
/GET ERROR CC'IUNT
/PRINT IT
l"CR•i.E"

/READ RELAYS
/ADD 1.
/I.DAD RELAYS
/HAVE 10 SEC~ GONE BVE YET ?
!NO

/YES, GO C~ECK THAT THE DATA BREAK DEVICES
/ARE STILi. RUNNING
/PRESEf TICKS
I

/Cl.EAR INTERRUPT ~LAG
/GET AP! SWITCH
/IS IT SET ?
/NO, EXIT
/YES, EXIT VIA AP!

/PDP•12 SY5TEM EXEqC!SER

PAl.10

V14l

l7•FEB·72

11132

PAGE 22

/HIGH SPEED READER ROUTINE
14';6
1457
1460
1461
1462
1463
l,464
1465
1466
1467
1470
1471
1472
t4 73
l,474
1475
1476
1477
1521121
1501
15i1l2
1:Hl3
1504
1505
151216

4545
"'"''~0

/!0/!r.:J
~12100

001!0
6011
5662
73710
3057
6016
7450
53<l7
32612!
1260

HSER,
HG00r) 1
HBAD,
HFL.D,
HSP,

ERROR

/HIGH

HSR

/HSRI 7
/NO EXIT

INTRPT
I Wei
HBAD
HBAD

TAD
HGOOD
Si!A CL.A
.JMP
HSER
IS~
HGOOD
NOP
TAD
AP!
~NA CL.A
.JMP I
HSR
REST OR
HL.T

/IF THE CHARACTER WAS 210210
15n
l,51121
l.511

73211
3257
5302

pHJ,

READER ERRCR

"'0
612111

HSREA 1

~PEED

.JMP I
Cl.A CL.l.
DCA
6 IH 6
SNA
.JMP
DCA
TAD
CIA

7~'41

1257
7640
5256
2257
700121
1112
7650
'5662
6771
7402

JMS l
e'

CL.A CL.l. ! AC
DCA
HGOOD
JMP
HS REA

/Cl.EAR !~lT', FL.AG
/READ l:lUFFER
I! S IT NDNwi!ERO
/NO, IT IS HRO
/SAVE DA TA REAl'.l
/GET IT 9ACK
/NEGATE IT
/ADD EXPECTED
/ARE THEY EQUA~ ?
/NO, REPORT IT
/INCREMENT EXPECTED
/GET API SWITCH
/AP I 7
/N0 1 EXIT
/YES, EXIT VIA AP!

/POP·12 SYSTEM EXERCISER

PAI.HJ

V141

17•FEB•72

11i52

PAGE 23

IOF'32•RF'08 SEl.ECTtON ROUTINE

1512
1513
1514
1515
1516
1517
1520
1521
1522
1523
1524
1525
1526
1527
1530
15:31
1532
1533
1534
1535
1536
1537
154 t:l

1541
1542
1543

1544
1545
1546

ei0~0

7360
6643

Cl.A CL.I. CHA CHI.

1340

Cl.A
Tl\D

3742
6645

DO I
6645

7650

SNA CLA
JMP
DF'ST1
HD
SF'TAT
DIML
TAD
l<OXAI.
DCA
FUDGE1
JMP
DF'ST2

7200

5332

1!064
6615

1341
3737
5335
1074

3156
71.')(l6
315.3
5712

11321
457121
6643
'1725
0000
762'4
77:1.0
6777

DFST21

KJMPDF
1,.PTC1

K~007

DCA

V1007

DCA
DF
JMP I
DF'ST
FUDGE1, FUDG1
KJMP:JF' I JMS I
PATC1
KDXAL1 DXAL
LPTC11 ?TCH1
/A Ip·,!', START UP ROUT I NE
AP!ST,

7300

TAD

6776
73<J0

SETSTK
CL.A CLI.
TAD
Ki21037
SET LEV
CL.A
RSTACK
Si!A
ijCA
AP!
JHP l
APIST
1'1037

1364
6772
7200

156iil

6774
7440

15~2

3112

1565
1566

<'1037
3000
3040

'5743
K02137 I
K321il~ I

K321401

/SET AC TO 7777
/LOAD 5!SK EXT~ ADDRESS CRF0~)
/WRITE
!SET UP THE RETUPN JUMP
I LOCATION
/READ 61sK EXT~ ADDRESS
/NON•i!ERO 1
!NO IT.WAS i!ERe
/YES, WE M4VE AN RFilP ON L!NE
/I.DAD STATUS

I
I

/MOVE I.INK TO THE AC
/CHANGE TH~ DISPLAY ~ESSAGE TO
/EXIT

k'I

LAS
SPA CL.A
JHP I
AP!ST
TAD
1<3000
SETVEC
CL.A Cl.L

1366

1561
1563
1564

DF"ST1 I

5743

1550

1556
1557

k'I

6643
6605

66k'l5

1365

1555

I'!

CDF

15~7

1551
1552
1553
1554

DrST,

6201

31210il
3il4il

K3040

!GET THE RIGHT SW!TCHE~
!BIT 0 SET ?
!YES, EXIT
/NO, GET 3~01'!
/L,OAD VECTeR TABLE POINTER
/GET STACK POINTER
!LOAD ~TACK POINTER
/GET 37
/l,,OwER MACM!NE LEVEL
/READ STACK POINTER
!DO WE~MAVE AP! INSTALLED I
/YES,SET AP! SW!TCM
/NO, EXIT

D~32

/PDP•12 SYSTEM

EX~~C!SER

PAI.HI

V141

17•FEB•72

16Cl0

pAGE
/F'PP-12 ROUTINES
/INTERRUPT SEHVICE AND ANSWER TEST
/START•UP AND REIN!T!L!2E ROUTINE

l6~121

0~.H.10

STF'PP1

1601
1602
1603
i(l04
1605
1606
162'7
1610
1611
1612
1613
1614
1615
1616
1617
1620
1621
1622
1623
1624
1625
1626
1627
1630
1631
1632
l.633
1634
1635
1636
1637
1640
1641
1642
1643
1644
1645

6552

16~6

1647
165121
1651
1652
1653
1654
1655

4511

~013

1350
3413
1341
3413
1342
341.3
1343
3413

TAD

'.JCA l
DCA l
DCA !
DCA I
l'.lC A I
DCA l

~413
~413

3413
3413
3561
7001:)
621211
13'51
7012
7010
1155
6553

LGETR
FPELD
FPELD
FF'PELD
FPELD
CDF"X
I +1

/GET THE F'!ELD
/SAVE ! T
/VES 1 MAKE SCOPE NUMgEP EQUAL

FSAPP
13
K1111
13
KF'Pl
13
KF'P2
13
KF'P3
13
13
13
13
13
L. I RB

/GET THE A~T ADDRESS
/SAVE i T
/GET THE NUMBER
/FPP .. 12 P
/STARTING ADDRESS CF FPP CODE
I
P+i
I GET !HE !R POINTER
P+2
I
/GET THE BASE POINTER
I
P+3
P+4
I
P+5
I
I
P•6
P+7
I
I
I R•7

lil

/CHANGE TO DATA FIEL~ 21
/GET THE F'!ELO NUMRER AGAIN
/MOVE IT TO RITS 9•11

~.JOP

/GET THE NUMBER AGAIN
/ADO A CDF'
/SAVE IT
/CHANGE F!ELIJS

~655

CDF
TAD
RTR
RAR
TAD
FPCOt-1
CL.A
TAD
DCA I

1344
6555
7000
56'10

TAD

KJMPrP
L,PTC3
Kr.'1'5

FPST
NOP
JMP I

STF'PP

./EX IT

ERROR

IF'PP•12 ERROR

7200

1254

4545
0000
;'lllJ?.10

0000

4573
'~730

F'PER,
F'PGOOD,
F'PBAD1
FPBF'LD I
KJMPFP I
LPTC31

PAGE 24

F'P I Ci.
.,JMS I
DCA
TAD
DCA
TAD
TAD
DCA
6211
Cl.A CLL.
TAD
IJCA
TAD
DCA l
TA'.l
'.:ICA l
TAD
DCA l

'3351
13'51
3lHJ
1351
1075
3211
6211
73210
1157

11152

JMS I
Cl

F'PELD
K04<?QI

0
"'

JMS I
PTCH3

/ADD INTERRUPT

E~A~LE

PATC7

/GET THE STARTING ADDRESS OF' APT TABLE
/START F'PP.,12

/PDP•12 SY5TEM

EX~RC!SER

PAl.10

V141

17•F'EB•72

11i52

PAGE

IF'PP·12 INTERRUPT SERVICE ROUTINE
16:>6
1657
1660
1661

l,662
1663
1664
1665
1666

l,667
1670
1671
1672

1673

?!tl00

6557
'i656

I NTF'P I

3271

F'P!ST
JMP I
!NTFP
CL.A CL.I.
DCA
INTRPT
SET LEV
TAD
FPELD
DCA
F'PBF'LD
TA')
F'PELD
TAD
CDF'X
DCA
, •1

6211
116<J

TAD

7330
3057

6772
1351
3253
1351
H'75

3013

6211

DCA
TAD
OCA
TAD
DCA

1674
1675

1413

1676

1345

1677

1703
PZ4

3251
1251
7041
1252
7440
5250

CIA
HD
Si!A
JMP

17~5

1413

TAD

17['\6
17Z7
171'?1
1711

3252
1346
3251

DCA

17021
17"11

1702

3252

1722
1723
1724
1725

1251
7041
1252
7440
52")0
1413
3252
1347
3251
1251
7041
1252
7440

1726

5250

1727
1730
1731

42Dl0
2125
7kl30
7200

1712
1713
1714
l 715
171.6

1717
1720
1721

1732

1733
1734
1735
1736

1737
1740

1112
7650
5656
1034
6772

6771

TAD

TAO

DCA
TAD

F'S APPL
13

13
FPBAD
Kr:"P6
F'PGOOD
r:"PGOOD
F'PBAD
FPER
13
F'PBAD
KF'PB
F'PGOOO
F'PGOOD

C!A
TAD

FPBAD

Si!A
JMP

F'PER

TAD

OCA
TAD
DCA
TAD
C!A
TAJ
Si!A
JMP
J~S

! Si!
NOP
Cl.A

F'PBAD
KFP9
F'PGOOO
FPGOOD
FPBAD

FPER
STF'PP
F'PTIME

TAD
AP!
SNA CL.A
JMP !
!NTF'P
TAD
K0017
SETLEV
RES TOH

/F'PP•12 INTERRUPT ?
/f\10, EXIT
/C~EAR

INTERRUPT FLAG

/GET THE F'PP-12 FIELD NUMBER
/SAVE j T
/GET IT AG4 ! N
/ADD T8E F!ELD
/SAVE j T
/CHANGE FIELDS
/GET THE APT EXPONENT ADDRESS
/SAVE IT
/GET THE EXPONENT VALur
/SAVE THE EXPONENT
/GET THE CORRECT ANSWER
/SAVE IT IN GOOD
/GET THE GOOD ANS~
/NEGATE ! T
/ADD THE DATA READ
/ARE THEY EQUAL ?
I NQ, FPP12 EXPONENT ERROR
/GET THE MSW
/SAVE IT !N BAD
/GET THE EXPECTE~ ANS,
/SAVE IT IN GOno
/GET THE DATA EXPECTED
/NEGATE !'I'
/ADD THE DATA READ
/ARE THEY EQUAL ?
I NQ 1 FPP12 MSW ERPQR
/GET THE LSW
/SAVE IT IN RAr:l
/GET THE EXPECTEn DATA
/SAVE IT
/GET IT 9ACK
/NEGATE IT
/ADD DATA PEAD
/ARE THEY EQUAL ?
I NQ 1 FPP12 LSW ERROR
/START-FPP•12

I AF l ?
I NQ, EXIT

/POP•12 SYSTEM

ExE~C!SER

1741
1742
1743
1744
1745
1746

3614
3540
3550
3530

j,747

t"000

1750
1751

1111

£1'015

2000
l"0iHJ

PAL.12
KFP1,
KFP2,
KFP3 1
KF"P5,
KFP6,
KFP8 1
KF"P9 1
K111l 1
F"PEl.D I

V141

F"PPRr,
IR
RASE
APT
t'J(l15
20CH'J

17•F"EB,.72

11152

PAGE 2!i

/F"PP PROGRAM STARTING ADDRESS
/IR ADDRESS
/BA~E ADORESS
/APT ADDRESS
/CORRECT EXPONENT
/CORRE~T MSW
/CORREgT 1.5W

M!'lZ

1111
~

/FPP·12 STARTUP ROUTINE
l. 752
l,753
1754
1755
1756
1757

0000
76~4

!11155
74'50
42'10

5752

ASTFPP I l'.l
l.AS
AN!J
SNA
JMS
JMP I

Ki.!':400
STF"PP
ASTF"PP

/GET RIGHT SWITCHES
/MASK TO B!T 3
/IS IT-SET ?
/NO, S!ART THE FPP•l2
/EX IT

/PDP~12

SYSTEM EXERCISER
2020

PAl.10

V14l

17•FE8•72

PAr;E 27

11152

•2020
/SUB~OUT!NE TO CHECK TO SEE JF BLOCK ~N" HAS BEEN WRITTEN INTO
l"N" !S IN AC1 TAPE DRIVE NUMBER !S IN LOCATION "UNJTI
/ROUTINE EXITS TO LJMP•l IF UNWRITTEN, LJMP+2 !F WPITTEN

2020
211121

4054

W~lTEN1

20?12'

2022

40Zl53

2Z23

?1641i

STC
ADD
STC
LDF'
AD:'l
ADA+20

2024

ns4

2025
211126

112;J
7 0 '?!?

7~07

22'27

4054

20321
2031
2032
22J33

H'J;ll0

STC
LDA

2"127
2054

1120

2035
2036

34710

2037
2040

2037

2"41

2054

2042
2043

6051

4037

1747121

22)4 4

U20

C'.eJfll

2:il46

2053
4053

2047
2050
2051
2052

r'l6Ql0

2053

~053

2054

00210
6000

2055

2054

?,641

2056

21000

2057

4465

2f/J621

:.'!274

2061

7450
5257

2062
2063
2064

3273
1073

2065

7041

2066
2067

1273
7740
5257

2070
2~'71

22'72

GET,

4054

2045

WNEX I T•2'1l0el

/SAVE AC
/GET CONTE~TS OF 0
/AND SAVC

WSAVE

/GET BLOCK NUM8EP
/SUBTRACT 771JJ

WSAVE•20::'!0

/SAVE
/GET UNIT NUMBER

IJNIT•21'10eJ

n42

2034

WSAVE•20111eJ
eJ

ROl.
ADD
ADH20
ADD
STC
ADD
STC
ADD
HE•2il
LJMP
LDA+2il

2
WSAVE
BL.KTBl.
GET•2000
I

WSAVE•2017lil
WSAVE
WNEXIT•2

ADD
STC
ADD
l.DF
l.!F'
WNEXIT1 l.JMP
WSAVE, Z'
l.JMP
GETRAN 1 <l
JMS I
AND
5NA
JMP
DCA
TAD
CIA
TAD

WNEXIT
WNEX I T•2:2!iH'I
\./SAVE
1

JMP
TAD
JMP I

2073

130710

GE.TSAV 1 ~

2074

0iil70

K007~ I

0<'70

/STORE AWAV
/GET CONTENTS

or BLOCK STATUS WORD

/NON•i!ERO?
/NO, i!ERO, EXIT
/VES, INCREMENT EX!T POINT
/THEN
/GET STATUS WORD

/EXIT
0

ORANG
K007:2!
I •3
GETS AV
F'XELD

GETS AV

SHA Si!• CL.A

1273
5656

/ROTATE 2 I.EFT
/ADD IN "TP!MMEDtt BLOCK NUMBER
/ADD JN TABLE ENTRV AD~RESS

, .. 11
GETSAV
GETRAN

/GET A RANDOM F!EL0 1 EXIT ONLV WITH A EX!STJNG
FJELD NUMBER IN AC 6•8

/PDP•12 SYSTEM EXE~C!SER

PALU
/EVERY
I

2075
2076
21::77
21P'0
21?1
21?2
21213
2lll'4
21Vl5
21116
2107
2110
2111
2112
2113
2114
2115
2116
2117
2120
2121
2122
2123
2124
2125
2126
2127
2Hi~

2131
2132
2133
21H
2135
2136
2137
2140
2141
2142
2143
2144

73210
1072
7650
i:;3c>15
1122
7650
4345
3122
1114
7650
'i314
1123
7650
4345
3123
1113
7650
5323
11?4
765~

4345
'.':124
1l1iil

7650
5332
1125
7650
4345
3125
1115
7650
'5341
Hl24
7650
4345
3024
1126
3127
5744
1444

A~E

V141

17•>EB•72

11152

PA(;E 211

l~ SECONDS ENTER THIS ROUTINE TO TEST THAT THE rEV!CES
STILL RUNNING

CHEK>i. 1 C'LA
TAD
SNA
JMF'
TAD
SNA
JMS
DCA
CHECKA 1 TAO
SNA
JMP
TAD
SNA
JMS
DCA
CHECKB 1 TAD
SNA
JMP
TA '.J
SNA
JMS
'.'CA
CHECKC 1 TAD
SNA
JMP

Cl.I.
CL.A

CHECK A
Rl='T!ME
Cl..A

Cl.A

CHECKE 1

CHEX l T
RF"T!ME
DKF'El..D

/RF08•DF32 TIMEOUT

ERR~R

CHECKS
RKT!ME
CL.A

Cl.A

CHEX!T
RKT!ME
AIPFl.D

/RK08 !IMEOUT ERPQR

CHECKC
APTJME
CL.A

Cl..A

T.AD

CHECKD 1

DDF'ELD

SNA Cl.A
JMS
DCA
TAD
SNA Cl..A
JMP
T.AD
SNA Cl.A
JMS
DCA
T.AD
DCA
JMP I
KW12R

CHEX IT
Al=>TIME
FFPEl.D

IA,!,P~·12

TIMEOUT ERROR

CHECKD
FPT!ME
CHEXIT
F'PT!ME
TCFDl.

/F'PP•12 TIMEOUT ERROR

CHE CKE
TCT!ME
CHEXlT
TCT!ME
M12
T!CHI
I

/TC~8

!!ME OUT ERROR

IPDP•12 SYSTrM EXERCISER

PAl.Hl

V141

17•F"E8•72

11152

PAGE 2?

/A DEVICE HAS STOPPED REPORT IT
2145
2146
2147
2150
2151
2152
2153
2154
2155
2156

?121;?10

7330
1345
7041
7040

CHEX!T I 3
Ci.A Ci.I.
TAD

CIA
r:HA

DCA
JMS I

~355

4545
3001)
tl'i'100
CHli'liiJ

T!MOUT 1

Zill 21 !CJ

F" I NOP 1

2157
2160
2161
2162
2163
2164
2165
2166
2167
2170
2171

12156
3010
1372
3011
1346
341')
2iJ11
5365
r:;757

2172

7771

CHEX!T
T!MOUT
ERROR

(:"

"'OcJ

73~.IJ

CL.A Cl..L.
TAD

DCA
TAD

CHEXIT~l

DCA I

10
11
I •3
F"!NOP

I Si!

JHP
JMP I
M51

L.PATCICJ
12'
M5
11

·7

/T!MEOYT ERROR, AC IS THE BAD P,C,

/POP•12 SySTEM EXERCISER
2200

PAL.10

ll.P1218~l.P12

22211

'.'l000
?J00

:;202

1112

:?203

2204
2205
2206
2207
2210

2211
2212

LPEX I

2214
2215

f"0110

AP I

SETTP I

R=:STOR
JMP l

, +1

/NO, EXIT

SETTPA
ERROR

/LP08/l.P12 ERROR ?
/NO
/LP08~LP12 STATUS ERROR

'l'

JMP
JMS I

7777
0

560121

SETTPA 1 6661
JMP !
SETTP
Cl.A t:l.L
DCA
I NTRP'r
JMP I
L.PEX

2222

2223

LPOUT,

2223
2224
2225
2226

000121
6666
6665
420121

l.Pi1l8P I

2227

730121

2230

5623

2231

2112100
6654

LP12P1

2233
2234

70021

LPNOP1

2235
2236

73210
5631

2237

?100121

224121

73011l
1321

2216
2217
22221
2221

2232

2241
2242

6661
5606
7300
~12157

2243

2244

42'111l

2245
2246

73710

"637

2247

4237

/l.P08/l.P12 DONE Fl.AG ?
/NO, EXIT
/YES

!Cl.EAR INTERRUPT F"LAG

LPQ18p
/PRINT A CHARACT(R ON THE 1.P08
/PRINT

{)

6666
6665

JMS
LPEX
Cl.A Cl.I.
JMP I
L.P08P

/WA IT FOR F'LAG

II.DAD A C~4RACTER INTO THE LP•12 PRINTER BUF'F'ER

/RETURN TO PRINTER ROUTINE

6654

42::1121

6652
6664

/GET APJ SWITCH
OP I 1
/YES, EXIT VIA A',P', !,

6663

0\!l?ll1l

7777

PAGE 3?'

e:
TAD

6063
5215
4545

2213

11152

PRINTER ROUTINE
EXECUTlO~ ROUTINE

Cl.A Cl.l.,

7440
6771
56C'l6
"1KJ(J0

17•FEB•72

PAGE
/L.P1218~1.P12

2200

V141

ACRl.r1

NOP
JMS
L,PEX
CL.A Cl.[.,
JMP I
L.P12P

/RETURN TO THE PPINTER ROUTINE

/DO A "PRINT" ON THE LP12

Cl.A Cl.I.
TAD
K12111ll0
66~2

6664
JMS
l.PEX
CL.A Cl.I.
JMP I
ACRl.F"
KACR,

JMS

ACRLF"

/WA IT

FOR

F"l.AG

/GET 0fll10
/l.OAD ~ORMAT AND PRINT
/WAIT FOR A FLAG
/RETURN TO THE PPINTER ROUTINE

IPDP•12 SYSTEM EXERCISER

PAL.HI

V141

17•FEB•72

11152

PA~E

/LP08•L.P12 PRINTER RGUTINE
/SL.ID!NG PATTERN
225f/J
2251
'.!252
2253
2254
2255
2256
2257
2262!
2261
2262
2263
2264
2265
2266
2267
2270
2271
2272
2273
2274
2275
2276
2277
23'-lf/J
23e'l
2302
231213
2304
2305
2306
2307
2310
2311
2312
2313
2314
2315
2316
2317

7301!
1322
3325
1322
3326
1;327
3324
2324
7410
5271
1326
4304
5301
1326
4622
2326
5257
4312
2325
1325
4304

2320

5712
0010

2321
2322
2323
2324
2325
2326
2327
23:1!0

2331

L5T121,
Lf:>T1 1
LST2,

L5T3,

t1000

TAD

K0240

DCA

l.PCH
F"Ui.INE
WIDTH
WIDTH

TAD

DCA
IS2
SKP
JMP
TAD

LST4,

J"IS
JMP
TAD
JMS
!52
JMP
JMS
!52
TAD

JMS
JMP
HD
DCA
JMP

5250
1325
3326
5255
1322
3326
5262

CL.A Cl.\.
TAD
K2l240
DCA
L.PSTCH

LST5,
TEST IT,

LST4
LPCH
TEST IT
L,ST5
L,PCH
L,POUT
LPCH
i.ST3
BCRLF"
l.PSTCH
1.PSTCH
TEST IT
L.SU
l.PSTCH
LPCH
L.ST2

TAD

KIZl240

DCA
JMP

1.PCH
LST3•3

Cl A

7640

Si!A CL.A
IS2
TEST IT
JMP
TEST IT

Olf/J00
7300

TAD

BCRl.F" I

0342!
000~

002'0

k'\000
7657
Ol212
0215

f/J

TAD

JMS
TAD
JMS
JMP I

4223

e!240

K0340

Cl.4 Cl.L.

1331
4223
133121

f/J

7!041
1323

2304
5704

/GET 024~
/SAVE THE STARTING CHARACTER
/GET 024ei
/SAVE THE FIRST CHARACTER
/GET A-F"tJLL L,!NE l<l!DTH
/SAVE IT IN THE COllNHP
/F"!NISHED A LINE 7
/NG,
/YES, DO A "CR•LF"tt OR "PRINT"
/GET A CHARACHR
/TEST !PS VAL.LIE
/INCORRECT, RESET CHARACTER
/CHARACTER WAS OK, GET IT AGAIN
/OUTPUT IT
/INCREMENT CHARACT~R
/DO ANOTHER CHARACTER
/END O~ A LINE CJ
/INCREMENT THE STARTING CHARACTER
/GET THAT CHARACTER
/TEST ITIS VALUE
/!NCORHECT 1 RESET CHARACTER
/GET CHARACTER AGA!N
/SAVE THE NEW rtRST CHARACTER
/00 A NEW LINE
/GET 024~
/RESET r!RST CHARACTER

K0010 I

121010

KIZl2401
K034Ql 1

0240

KfZl2121

!21212

K0215 I

91215

0340
WIDTH, 0
LPSTCH, 0
0
LPCH,
FUL.INE, •121

K0215

L.P06P
KIZl212

1.P06P
BCRLF"

/NECiA TE IT
/ADD EXPECTED
/ARE THEY EQUAL ?
/NO, /YES,

/POP•12 SYSTEM EXERCISER
2332
2333
2334
2335
2336
2337
2340
2341
2342
2343
2344
2345
2346
2347
23511)
2351
2352
2353
2354
2355
2356
2357
2360
2361
2362
2363

r110f'l0
6141
0517
?.1266
1560

PAl.ll'J
DCST,

Clli1Jel2
7430
5732
71214<"
3364
1361
712110
2364
5346
3762
1134
3533
4763
7301

Q'l1J2:l

7276
7263

PAGE 32

/MASK !O BfTS 111J .. 1i

.JMP t
DCST
CMA
OCA
KWST
HO
K12102121
RAR
!Sr
KWST
JM?
, •2
OCA I
I.GROUP
TAO
KPTC9
DCA I
LPTC6
JMS l
LGODC
Cl.A CL.I. I AC
MINT
MTL.S
JM? I
DCST

6115

11152

/GET I.EFT ~WITeHES
/MOVE l.EF"T

Si!I.

6126
5732

17,.FEB,.72

LI NC
LSW
ROl.+2121
BCl.+2121
7774
POP

7174

V141

/INHIBIT DC1212•F" ?
/VES
I

/SAVE IT
/GET 11J02Q!
/MOVE RIGHT
/DONE 7
/NO
/SAVE GROUP NUMBER
/GET POINTER
/SAVE lT
/ENABLE THE DC1112·F STATIONS
/SET AC: TO 11J011J1
/ENABLE INTERRUPTS
/PRINT ANO START A WnRLO OF INTERRUPTS
/EX IT

K00201 t'lel211J
L.GROUF' 1 GROUP
L,GODe 1 GODC
/KW12A STARTUP ROUTINE FJRST TIME ONL.V

23~4

~11J<l11J

2365
2366
2367
237121
2371
2372
2373
2374
2375
2376
2377

6132
76<"ll1J
1366
6133
7Jf'l11J
1146
6132
732'0
1036
6134
'5764

KWST,

121
6132
7600
TAO

6133
CL.A CL.I.
TAO

•1

KW12RT

6132
CL.A CL.I.
TAO

6134
.JMP I

/Cl.EAR CONTRC'IL
/Cl.EAR AC
/GET 760111
/I.DAD BUFFER PRESET
/Cl.EAR AC
/GET CLOCK RAH
/l.OAD 9L.0CK CONTROL

K0100
Kio/ST

/~OAD

/EX IT

KW124 INTERRUPT rNABL.E

/POP•12 SYSTEM EXERCISER

PAl.1'11

2400

PAGE

:?100;?1

RK8 1

/RK0~

SYSTEM PROGRAM
21
DSKE
.JMP
RKBA
DRDS
DCA
ARKBAD
JMS I
ERROR

2400
2401
24eJ2
2403
2404
2405
24el6

5211
6741
322'7

~407

el02Jl()

ARK~AD1

2410

0000
6745
560121

RKBA,

2411
2412

6747

4545

0000

2413
2414

7300

2415

6772

2416
2417
2420

5617
2467

2421

74:;Jl()
7200
1112
7650

2422

2423
2424
2425
2426
2427

2430
2431
2432
H33
2434

2435
2436

312157

2123

56Z0
U34
6772
6771

1362
4343
6733
4217

1221

3070

2437

1362

2440

3iil14

2441

1114
3263

2442
2443

2444
2445
2446
2447
2450
2451

2452
2453
2454
2455
2456
2457

2460
2461
2462

1114
1075
3246
6211
1364

3261
1414
3262

1262
7041

1261
7650

'5264
4545
012100
012100

V141

17•F'EB•72

11i52

PA~E

/RK08 ?TATUS ERR~R ?
IN0 1

/YES, KEAD STATUS
/SAVE iN l.OC~ BAD
I RK06 STATUS ERROR REPORT IT

0
2J
I'!

DSKD
/RK08 DONE ?
.JMP I
RK8
Cl.A Cl..l.
DCA
INTRPT
/CLEAR INT~RRUPT rLAG
SE Tl.EV
.JMP I
I +1
/YES, GO SERVICE IT
RKEX,
WKRITE.
/WKRITE 1 RKEAD OR CKHECK
IS~
RKTIME
M400 1
7400
CL.A
TAD
AP!
SNA Cl.A
I AP I ?
JMP I
RK8
I NO, RETURN TO BACKPOLJND PROG 1
TAD
Ki21017
SETL.EV
RESTOl'i
/YES
RKEA0 1 TAD
K7377
/GET CA ADORESS
JMS
SET1
/SET UP roR EXE,
/RE.AD
DI.DR
JMS
RKEX
!RETURN HERE AF'TER A READ COMMAND
CKHECK 1 TAO
M40121
/SET A COUNT',
DCA
CKNT
I l.OCAT!DN
TAD
K737?'
/SET 1~ TO THE STARTING ADDRESS OF THE READ aurFER
DCA
14
TAD
DKF'El.D
/GET RK38 rIEl.0 BITS
/SAVE rIEl.n
DCA
RKBF'l.D
TAD
DKF'El.D
/GET ! T RACK
TAD
CDF'X
/ADD A-CHANGE DATA F'IELD COMMAND
DCA
,+1
/SAVE IN THE NEXT LOCATION
6211
/CHANGE TD THE MEMORY r1ELD THE RK~B REAO !NTO
UD
DATA
/GET THE EXPECTED DATA
DCA
RKGOOD
/SAVE IT IN LDC GOOD
CKHEC 1 TAD I
14
/GET THE DATA READ
DCA
RKBAD
/SAVE f T IN LOC BAD
TAD
Rl(BAD
/GET I! BACK
CIA
/NEGATE IT
TAD
RKGOOO
/ADD THE EXPECTED DATA
SNA CL.A
/ARE THEY EQUAh ?
JMP
,+5
/YES
JMS I
ERROR
/NO, RK38 DATA ERROR
RKGOOD1 '1'
RKBAD1 ['!

/POP•12 SYSTEM EXERCISER
:?463
2464
2465
2466

?li:Jr110

PAL.HJ

V141

17•FEB•72

2070

!St

'5251

JMP
JMS

4217

CKNT
CKHEC
RKEX

/THIS !S THE ACTUAL. SETUP
2467
24 7f'J

2471
2472
2473

2474
2475
2476
24 77
2500
2501
25:::2
2503
2504
25<l5
2506
2507
2510
2511
2512
2513
2514
2515
2516
2517
2520
2521
2522
2523
2524
2525
2526
2527
2530
2531
2532
25:53
2534
2535
2536
2537
254i:l
2541
2542

4465
3364
1035
7640
5276
2067
5300
4465
3067

WKRITE 1 JMS
DCA
RKAKJ, TAD

CIKADK 1

1067

531J
1363
771<J

4511

3114
4465
7.366
31711
1H2
7041
11"1
7740
5312
1221
3070
1361
3014
1114
1075

3331
6211
1364
3414
2070
5332
1361
4343
6735

4217

5231

PAGE 33·1

DR ANG
DATA
Kl L.LI T

/YES, INCREMENT COUNT• FINISHED 7
/NO 1 MORE TD D~
/YE~, NOW EXIT THE RK08 ROUTINE
F"QR

THE

RK~8

wRITE ROUTINE

/GET A RANOOM NUMBrR
/SAVE IT THIS !S THE DATA TO BE WRITTEN

Si! A Cl.A

75?10

'5310
3067
5271

11 !52

RKBFL01 0

RK!JOK1

JMP
RKADK
!St
AKDD
JMP
RKADK+2
JMS
DR ANG
DCA
AKDD
TAD
AKDD
SMA
JMP
RKDOK
TAD
K160l'I
SPA Cl..A
JMP
RKDDK
DCA
AKDD
JMP
RKAKD
JMS
LGETR
DCA
DKF'EL.D
JMS
DR ANG
Al~D
K011Hl6
DCA
NROK
TAD
RKOAV
CIA
TAD
NROK
SMA SH CL.A
JMP
I•]
TAD
M400
DCA
CKNT
TAD
K6777
DCA
14
TAD
DKFEl..D
TAD
CDF"X
DCA
I •1
6211
TAD
DATA
DCA
14
!St
CKNT
JMP
,•3
TAO
K6777
JMS
SET1
DLDw
JMS
RKEX
JMP
RKEAD

/YES, INCREMENTING RK0e ADDRESSING
I

/RANDOM ADDRESSING, GET A RANDOM NUMBER
/SAVE IT THIS JS THE DISK ADDRESS
/GET IT BAC:K
/IS Ii-NEGATIVE ?
/NO, POS!T!VF. NUMBERS ARE OK
/ADO A CONSTANT
/IS THE ADDRESS WITHIN THE ~IMITS ?
/YES
/NO, ~!MIT EXCEEDED C~EAR THE DISK ADDRESS
THE V!LED
/SAVE IT
/VES 1 GET A RANDOM NUMBER
/MASK TO B!TS 10•11
/SAVE IT THIS IS THE DRIVE NUMBER
/GET THE NUMBER or DRIVES AVAl~ABl..E
/NEGATE IT
/ADO THE NEW NUM8ER
/DO WE HAVE THAT RK08 DRIVE ?
/NO, TRY AGAIN
/YES WE D0 1 SET UP A COUNT
IL.OCAT!ON
/GET STARTING ADDRESS POINTER
/SAVE IT
/GET RK08 r1EL.D
/ADO CHANG~ DATA r!ELD
/SAVE IN NEXT ~OCATION
/CHANGE TO F!E~D X
/GET DATA TO BE WRITTEN
/STORE IT
/DONE 7
1N0 1 MORE TO DO
/GET CA
/SET UP CA AND we
/WRITE-ON THE DISK
/THEN WAIT FOR D~NE
/WHEN DONE, GO TO READ
/GET

/POP"12 SYSTEM EXERCISER

PAl..H!

V141

/TMIS ROUTINE l.OADS
2543
2544
2545
2546
2547
255(1
2551
2552
2553
2554
2555
2556
2557
2560
2561
2562
2563
2564
2565
2566

17•FE8 72
8

w~c.

11152

AND C,A, AND gOMMAND

PAt;E 34
~Et,ISTER

I
0000

3365
1101
1114
10 7 l
6742
6732
6742
1365
6755
1221
6753
Hl67
5743
6777
7377

16"'0
0000
l'.1000

Z006

SET1 I

k'I

DCA
TAD
TAD
TAD

DCl..S
DI.DC
L\CL,S
TAD
DI.CA
TAD
Dl..WC
TAD
JMP !
K67771
K73771
KHlillil1
DATA,
RKSVl\ 1
K01il061

6777
7377
1600
l1J

11'

'11006

RKSVA
NRDK
DKF"ELD
STAT

RKSVA
M41il0
AKDD
SET1

/SAVE guRRENT ADDRESS
/GET RKliJ~ DRIVE ~UMBER
/ADD RK08 F"IEl.0
/ADD RK08 STATUS
/Cl.EAR RK08 STATUS
Ii.DAD RKk'l8 CDMMA~D REGISTER
/Cl.EAR RK08 STATUS REGISTER AGAIN
/GET C~RRE~T AODRE~S
II.DAD NKk'IB CURRENT ADDRESS
/GET •41iJ~
11..0AD ijK~B WORD COUNT
/GET DISK ADDRESS
/EXIT

/POP•12 SYSTEM

EXE~C!SER

261110

2600

i'l000

2601

2614
2615

6317
562l1J
4217
2124
70710
7300
3e<57
1112
7650
56710
111134
6772
6771

2616

7402

26"12

2603
26C'4

262'5
2606
2607
26U
2611
2612
2613

2617
2620
2621
2622
2623
2624
2625
2626
2627
2630
2631
2632

2633
2634

2635
2636

26:37
264111
2641
2642
26113
<'644
2645
2646

2647
Ui50

2651
2652
2653
2654
2655
2656

V!0V'10

PAl.17'
17•F'EB•72
Vl4l
PA.GE
/A!P•l2 ROUTINE
/TWO WORD FORMAT, RANDOM MEMORY FIELDS
I A TO D CHANNELS
A!P1

I Si!

T A::l

Cl.A CL.I.

SE Tl.EV

1314

TAD

63~1

SCH
L.CH

3307
1312
6301
1317
632'2
1313
6301
1036
63212

1314
63211
4511
3113
1113

1316
63~2

KiHH7

/A.I,P, DONE ?
/NO, EXIT
/YES, RESTART THF A!P
I I NC REM EN T A·, !', p ', T I fA E R
/Cl.EAR

!NT~RRUPT

FLA~

/GET AP! SWITCH
/IS IT-SET ?
/NO, EXIT
/YES 1 GET ~iil17
/l.OWER-MACHINE LEVEL
/EXIT VIA AP!

6772

131116

Al Pl
APT!ME

NOP
Cl.A CL.I.
OCA
INTRPT
TAD
AP!
SNA CL.A
JMP I
AIP

7300

63?12
13U
3311

Alf>

SETLEV
RESTOR
Hl.T
A1Pl I

PA~E

SBF
JMP
JMS

A7C'iil01

11152

TAD

DCA
TAD
DCA
TAD

A0014

STCH
AST CH
M3

ACHTOT

/SAVE IT

A1211'11QI

BUFF'

/GET 11J010l
/SEL.ECT C,A,
/GET BUrrER POINTER

A1211'1l1

/GET 0011

SC"!
TAD

/l.,DAO

I.CH
TAD

SCH
TAD
SCH
JMS
OCA
TAD
TAD
I.CH

1311
1315
6301
2311
2327

SCH

5250
5617

JMP
JMP

TAD
TAD
I Si!
l Si!

C,A,

/SEL.EC! W,C,
K01121~

Ii.DAD W,C,

I.CH
TAD

/RESET MACHINE LEVEL
/GET 0014
/SELECT CHANNEL 14
/l.O~D CHANNEL. 14
/GET r!RST CHANNEL
/SAVE IT

A:lll1l14

LGETR
AIPF'LC

/GET 11llll14

/SELECT CYANNEI. 14

AST CH

/SAVE THE rtEl..O
/GET l T f3Ar.1<
/ADD "~O" AND !NTEPRUPT
/LOAD CONTROL WORD
/GET A-TD D CHANNEL

AUl11Jl'I

/ADD "E'' B!T

A!F'F'l.D

AU01

/SELECT CHANNEL
AST CH
ACHTOT
,•5

A!P1

/INCREMENT CHANNEL.
/F!NlSHE!) ?
/N0 1
/EXIT

/PDP·l2 SYSTEM EXERCISER

PAL.Hi

V14l

17•FEB .. 72

11152

PAGE 36

/A!P STARTUP ROUTINE
2o57
26611
2661
2662
2663
2664
2665
2666
2667
2 6 7[11
2671
2o72
2073
2()74
2675
2676
2077
2700
2701
2702
2703
27rt4
2705
2706
2707
27121
2711
2712
2713
2714
2715
2716
2717
2720
2721

f'0%l

AIPST 1

7604
7004
7711iJ

5657
6141
1517
03214
~451

6674
1;:l20
V'044
6676
HJ::>21

22J4rt
4 710
21002
4217
73i1Jrll
13221
3721
3113
5657
7774
?!0211iJ
210'10
?'0210

0010
:1011
21014
1000
11rn1
34el0
4572
Z:731

LAS
PAL.
SPA CL.A
JMP !
LINC
LSW
ROR
APO
l,.JMP
LDA+20
44
L,.JMP
LDA+21iJ
40
STC
PDP
JMS
CL.A CL.l,.
TAO
DCA I
DCA
JMP I
M3 1
ACHTOT1
S!CH,
ASTCM1
Ailll1llel 1
A00111
A0014'
Al0001
uei01,
surF",
KJMPAP 1
L,.PTC4 1

Al PST
4
,•4

/READ l..EFT SWITCHES
/MOVE B!T 8 TO B!T 0
/IS IT SET ?
/YES

/NO, KW12A IS CONNECTED TO A,! 1 P, CHANNEL. 44•47
,+3
/YES, KW12A IS CONNECTED TO A,! 1 P, CHANNEL. 421•43
STCH•20011l

/SAVE Cl,.OCK CHANNEL

AIP1

/START TME

KJMPAP
l,.PTC4
AI PF"L.D
Al PST

/SET UP THE PETURN JUMP

.4
21

"::'.'010
21
0011
0014
10 :rn
1f2! QI 1
BUFFER
JMS !
PTCH4

/READ RIGHT SW!TcHrS
/MOVE L.EFT
/RSW 1 CLEARED ?
/NO, SET

P/\TC8

IE:X IT

A~t;P~

/POP~l2

SYSTEM EXERCISER

PAl.ll'J
/TC~8

2722
2723
2724
2725
2726
2727
27321
2731
2732
2733
2734
2735
2736
2737
2740
2741
2742

1744
1343
3577
1135
3564
5766
5722

2743
2744

2742
7156

C"2J~2l

V141

17~FE£l~72

ST56,

l.AS
RTI. Cl.I.
SPA Cl.A
JMP l
LINC
LSW
3Cl.+20
4777
POP
DCA I
TAD
DCA I
TAD
JCA I
JMP I
JMP I

77HI

5722
6141
0517
1560
4777
00"'2

KR58,
LTCAV,

PAGE 37

"'""

MAGTAPE START UP ROUTINE

760"4
7106

11152

/START Tr58 ?
/Nl'l, EXIT

ST58

/GET SW,
1M4SK TO 3 !T 1•2
LTCAV
KR58
PATC10
KJMPTC
L.PTCH7
L.L58
ST58

/SAVE THE NU~BER OF EXTRA TU10
/G~T Rf.TURN
/SAVE IT
/GET PC! PHER
/S4VE IT
/EXIT

TCAVIL.

/TC58 REWIND ROUTINE
2745
2746
2747
2750
2751
2752
2753
2754
2755
2756
2757
2760
2761
2762

2763
2764
2765
2766

~000

TCCIT 1

7006
7510
~745

70<16
70216
7710

5360
2345
6706
5745
'3115
1365
4764
5766
7074
~010

700i:l

RH,

TCRW"lD 1

SPA
JMP I
RTL.
RTL.
~PA Cl.A
JMP
I Si'!
MTRS
JMP I
DCA
TAD
JMS I
JMP I

LTCEl(E 1 TC EXE
TCU,
u
TC58A
Ll..58,

TCCIT

/BOT 7
/YES

TCRWND
TCC IT

/EOT ?
/YES, REWIND THE DRIVE
/N0 1 AN ERROR
/READ !C58 STATUS
/EXIT

TCCIT
TCF'Dl.
TCU
LTC:EXE
L.l.58

/GET 001C!
/EXECUTE IT
/RESTA8T T~58 ROUTINE

/PDP•12 SYSTEM EXERCISER

PAL,Hl
/A~P,!~

~000

30;;10
30J1

7402

31:J;J2

5042
7402
4476
74?12
74;J2
7402
7402
742l2
7422
742l2
7 4 J2
7•!11'2

3003
3004
3icli2:5
30<16
3007
3121Hl
3011

3012
3013
3014
3'115
3016
311l17
302'1
3021
3022
3023
32124
3025
~026

:rn27
3030
3031
3032
3033
3034
3035

3036
:3037

17•F'EB•72

11152

OAC',E 311

VECTOR ADDRESSES

•300?1
HI. T
HI. T
JMF'
I-IL. T
JMS I
HL,T
Hl..T
HI.. T
HI.. T
HI. T
HI. T
HI. T
HI. T
Hl.T
Hl.T
HLT
HL.T
HL,T
HL.T
HL. T
HL,T
HL,T
HI. T
Hl.,T
HI. T
HLT
HI. T
Hl.T
HI. T
HI. T
Hl.T
HI. T

742J2

74~2

74:;l2
7432
74"2
741l2
74212
74;12
74;)2
74?12
7402
7402
74(712
7402
7402
7402
7•H':2
74212
7402
3040

V141

TSTMOR•1

11.EVEL. 0
l!l.L.EGAL
/l.EVEL. 1

PATC5

!LEVEL 2 l<W12A CL.OCK

/T~12

11.EVEI. 3
11.EVEI. 4
11..EVEL 5
!LEVEi. 6
11..nEI. 7
/L.E:VEL. 11'1
/LEVEL li
!L.1,'.VEL. 12
11..EVEL 13
11.EVEL 14
/l.EVEI. 15
11..1".VEL 16
ll.EVEL. 17

•30421
ADDRESS
!STACK FORMAT
/STAC~

I
I
I
I
I

3400
34"'0

?li2Vi'l0

P•1
F'+2
P+3
P+4

AC 0•11
F'C 0•11
MODE 01 F'LO 11 LINK 21 MACHINE LEVEL 8•11
Mi;I

0•11

UF" l 1 IF" 2•61 OF' 7•11

•34'1ei
/81..0CK PATTERN TABl.E • 4?10 LOCAT!CNs
BL.KTBl. 1 ?I

/POP•12 SYSTEM EXERCISER

7000

PAL.10

V141

17•FEB•72

PAGE 3Q

11i52

.i72l01?1

l!05e ROUTINE

7000
7001

6 7 ill
6706
6716

HTSF•~712J1

~721

MTTR•6'21

6722

HTG011~722

Hl02
7003

4465
3336
4465
03?10

7004

335~

7kl~5

1356

?el06

7'141
1355
774e

7007
7010
72111
7012
7013

5202

711114

4:i11
33412J
1336

7015

6212

7016

4771
1357

7017
702Wl
7021
711122
7023

3360

4341

/SKIP ON il'.:58
/READ ~iATUS
/LOAD goMMAND REGISTER
/SKIP ON TUR
I "GO!•

HTRS•~712J6
MTL,Ca:~716

TC56A 1

JMS
DCA
JMS
ANO
DCA
HD
, CI A
TAD

SMA SH
JMP
JMS
DCA
TAO
CIF

JMS
TAO

DCA
JMS

DR ANG
TCGOOD
DR ANG
TK302!0

TCOR

TCAVll.

/SAVE

~DOD

DATA

/MASK TO BtTS 1•2
/SAVE DRIV~ NUMBER
/GET AVAIL.~ DRIVES

TCDR
Cl.A

/ADD

i.GETR
TCFl.O
TCGOOD

/GET MEMORV F!El.O
/SAVE tILED

C~RRENT

DRIVE

,•7

121
1.F' IL IT

TM5
TCSAV
TCSET

/Fii.i. THE TC58 BUFFER WITH Tl'.:GOOD
/SET UP A COUNT
I

L.OCATION

/SET w;c~ AND l'.:,A~

TAO

KllJllJ411J

TC EXE
TCSAV

/t.XECU!E A WRITE
/DONE ?

,.4

/NO

4347

JMS
!Sc
JMP
JMS

TSP ACE

1357

TAD

TM5

3360

4341

OCA
JMS

?032
7033

TCSAV
TC SET

/VES, SPACE REVERSE 5 RECORDS
/SE:T UP A COUNT
I L.OCAT!ON
/SET w;c~ ANO C~A~

1362

TAD

K012J311J

4274

712134

TCEXE
TCSAV

/EXECU!E A REAO/COMPARr

2360
5231
4347
1357
336121

JMS
!Sc
JMP
JI-IS

7024
7025
7026
7027
7ilJ30
7031

7035
7036

72)37
7040

1361
4274
2360
5221

TA:l

!'lCA

,.4

TSP ACE
TM5
TCSAV

/DONE ?

/NO
/VES1 SPAC~ REVERSf
/SET UP A ~CUNT
I

~OCA!ION

/POP•12 Sy5TEM EXERCISER

PAL.Hl

V141

17•F"E8•72

11152

PA~E

4?1

/TC58 READ ROUTINE
7041
7042
7 2l43
72)44
7045
72)46
12)47

70':>21
7i:i;,1
72152
7053
7il)54

7J55
7il)56
7057

72l61il
7 2'61

7J62
7<163
7064
7£l65

72166
7'<)67
7070
7'J71

7J72
7073

6212
4771
4341
1364
4274
1324
3341
1366

TC58C,

312111

1340
3115
13421
1 ;J75
3257
6211
1411
3337
1337
7041

c IF"
JMS I
JMS
TAD
JMS
TAD
!')CA
TAD
'JCA
TAD
DCA
TA!J

TC589,

1336

7640
5335
2341
5260
236'J
5241
52'?0

111l

1.F"Il.lT
TCSET
Tl<lil020
TCEXE
KT7600
TCSET
KTCBF"
11

TCF"l.D
TCF"DL.
TCF"LD
CDF"X
I +1

TAD
DCA
CDF"
10
TAD I
11
DCA
TCBAD
TAD
TCBAD
CI A
TAD
TCGOOD
Si!A Cl.A
JMP
TCERR
!Si!
TCSET
JMP
TC58B
!Si!
TCSAV
JMP
TC58C
JMP
TC58A

/CL.EAR THE Tcsa
BUF"F"ER AERA
/SET w,c~ AND C,A,
/EXECU!E A READ

/GET •201'!
/SAVE IT
/GET T~58 BUF"fER POINTER
/SAVE IT
/GET TC58 !!"!ELD
/UPDATE THE DISPLAY MESSAGE
/GET fIELD AGA!N
/ADD CDF" 16201)
/SAVE IN TME NEXT LDC~
/CHANGE ro f!EL.D x
/GET A-WORD READ rROM TAPE
/SAVE IT
/GET l ! BAOK
/NEGATE IT
/ADD EXPECTED VALUE
/ARE THEY EQUAL ?
/NO, TC58 DATA Et<ROR
/YES, ~IN!SHEO 20~ WOROS ?
!NO, MORE TO TEST
/f!N!SHED 5 REeORO~ ?
/NO, MORE t;ECORDS
/YES, DO IT AGAIN

/TC58 EXECUTE AN INSTRUCTION ROUTINE
THE INSTRUCTION rs IN THE AC BITS 6·~

7;j74

7Hl1

'1000
1355
1365
li716
30<10
1340

71~2

t,722

7J75

7076
7'J77
7H'l0

71213

73~1il

7104
7105

12)34
6772
73t'10
1ll2
7640
6771

7106
711'7
7l112l
7111

7112
7113
7114

5713

7115

~713

7116
7117
7120
7121

62211

~<lellll

671'11

6736
7510

5331

TCEXE1

TAD
TAD
MTL.C

TCDR
1<0607

TK311lt'10 1 30210

TC58 I

TAD
TCF"L.D
MTGO
CL.A Cl..L
TAD
K0017
SETI.EV
Cl.A C:l.L.
TAD
APl
Si!A Cl.A
RES TOR
JMP I
,+1

/ADD TC58 ~RIVE NUMBER
/ADD "~AG!O" NUHBEP
IL.DAD TC58 COMMAND REG!STER
/CL.EAR-THE AC
/GET TC58 rtEl.O
ll: GO MAGTAPE GO l l
/GET 0017
/l.OWER HACMINE LEVEi.
/GET AP! SWITCH

I AP I ?

/YES, EXIT VIA AP!
/NO, EXIT

MTSF"
JMP l
CDF"
MTRS
SPA
JMP

TC58
l'l

TCEXEA

/MAGTAPE F"l.AG ?
/NO,
/YES1
/READ !C58 STATUS
/ERROR 7
/YES,

PAL,1?1

/PDP-12 SYSTEM EXERCISER
1122
7123
7124

7125
7126
712'7
7130
7131
7132
7133
7134
7135
7136
7137
71421

6721
5322

76210

3057
6772
2024
5674
4772
"'324

MTTR
JMP
KT7611J01 76?l0
DCA
SETL.EV
! Si!

JMP
TCEXEA,

JMP
DCA
DCA
JMS

3337
3336
4545
~000

00Zl1J
2020

,,IMS

TCE:RR 1
TC GOOD, 0
TCBAD1 l1J
TCF'i..O I 0

('000

TCSET1

17"-F'EB•72

11152

PAGE 4C"-1

/NO, WAIT roR TRANSPCRT READY
I

'"l

INTRPT
TCT!ME
TCEXE
TCCHIT
KT7600
TCBAD
TC GOOD
ERROR

/Cl.OR AC
/Cl.EAR INT~RRUPT FLAG
/RAISE THE MACHINE LEVEL
/INCREMENT TC58 TIMER
/GO DO SOMrTH!NG USEF'UL.L
/AN ERROR WAS DETECTED F'IND OUT WHAT
/ACCEPT!ABL.E ERRnR
/UN•ACCEPT!ABL.E F'RROA 1 SAVE STATUS
/RESET GOOD
/TC58 sRROR

TO L.OAD TC58 CA AND WC

/~OUTlNE

7141
7142

V141

1366

21
TAD

7143

3767

DCA

KTCSF'
MTCA

7144
7145
7146

1324

TAD

KT7611l121

37711)
5741

DCA
JMP

MTWC
TC SET

/GET TC58 BUfF'ER AODRESS
/l..DAD TC58 CURRENT ADDRESS
/GET rgse WORD COUNT (~211J11J)
/L.OAD !C58 WORO COUNT
/EXIT

/ROUTINE TD SPACE REVERSE 5 RECORDS
71~7

00210

11=>0
7151
7152
7153
7154

1357
3770

7155
7156
7157
7160
7161
7162
7163
7164
7165
7166

7167

7170
7171
1172

TSPACE 1

\'I

DCA

TM5
MTWC

1363

TAD

4274

TKl1J1217121

JMS
JMP

TSP ACE

TAD

5747

21040

TCDR,
TCAV 11.. I
TM5 I
TCSAV1
K00411J 1

2030

K11Jl1J3~ 1

'1070

TKeJl1J711J 1

0020
Ql6rl7

1(06071

011l011l
2111J21il

7773
eilll?ll?I

2777
7753
7752
2740
2745

TKl1l0211J I

0
"'

-5
:n
41:1
30

"'
20

'1!611J7

KTCSF', TCBUF'Fw1
MTCA,
7753
MTWC,
7752
I..~ IL IT I F' I I.. IT
TCCH!T 1 TCC IT

TC EXE

/GET A MINUS 5
/L.Olr\D !C58 WORO COUNT
/GET 007C'I
/EXECUTE IT
/EX IT

KIN~

/POP•12 SYSTEM EXERCISER
72~0

PAl.,lt'l

122e

7221
7222
7223
7224
7225
7226
7227
72321
7231
7232
7233
7234
7235
7236
7237
724;1)
7241
7242
7243
7244
7245
7246
7247
7250

7251
7252

C'l000

PAGE 41

11152

M!NS=~125
MTKF=~123

MTSf=6121
MTPF'=6113
MTON=iiH7
MH,Si:¢126
MI NT1:6H5
DC02F' I

73~0

3277
1276
6125
56110
62211
6121
74Hl
'5220
6123
3216
4545
:"'0t'l0
?,0<J0
3000
6113
7104
7430
52321
7450
5255
?277
5221
73J0
312157
1277
131'l6
332'2
1702
3301
1277
7160
332J3
7121Hl
2303
5242
1276
6117
7300
1701
745Kl
5271

17,.F'EB•72

•720('1
/DC212•f ROUTINE

6125
6123
6121
6113
6117
6126
6115
7200
7201
7202
721Z3
7204
72>'5
7206
72k'J7
72121
7211
7212
7213
7214
7215
7216
7217

Vl4l

Ii"

Cl.A Cl.l..
DCA
DCSTAT
TAD
GROUP
MINS
JMP I
DC11J2F'
C:OF"

t-1TSF'
SKP
JMP
MTKF'
DCA
JMS !

/SKIP ON DC02f INTERRUPT
/NO DC02F'

'21

/PRINTER Pl.AG

DC11J2F'C•l

DCB AD
ERROR

/READ KEYBOARD Fl.AGS
/SAVE RESULTS
/DC02•F' KEYBOARD Fl.AG

iiHlel'21

DCBAD1

IOC02F'

0000
MTPF
DC02F'C 1 RAI. Cl.L.

T~IS

,+5
DC11J2F'D
DC STAT
DC02F'C

INTRPT
DCSTAT
TAD
TAB PT
DCA
DCSAV3
DCl1J2F' AI TAD I
DCSAV3
DCA
DCSAV2
TAO
DCSTAT
CMA Cl.I. CMI.
DCA
DCSAV4
RAR
I Si!
DCSAV4
JMP
I •2
TAD
GROUP
MTDN
CL.A Cl.L.
TAD I
DCSAV2
TAD

SNA

JMP

F'l.AG ON

/READ PRINTER F'LAGS
IF'IND THE ~!NE ACTIVE

521.

JMP
SNA
JMP
I Si!
JMP
Cl.A Cl.L.
DCA

KEYROAR~

DC02F'B

I
/CL.EAR I NH'.RRUPT
/GET STATION POINTER
/ADD TABLE POINTER
/SAVE IT

GET T~E GROUP NUMBER
/SELECT ACTIVE LINE
IN~,

/END
/YES

or MESSAGE ?

CHANNEi.

/POP-12 SYSTEM

~XERCISER

7253
7254
7255
7256
7257
7260
7261
7262
7263
7264
7265
7266
7267
7270

1276
1304
6117
5663

7271
7272
7273
7274
7275

37"2
1277
13C'l0
5254

7276
7277
73121el
73'111
73:"2
7311!3
73~4

73Zl5
7306
7307
7310
7311
7312
7313
7314

?315
7316

27n
6126
4263
73ill?l
1112
76'50
5201

PAl.lt'l

IS~ I
DCSAV3
MTl.S
DC02FD, JMS
GODC
Cl..A Cl..I..
TAD
AP!
SNA Cl.A
JMP
DC02F•1
RE5TO~

6771
rll?liiHl

GODC,

73~~

13~5

Z'l010

001210
~260

0000
Zl0e10

21001?!
7?60
7317
7307
7317
7317
7317
7317
7317
7317
7317
731?

V141

17•FES•72

11152

PAGE 41-1

P"INTER
/PRINT Tl-lE DATA
/RE !NlTlATE T~E i..lNES
l!NCREME~T

I AP l 1
INr'J

/VES

!21

CLA Cl.I..
TAD

TAD

GROUP
K7?6l'J
GODC

/ADD ?76f'l
/RESEl.ECT Al..L I.INES
/EXIT

KTYBUF'
DCSAV3
DCSTAT
K260
DC11l2FD•l

/RESET Pt'l l NH'.R
/GET L!NF'
/ADD 1?126!"
/PRINT IT

~TON

JMP l
DCel2F'8 1 TAD
DCA I
TAD
TAD
JMP
G"l'lUP1
DCSTAT 1
K261?l 1
DCSAV2 1
DCSAy3 1
DCSAV4 1
K776t" I
K!VBUF I
TABPT 1

0010
l1l
el260
121
0
0
7760
TTYBUF"

TTY0 I

TTYBUF"
TTVBUF
TTYBUF
TTVBUF"
TTYBUf
TTYBUF
TTYBUf
TTYBUF

TTVl I
TTV2 I
TTV3,

TTY4 I
TTY5 I
TTV6,
TTV?,

,•1

IDC02F' GROUP NUMBER
/DCl?l2F' STAT!l'lN

/PDP•l2 SYSTEM EXERCISER
7317
7322'
7321
7322
7323
7324
7325
7326
7327
7330
7331
7332
7333
7334
7335
7336
7337
7:540
7341
7342
7343
7344
7345
7346
7347
7350
7351
7352
7353
7354

21215
~212

73?'~

0320
21304
21320
0255
?1261
f'262
?241Z
0323
?331
21323
0324
03lJ5
1"315
12'240
0305
0330
03{!5
?1322
2303
12'311
0323
3305
0322
12'211
;1240
0304
21267
'1303
f'l3:J4
rl211
0240
0324
0324
21331
;>1240
12'314
21311
Ol3H>
0305
0240

7371

tl0J0

7355

7356
1357
7360
7361
7362
7363
7364
7365

7366
7367

PAl.112'

Vl41

17•FEB•72

1115?

Pl\GE 42

T!YBUF 1 0215
'"212
"Pl"Dl"Pl"•l"1l"21"

l"~1"Y1"Si"T1"El"M

" l"Ei"Xl"E;"Rl"Cl"ll"~l"Ef"R

2102'0

,..

1"01"7J"CJllD

1 11 I "Tl "TI "YI''

l"l.f"l l"N1 11 E'.l"

/PDP•12 SYSTEM EXERCISER
7400

PAl..li?!

17 .. FEB•72

Vl41

11152

PAGE 4'.'

•742'0
/THIS ROUTINE RESETS THE Cl..OCK COUNTER
AND TYPES OUT THE HEADER MESSAGE AT !HE START "F THE PROGRAM

7400
?4'11
14e2

7 4 :117
7410
7411
7412
7413
7414

73NJ
3035
3033
3031
3117
1224
3017
1417
7450
561.4
4215
52217
1241

7415
7416
7417
7420
7421
7422
7423

"'020
6046
722J
6041
5220
f\042
5615

pRT 1

7424

TX11. I

0215
:'1212
Pl315
e:z5:;
0261
"262
C255
\?!304
C"267
031113
032'4
V!215
0212
0212
0320
0301
2'323
2323
224i.?1
0240
0240
?!240
t"324

ITYPE OUT MESSAGE
"PASS
Tl ME
TX11
1'1215
0212
0315
2'255
212H
2'262
n55
Z304
0267
t"32'3
0304
0215
0212
Z212
0320
0331
0323
t'1323
0240
0240
212412l
0240
0324

74~3

7404
7405
74~6

MESSG 1

Lloll..0 I

7425
7426
?427
?430
7431
7432
7433
7434
7435
7436
7437
7440
?441
7442
7443
7444
7445
7446
?447
7450
?451
7452
7453

Cl.A Cl.I..
DCA
DCA
DCA
DCA
TAO
DCA
TAD I
SN/\
JMP I
JMS
JMP
WORUJ

KI I.I. IT

PASS
Cl.OCK
ERCNT
TXll.
17
17

L.WLD
PRT
I •4

0
6046
Cl.A CM.L.
6il41
JMP
I •1
6042
JMP I
PRT

/RESET RANDOM D!~K A~DRESS
/RESET PASS COUNT
/RESET CLOCK COUNT
/RESET ERROR COUNT
/SET UP TYPE OUT POINTER
I l..OCA!ION
/GET A CHARACTER
l!S IS i!ERl'l ?
/YES 1 EXIT TO START THE PROGRAM
/NO, PRINT IT
/DO SOME MrJRE

/PRINT THE

CHARA~TFR

/DONE 7
/NO, WAIT
/EX IT

TX1•1
PC

GOOO

CIAO

F'!ELD

/P~P~12

SY>TEM EXERCISER
7454
7455
7456
7457
7460
7461
7462
7463
7464
7465
7466
7467
7 4 70
7471
7472
7473
7474
7475
7476
74'7
?5V'ilil
75211
75~2

75?3
7 5 :1l4
7505
7506
752!7
7510
7511
7512
7513
7514
7515
7516
7517
7520
7521
7522
7523
7524
7525
7526
7527
75321
7531
7532
7533
7534
7535
7536
7537
7540
7541
7542

21311
0315
2'305
?!240
2'240
;'l2421
2!240
7240
f"240
0240
?!2421
2'320
t'!37J3
iZl240
l'l240
21240
21240
2!240
0240
21240
0240
2'240
0240
7!3217
0317
2!317
0304
0240
21240
C'l240
2!240
:l24il
0240
?240
0240
Pl3<l2
1'13211
:1304
02421
21240
0240
0240
0240
0240
0240
0240
0240
2!306
C':311
03:35
21314
0304
0215
il2l.2
2'000

PA~H!

C'l3l.l
21315
2'32'5
0240
0240
n421
0240
2!240
0241il
21240
0241il
0320
032'3
024121
21241"l
21241"l
1'1240
1'12411l
r.>240
0240
1!1240
0240
21240
0307
0317
!21317
('1304
0240
11240
0240
21240
21240
"'2 4':1
21240
Pl240
("31212
032'1
0304
0240
21240
C'l2 411l
1'1240
n•0
"'2421
0240
02421
02Hl
03:.l6
0311
0305
0314
213il4
0215
0212
01210121

V141

17·FEB•72

11152

P.l;~E

4:1·1

/POP•12 SYSTEM EXERCISER

PAl.121

V141

17•F"EB•72

11t52

PAGE 44

/THIS ROUTINE IS ONLY TO POSITION THE HSRI ON THE CORRECT STARTING
CHARACTER,

7543
?544
7545
7546
7547
7550
7551
7552
7553
?554
?555
?556
?557
?560
?561
?562
?563
7564
7565

"'0210
6016
3365
2365
5346
2365
5350
6011
?743
6016
6011
5355
7640
5354
101111
3764
5743
1457
'10?;:',

i-ISRST I

603,6
"'
DCA
IS~

JMP
I Si!
J'1P

HSRSV
HS RSV
I •1
HSRSV
,•1

6"1U

LLAST1
i-!SRSV I

JMP l
6016
62IU
JMF'
Si!A
JMP
!AC
DCA I
JMP I
HGOOD
~

HSRST
I •1
Cl.A
I •4

l.l.AST
HSRST

SYSTEM

EXE~C!SER

0110'.30~0

/PDP~12

P td. HJ

V141

17·FEs~n

11152

PAl';E 45

0000
eJUHl

11111111

70000000
11111111

11111111
11111111

11111111
11111100

11111111
11111111

11111111
111110?12)

11111111
11111111

02\?10
03\?10

11111111
11111111

2'411l0
0500

11111111
11111111

ui11111
11111111

0600
0700

11111111
11111111

11111111
1l?IQJ001il0

1000
11"0

11111111
11111111

11111111
il1HJ0?i0

11111111
i"0i"012!000

120121
1300

11111111
11111111

11111111
11?100000

1400
150121

11111111
11111111

11111111
11111110

11111111
!'l0000r1H'l0

1600
1700

11111111
11111111

11111111
l1!02!01111212!0

11111111
C'l012101111i!100

201210
210k:l

002102'000
11111111

2l0iHJ0000
11111111

11111111
11111111

11111111
1111210121210

2200
23210

11111111
11111111

241210
251210

11111111
11111111

11111111
11111110

11111111
('112121012101210

2600
2700

11111111
11111111

11111111
1111111121

11111111
?102l02'U0

:31!11110
3100

11111111
012112100000

11111111
2102'0;111212!0

11111111
2'01211210000

11111111
12101110001210

00k'l021000
12112111101'101110

1210001210<10
2!01110210210

1'!01"01"1210121
t'HHl12111101"0

r:'0?'02101210
t"0e"011101110

1012102111l0il

121000001110
001210001'!121

0iili2100el1210
000011Jl1l121121

2!012101112!1210
1110111012101110

00C'l01110210
00000000

0012102'0210
2J011102l0210

2ll1l002li21?12J
C'll1le01210?10

?'121C'l011112100

:320121
331210
3400
351210
36210
37111121

121000210~0

01'H"i2111l12100

PAGE 4-;.1

~YSTEM

EXERCISER

7111111"
7111' Ill

11111111
11111111

11i11111
11102100121

.,21210
7311!0

11111111
11111111

11111111

74"11!
'51Z!11l

11111111
11111111

11111111
111111t""

11111111

/PDP•12

PAL.le!

V141

17•FE8·72

11i5?

4111121121
4U<:l

420121
430kl

44'3121
45Q'JC
4611l121
4 7212!

5111121121

5111l"
520121
53121121
54111121
55111121
560121
571210
600121
61111121

62121"
6312112:
64111121
6511l121
661210
6.,121121

.,611!121
7711!"

1H"k:li1l121~'Hl

~111~k:ll1l11Jf'l121

/PDP-12 SYSTEM EXERCISER

7'001

PAl.,H"

Vl41

17•FE8•72

11152

PAl";E 4'i-2

FIEL!) 1
/PDP-12 CP TEST PART 3• BACKRO~ND • 1 PASS THRU
/E~TER SY A JMS TO LDC~ 177 , WILL EXI! WITH 121 A:c: IF ND ERROR DETECTED
/XXXX A,C, IF FRROR IS DETECTED A,C,=THE P~c: !N ERROR
/WILL EXIT BY A CPJMP I 177 TO BANK 0
/SA 0200 8•MODE ANY MEMORY BANK

6167
tHl16

CPHt.T=6167
CPNOP•QHH6

6000

CPJMP=6020

0i.l20

*20
K7777 I

7777

21020
:'i:IJ21
'.l022

5252
?000

K5252,

5252

TEMPL I

['100121

~023

::HJ07

KP~0217,

210L'l7

21024
2025
21026

36'.'ll

K0612l11

06211

21027
21030
2l031
Z032
21J33
2l034
Z035
21036
Z037

7007

7737

17211

7770
'.1770
2552
7752

7770
21770

7725
77?-0
7!030

7725

Kfil2112lt'! 1

2525

K2525 1

012121121

2552

7752

TEMPH 1

7700
l'l00el
2525

f'J00i<l

/HALT

/NO OPERATION

/PDP•12 SY5TEM EXERCISER

PAl.Hl

V141

17•F"EB•72

1115?

PAGE

/CP START UP ROUTINE ONE TIME 0~1.Y
/THIS ROUTINE IS ENTERED ONLY AT THE S!ART or TH[ PROGRAM
I TO I.DAD TME CP PROGRAM INTO ~EMORY FIELDS H!GHF"R THAN FIELD 1
'.H:'l40
fl041
:1042
'illiJ43
"1044
~045

<H'46
?'047
?1050
!112151
?!052
:'J053
['1054
1'1055
r.056
:1057
!11060
:21061
!11062
;1063
?1064
2'065
0066
0067
:'lil70
0071
2!072
1'!073
~074

tl075
1Hl76

62;)3
5442
0000
76il4
?!103
7041
31?!4
73?ll
3105
2124
7410
5040
21?15
1105

CPST,

CPST11

7lC'16
7lil4

11:?16
3067
13;:ie
31"7
3110
6211
1510
6221
351i)

15HJ
6211
7041
1'510
7640
74212

CPST2 1

corxx,

CDF C!F" 0
JMP I
,+1
0000
LAS
AND
AK0007
CIA
DCA
ACNT
CLA CLL I AC
DCA
ACPFLD
!Sc
ACNT
SKP
JMP
CPST•2
!Sc
ACPFLD
TAD
ACPF"l..D
RT\. Cl.I..
RA\. r.1,,1.
TAD
ACDFX
DP
C:JFXX
Cl.A Cl.L.
DCA
ACK NT
DCA
AAF"DD
6211
TAD I
AAF"DD
6221
A/\f."DD
DCA I
TAD I
AAFDD
6211
CIA
TAO !
AAF'DD
SCA CL.A
HLT

'J077
21100
21101
01 ~"2

21HJ
2107
5065
5051

!Sc
I Si!
JMP
JMP

0103
0104
0105
21106
"12'7

ll'0Cl7

AK21007 1 0007
AC:NT,
fl'
ACPFL,D I 2l
ACDFX1 6211ll
ACKNT 1 0
AAf."DD1 ~
AK2121 21212

~11~

H11

0000
0000
62i1J1

"''"~"
0000
rJ212

/RESET or
/EXIT
/READ RSW
/MASK IO 8!TS 9·11
/NEGATI IT
/SAVE IT IN A TEMPORARY LOC,
/SET AC TO 0?101
/SAVE §TARTING FIELD VALUE
/INCREMENT COUNT
/WE HAVE MORE THAN BK OF CORE
/NO ONl..Y BK SO EXIT
/INCREMENT CP FIELD POINTER
/GET THE NEW POI~TrR VALUE
!ROTATE LEF'T
/l NTO BITS 6·8
/ADU A 6201
/SAVE IT !N CDF'XX
l..OCAT I ON
/CLEAR-A PC!NTER l.OCAT!ON
/CHANGE TO THE OLD F!EL.D
/GET THE NEXT WORD
/CHANG~ TO THE NEW FIELD
/SAVE IN THE Nrw MrMORY F!El.D
I

/ERROR IN DUPl.ICAT!NG r1EL.D 2'
INTO THE EXTENDED MEMORY
/INCREMENT POINTER LOCATION
/INCREMENT THE CCUNTF'R 1 DONE ?
/NO MORE TO DO
/YES COMPLETED WITH TH!S MEMORY F'lELD
I

AAF'DD
/\CKNT
CPST2
CPST1

/PDP•12 SYSTEM EXERCISER
1?1167
"'167
1?1170
OJ 171
\1172
2173
?il74
71175

'?.176
•H77
:1200

PA[..1?1

?0?10

1560
6211?10
?'032

17•FEB-72

11152

PA(;E 47

*0167

V'flll

702'0
62713
5577

V141

CPOUTA 1
CPOU1" I

CLR
ADD
Ii!
BCt.+20
60210
PDP
7nJ0
CI f" CDF" ii!
JMP I
,+1

?'l<lM1

CPEX!T 1 '!

?'2710

*020C'I

?J2V'2
'.l2 fl 3

6141
62'12
"!462
6173

212l"4

1020

1?1Zi'5
(l2i17
91210

7777
1440
3020
6167

ni1
;i212
<l213
3214
'1215
2216

1020
7777
1440
::l035
0456
6167

LDA+20
7777
SAE
K00011l
LSKP
CPHLT

/SAE SKIPPED IN ERROR AC•7777 MEM•21011l0

::1217
?)220
?)221
0222
<JZ23

?lfH1
1440
1?020
(456
6167

CLR
SAE
K7777
LSKP
C:PHLT

/SAE SKIPPED IN ERROR AC=011l0C'I MEM=7777

'3224
Cl225
?J226
"1227

'1011

CLR
SAE
K000kl
CPHLT

/SAE FAILED TO

LDA+20
5252
SAE
K5252
CPHLT

/SAE FAILED TO SKIP AC•5252 MEM:5252

LDA+20
2525
SAE
K5252
LSKP
CPHLT

/SAE SKIPPED JN ERROR

32'11

"'2C6

1440
?'035
6167

0230
0231
ll232

1020
5252

~233

0021
6Hi7

?'234
~235
·~236

n37
2'2 4;J
21241
21242

:l.440

1020
?525
l44@

f'021
'1456
6167

LI NC
l.JMP
SNS+20
LJMP

,+1
2
CPOUTA

/SAE TEST
1:0
LDA+20
7777
SAE
K7777
CPHLT

B:~

/BYPASS CP TEST ?
/YES
ADDRESS OF OPERAND IS IN

SEC~ND

WORD

/SAE FAILED TO SKIP AC•7777 MEM:7777

SKI~

AC•011l0~

MEM:0011l0

AC:252~

M(M:5252

/PoP~12

SYSTEM EXERclSER
~243

il244
ll245
'~246

21247
?1250
'.J2 51

ll252
0253
ll254
71255

A1.U

V141

17 .. FEB•72

11152

PAGE 47-1

1020
5252
1440
0036
?456
6167

LDA+20
5252
SAE
K2525
LSKP
CPHLT

/SAE SKIPPED jN ERROR ACm5252

1020
2525
1440
f'036
6167

LDA+21i:l
2525
SAE
K2525
CPHLT

/SAE FAILED TD SKIP AC=2525 MEM:2525

MEM~2525

/SAE TEST
I

!=0 B:X ADDRESS OF OPERAND !S IN BFTA REGISTER

(:"256
0!257
7126k'.'
1261
?1262

;'1077
0035
f'011
1457
6167

21263
Z2?4
(l265

'.'2175
f'035
Hl2ir:J
7777
1455
0456
6167

SET+20•15
LDA+20
7777
SAE 15
LSKP
CPHL.T

/SAE SKIPPED IN ERROR AC=7777 MEM:01i:l00

ll274
"275
ll27 6
'll277

0076
f'021
1020
5252
1456
6167

SET+20•16
K5252
LDA+20
5252
SAE 16
CPHLT

/SAE FAii.ED TO SKIP AC•5252 MEM•5252 8=16

Ql300
1301
21302
;i303
'1304
21305

0073
?020
0011
1453
C'456
6167

SET+20+13
K7777
CLR
SAE 13
LSKP
CPHLT

/SAE SKIPPED !N ERROR AC:0000 MEM:7777 B=13

'1306

'."075

~3('17

?'l:J~0

2l310
2l311

Hl20
7777
1455
6167

SET+20•15
K7777
LDA+20
7777
SAE 15
CPHLT

/SAE FAILED TO SKIP AC=7777 MEM:7777 9;15

2''372
'.?'02l

SET+20+12
K5252

~206

il267
7-270
il271
!1272
n73

~312

0313
~314

71315

<;ET+20•17
KiZli,,li:lrl

CLR
SAE 17
CPHLT

/SAE FAILED TO SK!P AC•07102i MEM:0001i:l

B~l7

K~01i:lli:l

B~14

/PDP-12 SYSTEM EXERCISER

DAl.10

7'316
'1317
'.1320
2321
'.'1322

1020
2525
1452
17, 456
6167

LDA+20
2525
SAE 12
LSKP
CPHLT

/SAE SKIPPED IN ERROR AC:2525 MEM:5252 8:12

1323

~331

2071
0ill)6
11112 ill
5252
1451
"'456
6167

SET+20•11
K2525
LDA+20
5252
SAE 11
LSKP
CPHLT

/SAE SKIPPED !N ERROR ACs525'

;)332
.:1333
713.34
0335

':'~67

2036
102.21
2525

SET+20•7
K2525
LDA+20
?525
SAE 7
CPHLT

/SAE FAILED TO SKIP AC=2525 MEM:2525 8=7

~324
~325

<'1326
::>327
:J330

~336

1447

::1337

"'167

V141

17•FEB-72

11i52

PAGE 47-2

~EMa2525

8=11

/SAE TEST AUTO INDEXING TEST
/ADDRESS OF OPERAND •1 IS IN BETA REGISTER
/SAE Iz1 S=X
"'134ill
~341

7070
Zill34

2342
el343
2l344

14 713
6167

SET+20+10
K02'11H,,•1
CLR
SAE+20•11?l
CPHLT

/SAE FAILED TO SKIP AC•000eJ

J,345
:l346
2347
'.:J350
:i351
71352
2l353

2066
0034
Hl20
7777
1466
0456
6167

SET+20•6
K0el01?l"1
LDA+20
7777
SAE+20•6
LSKP
CPHLT

/SAE SKIPPED IN ERROR AC=7777

'.1354
3.355
2l356
<'.1357

::"ill67
tlil)l 7
1020
7777

/SAE FAILED TO

/SAE SKIPPED IN ERROR

2ill11

~360

1467

7!361

6167

SET+20+7
K7777•1
LDA+20
7777
SAE+20•7
CPHLT

"'1362
'l363
3364
7!3?5
::1366

7072
7017
?1011
1472
0456
6167

SET+20+12
K7777•1
CLR
SAE+20•12
LSKP
CPHLT

~367

SKI~

AC=7777

MEM:~000

MEM=00~0

ME~:7777

AC:3~0A

B=leJ

8:6

9=7

~E~a7777

B=l2

/PDP·12 SYSTEM
3370
l37l
'.1372
l373

~XE~C!SER

PAL.1t'I

V14l

17 .. FEEl•72

11152

PAGE 47.3

0066
0020
H'l20
5252
1466
6167

SET+21i:1+6
K5252"'1
L:)A+20
5252
SAE+20+6
CPHLT

/SAE FAILED TO SKIP AC=5?52 MEM:5252 8=6

0073

!"404

1:1l2il
2525
1473
'7l456
t-167

SET+2li:l+l3
K5252"1
LDA+20
2525
SAE+20+13
LSKP
CPHLT

/SAE SKIPPED IN ERROR AC:2525

l405
'1406
H217
'l4Hl
7!411
'.H12

().J65
21<n;
1020
2525
1465
6167

SET+20+5
1<2525•1
LDA+20
2525
SAE+20+5
CPHLT

/SAE FAILED TO SKIP AC=2525 MEM:2525 9•5

1413
3414
21415
(1415
'l417
7!420
7l421

2071
e035

SET+20•11
K2525•1
LDA+20
5252
SAE+20•11
LSKP

~374
:~

375

0376
l377
)42'0
>~4ll

1402
'34~3

002<"

1020

5252
1471
0456
6167

CP~LT

/SAE SKIPPED IN

ER~OR

~EMs5252

AC=5252 MEM:2525 Bm11

/SET TEST !=0 B=X
I

1))422
1423
liJ424
7l425
21426
21427
liJ430

?'057
002ZJ
102121

21431
01432
2l433
:H34
'!435
H36
2J437

21052
0021
1020
5252

21440
2441
'1442

21053
r<03o

~443

1777

144121
0017
6167

1440

0012

6167

102iij
25?5

SET+17
K7777
LDA+20
7777
SAE
21017
CPHLT

/SET+1 FAIL.ED !O SET 917 AC=7777

SET+12
K5252
LDA+2li:I
5252
SAE
21012
CPHLT

ISET+2 FAIL.ED !O SET 812 AC=5252

SET+13
K2525
LDA+20
2525

8:13

/PDP·12

SYSTE~

EXE~C!SER

PAL.Hi

V141

17•FEB·72

11l52

OAGE 47-4

!)444
Cl445
2J 4 46

1440
0013
6167

SAE
0013
CPHLT

/SET+3 FAILED

IO SET 813 AC=25?5

(11447
'3450
0451
<1452
H53
Z454
2455

2!054
1"035
1440
21014
6167

SET+i4
Kl2l002!
LDA+2"1
21000
SAE
0014
CPHL T

/SET 4 FAILED

IO SET 814 AC=l?li2l~0

2464

1?1054
'1020
102;:,
7777
1440
e'i2ll4
6167

SET+14
K7777
LDA+20
7777
SAE
"1014
CPHLT

/SET+14 FAILED TO SET 914 AC=7777

i1465
:J46b
'.l4b7
04 70
tH71
iH72
H73

<'!055
21021
Hl212l
5252
1440
012!15
6167

SET+l!'
K5252
LDA+212l
5252
SAE
012l15
CPHLT

/SET+15 FAILED TO SET 815 AC=5252

04 74
'14 75
04 76
04 77
21500
Ql501
f'J502

0056
0036
1020
2525
1440
t'll2l16
6167

SET+16
K2525
LDA+212l
2525
SAE
0016
CPHL.T

/SET+16 FAIL.ED TO SET B16 AC:2525

\'!503
(7]51214
0505
0506
ll512l7
Ql510
Ql511

0057
121035
1020
0000
1440
0017
6167

3456
214~7

0460
2l4bl
,Hb2
(114 b 3

1'IJ 2 0
N~2l0

SET+17
K~H'J0Q!

L.DA+20
2112lQJ0
SAE
1'1017
CPl-1L. T

/SET+l7 FAIL.ED TO SET 817 AC=l2l1"012l

/LDA ALL MODE TEST
(11512
e513
ll514

11=12! B•l2l ADDRESS OF OPERAND IS IN SECOND WORD
I
1~HH1

0035
146'21

:11515

00vh:J

~516

6167

LDA
K0Qlf210
SAE+2f21
11rnzi0
CPHLT

/LDA FAILED

AC:0ei0~

/PDP·12 SVSTEM EXERCISER

PALHl

3517
Ql5211l
3521
0522

i1111l211l
1460
7777
6167

LOA
K7777
SAE+211l
7777
CPl1LT

/LOA FAILED AC=7777

:!525
'1526
"1527
?15311l

111l<llll
r:021
146IO
5252
6167

LDA
K5252
SAE+20
5252
CPHLT

/LDA FAILED AC=5252

(1)531
3532
2'533
fl534
11535

1000
2llll36
1460
2525
6167

LOA
K2525
SAE+20
2525
CPHLT

/LDA FAILED AC=2525

~523
~524

10Vllll

Vl41

l 7-F"EB•72

11152

/!=Ill B=X ADDRESS OF OPERAND IS IN 8 REGISTER
I

?1536
2'537
?!5411l
VJ!:i4l
0542
"1543

SET+211l+11
K0(1Jlll[l
LDA 11
SAE+20

:1~'71

?035

146!0
011l00
6167

[li1Jellll

CPHLT

ILDA + B FAILED AC:02llll0

3544
Ql545
;J546
1547
:3550
"1!:)51

\HP2
'.1020
UH2
1460
7777
6167

SET+211l+l2
K'777
LDA 12
SAE+20
7777
CPHLT

/LDA + B FAILED AC=7777

fl552
0553
:ll554
Ql555
1556
0557

0073
N:l2l
1013
1460
5252
6167

SET+2fll+l3
K5252
LDA 13
SAE+20
5252
CPHLT

/LOA + S rAILED AC•5252

Ql5611l
:>1561

(11Jll74
?'036
1lil 14
1460
2525
6167

SET+211l•l4
K252'5
LDA 14
SAE+20
2525
CPl1LT

/LDA + 8 FAILED AC•2525

~562

2l563
~564

VJ565

/LDA I 8 TEST
1=1 B=X ADDRESS OF"

I
I

Ql566

0075

SET+211l•l5

OPE~AND

•1 IS IN 8 REGISTER

"AL;E 47-5

/PDP•12

SYSTE~
~567
~5721

'.]; 71
~572

?1:>73
~ ::i

~575

1;76
;-,577

'36e'0
?l6fl1

EXE1C!SER

PAl..10

7i034
1 '.J3:.
1460
00?10
6167

K021021•1
U)A+211l+15
SAE+211l

17,.FEB-72

11152

CPl1LT

/LDA l 8 FAILED

AC=0?0~

02i76
"·2117
1036
1460
7777
6167

SET+20.i-16
K7777•1
LDA+20•16
SAE+211l
7777
CPHLT

ILDA I 8 FA!LEDAC:7777

·?1077
?1020

11..DA I 8 FAILED ACa5252

/LDA I 8 FAILED AC=2525

V141

e'0011l

1602
1603
?1604
11605
?16fl6
?l6fl7

1037

1460
5252
6167

SET+2l:l•l 7
K5252•1
LDA+20+17
SAE+2£1
5252
CPHLT

7l61"
?J611
'1612
1613
'.1614
2615

12171
e'035
1031
1460
2525
6167

SET+20+11
K2525"1
i.DA+20+11
SAE+20
2525
CPHLT

/STA l=l B=lll TESTED !N PA~T 1
/STA ALL MODE TEST
11~0 8:121 ADDPESS OF OPERAND IS
1616
0617
:'J620
?1621

PA(,E 47-6

SECOND WORD

1623

"lll11
10 4 iO
('1022
144121
0022
6167

CLR
STA
TEMPI..
SAE
TEMPL
CPHLT

/STA FAILED AC=lll00?1

'.11624
t'l625
?1626
0627
eJ630
0631
0632

1020
7777
104121
?2137
14 4121
0037
6167

l.DA+20
7777
STA
TE MPH
SAE
TE"lPH
CPHLT

/STA FAii.ED AC=7777 TEMPH•7777

'1633
1634
0635
"636
'1637
2640

10 2121
5252
1fll4k:l
1022
1440

~641

6167

LDA+20
5252
STA
TEMPL
SAE
TEMPL
CPHLT

/STA FAILED

~622

?2122

AC:525~

TEMPL•00~0

TE~PL:5252

/POP•12 SYSTEM EXERCISER

PAl.1"

)642
::1643
1644
Z645
3646
~647
~650

1020
2525
1kl40
2Hil37
1440
1037
6167

L,:lA+?ill
2525
STA
TEMPH
SAE
TE MPH
CPHL.T

::1651
'11652
21653
<l654
il655
?1651i

:7lfll11
12J4i1
?lfll37
144Zi
C'icJ37
6167

Cl.R
STA
TEMPH
TE MPH
CPHLT

/STA FAIL.ED

'1657
::l660
21661

1020
7777
11214 0
2022
1440
0022
6167

1.0A+211J
7777
STA
TEMPI.
SAE
TEMPI.
CPI-IL T

/~TA

Hl2ill
5252
104!0
0037
1440
0037
6167

LOA+2fll
5252
STA
TE MPH
SAE
TEMPH
CPHLT

/STA rAlL,ED AC=5252 TEMPH;5252

1020
2525

1.0A+2fll
2525
STA
TEMPI.
SAE
TEMPI.
CPHl.T

/STA FAILED ACD2525 TEMPL.:2525

~662

21663
fl664
3665
2161>6
Cl61>7
::1670
~671

<l672
0673
e!6 74
0675
21676
C'i677
'1l700
07211
21702
2ln3

1040

21022
1440
'11022
6167

V141

17•FEB•72

/~TA

PAGE 47-7

11152

rAIL,ED AC=2525 TEMPH:2525

SAE
AC=fll212J~

TEMPH:00~0

rAil.ED AC=7777 TEMPL•?777

/STA TEST A
/STA 1•0 B=X ADDRESS OF OPERAND IS IN B REGISTER
217:"4
'1l705
::l7k'.16
n01
?J71ill

Cl711
\iJ712
21713
0714
0715
n16
11.717

0067
21037
1020
002'0
1ill47
1440
2Hl37
6167

SET+?lll•7
TE MPH
LOA+20
011J11li21
STA 7
SAE
TE MPH
CPHLT

011J66

SET+2ill•6
TEMPI-I
l.OA+20
7777

~037

1020
7777

/STA A FA!~EO AC=ill0Z21

TEMPH:00~0

8=7

/PDP-12 SYSTEM EXERCISER

PAl,.1?1

ll720

1046
144121
1112137
6167

STA 6
SAE
TE MPH
CPHLT

/STA A FAIL.ED AC=7777 TEMPH=7777

'NJ 7 7

'?; 7?.1

ll722
0723

V141

17•FEB·72

11152

l>AGE 47.8

0724
2725
0726
0727
0730
3731
'1732
'?J733

012137
1020
'5252
112157
144J
0037
6167

SET+211l•17
TE MPH
LDA+20
5252
STA+17
SAE
TE MPH
CPHLT

/STA A FAILED AC:5252 TEMPH='5252 8=17

0734
ll735
2736
'?;737
'.l740
0741
0742
'1743

0076
2'037
Hl212l
2525
1056
1440
012137
6167

SET+20•16
TE MPH
L.DA+20
2525
STA+16
SAE
TE MPH
CPHLT

/STA A FAILED AC:2525

TEMP~=2525

8=16

11744
0745
'1746
ll747
"1750
'.'17"1
:'l752
3753

011l67
0022
102121
('1000
1047
1440
012122
6167

SET+2fll+7
TEMPL
LDA+2fll
0121l'l0
STA+7
SAE
TEMPL
CPHLT

/STA A FAILED AC=0000

TEMPL=2'121~0

8=7

0754
?J755
ll756
'!IJ757
0762
0763

012171
0121n
102121
7777
111l51
1440
'111l22
6167

SET+20•11
TEMPL
LDA+2fll
7777
STA+l1
SAE
TEMPL.
CPHLT

/STA A FAIL.ED AC=7777 TEMPL=7777 8=11

11764
<l765
111766
0767
"1770
ll771
7,772
ll773

0075
2'12122
1020
5252
1055
144Z
2022
6167

SET+20H5
TE'1PL
LDA+211l
5252
STA+15
SAE
TEMPL
CPHL.T

/STA A FAILED AC=5252 TEM?L=5252 8=15

ll774
?l775
'JJ776

0074
V'f022
1020

SET+20•14
TEMPI,.
LDA+2'1l

111760
07~1

/POP·12 SYSTEM EXERCISER
?!777

12100
1211~1

l,1Hl2
U03

PAt.10

2525
11/J 5 4
1440
2i2122

V141

2525
STA+14
SAE
TEMPI.
CPMLT

6167

17•FE8•72

11152

PAGE 47-9

/STA A FAii.ED AC:2525 TEMPL:2525 3=14

/STA TEST AUTO INDEX
/STA 1=1 8•X ADDRESS OF OPERAND•1 IS jN B REGISTER
1004
Ul05
1006

urn

U10
Ul1

U12
1<l13

?07i(:l
~021

1!020
5252
111l70
1441:)
1!1022
~167

111l14

0067

1.015
U16
1017
1020
U21
U22
U23

1020
2525
Hl67
1440
0022
6167

~021

12'24
1025
U26
1027
1<'30
U31
U32
1<!33

Ylkl71
Ql036
1i2120
5252
1071
144k:l
t11037

U34
U35

?l:l66
0036

10 36
U37
1040
1041
1042
U43

1020
2525
1066
1440
l?l¥!37
b167

6167

SET+20•10
TEMPL"l
LDA+21il
5252
SH 211lH0
SAE
TEMPI.
CPHLT

/STA I A FAILED AC=5252 TEHPL=5252

SET+20•7
TEMPl.•1
LOA+20
2525
STA 20•7
SAE
TEMPI.
CP .. t. T

JSTA l A FAILED AC=2525 TEHPL=2525 8•7

SET+20+11
TEHPH•1
1.DA+20
5252
STA+20•11
SAE
TEMPJ.l
CPHLT

/STA I A FAIL.ED AC•5252

SET+22'•6
TEHPH•1
t.DA+20
2525
STA+20•6
SAE
TE MPH
CPHLT

/STA I A FAILED AC•2525 TEMPM=2525 8:6

1044
U~5

1046
1047

21011
11?10
C1'035
11'.'J 0

/AOA Al.I. HOOE ADDRESSING TEST
/ADA 1•1 8=0 r~sT IN PART 1
JADA I•lll B=lll ADDRESS OF OPERAND IN SECOND WORD
CLR
ADA
K01/JllJllJ

ADA

TEMP~=5252

B•l~

8=11

1PDP~12

SYSTlM EXERCISER

PAL.HI

V141

17~FEB~72

11152

l.050
1051
l,11152
1053

7020
1460
7777
6167

K7777
SAE+2kl
7777
CPHLT

1054
U55
1;2156
1057
1J60
U61
\062

0474
6167

/Fl.O FAIL.ED

'2!021
1460
2525
6167

F1.0+211l
CPHLT
CLR
ADA
K5252
ADA
K5252
SAE+20
2525
CPHLT
FL.0
CPHLT
Cl.R
ADA
K7777
AD4
K0001'1
SAE+20
7777
CPHL. T

IFl.O FAIL.ED F;:1

0454
6167
'.H111
111l0
0020
1100
;11/J35
1460
7777
6167

111il0
112'1

c>,474
6167

FL,0+20
CPI-IL T

/Fl.O~

11212
1103
1104
1105
1106
11 ~'J7
l.110
1111

l'.'011
11210
0036
11Ql0

CL,R

1 /l03

1064
1.J65
U66
1067
Hl70
1eJ71
U72
1073
H.174
1075
1J76

1112
1113
1114
1115
1116
1117
1120
1121
1122
1123

i;<l/Jl.1

1101/J
r021
1130

C'lfi:l36

1460
5252
6167
?,454
6167
0011
1100
0021
11'."'0

(11036
1460
7777
6167
Jl4 74
6167

1124
1125
1126
1127

11021

1,130

7036

"'"11

ADA
K2525
ADA
K2525
SAE+20
5252
CPI-IL T
FLO
CPHLT
CL.R
ADA
K5252
ADA
K2525
SAE+20
7777
CPHLT
FL,0+20
CPHLT
Cl.R
ADA
K2525

PACE 47-121

/ADA FAILED A:00?0 8=7777 AC:7777
FL,O:~

/ADA FAIL.ED A:5252 8=5252 AC=2525

/ADA FAIL.ED A:7777 8:0?00 AC:7?7?
FAILED Fi.0=0

/ADA FAIL.ED A•2525 8=2525 AC:5'.52
/FLO FAii.ED

/ADA FAii.ED A:5252 8=2525 AC:7777
IFl.O FAll.ED

/POP•12 SYSTEM EXERCISER

PAl,,Hl

1131
U32
1.133
1134

ADA
K5252
SAE+212l
7777
CPHLT

1,135

11021

0021
14621
7777
6167

V141

17•F"E8•72

11i52

PAGE 47·11

/ADA FAILED A:2525 8=5252 AC=77?7

/ADA A TEST
B:X

I I 1121

SET+212l•l1
Kl2l;J212l
CLR
AOA 11
ADA 11
SAE+20
002'121
CPHLT

/ADA B FA!l.ED A:2l212l0 8=0?!02'

1117
1117
1460
2525
6167

SET+20•17
K5252
CLR
ADA 17
ADA 17
SAE+20
2525
CPHLT

/ADA B FAILED A:5252 8=5?52 AC:2525 8=17

0067
0021
007!0
?036

SET+2fi1•7
K5252
SET+20•112i
K2525

U36

~2171

1137
114i'l
1141
1142

P'J35

1143
1144

0;,11
1111
1l1l
1460
00%:1

U45

6167

1146
1147
1150
1151
l.152

7'J77
11021

1153

1154
1155
1156

1157
1160
1161
1162

001l

~011

C1.R

11~3

1107

1164
1165
1166
1167

1110

1460
7777
6167

A0A+7
AOA+U
SAE+20
7777
CPl-ILT

1170
1171
1172
1173
1174
1175
l.176
1177
1200
12e1

0073
0036
t'1077
7021
0011
1113
1117
1460
7777
6167

1 ??!4

0067
0034
1?111177

8•2~25

8=11

AC=7777 8:7110

SET+212l•13
K2525
SET+20+17
K5252
Cl.R

AOA+13
ADH17
SAE+20
7777
CPHLT
/ADA I A TEST

1202
1203

/ADA B FAILED Ac5252

ACm0~02l

SEl'+2fi1+7
1<000?•1
SET+212l+17

/ADA 8 FAILED A:25?5 8=5252 AC:7777 8:13,17

/PDP-12 SYSTlM
1205
1206
12~7

EXE~C!SER

PAL1?,

'.'017
'"12l11
1127

V141

17•FE8·72

11152

K7777•1
CLR
ADA+20+7
AD4+21l+17
SAE+212l
7777
CPHLT

/ADA l A FAILED

A=~t2l012l

8:7777 AC=7777 8=7 1 17

SET+21l+t2l7
K5252•1
SET+20+10
K2525•1
CL.R
ADH2kl•t2l7
ADA+2kl+10
SAE+2i:l
7777
CPHLT

/ADA ! A FAILED

A=~0?10

8:000~

AC=t2l000 8=7 1 10

A=~00121

8=0000

AC=012lt2l~

PAGE 47-12

1210
1211
1212
1213

1137
1462)
7777
6167

l 214
1215
1216
1217
1220
1221
1222
1223
1224
1225

3057

1226
1227
1230
1231
1232
1233
1234
1235
1236
12j7

012172
f."034

1132
1125
1460
?lt2lVl0
6167

CLR
AC,JA+20+12
ADA+2iH05
SAE+20
2l1212lt2l
CPHLT

/ADA l A FAILED

124;J
1241
1242
1243
1244
12 4 5
\246
1247
12:>0
1251

0072
2'035
012176
0020
0011
1132
1136
146121
7777
6167

SET+20•12
K2525•1
SET+21l+16
K5252"1
CLR
ADA+20•12
AOA+20•16
SA:::+2t2l
7777
CPHLT

/ADA I A FAILED A=2525 8:5,52 AC=7777 8=12 1 16

?1020

0071()
0035
N'.111
1127
1130
145~

7777
6167

SET+20+12
Kt2lll0"1•1
SET+2l2l•t2l5

illl65
0034
r'011

Kt2l~00•1

IBCO A~L MODE ADDRESSING TEST
/BCO !=0 8:0 ADDRESS OF OPERAND IS IN SECO~D WOR~
/BCO !=1 az~ TESTED IN PART 1
1252
1253
1254
1255
1256
12'57

:3"121
1461:)
2525

1~6J

6167

Hl20

7777
164.J

LDA+2rll
7777
BCO
K5252
SAE+21l
2525
r,PHLT

IBCO FAILED A:7777 8:525? AC=2525

B=12 1 5

/POP•12

~YST(M

1261
1262
1263
1264
1265
1266
1267
127~

1271
1272
l.273
1274
1275
1276

1277
l.3~121

1.3"'1
13e'2
1333
13e'4

EX~qCISER

PAl.121

V141

17 .. FEB•72

11152

PAGE 47-13

:;252
1b4(l
Z036
146'-l
7777
6167

LDA+20
5252
BCO
K2525
SAE+20
7177
CP4LT

/BCO FAILED

1020
2525
164"
r'i2l20
1460
5252
6167

LDA+20
2525
8CO
K7777
SAE+20
5252
CPHLT

/BCO FAILED A:2525 8=7777 AC:5252

1~2121

7::2111
1640
?'"B5

1460
~0021

6167

A=~252

8:2525 AC:7777

C\.R

8CO
K0121121k'I
SAE+211l
01212'121
CPHLT

/BCO FAILED A:lll011l121 8:001210

AC=121~121121

/BCO A TEST
SET+20•11
K7777
LDA+2121
5252
BC0+11
SAE+20
2525
CPHLT

/BCO FAILED A:5252 8:7777 AC=2525

2525
6167

SET+20•17
K12112112111l
LOA+2121
2525
8C0+17
SAE+20
2525
CPHLT

/BCO FAILED A:2525

8=121~121121

AC=2525

1325
1326
1327
1330
1331
1332
1333
1334

::".12175
'.H'36
102121
3121'.3121
1655
146121
2525
6167

SET+2'1l+15
K2525
LDA+20
0121tHl
BC0+15
SAE+2kl
2525
CPHLT

/~CO

8=252~

AC=2525

1335
1 336

~~72

'."id21

SET+20•l2
K5252

13i<l5
131216
1307

712171
202121
11212""

l.310

5252

1311
1312
1313
1314

1651
1460
2525
6167

1315
1316
1317
132121
1321
1322
1323
1324

:;1077

0035
102121
2525
1657
14611)

FAILED

A:0121~0

/PDP-12 SYSTEM
1337
1340
1341
1342
l.343
1344

EXE~C!SER

1020

2525
1652
1461:)
7777
6167

PALHI

V141

LDA+20
2525
'1C0+12
SAE+2!0
7777
CPHLT

17 .. FEB-72

11152

PAt;E 47-14

/BCO FAILED A:?.525 8=5252 AC:7777

/BCO l•A TEST
1,345
1346
1347
1350
:!,351
1352
1353
1354

1;2166
"'12l17
1020
110'10
\656
1460
7777
6167

SET+212l+6
K7777-1
LDA+212l
BC0+20•6
SAE+212l
7777
CPHLT

/BCO FAILED

1355

1364

7::171
;102121
12l2fll
2525
1671
1460
7777
6167

SET+20·Hl
K5252"1
LD.\+20
2525
BC0+212l•l1
SAE+211l
7777
CPHLT

/BCO FAILED A:2525 8=5252 AC=7777 B=11

1365
1366
1367
1370
1371
t372
1373
1.374

'.H'73
0034
1020
5252
1.673
1460
5252
6167

SET+20+13
K0000"1
LDA+20
5252
BC0+20•13
SAE+20
5252
CPHL.T

/BCO FAIL.ED A:5252 8=000? AC:5?52 9=13

1375
1376
1377
14k'l0
1,401
1402
1,4f'3
1404

;1:(l74
0;2135
1020
2525
H74
141\0
000fll
6167

SET+20•14
K2525"1
LDA+20
2525
BC0+20•14
SAE+20
0000
CPHLT

/BCO FAILED A:2525 8=2525

1356

1357
1360
l.Jbl

l,352
1363

1405
1406
H07
141~

1411

0fll11
160111
0Kl36
1460
2525

~<100

A:l2l0~<l

8:7777 AC:7777 9:6

1BSE !•0 8=0 ADDRESS OF OPERAND IN NEXT LOCATION
/BSE ALL A~DRESS!NG MODE TEST
/BSE l=l B=0 TESTED IN PART 1
CLR
BSE
K2525
SAE+20
::>525

AC=0~00

8:1,4

/POP•12 SYSTEM EXERCISER

PAL.HI

1412

6167

CPHL T

/SSE FAILED A:2525 AC=25'5

1413
1414
1415
1416
1417
14221

0011

1600
'Hl21
1460
5252
6167

CLR
SSE
K5252
SAE+20
52'52
CPHL T

/BSE FAIL.ED A:5252

1421
1422
1423
1424
1425
1426
1427

1020
2525
1600
N'121
146[il
7777
6167

L.DA+20
2525
SSE
K5252
SAE+20
7777
CPHL T

/SSE FAIL.ED A:2525 8=5252 AC=7777

143"1
1431
1432
!433
!434
1435
1436

112120
5252
16210
2'036
1460

LDA+20
5252
SSE
K2525
SAE+20

7777

6167

CPHLT

V14l

17wf"EB•72

11152

PACE 47-15

AC=52~2

/BSE FAILED A:5252 8=2525 AC:7777

/8SE TEST
/8SE 1•21 8:X ADDRESS OF OPERAND !N 8 REG!STEP
1437
144~

1441
1442
1443
1444
1445
1446
1447
145~

1451
1452
1453
1454
1455
t456
1457
l,4611l
1461
1462
1463
1464

2112171
2112136
012111
1611
146ii
2525
6167

SET+20+11
K2525
CLR
SAE+20
2525
CPHLT

/SSE FAILED A:2525 AC=25?5 8=11

21017
e12121
IJ!fll11
1617
146121
5252
6167

SET+20•17
K5252
Cl.R
BSE+17
SAE+2f/J
5252
CPHLT

/BSE FAILED Ac5252 AC•5252 8=17

~i:'l67

SET+2fll•7
K5252
LOA+20
2525

012121
1020

2525
16:117

BSE 11

BSE 7

1460

SAE+20

7777
6167

7777

CPHLT

/BSE FAIL.ED Ac2525 8=5252 AC=7777 8:7

/PDP•12 SYSTEM
1465
1466
1467
147J
1471
1472
1473
1.4 7 4

EXE~CISER

91070
0020
1020
5777

1610
1460
7777
6167

P.\Ll21

V141

17 .. FE8•72

11152

PAGE 47•16

SET+20+10
K7777
LDA+20
5777

BSE j_ii:l
SAE+20
7777
CPHLT

/BSE FAILED

A:~777

8=7777 AC=7777 8=10

/BSE AUTO!NDEX TEST
/SSE 1•1 9=X ADDRESS OF OPERAND•1 !N THE 9 REGISTER
1475
1476
1477
15v0
1501
1502
15213
l,504
1505
1506
1507
1510
1511
1512
1513
1514
1515
1516
1517
152!.'l
1521
1522
1523

1524
1525
1526
1527
153ei
1531
1532
1533

1534
1535
1536
1537

f'l072
?'035
1020
5252
1632
1460

SET+20•12
K2525•1
LDA+20
5252
8SE+20•12
SAE+20
7777
CPHLT

/SSE FAILED A:5252 8=2525 AC:7777 8=12

6167

SET+20•16
K5252•1
LDA+20
2525
BSE+20•16
SAE+20
7777
CPHLT

/BSE FAILED A:5252

s~2s25

?'07 4
li'034

K02'0~"'1

/BSE FAILED

AC;~0910

7777

6167

0076
?l020
1020

2525
163b
1460
7777

e011
1634
1460
21000

6167

SET+20•14

CL.R
BSE+20+14
SAE+20
00210
CPHLT

:12!7 3

SET+20•13

0017
1020
2525
1633
1460

K7777"1

7777
!-167

1020
7777

1540
0036

AC:7?77 B=16

LDA+20
:2525
8SE•212l•13
SAE+20
7777
CPHLT

A~0000

/8SE FAILED A=25?5 8=7777 AC=7777 8=13

18CL 1•1 8=0 TESTED IN PART 1
/BCL ALL MODE ADDRESSING TEST
!BC~ I=0 8=0 ADDRESS OF OPERAND IN NEXT LOCATION
LDA+20
7777
gcL
K2525

8:14

/POP•12 SYSTEM EXERCISER

PAl.10

15421
1541
1542

1460
5252
61~7

SAE+20
5252
CP\.fL T

/BCL F'A!i.ED A:7777 8=2525

AC=5~52

1543
1544
1545
1546
1547
1550
1551

1022'
2525
1540
0i/J36
1460
7'0210
6167

LOA+20
2525
BCL.
K2525
SAE+20
v.1211110
CPI-IL T

/BCL F'A!LED A:2525 8=2525

AC=0~00

1552
1553
1554
1555
1556
1557
15613

1i212i21

LOA+20
5252
3CI.
K2525
SAE+20
5252
CF'HLT

/8CL F'Ali.ED A:5252 8=2525 AC=5252

LOA+20
21000
BCI.
K1777
SAE+20
~H!l 00
CPliLT

/BCL F'Ali.ED A:r11000 8:7777 AC=0000

1561
1562
1563
1564
1565
1566
1567

5252
1540
21036
1460
5252
6167
1:il20
"'02121
1540

ee<?0
1460
e~rn0

6167

V141

17"F'E8•72

11152

PAGE 47-17

1BCI. 8 TEST
1570
1572
1:i73
1574
1575
1576
1577

0075
0036
1020
7777
1555
1460
5252
6167

SET+20•15
K2525
L.DA+20
7777
8CL.+15
SAE+20
5252
CPHLT

/BCL B F'All.ED A:7777 8=2525 AC=5252 9:15

1600
1601
1602
1603
1604
1605
1606
16fli7

r2J72
0021
102121
2525
1552
1460
2525
6167

SET+20•12
K5252
L.DA+20
2525
BCl.+12
SAE+20
2525
CPMLT

/BCL B F'AIL.ED A:2525 8=5252 AC=2525

~074

SET+20•14
K2525
LDA+20
5252
BCl.+14
SAE+20

1~571

1610
1611
1612
16t3

1614
.......

0036
1020
5252
1!154
1 41\nt

/POP~l2

SYSTEM EXERCISER

PAl.H"

Vl41

17•FEB•72

11i52

PAGE 47·18

1616
1617

5252
6167

5252
CPHI.. T

/BCI. B FAii.ED A:5252 8=2525 AC=5252

1620
1621
1622
1623
1624
1625
1626

'.'1076
2'020

SET+20•16
K7777
Cl..R
BCl.+10
SAE+20
0000
CPHi.. T

/~Cl.

0011

1556
H60
lllQJQl0
6167

B FAILED A=0000 8=7777 AC=000f/J

/BCI.. I A TEST AUTO INDEX
1627
1630
1631
l.632
1633
1634
1635
1636

"'077
11'020
1020
?525
1577
1460
?525
~H7

SET+20•17
K5252•1
LDH20
2525
SCl.+20•17
<;AE+2QJ
2525
CPYLT

/BCL I 8 FAILED A=2525 8=5252

1637
1640
1641
1642
1643
1644
1645
H46

2'073
2034
HJ20
7777
1573
1460
7777
6167

SET+20•13
K0000•1
i,.OA+20
7777
BCl.+20•13
SAE+20
7777
CPHLT

/BCL I B FAILED A=7777 8:000? AC=7777 B=13

16 4 7
16'0
1651
1652
1653
1654
1655
1656

2'075
2'017
Hl20
?0210
1575
1460
20:10
6167

SET+20•15
K7777•1
LDA+20
0000
BCL,+20+15
SAE+20
00\110
CPHLT

/~CL

1657
1660
1601
1662
1663
1664
1665
1666

'.'073
e;,35

SET+20+13
K2525•1
LDA+211l
5252
BCl.+20+13
SAE+20
5252
CPHLT

/BCL I 8 FAILED A=5252 8:2525 AC=5252 8=13

1~20

5252
1573
1460
5252
6167

AC=252~

B=17

I B FAILED A•f/J000 8:7777 AC=000f/J B=15

/SRO 1~0 B=0 ADDRESS OF OPERAND IN NEXT LOCATION
/SRO Al.I. MODE ADDRESSING TEST
/SRO 1•1 8=0 TESTED IN PART 1

/POP•12 SYSTEM EXEqC!SER

PALli'I

1667
1670
1671
1672
1673
1674
1675
1676
1677
1700
1701
1702

1021ii
5252
1':14"'
:l022
1500
0022
6167
102i!l
2525
1441i)
6167

l.OA+2111
5252
ST.\
TEMPl,
SRO
TEt1PL
CPHL.T
L.DA+2111
2525
SAE
TEMPL
CPI-IL. T

1n3
1704
1705
17'.il6
17"'7
1710
1711
1712
1713
1714
1715
1716

1020
7775
104!0
0022
1500
0022
'1!016
1020
7776
144[cJ
0022
6167

LOA+20
7775
STA
TEMPL
SRO
TEMPL.
CPNOP
L.0A+2(1!
7776
SAE
TEMPL
CF'HL.T

1717
1720
1721
1722
1723
1724
1725
1726
1727
1730
1731
1732
1733
1734
1735
1736
1737
1740
1741
1742
1743
1744
1745
1746

1020
e002
1040
'11037

L.OA+2111
0002
STA
TEMPI-I
SRO
TEMPI-I
CPI-IL T
LDA+20
0001
SAE
TE MPH
CPI-IL T
l.DA+20
2525

1747
1750

00J2
5751

• 7'51

?01c:;1

e<fll22

15~0
~037

6167
1020
0001

1440
11'037
6167
102r.I
2525
1040
02137
15~111

011137
1'1016
1(112 0
5252
1440
(:l037
6167

V141

17•FEB•72

1li52

PAGE 47-19

/D!D NOT EXECU!E SKIP

/SRO FAILED TO ROTATE PROPrRL.Y

/SRO FAILED TO ROTATE PROPERLY

/D!D NOT EXECU!E SKIP

/SRO FAILED TO ROTATE PROPERLY

TEMPI-I
SRO
TEMPI-I
CPNOP
LDA+20
5252
SAE
TEMPI-I
CPl1LT

/SRO FAILED TO ROTATE PROPERLY

/Cl-I ANGE f' I EL.OS
PDP

JMP I
TAPE6

,+1

/POP•l2 SYSTEM

EXE~C!SER

2020

212120
212121
212122
212123
212124
2025
22126

212127
21213121

PAl..H'J

V141

7777

5252

012100

eJ121:l0
001217

eJ121Vl7
1216711
712107
777'7
7770
077121

~601

12112100
2525

2037

f'li;H"0

~HJ01il

6040

CPHL T;;604121

2552
7752
7725
7700

2040
20421
2fcl41
2042
<!12143
2llJ 4 4

2045
2046
2047
2050

•2eJ4C'!

?Ji2111
2121;,0

Cl..R

1560
60.710
162121
212100
121002

BCL.+2121
600121
BSE+2121
21210121

POP

7Hf/J
5175

JMP

212151

6141

212152

61215.3

PAGE 48

7121eJ7
7'107

212135
<!0:!6

212132
212133
211J34

11152

•2020

777121
12177121
2552
7752
7725
7730
0121121121
2525

212131

1 hF'EB•72

ADD

Cl..A Cl..1..
1..INC
i,..JMP
/STH 111121 8 •X

CPOUT

TAPE61

/STH 1•0 S•X OPERAND ADDRESS !S IN THE 8 REGISTER
212153
212154
212155
212156
2057
21216121
212161
2121!>2
212163
2064
212165
2066
212167
2'117121
2071
2072
2073

12112111
0067
4006
21011
Zfcl66
7777
13'.'!0
412125
1347
012111
13?J0
4006
1100
f.'1027
1460

7777
6040

Cl..R
SET+20•7
4012l6
Cl.R
SET+20•6
7777

LOH
412125

STf-1+7
Cl..R

!..01-f
4006
ADA

!'1027
SAE+20
7777
CPl-!L T

/STH

FA!LE~

A=7777

8=0~07

C:7707 D=R Es6,7

/POP•12 SYSTEM

~XERCISER

22174
22175

il011

2 :217 6

::-li:l06

1300

2077

11~0

2HH1

Vl034
1460
7777
6(1140

2101
2102
2103
2104
2105
2106
?107
2110
2111
2112
2113
2114
2115
2116
2117
212121
2121
2122
2123
2124
2125
2126
2127
213121
2131
2132
2133
2134
2135
2136
2137
2140
2141
2142
2143
2144
2145
2146
2147
2150
2l:i1
2152
2153
H54
?1 '5S

0011

eJ067
2006
t"011

!?1066
7777
130121
4f(l25
1347
0011

1300
0r/Jl?J6

11!10
eJ12127
1460
7777
604121

Al..10

CL.R
L.DH
0006
ADA
0034
SAE+211J
7777
CPHL.T

CPHLT

7717

6040

CPHLT

t'!011

Cl..R
SET+20•7
4006
CLR
SET+2121•6

13~0

4031
1347
0011
1300
4i;l['J6
1100
0033
1460
7777
t'IVl4VI

11152

PAGE 4'3·1

/STH MODIFIED WRONG HALF"

7717

Cl.R
L..Df.f
401216
ADA
121034
SAE+2121

;1067
40216
71011
e'066
7777

17•F'"t8•72

Cl..R
SET+20•7
0006
CL.R
SET+2121+6
7777
LDH
4025
STH+7
CLR
LDH
C!l 0216
ADA
0027
SAE+20

1300
42'2!6
1100
0034
1460

2011

V141

/STH F"AILED A:7777

s~001217

/STH MOD!F'"!ED WRONG

~Alf

e:0777 DaL E=6 1 7

7777

LOH
4031
STH+7
Cl..R
1..DH
40l'.16
ADA
2'033
SAE+211
7777
CPHLT

/STH

FA!LE~

A=7777

8=0~52

C:7752 D=R E=6,7

/POP·l2 SYSTEM EXERCISER

PAI.HI

2156
2157
2160
2161
2162
2163
2164
2165
2166
2167
2170
2171
2172
2173
2174
2175
2176
2177
2200
2201
22n
2203
2204
22l'l5
2206

CL,R
L.DH
00'1'16
ADA

012167
2006
0011
!11066
7777
1300
<1031
1347
0011
13"0
"'006
11210
[1033
1460
7777
6040

SAE+20
7777
CPHL,T
CL,R
SE;T+20•7
'11006
Cl..R
SE:T+20•6
7777
LDH
4ill31
STH+7
Cl.A
LDH
001'l6
ADA
Z033
SAE+20
7777
CPHLT

221.17
2213
2211
2212
2213
2214
2215
2216

;-011
13f.l0
40216
11<10
2'034
1460
7777
6040

Ci.R
I.DH
401'l6
ADA
0034
SAE+20
7777
CPHLT

r'!011
131'10
[HJ06
11210
111034
1460
7777
6040
22111

Vl41

17•F'F:B-72

11l52

!'AGE 49·2

~034

/STH MODIFIED WRONG HALF

/STH FAILED A=7777 8=011J52 C:5277 O•L E•6,7

/STH MODIFIED WRONG HALF

/ADM I•(/) 8110
/ADM 1•0 8=0 OPERAND ADDRESS IS IN THE NEXT LOCATION
2217
2220
2221
2222
2223
2224
2225
2226

r'l0ll
104121
0007
U.40
?"'07
1460
1'1000
MJ40

CL.R
STA
l<Hil07
ADM
Oi2107
SAE+20
'1!011JllJ
CPHL.T

22<7
2230
2231
2232
2233
2234

~474

Fl.0+20
CPHLT
CL.R
COM
STA
0007

6040
1'1011
Q'017
104121

21007

/ADM FAILED A=l'l0!1111J
/FLO FAILED FLO:Q"

B=0~0l'l

E:7

/POP•12 SYST(M EXERCISER

PAl..1Q!

2235
2236
2237
224121
2241

114121
l'liJ07
1460
7777
60421

ADM
(?Ji;l2l7
SAE+2i!I
7777
CPl1LT

/ADM FAILED A=7777

2l01l

Cl,,R
SET+20•7
2525
LDA+2121
5252
ADM
:;!0217
SAE+2121
7777
CPHLT

/ADM FAILED A=25?5 8=5252 C:7777 E=7

2242
2243
2244
2245
2246
2247
2250
2251
2252
2253

'3252
11421
012137
146ii:l
7777
61214121

2254
2255
2256
2257
2260
2261
2262
2263
2264
2265
2266
2267

f112111
f112167
7777
11212 0
00tH
1141U
00217
0452
61214121
146121
(1'12101
612140

227121
2271
2272
2273
2274
2275
2276
2277
2.300
2301
2302
2.3213

2112111
0067
2525
10212l
5253
114121
eJ0<2!7
:il452

2304
2305
2306
2307
23H
2311
2312
2313
2314
2315
?.316

~Zl67

2525
Hl20

~040

146121
0'.H"l

6040
21011

11212121
401210
'.J26l
e'452
0456
6040
0067
7777
1021!1

(1101211

V141

17 .. FEB•72

11152

PACE

4f'-~

8=121~00

C:7777 E:7

C'l.R

SET+211!•7
7777
LDA+2121
21121'1ll

ADM
eJ1212l7
Li!E
CPHLT
SAE+20
(':0U
CPl1LT

/ADM CHANGED L!NK
/AOM FAILEn AC SHOULD

= 00211

Cl.R
')ET+2121•7
2525
1..0A+20
5253
ADM
~007

L.i!E
CPHi.T
SAE•2121
f.'!11!01
CPHLT
CLR
LDA+2121
4000
ROl..+2iil+l
Li!E
LSKP
CPHLT
SET+212l+7
7777
LDH20
012l2'l

/ADM CHANGED LYNK
/ADM

FAILE~

A=25?5 8:5253

/RDL rA!LED LINK : i2l

C=~0121l

E=7

/POP•12

SVST~M

2317
2320
2321
2322
2323
2324
2325
2326

EXE~C!SER

146~

ADM
Qlfll'.'!7
LcE
LSKP
CPHL.T
SAE+2r.:'.I

0fll:l1
604;.l

CPHL.T

114"
;,[ll'.17
f/1452
P'456
6fll4r.:'.1

2327
2330

102i0

23~1

e"fll::ll

2332
2313
2334
2335
2336
2337
234;:1
2341
2342
2343
2344
2345
2346
2347
2350
2351

f1'321
?1452

2352
2353

2354
2355
2356
2357
236(/1
2361
2362
2363
2364
2365
2366
2367
2370
2371
2372
2373
2374
2375

PAl.111l

21fll11

~450

6040
21067
5252
102fil
5252
114r.::i
0007
21452
0456
6040
1460
2525
6040

21454
6040

i1'k:l11

\?llil66

Cl.R
L.DA+20
0001
POR+20•1
1.tE
L,SKP
CPHL.T
SET+2fd•7
5252
l..DA+20
5252
ADM
0007
Li!E
LSKP
CPHL.T
SAE+2i:I
2525
CPHLT

PAGE

4~-4

CHANGED LINK

/ADM FAILED A=7777

8=0~01

C=210~1

E=7

/ROR FAIL.Erl L=t"

/ADM CHANGED LINK L=i
/ADM FAILED A=5252 8=5?52 C: E=7

Cl.R
SEH20•6
7777

SET+2il+7
0[llf1'6
L,DA+2fcl
21001
A0M+7
SAE+20
0001
CPHL.T
L,DA
001116
SAE+20
211Z!01
CPHLT

00~b

/AD~

11152

Fl.0
/Fl.O FAIL.Erl FL.0=1
CPHLT
/ADM I •lil 8:sX
/ADM 1•0 B•X OPERAND ADDRESS lS IN THE 8 REG!STEP

~067

~011

17 .. FE8•72

lHH"1

7777

0ic:l06
1020
i1l0?11
1147
1460
'110el1
604111
10210
0006
1460
(1101?11
6r.:'.14i0

V141

CLR
SET+20•6

/ADM FAILED

/ADM

FAILE~

A•7777

B=0~01

C=00~1

E=6 1 7

/PCP•12 SYSTEM
2376
2377
2H'l2!
2401
2402
24!?3
2404
24'1'5
2406
24'1'7
2410
2411
2412
2413
2414
2415
2416
2417
2420
24U
2422
2423
2424
2425
2426
2427
2430
2431
?.4:52
2433
2434
2435
2436
2437

EXE~C!SER

2525
012!67
f'.006
102fll
5253
1147
146iC'l
~11H"1

6kl40

PAl.Hl
2525
SET+2121+7
e112106
LDA+2121
5253
ADM+7
SAE+2121
0001
CPHLT

?ikl11

Cl..~

H:l2121

1.DA+2121
412:3121
ROl.+2121•1
Li!E
LSKP
CPHLT
SET+21i:l•6
7777
SET+2121•7
0006
l.OA+2121
lill2!31
ADM+?
l.i!E
l.SKP
CPl-!l. T
SAE+2121
0001
CPHLT
LOA
11HHl6
SAE+212!
00rH
CPHLT

412100
0261
71452
0456
612!4k-)
;,066
7777
21067
!'l121Ql6
102121
00~1

1147
0452
0456
612!412!
1460
;.J02J1
604121
1030

2Jl2!06
1460

:>112!211
604121

V141

17•FEB-72

11152

PACE 48-5

/ADM FAILED A=25?5 8=5253

C:~l2!01

/ROI. FAILED L=C'I

/ADM CHANGED LINK

/ADM f'A!LEO A•7777

L=~

8=121~01

C:000l E:6 1 7

8=121~01

C=7777

/ADM 1•1 8•0
/ADM !•l 8•0 OPERAND IS IN THE NEXT L09ATION
2440
2441
2442
2443
2444
2445
2446
2447
24!'121
2451
2452
2453
2454
2455
2456

0011

1020
012121
1040
?450
11212121
7776
1160

Cl.R
l.DA+20
012101
ST4
,•4·2000
1.DA+2121
7776
ADM+20

e0.ii1

<'51211211

1460
7777

5AE+2121
7177

604121

CP~LT

102l121
"'1450
1460

LDA
,•2005
SAE+2121

E=6 1 7

/ADM FAILED A:7776

/POP•12 SYSTEM EXERCISER

PAL10

2457
2460

7777
t'12140

7777
CPHLT

24~1

7'011
102fll

CLR
LDA+2kl

V141

17•HB"72

11152

PAGE 48-6

/ADM FAILED TO CMANGf DATA

2462
2463
2464
2465

C"iH"l

~12101

1040
?471

STA

2466
2467
2470
2471
2472
2473
2474

U:l2f21

7777
1160
?fll01
146fll
17'02!1
604<'

LDA+-:;>121
7777
A::lM+2121
1211211211
SAE+2kl
00i'1
CPI-IL T

/ADM FAILED A:7777

2475
'.?4 76
2477
251210
2501

!000
!"471
1460
7'0•11
M'411l

LOA
, •201?15
SAE+20
'3001
CPHLT

/ADM FAILED

2502
251213
251214
251215
251216
251217
25121
2511
2512
2513
2514
2515

Zfll11

CLR
LDA+211l
5253
STA

Hl2ill
5253
1040
0512
1020
2525
1160
5253
1460
~11li'l1
~2140

1ill210
!?1512
146fll
604fll

SAE+211l
!!12101
CPHLT

2523
2524
2525
2526
2527
2530
2531
2532
2533
2534
2535

2!11l11
11212l<:l
2525
Hl40

CLR
1.,0A+20
2525
STA

/ADM FAILED

LOA
'•201115

f"533

1020
5252
116121
2525
146Jll
7777

9=0~01

C=f"01111

,+4-20210
1.,0A+211l
2525
AOM+211l
5253
SAE+20
21001
CPI-IL T

2516
2517
2520
2521
2522

Cl0~1

+4•20f2lf21

/ADM f"A!LEr:l

LDA+20
5252
ADM+20
2525
SAE+2IZI
7777

+4•2021ilJ

A~2525

9=5253 C:Ql11J0l

/PDP•12 SY5TEM

EYE~C!SER

PAl.10

2536

612140

CPHLT

2537
2540
2541
2542
2543

10,110
:)533

LDA
, .. 20k'l5
SAE+20

2544
2545
2546
2547
2550
2551
2552
2553
2554
2555
2556
2557
2560
2561
2562
2563
2564

l.460
7777

CPHLT

?':2111

Cl.R
LDH2121
2526

2526
1040
('554
1020
5252
1160

2526
1460
?0l'l1
6040
10i'J.il
~554

14611J
71;.l211
6040

17,.rEB-72

11152

/ADM

FAILE~

/ADM

FAILE~

PAr.E 48-7

A=5252 8=2525 C:7777

7777

604:/J
102~

Vl41

STA
I

•4,.2000

LDH20
5252
ADM+2fd
2526
SAE+211l
k'liHH

CPHLT

/ADM FAILED

A=52~2

Bc2526 C:0001

LOA
• ·20"'5
5AE+20
'1001

CPHLT

/ADM FAILED

/ADM Isl 8=X
/ADM t~l B•X OPERAND ADDRESS •1 IS IN !HE 9 RE~ISTER
2565
2566
2567
25712!
2571
2572
2573
2574
2575
2576
2577
2600
2601
2602
2603
2604
201215
2606

0011

0067
11l01?l5
'.."066
7776
1020
11li21:1Jl

1167
1460
7777
604rii
1000
2006
1461:)
7777
6040

262'7

2610
2611

111011
0067
0016
11112177
7776

:;1612

102"1

CL.R
SET+20•7
00215
SET+20•6
7776
L.DA+20
(11:1J(ll1
ADM+2fd•7
SAE+20
7777
CPHLT
l.DA
0006
SAE+20
7777
CPHi.T
CL.R
SET+20+7
0016
SET+2fd•l7
7776
LDA+2k'l

/ADM PAILEO A=7776

/ADM FAILE:'J

8=0~01

C:7777 E=6 1 7

/POP-12 SYSTEM EXERCISER
2613
2614
2615
2616
2617

1167
1460
7777
604<;

2620

HlYl0

2621
2622
2623
2624
2625
2626
2627
2630
2631
2632
2633
2634
2635
2636
2637

Nl17
14612i
7777
6040
2011
0067
011l16
3077
2525
1iil221
5252
1167
1460
7777
611l4111

26412i
2641
2642
2643
2644

10'10
?1017
1460
7777

2645
2646
2647

71011
eiti67
fl016
l'Hl 7 7

265~

2'21:.11

604~

2b51
2652
2653
2654
2655
2656
2657

5252

2660
2661
2662
2663
2664

1,030
fl017
1460
1Zl001
6Jll4ill

1020
2526
1167
1460
C!031
6040

PAl,111!

Vl41

012i2ll
A0M+2:1l+7
SAE+2il
7777
CPl1LT

17•FEB"72

/ADM

11152

FAILE~

PAGE 4P.8

4:7776 8=12i?l12i1 C=7777 E:7 1 17

LDA
elllll. 7
SAE+212i
7777

CPl1LT
Cl,R
SET+212i•7
fl12i16
SET+20•17
2525
l.DA+20
5252
AOM+20•7
SAE+20
7777
CPHLT
l.DA
elllll 7
SAE+211l
7777
CPHLT

/ADM FAILED

/ADM FAILED A=2525 8:5252 C:7777 E=7 1 17

/ADM F"AILED

Cl.R
SET+20•7
0016
SET+2fll•17
5252
LDA+2fll
2526
ADM+2fll•7
SAE+20
IZli?Hll
CP~LT

/ADM FAILED

l.OA
012117
SAE+20
012101
CPHl.T

/ADM fA!LED

A=52~2

8:2526 C=?101Zll E=7 1 17

IL.AM I Iii!) 8=0
/LAM ls121 8=0 OPERAND ADDRESS !S IN THE NEXT LOCATION
2665
2666

21011

102111

Cl.R
i,.DA+20

/PDP•12 SYSTEM EXEPCISER
2667
267'1
2671
2672
2673
2674
2675

PAI.HI

V141

17•FEB•72

26 77
2700
2701
2702
27t.'13

40el0
t.'1261
0067
6517
1020
3743
1200
C'0Ql7
1460
2463
6040
2'474
6040

ROl.+20•1
SET+20•7
6517
LDA+20
3743
LAM
(?1007
SAE+20
2463
CPHLT
f"l.0+20
CPHi.T

2704
2705
27Ql6

?1452
2'456
6040

Li!E
i.SKP
CPHLT

II.INK

2707
2 7 llil
2711
2712
2713

1000
t.'lllJQl7
1460
2463
6040

I.DA
el011!7
SAE+211l
2463
CPHLT

II.AM

2714
?715
:2716
2717
2720
2721
2722
2723
2724
2725
2726
2727
27311l
2731
2732
2733
2734
2735

?12111
111067
5253
1020
2525
121'10
t.'1007
1460
0000
6040
['!452
1'1456
604i1J
Ut.'10
t.'10217
1460
0000
6040

2736
2737

5175

2676

0002

11152

PAGE

4~-9

40~0

/LAM FAILED AC SHOULD
/Fl.O FA!LE~ FLO=~

Cl.R
SE;T+211l•7
5253
i.DA+211l
2525
1.,AM
11!007
S.AE+20
0011!0
CPHLT
1.i!E
LSKP
CPHLT
t. 0 A
0007
SAE+20
t'1000
CPl-fL T
/CHANliE f:'!El.DS
PDF'
JMF'

~HOUl.D

FA!LE~

2463

TO MOO!FV LOCATION 7

/L,AM FAil.ED AC SHOULr eE 121000
II.INK

~HOUl.D

BE SET

/I.AM fAli.ED TO MOD!FV CORRECT ADDRESS

CPOUT

/POP•12 SYSTEM EXERCISER

PAl,.1~

/TC5~

274;)
2741
2742
2743
2744
2745
2746
2747
2750
2751
2752
2753
2754
2755
2756
2757
276'21
2761
2762
2763
2764
2765
2766
'2.7 6 7
2770

3000

~IZl00

~0~Hl
~0:il0
76~0

3000
~075

17'-FEB•72

FIL!T ROUTINE Fll,.LS THE TC58

11152
~UF~ER

PAGE 49

WITH THE

NUM~ER

ENTERED !N

!THE AC, EXIT WITH A Cl.EAR AC
,..
FI 1.1 TI
DCA

3363
621ll
1762
1771)
3346
6211
1366
3364
1367
3365
1363
3765
2365
2364
5353
6203
5740
7140
?00'21

V141

cor

TAD I
TAD I
DCA
CDF
TAD
DCA
TAD
DCA
TAD
OCA I
I Si!
I Si!
JMP
CIF cor
JMP I

LTCFl.0 1
F' 11..sv1,
Fll..SV2 1
Fl 1.SV3 I
FT76t"'1 1
FTC BF I
l.CDF'X1

Fl1.SV1

/SAVE AC

Iii

l. 'l'CFl..D
LCOFX
,+1
H!I

FT76fl'21
Fl1.SV2
F'l'CBF
Fl1.SV3
Fll.SV1
F ! 1.SV3
Fl1.SV3
Fl1.SV2
I •4
0
Fl I. IT

TCFLO
;21
('

76'110
TCBUFF
CDFX

30~0

•3'11'21"
/TC5B BUFFER +Z00 WORDS l.ONG

210J0

TCBUF'F' I 0

/GET FIELD
/ADO 6201
/SAVE !T
/CHANGE TO THAT F!EL~
/GET •?'21('1
/SET UP A COUNT
/GET CURRENT ADDRESS POINTER
/SAVE IT
/GP.T GOO!"\ DATA
/SAVE !T IN THE NEW FIEl.D
/INCREMENT ADDRESS
/FINISHED 200 WORDS ?
/NO, MORE TO DO
/YES, RETURN TO F!El.D 2

/PDP•12 SYSTEM EXERCISER

32illill
3201
32Ql2
32213
32~4

32ill5
32ill6
32217
3210
3211
3212
3213
3214
3215
3216
3217
322121
3221
3222
3223
3224
3225
3226
3227
323121
3231
3232
3233
3234
3235
3236
3237
3240
3241
3242
3243
3244
3245

3246
3247
.3250
3251
3252
3253
32:54

3255
3256

V141

17•FE8•72

11i5:?

PAGE 5(1'

3200

03211)21
/SEl.ECT RETWEEN 1.Pill8 AND 1..P12 1 DETERMINE TO START OR INHIBIT,
!l..P21R•l..P12 STARTUP ROUTINE

730121
1260

ST1 I

3661
1111

6666
6665
"213121
62~3

5611
.~00121

73C121
62211
125121
3652
3013
6141
?'517
n67

ST I

Cl.A Cl.I.
T A'J
Kl..PJMP

/ENTER

HERE

/RESET

A COUNT LOCATION

/Mt'lVE l..ErT 7
I

ST•3

/YES, EXiT

75Ul
5207
743121

Sci.

e'l2lill2

JMP

5243
6662
21:113
5230
6661

IZJ

ST2

6662
I Si!

JMP
6661

13
I •1

JMP

730121
1654

CL.A Cl.I.
TAD I
Al<ACR

3655
1246
3656

DCA l

AST3X

TAD

Kl..POT

DCA
TAD
DCA
ST21

3657
"2710

2231
7572

225121
6651

22Ql0
22717

2247
2271
?.222
?327
4574

1?61

.H:;?

TAD

CICA
JMP
Ki.POT1
M206,
KSETTP I
K66511
ASETTP I
l.SETTP I
AKACP1

ST1

Al.. POUT
1<6651
i..S£TTP
M206
AUl.INE
ST1

i.P12P
·2ill6
1.ST0
6651

1.PEX
SETTP+1

KACR
AST3X1
LST4
Al.POUT, LP OUT

AUi.. !NE I FUl..INE
KL.PJMP, JMS I
I PTC5 I
PTCH5

/EXIT TD F'!ELD il

KSETTP
ASETTP

52~0

1251
3653
1247

/SET UP RETURN JUMP
L.DCATION
/GET A IZJ212
/PRINT IT
/ENABl.E LPm8 INTERRUPTS

OCA
1.PTC5
TAO
Ai(212
6666
6665
"JOP
c IF' cor ill
JMP I
I +1

Cl.A Cl.I..
CDF'
TAD
r:lCA
DCA
l.l "JC
l.SW
ROl.+2121
PDP
SPA
JMP

3260

3257

PAl,.Hi

PATC3

/GET 1.EF'T SWITCHES
/B!T 0 SET ?

/132 COLUMN LP~8 ONLY 1
/YES
/CL.EAR LP12 RUF'FER CF'UN ANO GAMES
/DELAY

1 IF' NO F'LAG 1.PIZJ8 OR NO PRINTER
/l.P08 OR NO PRINTER
/l.P12 CHANGE SOME LOCATIONS

/F'~AG

I
I
I
I
I
I

1132 COLUMN
I
I

LP~B

OR LP12

/PDP•12 SYSTEM

EXE~C!SER

"3 410

PAl.H'!

V141

17•FEB"72

•3402'
/A 1 !,P~

BUFFER +1210 l.OCAT!DNS

"020

BUFFER I

3530

•3530

:3530
3531
3532
3;)33
3534
3535
3536
3537

l'.'030

APT 1

3540
3541
3542
3543
3544
3545
3546
3547

"'000

3400

3550
3551
3552
3553
3554
3555
3556
3557
3560
3561
35~2

3563
35~4

3565
35~6

3567
3 :F 21

3571
3572
3573
3574
3575
3576
3577
3600
361!11
3602
3603
3604

00'10

(!!

iJ:iJ;;J0
"fll0il
"I0?0
,, 0 ('I il
\'02'il

e'
2'
"'
2'
2'
2'

"0221

IR I

2'!0['0

l'I

"'""'0
C'2IZ'il

2'
e'
2'

?0~il

··0210

"'<

":'.2120

"0210

(?I

'.112i?'0
3 iH'l0

8ASE,

00210
?'0211
22100

721210

i10<"1
20111il
7'21021
7776
'."002
2'0210
2' ill'll
5777
7777
7!00;:J
ll0210
1k:l210
i?l0?J121
?12130

'.'l:/!00
7'000
11000

?k:l00
::'l?Hl7
?'21:il2
~:o:;rn

3J'.10
::?0il0

2'
('I

BASA,

?'21:?J0
7776
21002
e:00;:i
21k:l01
5777
7777
Vl00
00210
?J02l0
?J0?J0
0000
2'00il
00l'l0
0000
72100
:>'0217
;,21212
?l000
3021121
2000

202!0
'.'lk:l2l0

'1'

:"0:'10

·:"

11152

PAGE 51

/POP•12

SYSTE~

3605
3606
361il7
3610
3611
3612
3613

EXEqC!SER

PAL,lC'I

0000
0f'l0
7001
3626
'."030

·-

1
TJAC
:'1030

~777

3777

7777

V141

/FPP.12 INSTRUCTION CODE
~614

3615
3616
3617
3620
3621
3622
3623
3624
3625
3626
3627
3630
3631
3632
3633
3634
3635
3636
3637
3 641l
3641
3642
3643
3644
3645
3646
H47
3652'
H51
3652
3653
3654
3655
3656
3657
3660
3661
3662
36~3

'.".0/12
?005
H11
3621
?3i'0
1iJ2l
3624

FPPRG 1

'."100
0001
1101
354ia

FCL,R
STARTF
JGE 1
,+2
FEX IT
JLE 1
,+2
FEXIT
FL.DA 212
JAC
FCL,R
STARTO
STARTF
FL,DA 2211
JGT 1
,+2
F'EX!T
F'MUL 211!1
F'i)I V 21'11
F'NOP
F'SUB 21Z11
F'STR 21'J4
FCL,R
L.DX e!
1
SETX 1
IR

~lll3[(l

XTA 0

1041
3653

J1~E

''!2'?121

1212
?007
'."032
".3~6

1005

:C2Zl
1061
3635
'."Jll0i:l

420!1
32n
2'041
2201
62:J4
Zil02

1"0Qli:l

11110
7777
~030

1001
3661
0000
IHJ02
0003
111020

3664

~12102

36~5

'."030

3666
3667
3671l

Hlv.ll

3671
~0;JQI

TJAC,

1
• •2
F'EXlT
AODX 121
7777
XTA \'.'
JEC
,•2
F'EX IT
FCl.R
F'NEG
ATX 0
F'CL,R
XTA t'!
JEQ 1
,+2
F'EX!T

17•FE8•72

11152

PAGE 51·1

/PDP•12 SYSTEM EXERCISER
~671

3672
'1673
3674
3675
3676
3677
37e0
,H<ll

37'52
3 7 <:3
3724
:3705

37kl6
'"l7e7
371~

3711
3712
3713
3714
3715
3716
3717
3720
3721
3722
3723
3724
3725
3726
3727
3 7 3 2J
3731
3732
3733
3734
37S5
3736
3737
3740
3741
3742
3743
:3744
3745
3746
3747
375;J
3751
3752
37:;,3
3754
3755
3756
:1,757

PAl,H'

('004
1l2l
~677

1 iU:Jl
37:~3

::'000

C10 4 1

TJSA,

'~041

1031
i:o74

Vl4l

FNORM
JSA 1
T.,ISA
JEQ 1
TJSB
FEX!T
Ff\JOP
FNOP
JA l
,•6

ro210
r1011

FL')A 213
JAL. 1
,+2
i:-E XI T
FLDA U'3
F\JEG
FDIV 201
FSTR 211
Fi..DA 2i2'4
F'ADDM 211
FLDA 211
FMUL 2il'l
FADD 207
FSUB 201
FMUL 202
FSTR 204
F"Cl.R
SETB l
eASE
JS" 1
,+4
JA l
,+5
FEX!T
JA 1
BASE•l
>EX IT
FL.DA 233
JL. T 1
,•2
FEXIT
FL.DA 210
LOX 1

?:027

V:027

"011
'.";,?3
10<11
3752

Al.'J 1
FNEG
JED 1

l2J;1i:J

>EX IT
Fl.DA 2l'l7
FSTR 211
f:"l.DA 232
FMUl.M 211
1"!.,!)A 211
F"STR 205

~213

1071
37'717
'.'10710
i12'713
?10'.'13
:>:2')1
6211
?'2M

5211
'.'211
4201
12J7
?201
42'712
62'.'14
~~~2

1111

35"i;J
1131
3733
irn1
3736
?.11100

1331

3551
00210
i 2:'13

1J"il
:!742
['.0J0

'.' 2 i!'7
"'211
f'21~2

7211
'.'211
t.2715

TJS8 1

,•2

17•F'E8•72

11152

PAGE 51-2

/POP•12 SYSTEM lXERC!SER

F'AL.H'I

3 76<J
3761
3762
3763
3764
3765
3766
3767

l"'Cl,.R

3770

3771
3772
3773

G0~2

V141

17•FE8•72

rt.DA ze4

"'204
3205
12716

l"'D IV 2()15
FADD 2()16
l"'STR 21216

62~6

'.'171
36l.4
62<l5
7'12102
6206
?,2J5
1"0121

JXN

171

FPPRG
F"STR

2t'l5

F"CL.R
l"'S TR 21216
l"'L,'.)A 21'l5
l"'EX IT

I
I

I
I
I

4121121121•5777

THE RF1218/DF32 ID BUFFER

11152

PAGE 5i.-3

/POP•12 Sy5TEM

PAL.Hi

EXE~C!SER

f.020

V141

17 .. FEB .. 72

f'Al-E 5?

11i52

o602ei

SERVICE UPDATE ROUTINE
/CONVERT T4E CLOCK TICKS to DIG!TA~ NUMBERS
/AND DISPLAY THEM

/C~OCK

6022'

6321

121'.'10
?'0'.'10

DD!SP 1

/SAVE

LJA

6J22

4364

6<J23
6024

?640
f-025

LJMP

6825
'i2l26

1020
1254

LDA+21:l

6;:J27
6J3J

'!2l·~4

;'446

6J31

"'456

62132

r,;.13J

6J33

.~011

STC
LDF

, +1

LJMP
CL1

, •2
1

4 J(~ l

ST C

,, "~6
li0-:37

7761

62l40

4477
1J22l

S[T+?l:l 15
-17
SET+20 H
T3•2'1101

6J~0

62151

~0721

402l

104J
4114

STA
XAXIS,.2000

6131
:rn61

LJMP

D!SPIT

SET+20

':~32121
10~J0

L,OA

62152

6J53

6410

6i'l54

~41e

6055

6410

62156
6057
6:il6~

6:il61

6062
6063

3 2l2l

Cl,,0CK•2000

LJMP
LJMP
LJ'1P
LJMP

HHl21

2117
6062
6147
HJ40
4415

FIELDS
ENA9LE

LJA+212l

'.'4 ~21

?.il11
li2162

LIN~ QATA
!~TERRUPT

446
LSKP

'.'tl 7:;

5J44
6J45
62146
6J47

/RESET
/RESET

/REU

1254
F:SF'

6i;l34

6J42
6J43

A~DOESS

DDEX-22121?
'11

6035

6041

~ETURN

SHUFF,

SHUFF
Xl
X1

LDA
ERCNT•2000
LJMP
SHUFF
LJMP
DEROR
SU

DCKS-2C'l00

62164
62lli5

1241

ROI.

1540

9C~

62166

4416

'11•22'2'~

6067

2417

6070

4013

ADD
STC

G1•4000
13

li071
6 ,,., 2

20210
4130

src

ADD

SHUFEX•2:'112l0

/GET THE CLOCK VALUE
I

~DCA!ION

/POP•12 SYSTEM EXEPC!SER
6073
6[:'74
6075
61::17 6
6377
612'0

6101
6102
6103
6111'4
6105
61Ql6
6137

6110
6111
6112
6113
1:!114
6115
6116
6117
6121/l
6121
6122
6123
6124
6125
6126
6127
613i:'l

PAL.10

V141

<'41~

ADD

"!3fl2
11Zi40
4415
1543
4 416
2417

P0'1

DCKS•401Zil2l
2

17•FEB•72

STA

DCKS·21'JIZi"
BCL.
Ml •200"1
AD'.J
G1•400QJ
STC
12
ADD
DCKS•40012l
ROR
1
LJMP
SHFD
STC
11
ADD
DCKS•401Zi0
RQR
4
LJMP
SHFJ
STC
14
L.D4+21Zi

~12

2415
12l32!1
6142
4QJ11
241 :>
?!304
6142
41Zi14
HU
f'!klJil

XAX!S 1

1754
1774
641kl
1751
1771
6410
1752
1772
6410
1753
1773
613i6

DSC
DSC+2il
LJMP
TJSC
DSC+20
LJMP
DSC
DSC+20
L.JMP
DSC
OSC+20
SHUFEX 1 L.JMP

14
14
X1
11
11
X1
12
12
X1
13
13

4135
21Zi?l1Zi
4141
1fZI 2 fiJ

DISP!T 1 STC
ADD
STC
L.OA+20
O!SAV1
DSC+20
XSK+20
LJMP
D!SEX I LJMP

DISAV•201'J0
0
DI SEX•21Zil2l0

6131
6132
6133
6134
6135
6136
6137
6140
6141

177121
0235
6134
6141

6142
6143
6144
6145
6146

1(!302
154121
4416
2417
60:.11121

1(!0~121

SHF'D,

u
1:'i
I ,.4

ROR
2
BCl.
M1•2000
ADD
G1•411l00
L,JMP
0

11152

PAGE 53

/PDP•12 SYSTEM EXERCISER
6147
61:>0
61:>1
6152
6153
6154
6155
6156
6157
616.J
6161
6162
6163
6164
6165
6166
6167
5170
6171
6172
6173
6174
6175
6176
6177
6 2 2l2!
6201
6202
62el3
6204
6205
62'-'6
62~n

6 2 lrl!
6211
6212
6213
6214
6215
6216
6217
6220
6221
6222
6223
6224
6225
6226

1020

125(:;:
f'!004
0446
?1456
6152
7'011
1Hlil

21115
6142
4014
11"0
2114
6142
4013
1100
2il72
6142
4012
1100
2110
6142
4011
4001
>"075
7771
2107<!
4515
1020
0330
6131
'11061
0300
1754
1774
0lll11

4001
2J075
7761
('1070
4523
1020
02?!0
6131
?!061
:"30iil
1753
1773

PAl.H'

DEROR 1

V141

17•FEB•72

LDA+2fll
1250
ESF
446
LSKP
LJMP
I •2
CLR
ADA
CPFL.D+2i<JC'lei
LJMP
SHFO
STC
14
ADA
DKFELD+2000
LJMP
SHFD
STC
13
ADA
DD'ELD•2000
LJMP
SHFO
STC
12
ADA
FFPELD•2el00
LJMP
SHFD
STC
11
STC
1
SET+20 15

PAGE 54

11152

/GREEN

/GET AND

C~NVERT

THE DfG!TS FOR:

/CP

/RK08

/OF32 OR RF08

~!SK

/F'PP•12

SET+2;:i

/CP

T4 " 211H:l 1

i.DA+20
3011l
LJMP
SET+20
30'-'
DSC
DSC+20
CLR
STC
SET+2fll
-17
SET+20
T5•2001
LDA+20
200
LJMP
SET+2e:
300

osc

DSC+20

DI SP! 1'
1

14
14

/CP FIELD 1'IGITS

15
10
/RKeJB

DISP I 1'
1

13
13

/RK0e F!EL1' DIGITS

tPOP•12 SYSTEM EXERCISER
6227
6230
6231
6232
6233
6234
6235
6236
6237
6240
6241
6242
6243
6244
6245
6246
6247
6250
6251
6252
6253
6254
6255
6256
6257
6260
6261
11262
11263
6264
6265
6266
6267

71011
412!711
71075
7761
1000
~153

6271
6272
6273
6274
6275
6276
6277
63t'0

0471::)
6242
012!70
45c;7
6244
2!070
4541
1121212!
0100
6131
C'llZl6l
12'300
1752
1772
0011
4001
0075
77:;5
'.'Ji117121
4617
6131
?1061
0300
17<;1
1771
e:011
11210
2113
6142
4011
4001
""075
7765
0070
4703
102121

63~1

e?r10

6302
6303
6304
63Ql5
6306
6307
6310
6311
6312
6313
6314

6131
C'l06l
03012!
1751
1771

627~

~315

PAl.10

V14l

CLR
STC
1
SET+20 15
·17
LDA
DF•22J00
Ai!E+20
LJMP
,•4
SET+20 12l
T7•20l01
LJMP
,+3
SET+2k:l 12!
T6•2001
LDA+2k:l
1021
LJMP
DISPIT
SET+2;:J 1
71300
DSC
12
DSC+20 12
CLR
STC
1
SET+20 15
-23
SET+20 10
T9•2001
L.JMP
DISPIT
SET+20 1
0300
DSC
11
os:::+20 11
CLR
ADA
AJPFLD•2000
LJMP
SHF"D
STC
11
STC
1
SET+20 15
·13
SET+20 10
Tll-2001
LDA+20
712l2J
LJMP
D!SPIT
SET•20 1
0300
DSC
11
DSC+212l 11

Z011

Cl.R

4001
'11075
7755
01iJ70
4b4l
102VI

STC
SET+20

1
15

~23

SET+20 10
r10-2001
LDA+20

17•FE8·72

11152

/DETERM!~E

/FPP•12

/A.I,P 1

/KF·12

PA(;[ 5'5

IF RFC'l6 OR DF32

/POP-12

~YSTlM

6310
'i317
632;:l

6321
6322
6323
6324
'l325
6326
6327
6330
6331
6332
6333
6334
6335
6336
6337
634;;)
6341
6342
6343
6344
6345
6346
6347
6350
6351
6352
6353
6354
6355
6356
6357
6360
6361
6.562
6363
6364
6365
6366
6367
6370
6371
6372
6373
6374
6375
6376
6377
H021

64ell
6402

~xEqCISER

PAL10

"'500
6131
'.'\2161
713,10

V141

r.300

500
LJMP
DI SP 1 T
SET+2k:l 1
311l'.'!
LDA
APl+211llll0
A2E+2k:l
LJMP
AIJEXA
SET+20 15
-7
SET+211l 121
T13-2011ll
LJMP
DAEX
SET+211l 15
-13
SET+21:1 llll
T14-2011l1
LDA+211l
52!11l
LJMP
DISP!T
CLR
ADA
TCFDl.+2011l0
LJMP
Sf.IF'D
STC
11
STC
1
SET+20 15
-17
SET+211l u
T15-211l01
LDA+20
61il2'
l.JMP
DI SPIT
SET+20 1
3011l

1751
1771
0600
6364

DSC

DSC+20
LI F
LJMP

HPlll

2112
147~

6333
:ll1l75
7771
:1070
4663
6337
1075
7765

AO EX AI

~0711l

4671
1ii:l20

OAEX,

,,501/l

6131
'.'11l11

11<" 0
2115
6142
4011
4'11211
"'075
7761
Z0721

4751
1020
0600
6131
~061

10910
Z\300
44n
1020
1254
7034
0446
V'.456
6373
'.'!061
?550
0075

7755
Z07kl

DOEX I
DXER,

LDA
"'"
STC
LDA+20
1254
ESF
446
LSKP
LJMP
SET+20
55>l
SET+20
-23
SET+20

17"FEB•72

Ill

oxrx .. 2000
;RED

• -2
1

15
1QJ

11152

PAGE 55-1

/POP•12 SY)TEM EXERCISER

PAl.,1C'I

V141

6403
6404
6405
6406
64'17

4575
:rn11
6131
'.'J6"'121
641?J7

DXEX,

T8•2e'01
Ci.R
LJMP
D!SP!T
L.I F
0
LJMP

6410
6411
6412
6413
6414

1760

Xl1

'JSC•2i:l

6415
Hl6
6417

::"000

DCK:>,

7761
4456

Ml1
Gl1

64~121

6141
1020
'n14
:102!4
0446
0456
6424

RE~L,

'.'1011

REAl.11

6421
6422
!1423
6424
6425
6426
H27
6430
6431
6432
6433
6434
6435
6436
6437
6440
6441
6442
6443
6444
6445
6446
6447
645121
6451
6452
6453
6454
6455

0000

0>:leJIO

1760

DSC+2f/J
2'0210
LJMP

f/'00121

6000

0061
0240
?'075
774.3
i2107ill

4715
6131
0415
6427

0210121
77 61
T2•211!1iH'l

LI !\JC
LDA+2i:l
214
ESF'
446
LSKP
LJMP
I •2
Cl.R
SET+20 1
n40
SET+2fll 15
.35
SET+2f/J 1lll
T12•2f/J1111
i.JMP
D!SP!T
KST
l.JMP
REAl.1

;J5r;,0

108

6036
VJ500
6046
1460
0331
6427
?.002
6041
5251
6203
5655
7400

KRB
!OB
Tl.S
SU•20

0331
LJMP
REAL.1
PDP
TSF'
JMP
I •1
C!F CDF f1I
JMP I
,+1
MESS(';

17,.FEB•72

11152

PAr.E 55·2

/POP•12 SYSTEM lXERCISER
6456
64?7
6460
6461
6462
6463
6464
6465
6466
6467
647111
6471
1>4 72
6473
6474
6475
6476

4130
3641

PAL.10

T21

?l;1l

4136
3641
l'lCll
::J1 77

'.'177
4523
2151
4122
2651
?414
lll477
5172
0651
152'6
4225
4443
6050

4523
2151
4122
2651
2414
0477
5172
?651
15216
4225
4443

[12IC_'l0

2!01:10

~477

C-000

:'000

65210
6:;01
l'iS<-2
651?3
65£14

404 21
4077

65215

6526
6?07
6510
6511
6512
6513
6514
'1515
6516
6517
6520
6521
6522
6523

6~521

T3 1

4077
30210
0Z'.!10
7741

'121210
700,0

7741
lll041

~041

'.'0~iil

210ei121
01210121
3077
773121
2'12121121
00ell:I
4577
4145

~21110

3077
773121
['0?1121
NJ0121
4577
4145
4136
?241
01110,0
t1111i'lei

4477
31:144

4~40

T4,

4136
2241
0121i'll:I
~0t'l121

4477
3044

\/141

17~FEB•72

11152

DA!",E 56

/POP•12 SYSTEM EXERCISER
6524
6~25

6:i26
6527
6530
6531
6532
6533
6534
6535
6536
6537
654 i'.i
6541
6542
6543
6544
6545
6546
6547
6550
6551
6552
6553
65'54
6555
6556
6557
6560
6561
6562
6563
6564
6565
()566
6567
6570
6571
ti572
6573
6574
6575

4477
3146

PAl,ll'J
T~,

212!?10

~0?l~

;.'1121?1121

1077
4324
<1000

1i:77
4324

"!1Hl0

~02'0

~641

0000
4136
3641

0000
?l0?10

002!0
:'1000

5126
2651

4136

T6 I

r:102l0
7il3:£;

4477
3146

/RF08

210t'l1Zl

4477
4044
7.01'1121

('10t'l0
4477
4044
121i!IZ0

7:12121(.

121fii?ll2l

4136
3641

C'll2lel0

2l011J0
C'l01210

0000
'5126
2651

4177
3641

17•FE8•72

4477
3146

"!000

4477
3146

V141

5126
2651
T7 I

4177
3641

!110'10

C.'!

i'l~Hli21

4477
4044
::1000

4477
4044
li'l000

121000

i'J

4122
2651

00210
0000

4523
2151

/OF32

11152

PAGE 57

/POP•l2 SYSTEM EXEqCISER
6576
6577
66f"i21
66211
66i?l2
11603
6604
6605
6606
116217
6610
6611
6612
6613
11614
6615
6616
6617
11622'
6621
11622
6623
11624
66?5
6626
6627
6630
6631
6632
6633
6634
6635
6636
6637
664121
6641

4577
4145

PALHl
T8 1

4577
4j.45

0121'.'!llJ
r'i212!0

('I

4477
3146

'.1000
vHH'l0

4477
3146

0i212!121
0i21211il

17•FEB•72
/ERROR

111

4136
3641

r111J l"llil
::J~Hl0

"'0

4477
3146

4477
4044

V141

T9 1

4477
412144

00~121

Zi2102l

V'.Zl0!1l

4477
3044

4477
312144

"100ZJ
/112Hl2l

4477
3i2144

4477
3iil44

fli2100
f"0710

li"0
2!

212!1
7177

21ei1
f'l177

70;JllJ
002!0

4523
;?151

4523
2151

/f PP•12

11152

PAGE

/POP•l2 SV3TEM EXERCISER

6642
6643
6644
6645
6646
6647

1n1
4324
:.'10el0
00210
4477
4044

66~0

;"VJ00
00i1!11l

6651
6652
6653
6654
"i655
6656
6657
6660
6661
6662
6663
6664
6665
6666
6667
6670
6671
6672
6673
6674
66'5
6676
6677
6700
6701
6702
6703
<'!704
67~5

1'1706
6707
6 71ill
6711
6712
671:;5
6714
6715

PAl.1111
il<l,

1077
4324

2 lQ!l

21177
0

4523
2151
0

"'5177
T131

2651
4177
7741

1?'000

('I

r'l021QI
3077
7706

31"7 7
7706

""'-'

Tl4,

4177
7741

["000
?02lQI

11'

4477
4044
0000

4477
404 4
21
7'

4477
4044

TU,

4477
7744

/A,1 1 P 1

i1'
0

7741
0041
21

012100

11'

4477
3044

r,:i!"lOI

/OFF

(>Ql00

li7''i

/KF12

4477
3146
l'0"10
("000
4577
4145
0000

PAGE 5Q

i1!

4523
2151
0000
71000
5177
2651
4177
7741

6716
6717
6720
6721
6722
6723
6724

11152

4477
4044

:'lllJ'10

4477
7744
002l0
"10?10
7741
0041
:?!00121

17•FEB•72

2
0

21:11
till 77
1'ii1J00

4177
7741

V141

Tl21

4477
3146
:.J

"4577

4145

,,"'
:?!

/Rl'.:ALLV ?

/POP•12

SYSTE~

6726
~727

67321
6731
6732
6733
6734
6735
!1736
6737
6740
6741
6742
6743
6744
6745
6746
6747
675!21
6751
6752
6753
6754
6755
6756
6757
676'1)
6761
6Hi2
6763
6764
6765
6766
6H7

EX~RCISER

PA\.121

4477
7744
00'10

17!177

71177
'1'301
e;

~301

0000
Cl~00

f"'l 77
?137Jl

2177
Q'32Jl

Vl0~0

'.'lii:l710
'li77l;

r'.770
7ii07

7007
210Clfl)
00CJ0

;JJJ0

;:l

171000

4021il
2055

2iZI 5 5

'~o!'Zlkl

17•F'EB•72

4477
7744

7'0f'lii

404il
4f/J77

Vl4l

4020

T15,

4040
4077
3

li'01H:l

4136
2241

Z000

'.')

0000
5172
Cl651

5172
0651

Q'0;3fl)

f'02J0

5126
2651

/TC58

11152

PAGE

59-1

/PDP•12 SYSTEM EXERCISER

PAI.HI

V141

17•FEB•72

11.lNC INSTRUCTION DEFINITIONS

2i21ZC

1l9'0
11412l
12'.'lZI
10Ji21
4:il?J0
HJ4i21
C"24i21
V'3!2!0

"'Jll
C04ZI
6n0
?JillJ6
>'004
1540
16Qli21
r.i17
1440
l"44i21
0456
'1450
9'451
9'452
9'2210
0014
0015
9'1!2!0
1740
2516
'71517
C"500
V"61li21
11640
cn6
fl704

7'707
V"0Vl1
r023
0416
17'0212
2454
164r<l
1500
1311J0
1340
6141
f"H5
~003

6557
6552
t553
6555
f>r'l:i1!/I

ADD=20!2!i21
ADA::11;rn
ADM=U40
LAM=1221i21
t.0 A= l(:H'l0
STC=4i:ll1lill
ST .A=1i2140
ROl.=21240
ROR=Vl321:21
Ci.R=ll011
SEhV'J040
t.JMP:600!2!
D.JR=;,0~6

ESF"=l?l004
8Cl.=1540
8SE:a160i21
COM:11ei2J17
SAE:144i21
SN5=21440
t.SKP:0456
Ai!E •t'l450
AF'0=9'4~1

t.i!E=fl452
XSK=ll211l0
ATR•?-014
RTA::t'1'015
SAM•VIUl0
DSC"174el
RSW•i21516
t.SW:sei517
!08="1500
LlF"aei600
t.DF'•l1l64i21
WR! •ei711l6
WRC•l?l71214
CMK•l1l711l7
AX0•0011l1
TMA=21i2123
!'T0•0416
FOP•l1l011l2
F'l,.0•('1454
BC0::;164"1
SR0:111511l0
t.0"4•1311lrll
ST"4•1340
L l NC•6141
KST•41'5
TAC=:'111ltll3
F"P!ST•A557
F'P!Ct.•(1552
F"PC0Ma6553
F'F'Sh6555
f:'STR:62100I

11152

PAGE 6?'

IPDP~12

SYSTEM E¥ERC!SER

PAL.HI

~002

FCl.R:fil11102

2000

FL.DA=rlli110~

40~0

V141

60~1

FMUL.:411107,
FO!Vm3i110111
FSU8:20rlJ('l
FNEG=0111fil3
FADD=1i11rlJQI
JXN:2fili11fil
FEXIT•i11fil2!0
DL.DRa6733
nl.DWc6735
DL.DCs6732
DL.WC:6753
DL.CAz6755
nRDS:6741
DCl.5=6742
DSKDm6745
DSKE:6747
OCl.As6751
DMNT:6743
DRDAa6734
!OF:6fil1112
ION=6fili111

6301
6302

SC~=631111
L.C~=63i112

63~7

S8F:63i117
APION•6filfil6
RESTOR•6771
SETL.EV,6772
RSTACK•6774
SETSTK•6776

3000
'.000
~fili3

1000
?000
?fil?;fil
6733
673~

6732
6753
67~5

6741
6742
6745
6747
6751
6743
6734
60~2

60?;6
6771
6772
6774
6776
6777
0041
se~fil

7000
U7fil
1110
1130
1030

1050

SETVE~~6777

FNOP•fili1141
FADOM•500fil
FMUL.M•7filV-fil
JAl.=HJ7fil
SET8c111r.
JSR•113rll
JA•U!3111
JI. T=U5rll

0010

Al.N•lllii.110

1000
01210
11210
2030

JEG•10~rll

LDX=11111112l

SETX:110C
XTAat'JilJ30

112140
0110

JNE=Hl42l

0020
0004
11212l

ATX•i11fill!111
FNORM•11111104
JSA:l1120
STARTFa0el2l5

~0~5

00~6
r~H'!7

10212l
10HJ

AODXs011~

STARTDRflJ~l2l6

JAC:aei01117
JLEa112J212l
JGE=112l10

17•FEB~72

11i 52

PAGE 61"-1

/POP•12 SYSTEM EXERCISER
Hl6rll

PAL.HI

JGT=U6rll

6643

DXAL.a6643

6615

D!ML.=6615
'!:

V141

17,.FEB-72

11152

PAGE 6?-2

/PDP•12 SYSTEM EXERCISER

PAL.1C

V141

17•>EB•72

11152

PAGE 6?1-3

00r.rn
1'1100

llJ012111J?leJCl121
11111111

11111111
021'111Jel121'311J

11111111
11Hl11JllJ1210"0

11111111
00121121121000

11111111

118012102'0

00~HHl012111l

11111111
l'llJ'10l"!lll:.'11

11111111
11111111

02011l
0300

11111111
11111111

11111111
111.11111

11111111
11111111

1.1111111
11111111

11111111
11111111

0o11tHl
2'500

11111111
1111 :1.111

11111111
11111111

0600
0700

11111.111
11111111

11111111
11111111

H'Jl1l0
1100

11111111
11111111

1200
1300

lll.11111
11111111

11111111
11111111

11111111
:1.111i111

111111u
11111111

11100
1500

11111.111
11111111

11111111
11111111

1600
172'111

11111111
11111111

11111111
11000000

11111111
21000('!1211210

11111111

2000
21210

0000201210
11111111

::'111l011l012100
11111111

11111111
11111111

11U1111
11111111

11111111
11111111

11i111u
11111111

2200
2 3 021

11111111
11111111

2400
251Z10

11111111
11111111

11111.111
11111111

11111111
11111111

2600
2700

11111111
11111111

11111111
10000000

3000
3100

10002000
IZlllJ21fll3000

?IH"rlJ1111211Z10
7'01Z1i<'J0000

21001'l0fiH'Ji21
IZlllJ:>l000?11l

011l11111l0000
l'l00000fll0

IZl0t"i211Z101110
fll00fll2'11l0fll

0Qll1Ji2111102'1Z1
fllfllfll02llll21111

llJ0001!11iH'll'l
i'l21!1l01"iiH"llJ

'11000el00Ql
Pl01'10IZllZlfll0

3200
3300

11111111
lll211'l0'1'.,210

11111111
20~00012!0

11111111
:>!00012!"2'21

11111111
IZlllliZ!211110021

11111111
flH11011JIZllZl1110

11111111
0Ql0011121fll21

11001'!0?10
:'1000t'!Ql021

l'01'J121((112100
?121?' 21f'!i210 0

34210
3511!0

111l21f/J200:1J
1110121121~01210

?J2120f'l01Z10
00?!000"0

2!01112121011!21
000011JfZll?'121

0011J000fll0
11111111

IZl0210:1!ill00
11111111

21011100000
11111111

?100011'0?!0
11111111

?l0!'!i:'H'1fZ100
l.1111111

3600
3711!1Zi

11111111
11111111

11111111
111102'00

~1 0011l12102lllJ

?10~000Ql0

/POP•12 SYSTEM EXE~CISER

PA(.1121

V141

17 .. FEB,.72

11152

PAGE

6~-4

411Jl1J0
41'1Jlll

4211!21
43C1!11J
400
4511)0

460121
4700

511l11J121
5Ul1l
5200

5311J0
5411!0
5511!0

56"'1121
5700
6011Jl1J
6Ul2l

0011l0~1Zl011J

~iH'JiiHl011!11J

11111111

11111111
11111111

1111111l.
11111111

11111111
11111111

6200
631110

11111111
1111llll

11111111
11111111

11i11111
11111111

6400
651110

11111111
11111111

11111111
1111ili1

11111111
11111111

6611J121
6711J0

11111111
11111111

11111111
t"l1J(ll011Ji1111!11J

7011J0
7U0
7211J121
7300
740121
7500
7612'0
7711!0

/P0P•12 SYSTEM EXERCISER

=iAL,HI

V141

A0"'10
A021l1
A.:!2114
A1?100
A1?Ji<Jl
A72100
AAF'DD
ACfiFX
ACHTOT
AClo(NT

8CO
BCRLF'
BL.KT81.
PSE
PUF'F
BUFFER
C4TEMA
CDF'X
CDFXX
CFHECK
CHECK A
Ci-!ECKB
C'.HECKC
C'.HECKD
CHE CKE
CHEKF'I.
CHEX!T
CHK
CKHEC
CK HECK
CKNT
CL.OCK
CL.R
COM
CPBAD
CPBr;'L.D
CPOSP
CPC:X!T
CPF'l.D
CPF'RN
CPC:OOO
CPHi.T
CPJMP
CPNOF'
CPOUT
CPOUTA
CPR UN
CPST
CFST1
CPST2
CRl.F'
CRl.FE
DAEX
DATA
DATl.UP
DATUM
Dc;,2r
DCl1l2FA
DC02F'B
DC02F'C
DCl1l2FD
DCAA

164il
2312
3400
1611l0
2717
3400
2'424
11l075
0067
1103
2105
2114
2123
2132
2141
2075
2145
1'!711l7
2451
2435
t'J070
012131
012111
001.,
1224
1225
1226
11l17?
11lU5
1213
1223
6040
6011ll1J
0016
11l175
0173
1201
0042
0051
0065

AC~T

ACPFL::J
ACRLF
ADA
AD!J
AQ'jX
A::JEXA
ADM
AERROR
Ar;''JD
AF"EA
AIP
AI Pl
AIPFl.D
AI PST
Al<!1l0121?
AK212
AKACR
AK::lD
AV'
Al.POUT
AP!
AP ION
AP!ST
APO
APT
APT!ME
ARKS AD
ASETTP
AST3X
AST CH
ASTFPP
ATR
ATX
AiJL. l NE
AXO
AH:
BAD
BADFl..D
BASA
BASE
BCL.

2712
2713
2714
2715
2716
26J5
0110
71716
2707
O'lVl7
01?14
<l1::l5
2237
1100
2.:li1l0
z110
6333
1140
0747
1163
:z:100
2611JJ21
2617
?113
2657
~111l3

2111
3254
?l067
7, 01lll

3256
0112
611l06
1543
2451
3530
1124
24Vl7
3252
3255
2711
1752
e014
f'l020
3257
012101
(1!450
0152
0116
'.'573
355121
1540

0671

11171213
6337
2564
21212
11l211JllJ
7200
7235
7271
7221
7255
1161

17•F'EB•72
OCBAD
DCKS
DCl.A
DCl.S
DCSAV2
DCSAV3
DCSAV4
DCST
')CST AT
DDEX
DDF'El.D
OO!SP
OEROR
DF'
OF32S
DF'ATA
DF9AD
Dr'ST
Di:'ST1
DF'ST2
D!ML.
D!SAV
DtSEX
DlSPCH
OISP!T
OJR
DKr;'EL.D
DI.CA
DL.DC
Ol.DR
DL.DW
DL.WC
DMNT
DR ANG
DRDA
ORDS
DSC
DSKO
OSKE
DWC:A
QXAL,
DXER
DXEX
ERCNT
ERROR
ESF'
EX Tl
EXT2
EXT4
EXTUNO
FADD
F' ADDI'

11152
7216
6415
6751
6742
73?11
73C"2
73{)3
2332
7277
63&4
0072
60~0

6147
11l1'33
C'J147
1162
1151
1512
1532
1535
6615
6135
6141
111272
6131
11l011!6
\?1114
6755
6732
6733
6135
6153
6?43
0065
6734
6741
1740
6745
6 '14 7
1U0
6b43
6365
6411J?
111117
0145
2'12104
l'l24 7
21256
0264
11121. 7
100121
501110

PAGE 6'"-5
F'A!LED
FCL.,R
FD!V
F'EX IT
FFPEL.D
F' IL. IT
FI 1.SV1
F n.sv2
F!L,SV3
FI NOP
F!XNP
F'i.DA
F'L,O
FMIJL
FM 1Jl.M
FNE'.G
F'NOP
FNORM
F'ORG
FPBAD
FP8F'LD
FPCOM
F'pE:L,Q
FPER
FPGOOD
F'P l Cl.
FP!ST
F'PF'RG
F'pST
FPT I "1E
FSA PP
FSAPPI.
F'STR
FSl)B
F'T?600
FTCBF
F'UDG1
FUDGEl
FUL.!NE
F'XELD
G1
GET
GE: TRAN
GETS AV
GODC
GOOD
GROUP
HAL.FX
HAL,FV
HBAD
Hr;"L,D
HGOO'.:J

11ll5.:J
00ei2
30?J0
11l000
0110
2740
2763
2164
2765
2157
0130
002'0
11l454
40210
7000
00"113
0041
11Hll214
1340
1652
1653
6553
1 '151
1650
1651
6552
655?
3614
6555
01:!5
11l157
0U0
601210
2011l0
2766
2767
11311J
1537
2327
111073
641?
21213?
2056
2073
7263
21151
7270
1?52?
053121
1460
1461
145?

/POP•12

SYSTE~

HSER
HSR
HS REA
HSRST
HSRSV
HSRT~

INCR
INCRA
lNTFP
INTRPT
108
I OF'
ION
IR
IW~

JA
JAC
JAi.
JEQ
JGE
JGT
Ji.E
Ji.T
JNE
JS•
JSR
JXN
Kli'J2llZI~

Kli'J11111J6
K011107
K021111l
K02117
K121020
K121f'l30
KllJ0!37
Kli'J0411l
K11J07fll
K01iiH~

K020'1'
K121212
K121215
K024111
K0260
K121341'l
KllJ4;,0
K12161Z11
Kli'J607
K11J77111
1<1111
K1!!100
K22l5
K2Vl6

EXERCISER

PAl.H'l

V141

1456
1462
1502
754.3
7565
0163
['1314
['1321

K2411J
K2525
K2611J
K3011Jl2!
K304t'I
K3700
K3777
K4r1i011J
K4777
K5252
K6651
K6777
K'7377
K7760
K177?
KACR
KC IDF
KOXAL.
KFP1
KFP2
KF'F'3
KrP5
KFP6
i<FP8
K!i'P9
Kt 1.L. tT
KJMPAP
KJMPOF'
i<JMPF'P
KJMPTC
Ki.PJMP
Ki.POT
KNOP
l<PIZllZl1'!7
KPT2
KPTC9
KR58
i<SE:TTP
KST
KT76H
KTC:BF
KTYBUF'
KW12
KW12A
KW128
KW12C:
KW12RT
KWST
KXOBWO
L.AM
I.AP l
L.CDFX

r1:711J4
11Jl1J36

1656

l'l057
"l5Qll1J
611JQl2
6f.H'!l
35411J
151117
1"'30
17'011J7
1070
1000
1l1J 10

1060
U211J
1l1J 5 0
10411J
11211l
1130
2~QlllJ

l'l035
2566
(1'074
2321
t'\034
2361
7162
1564
7161
2074
111036
110:n
2330
2331
2322
C"663
2323
171155
1'1024
7165
lll5U
175ill
2563
0063
lll1J62

7311J2'

1565
1566
11l111J7
11J(')611J
11J5511J
i1l061
l'll1l21
3251
2561
2562
7304
rl!l1J211J
2247
t'l 1"16
1541
1741

1742
1743
1744
1745
1'746
1747
t'1035
27211J
1540
1654
0135
32611J
3246
1411
2112123
0132
"'134
2743
32511J
121415
7124
7166
7311J5
1411JllJ
1431
1444
1447
121146
2364
0511
120:21
1363
2770

17•FEB-72
I.CH
l.DA
l.DCST
l.DF
L.DH
L.DX
L.F l L. IT
l.GETR
L.GODC
I.GROUP
I. IF
l. I NC
L. !RB
L,JMP
l.i.58
L.L.AST
L,P08P
l.,F'12P
1.PATC0
i.PC:H
i,.PEX
i.PNOP
!.POUT
i.PSTCH
i.F'TC1
L,PTC2
1.PTC3
i.PTC4
1.PTC5
i,.PTC6
i.PTC!-17
I.REAi.
i.SETTP
i.SKP
I.SHI
i.STl
i.ST2
i.ST3
L,ST4
i,.ST5
L,ST58
i.STA!P
i.STF'PP
L,STKW
1.sw
i.TCAV
i.TCEXE
L. TC:Fi.D
L. TCP
1.. TL.P
i.Wl.D
1.i!E:

11152
63t'12
111ll1J11J
1366
i1l6411J
13C'l0
l'llt'.'10
71'1
~111

2363
?362
11J6'.'!llJ
6141
'11161
611J"'0
2766
7564
2223
2231
11J056
2326
22t'111J
2233
22:!2
2325
1542
i1l1:51
'\.655
2n1
3261
0133
Pl164
1'.1162
3253
121456
22'Hl
::!253
22'55
22'57
2271
231211
1367
1364
1365
1371
C'J5i7
2744
2H4
2762
1371(:1
C'll'.!4
7414
i114'32

PA~E

6'.'!-6
Ml
Mle!
Mli1ll1J:J
M12
M21116
M3
M4r1il1J
M5
MAG TAP
MASTER
MESSG
MINS
MINT
ML,411Ji1l
MTCA
MTEX!T
MTGO
MT?NST
MTKF
MTl.C
MTl.S
MTON
MTPF
MTRS
MTS ET
MTSF'
MTTR
MTWC
NRDK
OCT

OCTE
PASS
PATC1
PAT CU
PATC2
PATC3
PATC4
Pf\TC5
PA'fC6
PATC7
PAT CB
PATC9
PATCH
PA TCHIZI
PATCHA
PA 'fC!-18
PATCHC
PDP
PR!NTR
PRT
PTCH1
PTCH2

6416
i1ll21
101.4
12!126
3247
27216
2421
2172
>'1055
l'lllJ22
741"10

6125
6115
0451
7167
121470
6722
0472
6123
6716
6126
6117
6113
6706
i1l452
6121
6721
7170
12111111
121647
06711J
13033
"'1711J
lll177
1'!171
"'174

llJ175
llJIZl76
11111J77
0173
111172
0176
lll'115
l!l724
111135
0743
0'745
111002
11172'5
7415
121725
'1!726

/PDP•12 SVSTEM EXERCISER
PTCH3
PTCH4
PTr:H5

:J73i21

PTCH~

0731
i1;732
('!733

PTCH7

'1'7?.7

QNAN

f.!ANi)OM
HA~~ GE:T
RA'<XIT
RCl-lK
HDCC:DN
R::lSUB
READ
RE4L
REAl.1
REST AR
REST('R
REX IT
HF'~EX

RF'flEXA
RF'8SA
RF'ElAD
RF"EAD
RF"FLD
RF"GQOO
RF'T!ME:
Rt<a

RK'!A
RKADK
Rl(AKD
Rl(BAD
R!<gF"l.D
Rl(DAV
Rl(DOK
Rl(EAD
RKEX
RKGODO
RKSVA
RKTIME
ROI.
ROR
RSTACK
RSw
RTA
SAE
SAM
SBF'
sc~

SE:T
SETl
SET8
SE Tl.EV

:"i2132
?512
0532
C'l531

0342
2'471
C'l312
"1324
642121
6427
Vl2eJ2
6771
71371
1141
1153
10eira
1114
11216 3
1115
1113
r11122
242'0
2411
2476
2471
2462
2463
OH2
2510
2431
2417
2461
:?565
"1123
Vl2411J
'13(11121
6774

'1516
012115
144i1J
012l11J

6307
63211
;104121
2543
1110
6772

PAl.10

V141

SETSTK
SETTP
SETTl'A
SETUP
SETUPA
SETUPS
SETVEC
SETX
SPAT
SfffD
SHUFEX
SHUF"F"
SNS
SPACE
SPEX
SRO
ST
STl
ST2
ST58

6776
2206
2215
1122
1132
1137
6777
1Hlf21
0.064
6142
613i1l
6f2162
11144121
0634
11l646
151110
3212
320121
3243
2722
U4i21
1053
1IZI 2 5
f1!12111l6
f1!121f1!5
012171
411li210
27U
r11416
1612111J
134121
111601
6642
6704
6716
6664
6672
6752
6456
65011J
6516
6524
6542
6 5 61?)
6576
66211J
f1!311J2
7306
012103
2051
0364
2765

~TA

SUR
START
STARTD
STARTF"
STAT
STC
STCH
STD
STF'P?
STH
SUBT1
1'1~

T11
T12
T13
T14
T15
T2
T3
T4

T5
T6
T7

TB
T9
TABl.E1
TABPT
TAC
TA?E6
TSAO
TCUJ

17•F"EB•72
TC58
TC58A
TC58B
TC58C
TCAV 11.
TCBAD
TCBUFF
TCCl-l ! T
TCC IT
TC:DR
TCERR
TCEXE
TCEXEA
TCF"DL
TC:F"LD
TCGOOO
TCRWNO
TC:SAV
TC:SET
TCT!ME
TDF"LAG
TEMP
TE MPH
TEMPI.
TEST IT
Trl.D
TGOOO
TIC1"'
TICKS
TIMOUT
TJAC
TJSA
TJSB
TK0121211J
Tl<f1!0711J
TK30f1!0
TM5
TMA
TSP ACE
TSTOAT
TSTMOR
TTYl1l
TTYl
TTV2
TTY3
TTY4
TTY:;
TTY6
TTY7
TTY8UF
TX1
TX1L

11152
7113
7f21:'!0
721~0

7041
7156
7 137
30tii0
7172
2745
7155
7135
7014

7131
01i5
7140
7136
27U
7160
7141
l1!11l24
i1l5i1l3
2l6'7
012137

rrn-n

i.'3t'l4
0'!3&5
t'l363
?!127
0120
2155
36'6
3677
37'113
7164
7163
71'J11J
7157
:ii11J23
7147
[1!3i;3
21041
7307
7310
7311
7312
7313
7314
7315
7316
7317

7425
7424

PAGE 6c:l-7
UNBNSV
UNIT
V12'f217
WA!T
WCHK
WCONT2

woi

WD3
WD4
WEXlT
WIDTH
WKDl
Wl(R!TE
Wl.02
Wl.D3
WNEXIT
WORLD
WORl.D1
WPAT
WRC
WR!
WRITE
WR!TEN
WSAVE
X1
XAX!S
XOBWD
XSK
XTA

XXR
XXRE
XXRX

xxx

XXXAC
XXXPC

0447
i1l027
0156
Hl12
04421
Vl443
lill1l23
0025
i1l026
C'l4 5 f2I

2324
0066
2467
i1lHl3
0111l4
211l53
1241
1321
0444
11171214
0711l6
21372
20211J
2054
6410
6114
f1!11J311J
11121'l11J
f1!0311J
061217
0553
057121
05'45
0537
0002
2161ZJ121

OP•12 SVSTEM EXEPC!SER
ERRORS DETECT~Dl 0
!..INKS GENERATED: 0
R~·T!MEI

3K CORE lJSED

~r.CONDS

PAl..10

V141

17•F'EB•72

11152

PAGE 6r-·8