Digital PDFs

MAINDEC-11-D50A

November 1979

39 pages

Original

1.4MB

Document:	RF11 DISK DATA Nov70
Order Number:	MAINDEC-11-D50A
Revision:	0
Pages:	39
Original Filename:	http://bitsavers.org/pdf/dec/pdp11/xxdp/diag_listings/RF11/MAINDEC-11-D50A_RF11_DISK_DATA_Nov70.pdf

OCR Text

IDENTIF'ICATION
..

___

• • • "P'I!

COOEI

MAINO£9 .. 11-050A

pRODUCT NAME'

Rf"11 DIsK DATA

DATE CREATE;ol

1 NOVEMBER 19~rD

MAINTAINER'

DIAGNOSTIC GROUP

AUTHOR,

EARL. HAIGHT

P~ODUCT

TABLE or CONTENTS
SECTION

,.,--- .. --

CONTENTS
ABSTRACT

REQUIREMENTS
EQUIPMENT
STORAGE
LOADING PROCEDURE
METHOO

STARTING PROCEDURE

4.1

WORST CASE OPERATION
OPERATOR INTERVENTION

4.2.1

CHANGE DISK OPERATING PARAMETERS
SCOPE ~OOP ENTRV POINTS

OPERATING PROCEOURE

5.1

CONTRO~

5.2

CONVERSATION MOO~

SWITCH SETTINGS

SUBROUTINE ABSTRACT
ERROR REPORTS

ABSTRACT
THE Rr11 CISK DATA TEST IS A SERIES or STATIC, ADDRESS AND OAT A
RELIABILfTY ROUTINES WHICH VERlry TO THE USER THE DISK
CONTROL CRPll) AND DSIK (RS1l) ARE OPERATING CORRECTLY. THIS
TEst USED IN CONJUNCTION WITH THE RPi1 DISKLESS AND RP~l
MULTI OISK ASSURES THE USER 0, AN ERROR fREE SYSTEM, WHEN
US£D IN ITS ENTIRETY,

REOUIREMENTS

2,1

[QUIPM[NT
pOP ... l1/20
RF11 ANO RS1l

2.2

STORAGr
STATIC TEST
PROGRAM oCCUPIES rROM 0 TO 11~~4
nATA TEST
MAIN BODY Of PROGRAM OCCUPIES PROM ~OC 0 TO 13416
WRITE OUTPUT BUFfER OCCUPIES FROM LOC 1350~ TO 15416
READ INPuT BUFFER OCCUPIES PROM ~OC 15500 to 17416

LOAOING pROCEDURE

3,1

METHOO OF ~OADING BOTH STATIC ANO OATA TEST TAPES
PROGRAM paRMAT ABSOLuTE
A,

VERIPY THE BOOT LOADER IS IN MEMORY.

SET SWITCH REGISTER EQUAL TO .,50
MEMORY SIlE ..
4K

8K
12K

17
37

24K

57
71
111
137

28K

15'

16K
20K

DEpRESS LOAO ADDRESS.

DEPRE~S

START.

STARTING PROCEDURE

4,1

WORST CAS~ DISK TEST UNIT
A)
B)
C)

~ERO

rOR BOTH STATIC AND DA!A TEST

SET SWITCH REGISTER EQUAL TO 200
DEPRESS LOAD ADDRESS
SET sWITCH REGISTER EQUAL TO lERO
DEPRESS START

4.2

OPERATOR INTERVENTION paR DATA TEST ONLY,
A)
B)

SET SWITCH REGISTER EQUAL TO 20~
DEPRESS LOAD ADDRESS
SET SWITCH REGISTER EQUAL TO MOD~ Or OPERATION CRE'. SEC5,)
DEpRESS START.

4.3

ADOR[SS ENTRY POINTS rOR TlST ROUTINES
---STATIC ROUTINES--.--ROUTINES IN STATIC TEST ON~V.-.
JMP
JMP
JMP
JMP
JMP
JMP
JMP
JMP
JMP

STAll
STAI2
STAl3
STAI"
STAt5
STAI6
STAI1
STAJ10
STAI11

JMP
JMP

STAI12
STAI1 3

354

360

JMP
JMP

STAllS

364
370

JMP
JMP

STAI1 6
STAI11

374

JMP
JMP

5TAI20
STAI21

JMP

STA12~

410

JMP

STAI40

414

JMP

STAI5~

42~

STAI14
STA171

44rll
444

JMP
JMP
JMP
JMP
JMP
JMP

450

JMP

STA111/1

454

JMP

STA112

JMP

STAl1 4

JMP

AOT1

JMP

ADT2X

3H'J

3:,4

310
314
32rll

324
330

334
340
344

350

4 "

424

430
434

464

STAI1~

STAH'~

ST105X
NXMTSM
STA10~

TEST RESET TO CONTRO~ REGISTER
TEST RESET TO CURRENT ADDRESS REGISTER
TEST RESET TO WORD COUNT REGISTER
TEST REsET TO OISK ADDRESS REG[STER
TEST RESET TO DISK EXT. ADDRESS REGISTER
TEST RESET TO DATE BuFrER REGISTER
TEST RESET TO MAINTENANCE REGISTER
CAN WE SET W/R BITS IN DCS REGISTER
CAN WE CLEAR T~E DCS REGISTER
USING DISK C~EAR.
CAN WE SET ALL CMA BITS
CAN WE c~EAR A~L OMA BITS
USING DISK C~EAR
CAN WE SET ALL WC BITS
CAN WE C~EAR A~L wC BITS
USING DISK CLEAR
CAN WE SET ALL THE DAR BITS
CAN WE CLEAR A~L T~E OAR BITS
USING DISK CLEAR
CAN WE SET ALL THE DAE BITS
C~N WE CLEAR A~L T~E DAE BITS,
USING OISK CLEAR
EXECUTE A ONE WORD WRITE
FOLLOWED BY A ONE WORD WRITE CONTINUE
EXECUTr A ONE WORD WRITE CHECK
rO~LOWEO BY A ONE WORD WRITE C~ECK CONTINUE
EXECUTE A ONE WORD REAO
POl..LOWEO BY A ONE WORD READ CONTINUE
TEST TRACK INCREMENT
TEST OISK INCREMENT
TEST THAT NED RAISES ERROR FLAG
CHECK CMA INHIBIT
.
TEST NON~EXISTENT MEMORY ERROR
TEST THAT THE DISK WI~L NOT TRAP
AT PRIORITY 7
TEST T~AT THE OISK WJ~L NOT TRAP
AT PRIORITY 6
TEST THAT THE DISK Wl~L NOT TRAP
AT PRIORITY 5
TEST THAT THE OISK WI~L TRAP
AT PRIORITY 4
ADDRESS TEST 1
CHECK TIMING BY EXECUTING
A ONE WORD WRITE:
ADORESS TEST 2
CHECK TIMING BY EXECUTING
A ONE WORO READ

***ROUTINES IN OATA TEST ONLY-·*
6,/10

JMP

AOT2

CHECK THAT WHEN A
WORO XS WRITTEN IT
DOES NOT ALTER ADJACENT
WOROS

6(14

JMP

AOT3

WRITE EACH WORD AOOR ON ITSELr AND
READ BACK TO ~OMPARE

610

JMP

AOT4

TRACK SELECTION TEST

614

JMP

AOT5

LOOK AHEAO TE~T

620

JMP

SPIRAL

SPIRAL. TEST

624

JMP

XSPIRAL

SPIRAL TEST EXTENSION

630

JMP

RANEX

RANDOM AODRESS. DATA ANO
WORD COUNT TEST

634

JMP

EXTMEN

OISK EXT. MEMORY EXERCISER

640

JMP

PF"T1

OISK WRITE POWER rAIL TEST

644

JMP

PFT2

DISK WRITE CHECK POWER FAIL TEST

***MAINTENANCE ROUTINES***
ROUTINES IN STATIC ANU DATA TEST BOTH
JMP

SELWC

LOAO WORD OOUNT REG,
WITH SWITCH REGISTER

654

JMP

SEl.CMA

LOAD CURRENT MEMORY ADDR
REG. WITH SWITCH REGISTER

6613

JMP

SEI..DAR

LOAD DISK ADOR. REGISTER
WITH SWITCH REGISTER

664

JMP

SEl.DAE

LOAD DISK ADDR. EXT,
WITH SWITCH REGISTER

670

JMP

SELDBR

LOAD DATA BUFFER REGISTER
WITH SWITCH REGISTER

674

JMP

MOVLK

MOVE CONTENTS OF LOOK
AHEAD REGIST£R INTO DATA LIGHTS

7 0

JMP

SEI..OC~

LOAD DISK CONTROL REGISTER
WITH SWITCH REGISTER

1·t4

JMP

STAMP

ENABLE READ AMPLIrlERS
TO TRACK SELE9TED

OP£RATING PROCEDURE

5.1

CONTROL sWITCH SETTINGS
pROGRAM CONVERSATION
SR15

Sf;T

ENTER PROGRAM CONVERSATION MODE
REP. Sec. 5.2

RESET

OPERATE WORSE CASE DISK lERO

DELETE TYPEOUT
SR14

TYPE OUTS

S;T

DEI"ET~

RESET

REPORT MESSAGE

HALT ON COMPLETION FLAG
SR13

SET
RESET

EXECUTE NEXT OPERATION

DEI"ETE COMPARISIONS
SR12

SET

DELETE DATA COMPARISONS

RESET

COMPAHE DATA BUFFERS

LOOP ON TEST
SR11

SET

1..00P ON TEST

RESET

CONTINUE TO NEXT TEST

HAl.T ON ERROR
SR112I

SET

HALT AFTER ERROR REPORT

RESET

CONTINUE APTER ERROR REPORT

JOENTIF'ICATION
PRODUCT CODEr

MAINDEC 11-05"A

PRODuCT NAME'

RF'11 MULTI OISK

DATE CREATED I

1 N0VEMBER 1970

MAINTAINERI

DIAG~OSTIC

AUTHOR,

E. HAIGHT

GROUP

::':":~:t··.
'.

ABS~CT

MULTI OISK IS A ~IGH SPEED CONFIDENCE TEST THAT ASSURES
THE USER· THAT ~E CAN TRANSFER DATA CORRECTLv. ~lTHOUT
O(STHQVING THE DATA ON THE OIS~. MULTI OIS~ USES ~LL
EXISTING MEMORY ON THE SYSTEM AS BUFFER AREAS.
?

REQUIREMENTS
A.

PDP-l1

4K TO 26K OF MEMORY

TELETYPE
8.
).2

Rrl1 ANO RS11 PLUS UP TO SEVEN ADDITIONAL RS11'S

STORAGE

THE MAIN BODY or THE PROGRAM OCCUPIES THE FIRST 5K OCTAL (BYTES)
OF MEMORV. THREE DATA BUFFERS OCCUpy THE REST OF EXISTI~G
MEMORY.
8urFER ORDER

= RA~OOM DATA TO 8E WRITTEN ON THE DISK.

OUT nurrER
IN SUFFER

SAVE BUFfER

AREA FOR RANDOM DATA WHEN READ FADM THE DISK.

= AREA TO SAVE DISK WHEN EXERCISING,

LOADING PROCEDURE

).1

METHOD
PROGRAM FORMAT ABSOLUTE
A.

VERIFY THE BOOT LOADER IS IN MEMORY.

LOAD TAPE INTO READER,

SET SWITCH REGISTER EQUAL TO *75~

MEMORy

SIiE it

121<

16K
20K

17
117

241<
281<

131
157

DEPRESS LOAD ADDRESS,

DEPRESS SY~RT.

...

STA~TJ~G

,JIIfIIII;..

PROCE~URE
S~lTCH

D£P~ESS

LOAD ADORESS.

DEPRESS START.

THE PROGRAM AT THIS POINT WILL OETERMINE THE A~OUNT OF
EXISTING CORE MEMORY, ANO SET UP THE WORD COUNT AND BurfER
AREAS rOR THE PROGRAM,

THE PROGRAM WILL NEXT REPORT THE NUMBER OF EXISTING DISK(S)
WHICH WHICH ARE ON THE SYSTEM. THE NUMBER WILL RANGE
FROM 1 - 10 OCTAL. THE DISK SELECTION LINES MUST BE IN
SEQUE~TIAL ORDER RANGING FROM 0 TO 7,
06 EXISTENT QISKCS)

OPERATING PROCEDURE

;,1

OPERATIONA~

SWITCH SETTINGS

THE SWITCH REGISTER HAS NO CONTROL OVER THE OPERATION OF THIS
PROGRAM.
5.2

STOPPING THE PROGRAM
MUlT! DISK MUST ONLY BE STOPPED BY TYPING CONTROL C. IF THE
USER STOPS THE PROGRAM BY DEPRESSING CONSOLE HALT, THE DISK
SURFACE MAY NOT BE RESTORED.

).3

PROGRAM ABSTRACT
MULTI DISK WAS DESIGNED TO INSURE THE USER THAT THE DISK
SYSTEM IS CAPABLE OF TRANSFERRING DATA CORRECTLY WHILE NOT
DESTROYING THE USERS PROGRAMS ON THE DISK SURFACE, THE
PROGRAM FIRST READS FROM THE DISK, T~E LENGTH OF THE TRANSFER
IS OETERMINED BY THE Sl~E or MEMORY. IF AN ERROR OCCURS WHILE
READING, THE PROGRAM WILL MAKE UP TO THREE ATTEMPTS AT
READING THE DATA. IF THE ERROR STILL EXISTS, THE PROGRAM WILL THEN
HALT, IF THE PROGRAM SUCCESSFULLY READS FROM THE DISK WITHIN
THE THREE ATTEHPTS, IT wlL~ THEN GENERATE A RANDOM BUFFER,
wRITE IT ON THE DISK, AND READ IT BACK AND VERIFV IT. AFTER
COMPARiNG THE DATA, THE PROGRAM THEN WRITES THE ORIGINAL
DATA BACK ON THE DISK, MAKING UP TO THREE ATTEMPTS TO TRANSFER
IF AN ERROR IS ENCOUNTERED, BEFORE HALTING. IF THE DATA
WAS SUCCESSFULY TRANSFERREO, THE PROGRAM WILL GO TO THE NEXT
DISK BUFFER UNTIL THE COMPLETE DISK SYSTEM 1.S EXERCISED.
NOTE'

EACH WRITE IS FOLLOWEO BY A WRITE CHECK.

ERROR HA~TS
THE PROCESSOR HA~TEO AT LOC. 1316.
CAUSE or ~ALT. NO BUS
ERROR OCCURRED WHEN ADDRESSING NON-E~ISTENT ~E~ORY.
THE PROCESSOR HALTED AT LOC. 1434,
CAUSE OF HALT NO SELECTED
DISK ON THE SYSTEM, OR DISKS NOT SELECTED IN SEQUENTIAL ORDER
STARTING WITH DISK 0.
THE PROCESSOR HALTED AT LOC. 1750. THE CAUSE or THE HALT,
UNABLE TO READ FROM THE DISK FOR THE SAVE BUFFER, THREE
ATTEMPTS WERE MADE.
THE PROCESSOR HALTED AT LOC, 2142. THE CAUSE or THE HALT,
UNABLE TO RESTORE THE DISK SURFACE. THREE ATTEMPTS WERE MADE •

.• 2

ERROR REPORTS

STATUS ERROR
ST/\TUS ERROR ~~~~~_~(~}~~~)
ABC
A=THE DISK NUMBER AND EXTENDED DiSK ADDRESS BITS.
DISK ADDRESS REGISTER
C=THE DISK CONTROL REGISTER
B=THE

LAVOUT OF DISK ADDRESS BITS
OAE
DAR

xxx xxx xxx xxx xxx xxx xxx

DISK NO.

TRACK ADDRESS

WORD ADORESS

;lIT

L4YOUT or :JCS REGIS-fR
EqROR

81T15.

8tT14=·

OISK rREElE

81T131:

81T12=

h~lTE CHECK ERROR
DATA PARtTY ERROR

81T11=

NON-£XlSTE~T

DtS~

WRITE LOCKOUT
MISSED TRANSFER
81T9=
DISK CLEAR
BITe=
READY
8111=
I~TERRUPT ENABLE
81T6=
EXTENDED MEMORY 1 (XM1)
81T5=
EXTENDED MEMORY 0 (XM0)
8IT4=
81T3=
M4INTENANCE
81T2-1= rUNCTI0N REGISTER
81T10=

BJT~=

GO (WRITE ONLY BIT)

, ~..

e I T 0.: C~1 A ! ~ H.

(~, O'r

;~ "i

f;>,'W ~4 G:J r-.(':. 1 T I ;J"~ )

BIT1= UNUSED

8I12=

~O~-[~I5T~\T

8 I T .3 ~
,: it '1 ~

1.1 '\1 i j '3~' 0

~lT5=

(RACK 8

i 'i ;\ C,(

~EvORY

t 1" i ',; Li
1 IMING

2!16= TGACK A rIMI~G
8 I 'f 7::. .!I L' Cq C;:3 i),t, ~< I r y

[ f~ ~~ ;) f~

Ii U A[

.- .....,( '-" j

(RR01

'I ~;\

£RRO~
En~Oq
~: '(:~ (J '~

)( >< X ;< X ;( C :\ P, ,J< X X X X XG[) COD II T;~ X ;< \:: X XX ~J ADO A T

\...". -.~\" ... '

"-..

.. ...." r··" .... ·

.... ~ ..- -

\..._.

. "/'

A -:: T 11 £. I) ~3 I~ ~J ( j 11 ;3 ;::: ~ < '\ \J 0 ~: X r i. i'l ;,) t 0 [) I S K .,\ i j !J ::i L ~;~ S 8 1 "r S
W.: '~ H£: ;j J: :; f\ AGui~\ L :; :') R[ ~~ ~ ~~ r ~~~ !~
t·~ ';; ; I

C,\ r

\,~ R 1 T

r ;~: ;.~ 0 t.J ·f HEel ~3 ~<

!'r"

i('
• '., .', I )

) •4

0 I S K ADD f~ £ SSE Ii n:J f<

j", ~:y E}~;~ 1 ~.,~ 11 \; I.; DIS x.
:~ DD'; f :;; '.; AFT::: ;,1;' f,j E :-,~ /.. I"~ S F E F~ >! AS ~; J reo I:; g [(; r
THE D AE .\ \ I) ::; M1 S ;'1 ~) (.H.. 0 E l~ iJ ~!M ~~ H Ai ~~ AS !~ l:: P 0 R fED •
G:H: C1< " Hf.

n;11 PANiL FOR

rH~

ERHOR AGQRiSS.

t:li S :·1 E SSAG E ~n I. L 8 ERE \) Cin E 0 I F r H£ 0 I S K F t~ IL. S r Q R A ! SEA B i~

R[OUE$T AFTER EXTENDED PERIOD OF TIME.
).6

rf';D

END
nd S ~1 E SSAG E ! S REP 0 RrED A"
T~iE

i)l SK

sYsn:',1.

r HE UW 0 F 01\j E C0 r\ P L [H: P.l\ sse F'

THE DISKS MUST BE IN SEQUENTIAL ORDER RANGING rnOM DISK

s C, ~_ CT Z ~ 7,

PR~~ O[SCAIPTtO~
IS ~OT A DIAGNOSTIC - IT IS MERELY A CONF"ID£NCt
IF" THE USER ['ljCOUfiT£R5 ANY PROBLErAS WITH THE SYSTEt-'
~HILE OPERATING ~ULTI DISK, HE SHOULD NOT TRY TO DIAGNOSE THE
PROBLEM USING THIS PROGRAM. lr PROBLEMS ARE E~COU~TERED, tT
IS SUGGESTED T~AT THE USER REVERTS TO DISK DATA AS A MEANS
or DIAGNOSING HIS PROBLEM.
~ULtl

TEST.

DISK

PAl-Xl1

vlB3

19-NOV-7121

15104

PAGE 1

BIT"-l
81T1-2

""0001
080002
000004

BIT2:t4
BITJ-10

"""018
000020

91141120
BIT5~40

080040
000100

BI'6=lflJ0

0002021

BJT7=2QJI?J

00e400

8I'fSsl;~00
B!Y9~100!l1
Bl'flfj~20!30

001iJQl0
(002000

91'1'11:&4000
(»1 'f :U~ ~ 1, 13 ~HHo
B I T13~2€HHH'

004000
1211181300
f020!iHUI

0 cHHHlrtJ

Bll'l~:;4iZH:j00

1!~~m~0

B I "'1'~10f::'H300
J
J

l~4403

WU '{~;;:TRAP"'3
~.~ HeHir C}~" 'f:, i\ p. '"
r~£t\D~ 'HU,P+:<.i

~4~t54i:il

1!lJtli0:'f

o ~i1(:HJ

0!J0200

00iJ:?tH3

~,HH~i61

~j00722

..,IMP

S'fMH

,S'fA'rIC

ROUTINES

(~HiH3JSH~

t~~300

•J

,.RF"11 DATA TEST
J

,VECfORS USEO IN PROGRAM
Loe 204 D~SK INT[RRUPT
LOC 30 EM! (TE~ETVPE OUTPUT)
J~3 LOC 34 TRAP (OISK HANOhE~S)
,#4 LOC 14 TRACE TRAP <USED IN BACKGROUND TEST)
J~5 LOC 20 lor TRAP (USED IN CALLING BACKGROUND TEST)
J~~
J~2

PAI-Xi1

Ve"3

19-NOV-70

.EVEN

0~1"00

001010

117570
117716
171566
177'62
177564

12101012

1715M'

121"'1000
001002
001004

001006

JlIO ADDRESS POINTERS
177570
171176
CSR1
177566
TPBs
177562
TKBt
TpSI
117564
117560
TKSI

SR.

JDlS~

0131~14

001"16
01111020
001022
001024
QH~1.026

0WL030
kH31fl32

",7460
177462
171464
177t~{;6

1/0

DeSt

wei

eM,q
DARI

REGISTERS

177460
117462
1774604
177466

,.17472

DAt::

177472
177474

Df;Hl I
f~ #, u

1774"7'0
'.7 7 4 t' 2
1 '7 7 -1 7 4

11'7~176

/;'D~8

177476

0~~:l034

000204

V[GTI)R'

20~

001036

0w~2PJ6

0~J104"

~HH120g

~T (.41'\J~~ ~

JSW!TCM REGISTER
'PROCESSOR STATUS R£GIST£R
,TELlTYP£ REGISTERS

2136
PR I oru j'l lEU <fi

iDiS~

CONtRoL R~GlSTER
COUNT REGISTER
_CURRENT ADDRESS REGtST[R
JLoWeR 16 Blis OF DISK ADDRESS
J£XY£NSION AODRESS Rf.GIS1[R
SDATA BU"ER R€GISTER
'MAINTENANCE ReG!ST!"
iLOOK AHEAD AEG!STeR
.INTERRUPT V!CTOR ADDR!~S
~WORD

jDIS~ INTER~UPT ~TATUS

'DISK PRioR~tv LEVEL

,
J

JRF11DEDICATE REGISTERS (MEMORV)

0rara000

F'I... AG I

RANNYs

001!2l46

146723
m00000

~01090

,,00B0f21

TRACK;
OMA I
PA'fNUl
BUPr

;1.46123
0
IZI

001042
001044
001052
001"54
001056
001060

0211062
01211064

1210112166
001010
001012

~H'0t1J00

000000
e001!100

0002100
000001
021121000
00000Q1

,,£10000
0"0000

001014

IIHUJ000

001016

000000
0000021
QUI0"0"
00"001

001U'"

001102
2101104

210111216

2101110

001112

01113,4

0"21"""

el010'
"IlU446

"' ' 8111

~~fWC'f I

111

"
III

TWRDcrl "
lOMA'
II!

SWRDeTI 111

£RCQUNTI0
SAVEl
"
SAV1,
'"

PASS.
0
OSKNORI 0
I-IROERI

L.IMIT'

HIGH,

TTRACK1 "

TDSKNoa 0

OUT~UF' I

I NBU' I

BurrltA

;INYERNAL ?ROG~AM VLAC
:RANDOM NUH9!R ~R!Mf
JWOAKING WDR6 ~OUNT
iWORK!NG OAE
'WORKING DAT~ eur'£R (OUT~!N)

.DAT. PAT'£RN INDEX

'WORKING DATA BurFER (OUT"IN)
.rEMP WOAD COUNT
I TEt-tP

OAR

,STANDARD WORD COUNT
JERROR COUNT FOR MESSAT[S.

,POINTER POR HARD [RROR

,TEMP TRACt< NO.
IT[~1P

DISK NO.

PALX11

Y003

021116

1110001219

19-NOV-7111

15 HlJ4

SAVBUr, 0
J

"'''11211
001122
e01124

e0""01
0000"0

000000

PAGE 2"1

,Rrl1 WORK REGISTERS
,(CAN BE CHANGED IN ANY ROUTINE)
121
WORK.
WORKil 0
WQRK21 0

PALX11

V~03

001126
001130
00113"
001142

00000'

001154
001162
001110

012106
012761
005067
012777
"12771
"12167
012761

01'31116

01216'7

0"1146

19-NOV-70
START'
~0"006

176640
0$2270
000340
003610

012777
;'U276'?

iJ340g@t!SA

1'/1616

Cl.R
Ct,R

D~~f~

CI.. R

PA'i'NU

:'\,116;?~

;~'/7614

0'33464
;'1'6550

i<10V

1'16552

C~R
;~OUT! Nt:

t7951,6

5, 77:?!f~~

0~)l266

!Jl2167

~~:.\03 ~ C1

1165~,2

:i.HH,2i'··}

~1"?767

0:i 7 tH£~

t'i7t)~6

~.':OV

p,HH~H;2

(01;)977"1

1. !7~~62

~~O~:.'Hi6

02~7il1

'1. /1'lt~6

11'n1~4

~%');!.f(H12

8Nt

Ii'HHle'1m

Htd... Y

~~0777

0id:1,33kil
0it:1;'3:52

~0a764

0!~t336
00~,344

OR
(.~ ':0~J0~

012'706

:?J~H.k160

162167
032767

1lI;~etZl~0

!?Jz12Wia0

'(RACK

,CLEAR TRACK REGISTERS
.CLEAR DAR REGISTERS
;CLEA~ PAYYER COUNT

#XHAn',2~

DE l' r. R:n NES HOW NIi C1~ 14 £ M0 Wf ! S (1 N l' H£ S VS YE: ;,~
i;l3 ,40 g ~C~~R

ril'1A:,REf 0 ..

1~7'104S

MAXRCF~

ADD
OR
MOV

SUB
BIT

'.77524
117470

~ lDt;~

~~ I OH I -r1

i"it:\!f.:l,:;:

ise1 UP PAOC~SS~R TRAP

tn~$}~ ~ ~

#1",7446BSAV£

.'4177!1-16.:TL4,VE

0iU,:H.4

062767

#3~0,36

(J.l~LH/t:

0t]1316
01~:Li~:2

#340,32
#D!SK,34

,SET UP OiSK POINT(R
JLOC~ UP iNTERRUPTS
,5£T UP TTY ~OINTER
.LOCK UP INTtRnUPTS
,SET UP OISK HANDLER POINTER
JLOC~ UP lNT£RRUPTS
JLCCK UP INT£RRU~' LEVELS
JCLEAR PROGRAM 'LAC

;-j, :;li3,ftu;
~, ;: ~. ~~ ~~ ~

EXlin'l£ti t 1'1OV
:'·10 V
1-1011

0kltJt0

#EMTRP,30

PLAG

176630

i 'f~H;S
2HJ:L~~2
ew:).~! 60

#340, (tST ,A 'HIS

#OKINT,ftVt:OTOR

CL.R

005}36]

005"'67

MOV

.CL.EAA TM£ WORLD
.SfT UP STACK

#6,01

\776';6

0012213

eHU246

:~OV

~12"71

~B:506'l
~127~;1

MOV
Cl.R
MOV

111562

i!H~~,?12

re1~0340
eCr.3~0

'~f03061

11166(J

111654
116640
116634

#1000,"6

176624

012761

00506i

176642

MOV

MOV
MOV
MOV
MOV

~0034"
~02216

001204
~HH~~2~
0~Jt~~1~
0f~l2~4
0~U~>10

RESET

201000

.S[T U~ RE'E~E~GE YO 4K
J~E'!REN~E M[HO~Y

,r[ST rCR GR~A72ft THAN 2JK

~ ';" f,
~

f$2~0G~ t 8i\ VE

EYtREF
#~~0$$%6
~2000~,SAYE

#BITlm~fLAQ

TO RE?ORj' THE NUHB£R
JON n·t£: S'1§"(~1 t
REPON$
Cl.,R
~WRK
WORK f ~;OA[
INOStU MOV

,82' UP ~OA NEXT R['[~[~e[
sne'fNENCE N!Xr BANK
HH':SE 'f S1' It CI(
J

$ RfHH I NE

001352

~~5j{j67

11/~42

~liB.3!36

a'.6177

177536

1'7;440

001364

032771

iZ9~000

171422

~01312
00~J74

"~1~1~
~62"67

0&jW(7Ji14

BIT
BNE

NEOST

17'1!a6

001402
001410

022761

~0""4~

1115tB

ADO
eM?

#40,WORK

0131412

""1401
0il0161

BEQ
BR

~BIT11 .. ~DCS
#4.~WRK

... 4

INDSK

'LOAD D!SK EXT, ACDNtHITS
iTEST fOR NON-EXISTENT DISK
JBRANC~ i, NON EXISTENT DISK SET

;SE' UP NEXT DISK NO,

;CMECK POR a OiSKS
iaAANC~ ir 8 DISKS

PAL,Xl1 ..y"e3
001414
001420
001424
001432

006067
006061
032761
001002

001434

00£10"QI

001436

ae0777
""4561

001440
001444
kiHH,446
0/1]1450

001452
001454
001456
00;\.460

Nil'-.462
001166
0014;2
00~.t'l7 6

19"~OV-7"

15'0~

PAGE ~

1775~0

NEDST.

ROR
ROR
BIT

117414
",,0017

171466

BNE

#17,WORK
,+6

HAl..T
OR

JSR

002332

Qlil11211J

\~ORK

0"4351
000"'''2

MES11

%5,CONV

EMf
HE05A

104PJ00
004167
00,4351

177777
005361

WORK
WORK

"'9

~lES11

... 1

WORK

1i'7432

DEC

~06167

1',77426
1"77422

ROl.
ROt.

l,jORK
IlORr<

016767

1/7416

HO'!

~WRK, DS;H4{}N

006167

'.77'J"l2

JROU'flNf. TO SET UP

Wf~IH:I!H:AO

8UFft:i1~

;
J
00J,!,H~4

i.~6167

1/14102

0!a1512

0tJJ'ta67

117402

00~.516
00~.524

162'767
022761

0!j0003
'1;)0003

001.?32

1~H.:'3!a3
3~5267

11136!lJ

00153~
0015~0

01UI766

001S42

042767

0015'"
001556

111J:H;
~,773~14

1113;36

0~:;00211

171330

016767

1- ',1'7336

111:336

gj66167

1,113:~r;

0101564

ra~l6767

1/7336
1';1324

QHiH,~'2
~016~ta

12166767

1'17322

117:3:24
1. 7'l3H;

016767

117314

1712!~6

0m:l606

2100241

1lI~1610

006067
012767
012767
252777

1001614
12l2l1622
0\a1630

~;Eri'8Ur r

0"o340
GHH'U'H1J

OUTour 1:;1\ VE

SUB

$3,SAVE

C~1P

j~3 i S,H/[

13Nl
INC

on:Hrt.. O

1)1\

St:H3UF'
#B I T~ i ~~OFH(

eLR

o'if t: ti?' UJ HU r,

t,iOV
.\OD

0211636

.1816167

177222

IU,2767
025067
"05367

0~1636

1301656

001662
0016'0
0211616

012'177

e16767
042767

~~OfH(

OU'fBUF, 1N8UP

#8 t 14)' ~n<s

MOV

SWRDCi,WROCT

tol0\'

~OATAiIHROf.R

Cl,R

DMA
1RACl(

Ci.,H

""H~3tl0

1711:~2
17716~

2l~00e3

171136

RDSAVJ

i ~~c>UUFrEfl!

s~mDei

SIS

177222

t~OV

171154

177174
117166

J~~E'f

CL.C
ROR

f.lCNTLC,60

f,134~1tiCSR

MOV

SAVBUf",BUF"

atc

#3,F'l,AG

8UFF'Ei~

!SE.'i' UP

WaR!) tH'JUN't

,f:jET Uf'

J!JIV~OE

avn:SX2
Tty VECTOR

JENABL.E

'f'fV INTERRUPT

#340,62

t~OV

BY ;3

H;r~A ~H.:~ H' NO r.tEi,iA: NDCA
j;Jl!t eiJ!JWi

JSE'i" \J P' S;\\HC

t~OV
~10V

OA'fAT.

i4ti40nv

!N8UF~SAVBUF'
WORI<,SAVBU~
I~ORK c ~;H~F:DCY

ADD

1162:36
1762:52

17,202
177226

HJ:VH)1~

2'211644
0211632

\,JQRK

~-H)nK, I NAU~~

t-10V

1'/125"
0!J3554

sua

)SET UP WORD COUNT
U~ F'QR j,lARD ERROR

.S!'f

JtOCI( UP PROCESSOR PRIORITV
iSET UP CURIUNT AODA

PAl-Xl1 ,Ve0;!

19-NOY"'7e

001724
001112
001116
001120

042167

001000

0215267
S.il4505

177124

000004

001'122

032761

~01'730

005,414

001732

"16767

001"/40
001.,46

i?J42767
022767

001754
001756

'HH~0~"

012l11tJ0
~H'1:16~

00i'll'0
eJa!1116

1tJ4~H'JJ

PAGE !S

LOAT.

stC
INC
READ
lOT

IIlB1000

171112

1]7104
177774
000003

17'1160

~HH353

13130177
0:1,,2767
01.6167

177130

15.04

BIT
BEQ
MOY

f;!BtT9,F'LAG
HADAT
F"i,.AGtWORK

eMP

#17777'~, ~WRI(
#3, ~'lORK

ale

177152
1'J1144

BN£

HAt..T
~'~i~H.02

177116

1, 77'-1"

~'JRDAT I

1'!'1~'60

SR
t>10V
itiDV

WRITE

0'120f)!?'

00il.f00~

~3~j2i~02

042767

kH;:~rdf;'3

17i1~i32

!::H12'H.0
:2:J2ia6

1235.. 6767
0,12767

~.. '77~,0~

17J040

~1¥1tZ~0

17'1~j:t6

0~12024

0~5267

ii7g;~~2

"~'2EjS0

j,:J\1305

flEAD

~02rJJ2
002~134
~0204G
0020~16
~9i2050
0020~6

~;H~Smta4
;z!~ft561

~ O'T

0~}2~~4

0~20?2
0~2J14
0~~2102

002110
002116

f1:,2167

n"AG
'"U~ifj

'~5, CON}" ;d£
#8! T9 j n.;~G

!"JRSAV

aNE

FUNfm

17614"

SIC

~42161

000~0J
0B1~60

i~3,'LAG

~16767

1171002

1167,~a

t~OV

SAVBUF',fJUr
f,j,era

1'16132

WRS;\Vi

032767

0ti2134

001413

002136

016767

042767
022167
00135Qt

B01000

1'16706

116;00
177774

176754

~kHH!l03

176742

!OT
BIT
BEQ

1766'2
000342

k1021'16

000161

177460

~02202

tra4012l1,

002204

004441
00~167

202212
002214

01.1101800
2100717

#1'11'714 i ~O~K
#3 g vw~:,(
~18 i "(9,

rl, .• G

lOT

101a41i
00,.167

~02206

~"LAG, ~Hir~K

HOV
BIC

1'16146

CMP

STORBU'

SHE
HA'-T
TST

eMI
JSR
JMP
EMT
END
JMP

117424

R[STORE'
13Ft

rem ~'LAG IN BAC;( G,f4QUNO

STORBU
F'I.. AG, WORK
#177774,WORK

eonm:N'f ADrH~

, Slf.:'~ Ur"

H:L\i l' ron t'L, !}.G
, CtHWM1E D/\ t J~

rN DAlHHHW UN[j

NCtcH':CK i>"OR EfH,CR
~ RE8"f(H1t
i CH~>~f(

iHSK

tH;f~"'~!R

FOR J R£"'Rt:,~Og

loa ~~,"tU:AtJ OA'rr.
$ (~t,~Mi(

~SEr

HIAtT
#8 t T9, F'L,U;

~'R(jM

H3Ei UP rOR K~HO ~1~RaH
ISET !,.If!' RANfHiM ~U~'~~(~~

WRCHECI< ·100

00000S
18057&7

BIC
WRI'f!:

j,04503

0~'2126

002112

INC

042161

0~2124

01a2164
002110

I NBt)r, BUf

CriP

FOR [RROR
JWRt'fE RANDOM DATE
_fRY TO READ :3 TIMfS

H~~ 1 'f

:'~B!r9,rLAG

\'lEO
HOV

;C~ECK

f~3if"Lfo.G

alC

"*,2767

022761
00;L3'"

104;07
000004

0"2162

'~1iVm

177042
171034
177026

002122

00216~

f'HHH~AV, H~~Oe:R

O\J'fBIJF,uUr

t,10V

SIT

IN BACKGROUND TEST

HUlT POR FLAG

J UNMH.f: YO H~: AD
B()1SK

ii6'766
1'17174
ef:0003

0.:l,6167

132100214

0"2152

1'1~774

LDAY

BIC

lJSR

0~14t5

e~'2:U~0

2H~2144

~10:1,j:16
00l~H;0

rOT
SIC
iV\NHQ;

tlBIT9.F'LAG
rt.. AG
+100

PR;';(HUi-i iRfHHl

FL~lt~

UP eUHH£N'f ,u; tH'U~ ~ ~~

IN BACi<GAOUNC 'fESY

HU!l' rOR F'LAG
I CHECr( rOR ERROR

#3,woRK

WRSAV

F'I..AG

RESTORE
%1,OISBU'

ROSAV

0.1

DATAT
HAL.T

.RESTORE D!St< ,~ND IlX1T
UP NEXT DiSK ltUrF'ER

JS~'f

HH':AO NEXT BurrER
IfIlEPOAT ENO~

,A£CVCLE 1£S'f
JOO NOT REST'OR! HEM

PAL.X11

.y083

19"'NOV-70

15. 04

PAGE~'

.ENTER DISK H~NOLER BV THE TRAP INSTRUCTION
'ARGUMENT TO T~AP INSTRUCTION IS TWO ORDER
,BVTE or THE CONTROL REGISTER,

002216
002222
002226

002232
002236
002242
002244
002246
0022521
002254
002262
!2102266

016705
016145
016145
016745
016745

,
176604

OISIU

176622
176620
176620

17661?l4

005115

£105215
"11604

MOV
MOV
MOV
MOV
MOV
co~

INC
MOV
MOV

DBR,%'
TRACK,-(')
OMA, ... <"
9Ur,,~(5)

HROCT,·"(!S)
(5)
(5 )

(6),%4

"114467
(342767

,.",,5644
1'776~0

SIC

,... (4) F ~~ORK
1~1776~~, Hor{1<

016745

176632

MOV

~~ORK,~(~l

kHH'''02

R'fI

.Sr.T UP TO LOAD DISK REG
'LOAD TRACK NUMBfR
.LOAD WORD ADDRESS
iSET UP CURRENT ADDRESS
'LOAD WORD COUNT
JS~T UP TWO'S COMPLEMENT

,.MASK rUNCT!ON BITS
'LOAD fUNCTION REG,
JRETURN fROM TRAP

•J
J
J
J

'Rfl1 OISK INTERRUPT HANCL[R
,ROUTINE CONTJNU[S ON ERRORS

0022721
0212216

002302
002304

002312

0014567

002352
rcH!!2356

002362
002364
002366
002310
002372
002374
002376
002~il0

£102406
002412
002414
012416

116506

1165310
176600

1177~0

116512

BIC

116512

002326
002332
002334
002336
002342
002344

~oes

00"71
100113
052167
017767

e42767

~02340

i~Bli~,~C~R

TST
BPt..
BPi
MOV

@[iJa~20

002J2flJ

,,0,.120
004205
"00002
104001
004075
011767
QJm5367
004'67
0il11120
2104111

BIC

~~2777

0~1000

DKHrn

JSR
WORK
MES1A

001444

176452

176546

176542

001414

OEl.t~£S'

,REPORT ERROR
.
JMASK ADDRESS EXT. BtlS.
'CONVERT TO ASCI!

%5,CONV

,CONVERT TO ASCII

MOY

~OCS,WORI(

JSR
WORK

"',CONV

.SfT UP STATUS

MES1
EMr ... "
MES1A

QJiHUUI'

@DAE~WORK
#117700, i~O~K

"',CONV

00420'

11)8"'215

• se 'f tr'lROR sf T

S5eT UP LOWER 16 BITS Or ADOR,

DEC
JSR

WORK

104000

0""'61
90112.

J8RANCM !F NO ERRO~

#0 t i9, F'L;~G

IilOAR,WORI<
WORK

MOV

111167

YRAe~ ~H f

j Y~:ST f'OR ERiHHt

EMr.!.
HED2

~HHH'06

004111
177177

UfH:XT

H=~~£'U~

ME!"
116410
00136 ..

116512

-1

H£82
6

PAL)(11

VeS3·

002420

UI4001
004215

002422
002424

032717

19-NOV.,.72

1"04

PAGE 6-1

EMT.1
MES2
176362

BIT

PALX1'1V003,

19-NOV-70

'002432
002434
002442
002446

176364
176452
17742''''

"024~'"

02124621

002462
002464
~02466

0024,."
0"2:.172
002414
0~2476

0!!l25 flH*
el!~2?H ~
~Hj~!:H.4

0"1430
017767
000367

042767
11'04'67
""1120

JSR
WORK
MES2A

001316

,,"4231

10400"
"04167
00.1231
177777
&35271;
0127"6

EMT ... "

... 1
i!h1040:lJ

176;'H.0

0~.H.D00

fnH ra e ~UCS
#UHHil,%6
~HRO[R

176364

JMP

116276

SOfTER I "(ST
tlEQ
filS

00:1404

00~5~30

~f;i;jrOK.12

~1?106
~£HJ002

'CONVERT TO ~sell

"',CONV

SIS
MOV

~tJ"177

,,521"17

.GO AND CONTiNUE sorT ERROR
.FETCH ERROR EXT. 81TS

SOFTER
GlOAE,WORK
WORK
1tf11740e.WORK

HED5A
M£S2A

ra05777

~H~;;:;1]20

(H3~~J36

SWAB
BIC

176444

1Di'000J

(H~25?2

iii ;» ;,) :3 2

BEQ
MOV

116456

JEXiT HARO ERROR
jCWECK FOR X~F[A DON[
IEXIT fRDM RDUYiM~
'5~? GO AND CON'iNU~
,RETURN to H~IT tN~?R~

~wc

INTEXT

~;!B I T0, ill!)CS

F!YI
HHE~<T!

:)(}V

Ht 1>: S ~; l' fJ l F. !~ ~(

RTI

H~:~n'

g
lihJlJ7I~1£ 'H) SETUP DiSK 8U'F't:~;~
IAOD H~RD COUNT TO START1NG
3COM~A~E CALCULATED ADDH~SS TO

DISK ADDAESSES
T~RMINATJNG

ADDRESS

)

0'32'i$0

:\g,J~02
~HH;267

0~2'!54

026777

002562
0~~564

'H'~4£1:S
1052'67

2J1lJ2~'12

03,7767

130260"

tB~2167

0~2614

042767
026767

1302622

0&J1100

0ra2606

""2624

105167

002630

UI2IliJ15

0212632

01115067

002636

21"5061

002642
002650

002654
002662

r.n ~inw"'. ADD

066 "'~.,

00~0~6
00259~

042761
062716

016767
000457

Bce
lNC

176214
176272

176226
111140
177740
176230

COIH)t\FU

ct~r

BEQ

IHwer t tJriA

IADD WORD COUNT 70 LOWER 16 BITS

DMA ,'OM~

,OVER'LOW Acb ON[ fO T~ACK
JCDMPARE LOWER 1& 81'S

e(H~lHJ1
TR,~CK

SIS

CMOAE
#BIT6,F"LAG

11~322

~~OV

@OA~,WORK1

116314
176234
1763210

BIC

#17714fJ,HORKl
#1'17740,TRACIC
TRACK,WCAK1
ERAOR

SIC

CMP

ONE

15T8

116212

BPL

176214
176206
000200
0£10004

116172

176212!4

eIC
AOD

116164

MOV
SR

Cl.R
CL,R

F'L.AG

EXTCt+1E

JF!TCM EXT. AOOR BllS
iHASK TRACK iND DISK AODA
J Ml[ TMEV EQUAL

.ERROR IN OAl REG
.CHECK FOR L~ST DISK Bur'ER

TRACI(

;CLEAR LOWER 16 11TS
jCLEAA EXT. AOOR~ BITS.

#4, (6)

,INC STOCI( POINT(R

OMA

f11200,F'L,AG

SWRDCT,WRocr
EXTDR

.[XIT

PAGE 8

PALX11

""03

It-NoV-7m

15104

r!02664

0"2761
022767
a01833
011767
"42167
026767
001121
017767
e66167
U'3012
052767
017767
00 5 167
0"'261
011767

177774
000""3

17623"
116222

EXTCMEI BIC
CMP

116116
177743
176116

176210
116202
176152

MOV

176010
176106

176164
176156

MOV

~DAR,WORi(

ADD

WRDeT,WORK
AKH

0'H~200

176(d10
116066

SIS

#200, n~AG

i~OV

(.10 AR, WRO(;T

C'CH1
tNC

\~ROCT
~IRDCT

MOV

!(tOAt. YR,\UK

002612
002700
0021Q12
002710
002116
002724
002726

0027S4
0212142
002744
0212752
002760

002164
1302'170
002'7'16

~t1276'7

l1M~44

BNE

BIC
CMP
BNE

Bee

176f;362

116056
j,,/i'}03ra

17:1'140
l'J')i?J12

176(052
1.76ta44

AK~" 8

H.17774m,TR.~(;K

"..16022

SIT

~Bli6,n"AG

EX7n~8

BNE
1('1'5

E:1ADRt

J~H::

%'1

!t!<i;~fJ22

003;124

~g496?

003~3f!j

~H31"52

OrlA

0030J,?

0~4;. 7:\
y)@!lHJ06

tJi[Sj,

!iHHfS6'1

JSR
'rRA'cX

003044

"~4205

i.)t:S1A

0,,31!.-16

00(O;[l02
1f{jtlm!3e

2
EMT
HED4
I'-U:S1A

J2!0Je.:J0
003032
0213;]54
003056
003060
0031362

003"66
0030"12

004142

004205
004171

1.77777
00!3061
00!H'61
00000£1

JF'f.TeH LOWER ltt BITS OF' ADDRESS
i W!I.1.. D15K OVERrl..OW

.DISK WILL ov[~rl.OW
;S[T UP NEW l~ORD COUNT
HU~.H{
j LIJ~~tW~

TRACK BII'S
16 B t 'TS or MHlRf::SS

,';? ~

;~f5, r!i)NV

.Einy
J Ci'HPJR:RT LH1A

%',CONV

~ CO;PJ[~T

JREPO~T

OMA
TRACK

HHSK ADDiU:SS ERROR fU:"'J:"/' M~'i' i,)i10G.

~~!i

Ci~IJNr

6
0r;.1'~134

uH~~~S~

012130(~2

AKH

@OAR I Ot4A

00UHH,
iil002Wl

.MASK EXT, TRACK BtTS
,COMPARE FOR L.AST TRACK
JNOT LAST TRACK EXIT

#117143,WORK
WORK,QSKNOR

MOV

0~3lj~0

003"34
003"36

AKH

POAE,WORK

l'16ra4~

017767
932167

ta~~7,'~6

tll,WORK1

BIC

003f~~4
003~12

00;~:U~0

#11777~,WORK1

'J"R,\CK

~H':G

Ttl AStH It

COl)Wr yfJ ,~3CI j

EfH~ilR

~1ES:l.

... 1

175764

C\.,R

1.75756

CL.R
HAIeT

PAlX11

V003

19-NOV-70

,
J

,ROUTINE TO rILL BurrERS WJT~ RANDOM DATA

J
J

JENTER rROM JSR n7,RANEX
003a14
003102

~16767

012705

175746
001112

116016

•
RANEXI

,•

MOV

wADeT, ~'lORt<

MOV

#QUTBUf",%'

JS[T UP WORK
jLOC~ or OUTBU"£R

003106

016700

00012ff]

003112

~16701.

003~l~6

((1:'2703

QWW116
QHHHH17

003122

!30!i1a02

((l!03124
003126
00313'"
003132
003134
kH'3136

QJ063~H3

0ik'31~2

066713m

CI.R

~6:S7101

0031S0
003152

0627013

SHI~'F-370

IlHJkJQJ64

ta~'5!02

003156

~05~01

0~3160
01~3162

003166
0ra31'10

005502
062701
0055"2
062102

01~31'4

060200

2103116
003200

"05501
0121067

ASI.

901051
047401
1!l00006

~2
~~

sSET UP Ri H1110t 5 tHGITS hlGW

.SET UP SHIFT ceUNT
iCLEAR R2

,INl"

LEfT AND

,ROTATl ~ARRi !Nto L~8 or Rl INfO
jROTAT! CARR~ OU, 0' Rl INTO A2
JDfCREM£Nt "~

ADO
ADO
ADO

LDNUM,.m

,ADDN ~N NUMBER TO MAKE ~ 12'

ADO

HINUM,%l

,ACDN IN NUMBER '0 MAKE X t29
,PRO'OGAtE CiR"'
'ADDN LOW CONSTANT

OEC
BNE

ADO

ADe
ADe

SHI"
~1

sl~57,le

,eoNtt~U[

SHI" Loo'

ip~apOGA+[ CAR~Y

jpROPOOA?£ C'~Rr!$
jPROPOGAtE ACAIN
.ADON NIGH CONSTANT

ADO
t\OC
AOD

%1
%2
#47401,.1
%2
#6,%2

ADD

~2,%0

jAODN NIGHfst CONSTANT
,nEPRIM[ R0 WITH H!GH OlG1T

MOV

%1
%0,LONUM

,PUT RI BACK IN LONUM

Aoe

QHHHJ26

HH~U:~jli$1
~7g%3

11
K2
13

ROL

ROI..

~H'93S1

00:3144

j<J,OV

NOV
SH1F'fs

IlHD~l"l
~06102
~H'53~l3

001313

.RANDOM DATA GENERATOR SU8RoUTIN~
DAVG£N2 MOV
LONU",~0
.SET UP R0 HjT~ 5 DiGITS LOW

'PROPO~At[ C~RAy

'P~OPOGAtE C~R~'

PAL.lUi ·V003
2103204

003206
083212
0.03214
0,,3220
003222
"03226
003230
003232
0133234

010025
005367

19~NOV"'7'"

1,121.

175706

""i4e6

010167

tlI1012'

13"'367

PAGE l '
MOV

"0.(5)+

JHOLO LONUM rOA PROGRAM

OEC

MOY
MOY
DEC

.PUT R1 BACK IN HINUM
• HOL.D ~UNUH rOR PROGRAM

BNt

WORK
EXGEN
Xi,HtNUM
"1,(5)'"
WORK
OAYGEN

RTS

SEQ

""0014

175612

"Q1~321

"''''207

EXGEN.

00"000

HINUM:

~Q10001

L.ONUM.

&!)

JRETURN TO PROGRAM

H)ATA COt'lj? AR I SON ROUT I ~4E

'IF' AN ERROR OCCURS BETwr:EN Tti~ OU'f .. BurrER AND
.THE I N",SUFn.:R AN ERROR WH.L SE REPQRTtD IN fHL
'POLl-OWING MANNER
JOi\TA ERROR XX DAt: iOOOOO( OAR xxxxxx eooo DATA )OOOOO( GAO DATA

,
rag;32:36
0"J2~2
0032!39

e03236

12103264
1210:5266

003212
12103300
1210J3ta2

003310
003316
00332e
1211213322
00333(0

003336
0~3344

121213352
0213354
12103360
0213364
01213366
12103370
003312
003316
121213400
12103402
003404
003412
003416
"03420
003422
003424
013~32
0034~6

~r;~06 7

1'1~662

tJi,ft161

1.'156;14

QJ16167
021171

t'l'~4ta

:L'1561!6

~0j,"16

2135267

026767
001407
062161
,,62767

1.7'632
175550
~etDi1l"2
~iC:0002

1796Z!3
11"H4
175606

115624

J
CCH1P M~(; e\..R
!4QV

1·10 V
WFWCMP' eMP
BNE

WROINCs INC
CMP

179560
115554

000'157

,
052167 0011212121 1'15512 WD€RRJ
00~20!$

016767
016761
066767
103002
0",5267

004'67
001121

AOMH

17!'516

175506
175594

115562
175556
17554,6

1755142
000412

WDF.RR
t'iORK2

I,HlDC'f, WORK2

j Sl~ 'r U~) QUTOlJ~?~l~:R pohrn:R
Hl£T la' ! N BUf'~"tf:il tloi NH~r;~
I c(m~M~~[ BUFPEJlS

,WORD IN ERROR

)$1 ~"I0RD (JaUNT
i ! S CQ!~PLEtrE: BurrER ~rH:e~U:D

j[><lY RQUTINI:

WRDei~p

R'fS

,COMPARE NE!~l' WORD
;EJ<lT THiS ROUTINE

#8IT~,rLAG

ISfT £RROR

BIS

ADAM

#2,SAV£
#2,SAV1

HOY
MOV

OMA, ~iORI<
TRACK d.JORi<1

ADD

WORK2,WQRK

tNC

WORK1
",.CONY

Bee

,.6

siT

.rETCH STARTING DISK AOIlR

,CAi.CULATE FAILING ADOA
,SHOUI..O OAE BE !NCFtEMEN'r[O
iC:ONVERT WORD AODR TO ASCII

JSR
WORI(1

2100400

"',CONV

iC:ONVERT TRACK AOOR TO J~SCI I

MOV

~SAV[,WORK

JSR
WOAK
MES'

%"CONV

, ,'ETCH GOOD CATA
• C:ONVERT GOOD OATA TO ASe II

MOV

PSAVS"WORK
"5.CONV

, F'ETCH BAO [lATA
.CONVERT TO ASCI!

t~ES1A

11'460
"""'360

175506

,
17'442

'''''340
,,01121
004'67

t~SAV!, 9SAV1

~ tnJRD t.'JOUNt

otC:)
AOD
ADD
SR

JSR
WORK
MES1

0214111

""""06
"o4'61
001122
0214205
21001Z102
"17167
12104'61
12101121
004J1"
,,00006
"2.7761

W(H~}(2

ClIjYilUr: , 5AV!:
I Nf.l\J}" , 5f~ V1

1"466

JSR
WORK

PA1.X11

VllJ

0034~0

00433"
"""rUI6

003442

19-NOV"1"

15104-

PAGE
M[S6
6

10~1

PALX11

V003

003444

10400"
0"4060
00420'
,,04171
004314
004330
111711
000101

003446
e03450
~03452

003454
003456
003460
003462

19-NOV"10

15.0'.

PAGE :11
£MT
HEOl
M[S1A
MESl
MES5
MES6
1
OR

,PRINT MESSAGE

WROINC

,GO COMPARE NEXT WQRD

!'I

J
J

,
J

J8ACKGRQUND TEST FOR INTERRUPTS
J
~~f:~3464

~12767

~rt3552

0103412

005ta67

1'14320

X~Ud

i'10V
Ct.,R
CI,.R

tHfrx X, 14
16
PASS

ti;~3416

0Z~~61

t'75372

~:H3·3502
{i303~H.0

0521,77

i!J:!~~020

SIS

'eJT4,~C~R

0DkJee0

CI..R

~tr3520

005"27
1010:;261
t05767

rST9

X! NCW",;2

003524

:UHJ31J

00351. '1

003526

0m5267

"035;~2

a~H,401

0qJ3534

3~376!'

:3~~t)36

(J4'2:777

0035:14

1"4~HlI1

~03546

MH~4~01

0031)5121

GIt)0~ra"

0fJ3552

0000132

lr7772

1.11766

115342

XINC!~I

INC

XINCW

tNC
BEQ
8R

PASS
t'\\o4

BIC

'BtT4,OCSR

XINC~~ ... 4

HU2PORT BACKGROUND T[ST TIMEO

TIMO
HAI.T

RTI

i SET

THM.a: BiT

XINCW".2

BPI...

£:MT91.

JSET UP tt~E BAS!

OUT

j i~6EA~ YRAC~

Bt If

PAL Xl1

'1.0"3"

19-NOV .. 10

1510«1

,PAGE 12

.TEST FOR CONTROL "e"
.UPON RECEIPT or CNTLC SET rLAG BIT
J

0,,3554
003562
00351"
003516
~0:S60"

011767
042167
022161
,,11"03
052167

003606

000002

175226

175336

000200
000003

11533"
175322

100000

175234

CNTLCI

MOV
BIC
CMP
BNt
BIS
RTI

9TK8,WORK
#BIT7,WORK
#3,WORK
,+10
#BtT15,rLAG

,FETCH KEYBOARD BurrER
.MASK rOR 33
.T£S1 rOR CNTLC
iNOT CNTLC EXIT
,SET rLAGBiT
,[XIT ROUTINE

J
J

003610
003612
003616
003622

a116C19
062116
911fJ00
112"61
122161
001101
"00'''')2
122161
0"1416
12216'

003646
003651!
003656
0036621

003666
003610

003614
"03616

""'31m"
003110
003112

003114
003122
003726
003734
003740
003742
2103144
0031.6
2103152
0031'6
003764

003166

eZ1417
0"4161

0''''''6
116177
\05771
10"37'

"""207

112161
""4'67

112167

004161

~!UI~H~2

AOD
~.ov

"""002

~10VB
ca~PB

13"H'104
00e1to0

ft",0076

0021ra45

00~12164

0il2!042

000054

17910~

175100

T'(Pre

117750
000012
177736

0000216

TVPGt

tH.21 III , TYPOA"

TVPG

JSR

~1,TVPO

SR
MOVS

TYPA
TYPOi" T, '''TPEt

iSle
BPI.,.

0~0020

f445,1VPDAT
TYP'
#'l2,'fVPDAT

TVEXITI ATS

'H~0015

C~lP8

Ct-1P9
BEQ

TVPOI

tl2, ~~'6

0'Oin'3 .. %0TVPDi\T
Type

eEQ

'HH~!tl~2
~00040

(6),%0

BNE

RTI

0"0734
11J00008
0116"0
062116
01111J61
022161
"01801

MOV

# E~1 ,. .. 1 , - ( 0 )
CMP
'WAS TWE CALL EHT.t
aNt
TVPS
ANOI TYPE A SERIfS
BR
TV?
J!f Vf'f ONE t..t NE
,SU8ROUTINE TO OUTPUT ASCII MESSAGE ON TEL£T~P£ PRINTER.
TVP,
MOV
~X6,%rB
IG[T AaD~ESS THA' CONTAtNS M!SSADE ADDRESS

"22140
,,9j,itJ52
~m040"

003644

EMTRP:

011.6"0

k}03620

2103624
003630
003632
003636

.ROUTINE 10 DECODE EMY CALLS
.EMT*l=TVPE ONE LINE or TEXT
J Et~r"'I::TVPE A SERIED or LINES

MOVS
JSR
MOVS

JSR
BR

@'fPS

.... 4

fJl!5,TYPOAT

"',TVPO
#12,'fVPOAT
~1,TVPD

TVPA

iSF.::T Ui' [)(it.

'AODR[SS OF MESSAGE 10 R~~
iGET CHARACT£R
sCHECK fOR K~" CHARACTER
,CRANCM j; NOT "~".
.TERMiNATOR CH~R~ DONE. EXIT.
JCWECK rOR n~"D
'BRANC~

h" tV,,".

iNCT n~"~ CHECK PCR "'",
JBRANCH if' "1\4"
,~V?[ eHAR IN TVPDAY
'OUTPUT CHARACTER 10 PRINTER
JWAlt POR DDNE 'LAG~

'EXIT
.MOVE CARRIAGE RETURN CODE TO TVPOAT
iGO TYPE CHAR.
'MOVE Lr coDe TO TYPOAT&
iGO TVPE CHAR.

TYPOAT. "
I SUBROUT t NE 1'0 OuTPUT A SEAlES or ASCII MESSAGfS ON TELETVPE PRINTtR
TVPS'
MOV
fGET ADDRESS T~AT CONTAINS M£SSAGE ADDRESS
$"6,"21
ADO
MOV

""0£lQl2

Z00014
177717

"00006

CMP
BN[
RTt

#2,."6

EtXe,TYPSB
#"1,TVPSB
TYPSA

,UPDATE TO NEXT MESSAGE ADDRESS
.ADDRESS or MESSAGE TO Tvpse
.CHECK 'OR TtRMINATOR
iBRANCW ir NOT TERMINATOR.
~T!RMINATOA~ EXI'

PAL-Xli

Ve03

003770

104001
00000e
"""763

003772

003774

19-NOV-70

TVPSAI
TyPSBI

£HT

"BR

TYPS

.CALL ON TYP SUB TO TYPE MESSAGE
iAOOR£SS or MESSAGE GOES HERE
,GO PROCESS NEXT MESSAGE

J
J

,'OCTAL TO ASCII CONVERT ROUTINE
.ENTER ROUTINE AS rOLLOWS
JJSR"',CONV
JAODR#aAODRESS or NUMBER TO BE CONVERT£O
.AODA BYTE=LSB OF WHERE ASCII IS GOING
'ASCII~=THE NUMBER OF ASCII CHAR~ TO BE CONVERTED
J
J

003776

1313567

004002

eu.2 !.Ha

ZZ40"4

2:12'''2
060201
""67213
342703

0~4"06
QJ04~10

004£114
004020
004024

3627213

CONVI

S"7771~

1'-0341

0t42767

000007

004034

006167

1304040
0e4044

ee6"67
""6167

~"0"t6

0041354

00~20'

000012

0"1/1006

(5).,~1

JVALUE OP # TO B£ CONveRTED
'ASC!! AODR

MOV

(5)+,%2

ADD

%2, fU,

MOV
MOV
aIC
AOD

000060

e~41826

005302
004"'"
0041352 01&H,356

ACVNI

0""2142

~(5).,ACNV~

MOV

000022

ACNVX,~3

'1',77g,%3
#60,~3

Mova
BIC
ROR

%3,·(1)
#7,ACNVX
ACNYX

OEC
eNE
RTS

%2
ACVN
X,

ROR
ROR

or ASCI! CHAR

ACNV)(
ACNV)(

i!SDLAT[ LEAST S1GNI'ICANT OCTAL#
,SET u~ ASCli~
iSTORE ASCI! C~AR

IROTATE OCTAL.
.~1

'ROM AsciI CHAR COUNT

I[XIT j CONVERTED

PALX11 . Vle~

2'004056

000000

19-NCV-10

1"04.

pAGE ,14

ACNV)(I

'WORK R[ClSTI[R

•J

,
J

'ERROR MESSAGE HEADERS

""4"6"
00426(21
04'
0042161
0011062

004063
004064
0kl4k165

004066

104

HE01'

I"OATA ERROR @/

.ASCII

I%STATUS ERROR ~I

,ASCII

IXOVERrLO XqrER ERROR 1/

101

Z40

10'

122

""4070

122
111
122
041J

10i
J
J

0"4015
004016

.EVEN
,ASCII

101
124

0041!l67

004011
004012
004013
"040'4

"04077
004100
004101

04'
123
124
101
124

004102
"04103
"04104
004105
004106
004107
"04110
004111
004112
004113

122
122
117
122
041
100

HE02.

125
123
2148

1"5

J
J

004114
00 411'
004116
004111
0041211
"84121
004122

04'
117
126
10'
122

10.

114

HEOJ.

PALJ(11
,,"4123
00"124
00 4 12'
",,,4126
004127
004130
004131
004132
004133

004134
004135
004136
004137
004140

VI'3

13'
0"
106

105
122
048
10'
122

122
111

122
m42i

0214142
004143

~45

123
113

004141
004190
004151

040

0041!i2

3.04
122
10'

0i141!34

004155

02141'6
004151
IUH1~iI

0214161
004162
004163

004164
004165
0214166

,
HED41

I%DISK ADDRESS ERROR '1

.ASCt1

1'1.'1

101
1214

123

042'
105 .
122

122
117
122
040

101

04'
1i1"

HE05A'

004161
0214110

.Asel :[

104
1.11

021414'

0214153

PAGE 1 ..... 1,

117

100

0S41~6

1"S"

041

004141

~VJ";144

19-NOV .. 71

,
J

J
J

IMESSAGE TR AI t.ERS

,," 4 111

"14172

0."173

04'
041

"...

•
M[S1'

.ASCIl!

OAiIt .1

PALX11 ,VIl13",
004114
21,,4175
004176
",,4177
004200
004201
004202
004203
004204

19-NOV-18

1'10,4

PAGE :14 ... 2

041

048
148
041
104
111.11

122
841
10.
I
J

004205

004206
004207
0042:1,0

2104211
"04212
Z~t121J

004214

04.
048
Z41
104
101
105

MES1AI

.ASCII

Des 'flit

,ASCII

HARO ERROR"

OAE ' I

"40
l~HB

,
j

004215

eJ41

~0t4216

"41

~"'4217

004220

MES2,

QJ48

e.I

004221
004222
004223
004224
004225
004226
004227
004230

84"
1iJ48
2141

004231
e04232
0"4233
004234
004235
e04236
004237
00424"
"04241
004242
004243
"""244
00424"
00'246
0842"
014250

048
148
041
fJ41
fJ48
"41
041
118
1fJl
122
10.
04"
1'"

104
103
123
2140
100

122
122
117

MES2A:

PALX11 . Vel3
00~251

0114252

0£142'3
00jf254
004255
02142'6
004251
004260
004261
004262
0134263

004264
004265
21214266
004267

19-NOV-11

15'0~

PAGE 14 ... 3

122
10.

".,

J
J

MES31

141
048
04"

.ASCII

WORD COUNT"

,ASCII

WORD "DR','"

.ASCII

0000 04TA ./

048
121
117
122
104
1214(8

1213

0fil421121

117
12'
116

","4211
004212

10ra

124
J

J
J
~"4213
~H~42'4

"04275

004216

004217
"043Q!iI
"04301
004302

004303
O,,4304
0B430'
004306
1304301

01214310
004311
"04312
004313

m4/3
12140
0481
e4fJ

r~ES41

041
141
04"
127
117

122
1."4

~t4"
,.01

104
122
.56
1011
J
J
J

004314
00431'
004316
"04317
004321
004321
21'4322

014323
084324

011
11217
117
117
104
041

10.

un.

124

MES',

PAL)(11
e04325

0'''326

0,,4321

V003

19-NOV-71

15'''.

PAGE 1 .... ~

1r1'1

"4"

10e
J

J
J

004330
004331
004332

040

~04333

049

0214334

048
04SJ

041
040

01214335
004336

040

004340
004341
01214342

1212
1211
104
040
104

004331

~"43~3

"214344
fa04345

004346
0"4341
004330

12)1
124
101
1Z14R1

10m

MES6.

• ASC I :[

BAD DATA .1

PALX11

Ve93,

19-NOV-70

151214

. PAGt 15

•J
0214351
004352
004353
004354
004355
004356
004357
01'i'436"
004361
004362
0"'4363
004364
004365
004366

004367
0214310

B41
041
84"
105
138
111
123
124

,ASCH 1

,ASCII

I%PROCESSQR BACKGROUND Th1EO OUT"

124
048
104

111
123
113

~Z4371

ra5QJ

123
9.H'1

004:]13

EXISTENT DISK(S)~"

.ASCII

1'116"

t'31a4312
00~3'15

kj56
1~"

094316

"41

004314

M[S11a

,
J

004400

"4'
1181

0044~1

1845

0214402
004403
004404
004405
01'i'4406
004407
004410
2104411
004412
004413
01'i'4414
0iJt4415
"04416
"04411
"044221
004421
004422
014423
,,"4424
0'4425
014426

128
122
117
103
10'
123

0fa4317

MES121

,
J

123

117
122
841

102
101
103
113

101
122
111

12'

116
114

14'

TH'OI

PA\..X11
00-4427
004430
0" .... 31
00 .... 32
"04433

"04434
"04435
"04436

004431

004440

V"fll3

19-NOV-10'

1,.04

PAGE 15-1'

124
111
115

105
1""

". "
111
125
124

100
J
)

el04~41

m45

"04442

10'
116

004443
,,"4444

ENOl

,ASCII

BUrrf~R •

104

fiH~11445

100

0~](~ti46

~!!4446
0~HHJQJI

9210001

.EVEN
.END

I%[NO'/

PAI.X11

V0"~

ACNVX

,,040'6

ACVN

HEOl

004"11
00332.
001132
"0277'

HE02
HED3
Jo!£D4

ADAM

ADS

AKH
81T0

BITl
8IT10
81Tl1
81112
81113
91T14
81T1.5

8112

BIT3
SIf4

B%T5
8!i6

""""01
"0""02

0028"8
"040018

01""""
02000.

040008
100008

21"""£14

0iH"'10
e02J028
2HHH14iJ

19-NOV-70

HE05A
Jo!lGH

HINUM

HRDER

15104
004075

TOSKNO
TIMO

001110
004411

1'04114
0(14142

TI<8
Tt(S

004167
001102
003234

TPB

0151016
0iH.012

00~06"

"01 UJ0

tNBUF

~01114

INOSt(

INTEXT
LOAl
LIMIT
LONUM

0013"
002532
001104
''''1104
003232

2111031

MAXRE,F"

001332
9104111

MES1
MES1!

0fZlt4J'1

00"1"8
0002""

MES:t2
M~:SlA

0ra4~16
0W42i~5

81T9

00U}0S1

t~[S2

"(ali/'H,'

BUF'

0Ql~I'6
~"?J~446

r4£~2A,

0WA2::U.

~1ES3

0~42~J3

MES4

0214213

MES'
MES6
NEOST

"0~314

13117

8li8

BurrER

~e"4~a

Cf~OAE

a"""20
002572

CNTLC

~H33'54

Ct1A

COMPAR

""2'54
211133236

Cf.lN\I
CSR

003716
0011Ul2

OV[RF'L.
PASS

DAE

0e1Q,124

PATN~I

DAR

0"1022
001636
"03106
"01&126
0""&114
002344

COMOAR

DATAT
DAYGEN
DaR

Des

DELMES
OlSeur
DISK
DKINT
OHA

DSI<NOR
EMTRP
END

ERAOR

ERCOUN
EXGEN
[XREr
EXTCME
£XTOR
EXTMEM
F'L.AG

"02'4'
002216
""22'11
m2l1,"'2
0kH.176
083611

aUTeur
PRIORI

RANF.:X

RANNU

RANRD
ROSAV

READ

REPON
RESTOR
RTIX
SAV1
SAVBUf"
SAVE

8044041

S[T8UF'

"031124

SHirT

""1066

SOF'T£R
SR
START
STATUS

0"32311
00'-302
"02664
fUIJI22

S1OR8U

"012'2

s~mDcT

rUae42

TOMA

PAGE 15 ... 2

00433fJ

001414
001:1.3.2
003.542
0eJ107.
a01k"4
"0",040
0030'4

TPS

TRACI<

TTRACK

TWROCT
TYEXIT

TVP
TYPA
Type
TYPO
TYPOAT
TYPP
TYPO
TYPS
TYPSA
TYPSB
VECYOR

wo£m~

WC)flK

I~ORK1

WORK2
WACHEe:
WRDAY
!~RDCMP

WRDeT
WROINC
WRITE
WRSAV

001Z04
001018
"010'0
"01196
0211061
~031"2

003622
W036~2

"036!Hl
01B3616
lilQJ314~

taro3114

,,"3726
"'03144
~~371m

003112
13QJUJS4
fHaUH,6
£1;3322
~01120

001122
2mi124
Ul44i17
kiQl5,162
"~32'6
e~11346

"g3266
1~~4ta3
0"21~2

0ffJS,S44

XINCW

002016

003514

XWAl"

0"3464

"""662
1S4405
001352

0022~2

0035'2
001012
"01116
001010
001516
003124
"02514
0010013

"01126
00"036
",,21,64

0tH.e64

~(H.0'2

RRORS DETECTED' 0
UN~TIM[I
I(

8 SECONDS

CORE USED