DEC Compatible Tape Controller Diagnostic Manual 91000448A August, 1980 91000448A_DEC Compatible_Tape_Controller_Diagnostic_Aug80 Aug80
91000448A_DEC-Compatible_Tape_Controller_Diagnostic_Aug80 91000448A_DEC-Compatible_Tape_Controller_Diagnostic_Aug80
User Manual: 91000448A_DEC-Compatible_Tape_Controller_Diagnostic_Aug80
Open the PDF directly: View PDF 
.
Page Count: 168
| Download | |
| Open PDF In Browser | View PDF |
(;\
v
DEC - COMPATIBLE
TAPE CONTROLLER
DI.4GNOST IC
MP.iW,~L
PUBLICATION NUMBER
91000448 A
FOR TAPE CONTROLLER 2'10DELS:
TC-130/138, TC-150/158, TC-160, TC-180, TC-190/198
TC-131, TC-151
western peripherals
14321 MYFORD ROAD
TUSTIN, CALIFORNIA 92680
© 1980
by Western Peripherals, Inc.
All Rights Reserved
PRINTED IN U.S.A.
AUGUST,
1980
PROGRAr1 TAPES
TAPE CONTROLLER MODEL
130& 150&
151
160
180
190
131
PROGRAM
PART NUMBER
1
3
3
1
1
Diagnostic Program Paper Tape (PDP-11)
01300110
1
3
3
1
1
Reliability Program Paper Tape (PDP-11)
01300128
2
3
3
2
2
Master Magnetic Program Tape (PDP-11)
68000009
2
2
2
2
2
WPDP Mugnetic Program Tape (PDP-11/LSI-ll)
68000017
3
1
1
3
-
Diagnostic Program Paper Tape (LSI-11)
67000000
3
1
1
3
-
Reliability Program Paper Tape (LS1-ll)
67000018
3
3
3
3
-
Sample Driver Program Paper Tape
01300466
KEY:
1
Standard Program
2
Optional Program
3
Special Purpose
TABLE OF CONTENTS
SECTION I
DIAGNOSTIC PROGRA.'vl
SECTION II
RELIABILITY PROGRA."1
APPENDIX A
SAMPLE DRIVER
NOTES
LOADERS, PATCHES, TEST LOOPS
PROGR.fu~
PROGRAM CHANGE NOTICE:
Any program changes will be found at the rear of the
Manual. Please refer to these chnages before operating
any program.
SECTION I
DIAGNOSTIC PROGRAM
DIAGNOSTIC PROGRAM
TABLE OF CONTENTS
GENERAL INFOPJvlA_TION
STARTING PROCEDURES
SWITCH SETTINGS
TEST SUBROUTINE DESCRIPTIONS
ERROR PRINTOUT EXPLAINATION
COMMAND & STATUS REGISTER BIT ASSIGNMENTS
PAGE
1
1
1-1
1-2
1-3
DIAGNOSTIC PROGRAM
VECTORS, TRAPS & OTHER INITIAL PARAMETERS
START (LOCATION 200)
VECTOR & REGISTER ADDRESSES
COLUMN HEADINGS
START-UP SEQUENCE
REGISTER TESTS
REWIND TEST
SPACE OVER EDF TEST
WRITE &READ TESTS
MISC. FUNCTION TESTS
DATA TRANSFER TESTS
MANUAL INTERVENTION TESTS
SUBROUTINES
ILLEGAL TAPE INTERRUPT
SUBROUTINE LOOK-UP TABLE
HALT (PRINT ERROR)
SCOPE LOOP
CHECK CONTROLLER READY
CHECK TAPE READY
CHECK REGISTER BITS
PRINT MESSAGE
COMMON INSTRUCTIONS
CRC-EXCLUSIVE OR
CRC-ROTATE
PRINT OCTAL VALUE
PRINTOUT
MESSAGES.
LOCATIONS OF SYMBOLS
CROSS REFERENCE TABLE (BY LINE NUMBER)
1-4
1-5
1-5
1-6
1-6
1-7
1-14
1-15
1-16
1-16
1-19
1-30
1-33
1-33
1-34
1-34
1- 3 5
1-35
1-36
1-36
1-36
1-37
1-37
1-37
1-38
1-38
1-38
1-45
1-46
START
2.00
\I bO
1\450
HAN\)LER
. START-UP
'SEQLIENC.E
\512.
3'1 I IRA P 3'+
I REGISTER
I
TESTS
i
DATA
I
TRANSFER
b'tlb
TESTS
ID?llO
INTERRUrt
rAP
LOOK~UP
l'llllI Lfl'2.'2..
I MESS/\(iE 5
IABL£.
HSlf,
( CALLUU\Tt. ~
1-\PPROPRl/\Tf..
5U&ROU1" IN[)
I
I
I I
I
I
llbe.O-
. IZ.502.
SULSROlHlN E.5
H
01/\GNO)Tl C PROGRAM
0 RG/\N \LAT l 0 N
10310
R£1URtJ
I MANUAL
"TESTS
.....
'-----~
,~AIN,
MALkO V06•03 05•NOV•71+ 12l39 PAlE 1
•••••••••••••••••••••••••••••••••••••••••••••
•,WP
l
!I I
JPClPll '1AG TAPE FUNCTIONAL OIOGNOSTIC •
•PPOGRAM LISTlNGW '166,i:!
•
•AUTHOR: ALU< Sl1.0TI
•
.2
.5
..
•••••••••••••••••••••••••••••••••••••••••••••
5
6
7
8
11,
I
AllSTHf\CT
TH[ MA& TAPL INSTRUCTION TEST CONTAINS A S(RIES OF BASIC TESTS rn
CHECI\ CONTHOLL['{ llEGI:ilERS FOR PROPEi< OPU.l•l
"I l
I
lf2
'13
1s.1.2
'17
MHI COr-Jl IN11£
SIU TCii sr I I l •'•(;5 AR£ I
l OH .JP ••• HALT ON ERROR
Swl5
Sl.Jl 11 : 1 Oil JP ••• SCUPE LOOP
OH wP ••• lNHliifT f'HINlOUT.
Swl~
OH uf' , , • ll'ill :;
oH dP , • • IN°ll1'1 T r·1ANUAL JIHERVUHION TEST
. ,,
Slol'J
....
'15
'IC.
I
I
I
WITll
~WITCH
~;WJTCll!S
=
=
s . . 10 =
Sw3
1 OH UP
1 OH"µ
::: 1 OH JP
= 1 OH
THIS SUUHOUTINE CALL lS PLACED BETWEEN EACH sue-TEST IN THE INST
SECTION, IT ~ECORUS THE STftRTlHG ADDRESS OF EACH suo-TEST AS IT
[!(lllG LNTUl[J, IF A S(Ol'E LOUP JS f!f.QUESTL~. lT Wil-L JUMP TO nu:
STl\HT Of Tllf SU·l•TE.ST TllAl Tltl SC:OPL LOOP IS HLQULSTING,
IERf!OH HALTI
THlS SUbHOUTINE CALL PRINTS THE ADDRESS THAT TAGS THE FAILING
SUOTLST AHO fH[ CONTENTS OF ALL THE CONTHOLLlR REGISTERS
IN FUlS11l>[ I
THIS su111wUTINf CALL PHINTS /IN ASCil 2 l'IESSAGE WHOSE STARTING /IOt.h'.
IS COIHAllJlD IN R2
IPlI
THIS SlJ!iHOlll LNE CALL IS USED TO SEVVICE UN(XPECT£D OR ILL(GAL
MAG 1 Al'[ liHlRHJPTS.
if'RlfHOUT I
THIS SU!JHOUTINE CALL TRANSFEHS THE LOWER BfTE OF "CHAR" 10 THE
PRI~TOUT ntvlCE. IUSUALLV A TlLETYPEl
IEXCLUS!llf. O~ I
Tli!S SU~kLUllNE CALL EXCLUSIVE OR•S THE CONTENTS OF Rl & R2
I Hu TL ~p I HOT AT[ (llhl'A•I[ I
TlllS SlltlltOUl !NE CALL GENLRATFS TH£ CHC CHARACHR FHOM THE
~~
.~AIN.
MACRO V06•03
05·NOV·7~
12139 PAGE 1·2
CONTENTS OF
11~
itO
116
I
SUUROJTJ~E CALLS EXECUTE COMMONLY USED
"MDV" ANO •01ru INSTRUCTIONS OF THE SPECIFIED FUNCTIONS.
CPOWER CLfARI
SETS OIT 12 OF ~TC
IWRJTl ONE RLCO~Ol
lNITIATlS WRlTE COMMAND
CRfAO 0~£ R[COR)I
INITIATLS R[AU COMMANO
IWRITE LNU OF FILEI
INITlATLS WRITE FILE MARK
(REWIND JAP[I
INJTlAJlS RE~lNQ OF TAPE UNIT
CSPACL fOkWA~OJ
INITIATLS 5PACE FORWAHD COM~ANO
ISPACE UACKWAMQSI
INJTlATLS SPACE RACKWAROS COMMAND
CSELfCT TAPE UNIT)
SEL[CTES TAPi U~IT TO OE TESTEO
IWMJT[ ourFE~ TJ CAI
SElS CA 10 SIART OF WHITE OUFfER
IMLAO DUFFER TO CAI
S£1S CA TO START OF READ BUFFER
IMINU5 ONl TU BCI
SETS nc TO MlNUS ONL
IMINUS THHlE TO BC)
SETS BC TO MINUS THREL
IMINUS fUUR TO ~Cl
S[TS DC TO MlNU~ FOUR
(TEST FUR lOFI
1£STS FUR FILE ~ARK DETECTION
16.
£RHOHS
lb.l
I
I
lkkOH PRINTOUT FOHMAT
WITH SW13=o COR QOWNI THE FOLLOWING PRINTOUT WILL APPEAR ON AN ERRDR
PC
STATUS CJMAND ~YTE
CA
DATA B READ L TEMP
CRC CAL
117
ITHE FOLLOWING
118
119
120
121
122
I
123
12'1
125
1"6
127
128
IPwHLLR
I
1WRll(
I
1RlAU
I
&WPEUF
I
lll[Wl\10
I
129
ISPALEF
130
I
131
132
I
ISPAl£0
133
I SELL CT
13'1
I
135
136
I W!JU~ CA
I
137
IRUU~CA
138
1.59
I
1'10
t '11
I
1'12
I
1'13
l '1'+
1'15
t '16
IMIN1~C
IMIN.HC
IMIN'+:!C
I
ITS Tl :lF
1 '17
1118
1'19
150
151
152
153
15'•
155
156
157
\58
15')
160
161
162
163
lb'I
165
166
167
168
16
UUFF~7J6
ITRAP SUBROUTINE TABLE EQUATES
ol!AINo
286
287
268
269
290
291
292
293
29'1
295
2%
2Y7
296
299
300
301
302
303
30'1
305
306
307
l!ACRO V06•03 05•NOV•7ij 12139 PAGE 1•5
000200
001000
001002
00100'+
001006
001010
001012
00101'1
001016
uo1020
001022
00102'1
3Gll 001026
309 001030
310 001032
311 Olllu,H
312 00103£.
313 001 040
31'1 001042
315 00104'+
316 001046
317 001050
310 0010fi2
319 001054
320 00105£.
321
322
32l
324
325
326
327
328
32'J
330
331
332
333
33'1
335
336
337
33ti
339
3'10
3 111
342
001060
001062
OOlQ(,'i
0010f>6
001070
001072
001074
001076
001100
001102
00110'1
001106
001110
001112
00111q
001116
OUl UO
001122
00112'1
001126
001130
oooouo
RO=so
00001.ol
000002
oooou.5
0000'-'+
oooou:.
oooou6
00001.17
0002uo
f0
00021>2
0002'<'+
0002.:6
1725<'.0
112':li:.il.
R3=~3
Hlf=%'1
H5:~i:,
001160
HTNADI
HTAAD:
MTNV:
HTNSl
HTAV:
HTAS:
MTV:
MTVSI
HTSl
MTCI
1125~'1
1:1c:
172tilf>
17"5.)0
CA:
1725~2
177~1<>!.
f'ITD:
f'lltW:
SP=l:>6
PC::'l'.7
.=200
..IMP
START
.=1000
172fi20
172720
22'1
226
260
262
22'+
226
172520
172522
J72S2'1
172526
172530
172!d2
1 775&6
J 775v ..
TO!lHl
TCSH:
0000~0
IuTSTI
0
THTl
005Qj7
0050H
0050j7
012111
01n:.1
0050.H
00!>0.l 7
OO!JO.:l 7
OB7UO
04'7"0
0100~7
H.21uo
0100.:>7
01371.10
0•1271JO
0100j7
0527U0
01271.11
0003'10
oou:,o
000776
0010'12
177776
000036
0114~0
0 0 0 3'1 0
001100
001072
000006
177570
177'137
001104
0000'10
001110
177570
17'1377
00110£.
060001
001112
0]00~1
06:?71.10
0010111
001016
1771146
l 77'1112
001102
000002
177'110
001016
MTVNI
BEGINI
,'.·,
-r
.=.+20.
Cjt- L_,\.
~
J' ~·t i\
(=, I \
:~)
ITEMP STORAGE FOR TAPE REGISTERS FOR ERROR PRINT
MOY
llBUFF,SP
&RESET STACK
HOV
lll'ISGOtR2
PRTHSG
iPKINT MESSAGE IN iR2
HALT
&RESET CYCLE COUNTER
MOVA
U60,HSG13+11
MOVA
a60,HSG13+12
MOVA
a61,MSG13+13
1MOOIFy MAG TAPE HEGISTERS ADDRESS ACCORD!"& TO SW It
MOV
UMTS,R2
HOV
MTNAD 1Rl
OIT
a20.sR
I IS SW 'I SET?
8[0
lAMO
INO, GENlRATE NORMAL HAG TAPE ADDRESSES
MOV
MTAAD,Rt
IYES, G£NERAj£ ALTERNAIE HAG TAPE AOORfSSES
HOV
Rlt1R21+
ADO
112,Rl
&GENERATE NEXT ADUERSS
CMP
k2tUMTRO
Ill[
lAMO
tMOOlF'( MAG TAPE INTERRUPT VECTOR ACCOROIN& TO SW ~
OIT
1120,SR
IIS SW II SlT?
8t.Q
l'ITVN
!NO, GfNlRATE NORMAL IHTERRUPT VECTOR
MOV
MTA\/,MTll
IYES, GEN ALTERNATE INIERRUPT VECTOR
MOV
MTAS,MTVS
MOV
UMTTHP,@MlNV
MOV
a34o,MTNS
BR
B£GIN
MOii
IHN\/1HTV
MOV
MTllS ,MTVS
MOV
llMTTkP,~MTAll
MOV
11340,iMTAS
MOV
llOEGIN,RETURNISET UP RESTART OF PROGRAH
MOV
aOUFF,SP
!kt.SET STACK
CLR
TMTNFL
!CLEAR TAPE MOTION FLA&
CLR
CC
ISET PfiOCfSSOH PRIORITY TO 0
CLR
@1136
!SET TRAP PRIORITY TO
MOV
llMTTRP,~MTV
ISET UP ILLEGAL INTERRUPT RETURN
((\ ') \'"\ -\ \j -\~~
MOY
--113t;n,MH'S
1su INT£RHUPT \/ECTOR c
CLR
PfHNTl
llrllTIALIZE lf6
kLSLT
BIT
11137600,ilMTS
Ula
, +It
Ill r
10'f4UO
IERRORt INIT OION•l CLEAR l''ROPER
ans IN STATUS
•.............•................................... ·······$·············
1TEST UINIT TO CLEAR BYTE MECORO COUNT
1011'102
SCOPL
005717
Rt:SET
TST
oooou5
177246
01) 1 11Ul
BUI
l0'14LO
ltLT
.....
;lBC
l[RRORt !NIT 010N•T CLEAR BYTE COUNT
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
1TEST
TO CLEAR CURKENT MEMORY AOURESS REGlSTEK
l~IT
001562
0015611
OC156t.
001572
00157'1
10440~
oooou5
005717
0014Ul
104'1UO
171231f
'13'+
001576
001600
001602
001606
001610
001612
00161'l
lfll'l 001616
'1'15 001622
'+'16 00162'l
4'l7
'148
41f9 001626
'+50 001630
lf51 001632
'l52 0016'10
lf53 001642
't51f
1155
lf56 00104'1
10lf 'IU2
oooou:>
005717
0014U1
177222
iilCA
0£Q
.....
SCOPE
kESlT
TST
•ino
tl[Q
....
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
tTEST CU RfAOY !BIT 7 COMMAND ffEG15TER) TO 6£ SET ON INIT.
SCOPE
10'14Ui!
oooou:;
Rl~t:T
TSTA
OM I
177200
1004Ul
iilMTC
•+'I
IERROR, INlT OION•T SET CU AEADY
,1TCST
•.................................•...............•.•.......•........•
UIT 14 OF TUtO READ LINES TO BE CLEARED BY INIT
HLT
1044v0
l04'lU2
SCOPE
032711
RESET
UIT
BEQ
ooi.ou5
OOl TO CLEAR BYTE RECORD COUNT
SCOP[
PwRClfl
TST
@BC
177114
0014U l
lOlf717
1199 001760
500 001 '/62
Oul 76'1
502 001712
001774
1ERROR, POwER CL£AH OIDN•T
CLEA~
DATA BUFFER
.•••...............•..•....•.•..•.............•...
······*··············
1TEST CU H(AOY IBIT 7 COMMAND HEGIST[R) To BE SET &Y POWER CLEAR
SCCP£
PolHCLR
TSlB
ilMTC
OMI
.+If
1770116
lOO'IUl
till
1041fu0
101fll02
10441'+
Qjt;717
001'11.Jl
104'1lJ0
ilMTO
• +I+
11LT
104'1~0
IERHDR, POWER CLEAR DIDN•T SET CU READY
•••••••••••••••••••••••••••••••••••••••••••••••••• •••••••••••••••••••••
1l£ST BIT 14 OF TUlO HEAD LINES TO UE CLEARO BY POWER CLEAR
4•H
1198
50'1
505
506
507
50/i
509
510
511
....
llLT
···············································~·*
104401!
10441'+
50~
PWRCLR
BIT
•17757Tti"TC
0£0
101141.10
001662
001664
0016f.6
001674
001676
501
1•8
SCOPE
I' .iR Clf<
040000
1770'10
011
fJEQ
HLT
..
••oooo,i"TNo
~
!ERROR, POWER CLEAR FAILED TO CLEAR Billi+ OF 7U ID REG
1•••·········································•••*•
••······•····•·••·••·
tTEST FUNCTION BITS Clo2o3l OF COMMAND REGISTER
BE SET
CA~
001776
002000
002006
l 0 .. 4 u 2
012717
12:'711
011201'1
002016
001"01
10441.0
513 00<.'020
ll;•;lf lJ 2
51.2
SCOPl
000016
000216
177014
1 77006
MOV
LMl'H
ll(Q
HLT
#16,@MTC
#216,@MTC
....
IERRURo CU READY ANO ALL FUNCTION BITS NOT SET
••••••••..•••.•••••••••••••.•••••••••••••••••.•••• ···········••••*•*•••
1TEST FUNCTlUN 81TS Clt2o3l OF COMhANO REGISTER CAN BE CLEARED
SClJJ>(
0
llAlNt
MACRO V06•03 05•NOV•7'1 12139 PASE 1•9
002022
002030
002036
0020'1'1
0020"6
052717
0'+2711
032717
OOllfUl
002050
002052
002060
002066
002070
002072
0020711
UU2102
002110
002112
00211'1
Ou2116
533 00212'+
534 002U2
535 00213'+
1041tlJ2
51't
515
516
517
516
!>19
520
521
522
!>23
524
52!1
526
527
520
529
530
531
532
53.; 002136
5,H
538
539
540
541
542
543
0~2140
002146
00215'1
002156
002160
002162
002170
176712
17t.7&1f
1767!)6
£:11 s
SIC
BIT
B[Q
lO't'tUO
#16.Cil1''7C
116,iill'ITC
116,iill'HC
,+If
HLT
IERROR1 ALL FUNCTION dITS ~OT CLEARED
···················~······························
1TCST FUNCTIONS BITS 11121311 OF COMMAND REGISTER CAN BE SET AND CLEARED
SC.OP(
MDV
112 1 ii•MTC
CMPA
11202,@MTC
.....................
012111
122111
000002
000202
1nn2
17t.H4
OOl'+Ul
1041tuO
10'14Ui!
01.2 7
i'
12".717
00l'IV1
UHi
000004
000204
176720
176712
10'14~0
l0 11'1lii!
012711
1227,,
OU14U1
000006
000206
176616
17t.670
10441J2
Ol;-711
122717
OOl'lll 1
1044.iO
104'1U2
01-.UIT
122111
002200
002202
00220'1
002212
002220
oun22
00?224
OCJ2226
00223'1
~~"
002242
Otll 't lJ 1
l 0441J0
1Qljlj1J2
012711
1227'7
0014lJl
l04 11v0
10•11102
Olt-711
12<'777
OOl'tlJl
555
556
!>57
558
559
'!:.60
:161
562
5&3
564
565
5t.6
:lt.7
56tl
569
570
0022'14
l0411UO
0022"6
1044UZ
002250
002256
00226'1
002266
0127'7
122717
(J014li l
002270
002272
002300
00230;,
00231'1
002.H6
l 044U2
052717
042711
032711
001It0 l
116,iilMTC
11206tiilMTC
[J[l.J
• +'I
IERRORt FUNCTION NOT :001
REAOI
IERRORt FUNCTION NOT :010
WRITEl
!ERROR, FUNCTION NOT =011
WRITE [OF)
!ERROR, FUNCTION NOT :100
SPAC( FOflWAROI
ICRROR, FUNCTION NOT K101
SPACE REVERSE)
lllf,iilMTC
1120'1 ,clMTC
• +'I
SCOP£
000010
000210
000012
000212
1766:\'i
1766'+6
176£.32
17&62'1
MOV
CMPA
AEQ
HLT
SCOPE
MOV
CMPB
fj[Q
HLT
00001'1
000214
17b610
176602
SCOPE
MOV
CMPtl
U[Q
f1L T
lll01iill'1TC
112101iilt'ITC
,+'I
#12,@MTC
1121?,iiMTC
....
....
111'1 ,@MTC
1121'1, mMTC
!ERROR,
FU~CTJON
NOT A110
WRITE XIfiGI
SCOPE
000016
000216
17£.51>6
17651>0
MOV
CMPO
1116,iilMTC
11211>,iiMTC
··"
•••••••••••••••••••••••••••••••••••••••••••••••••• •••••••••••••••••••••
!ERROR, FUNCTION NOT alll
fj[Q
REWIND!
HL1
000060
000260
17654'1
176536
lOlt'tUO
1 O'i4l·O
• t'I
HLT
SCOPE
MOV
CMPB
BEQ
llLT
SCOPl
MOV
CMPB
HLT
lO'l'luO
545
546
547
548
5119
550
551
552
553
5•14 OO?l 76
000016
000016
000016
SCOP[
1TEST AOUHESS BITS 14t51 OF COMMAND REGISTER CAN BL SET
MOV
tl60,@MTC
CMPO
N26o,@MTC
{Jt.Q
• +'I
1£RRORt CU READY ANO AOOR£)S BITS NOT SET
HLl
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
1TEST ADOHESS fJITS l'le51 OF COMMAND REGISTER CAN Bl CLEARED
OOOObO
000060
000060
176522
17651'1
176506
SLOP[
IS
IJ
UIC
lJlT
lJEQ
l•L T
111>0,0IMTC
i160,iii11TC
1160,iilMTC
• +'I
!ERROR, ADDRESS BJTS NOT C1£AREO
,l'IAIN.
571
572
573
5711
!:175
576
577
5711
579
560
t.B 1
582
583
584
585
586
!>67
HACRO V06·03 05•NOV•7'1 12139 PAi[ 1•10
•1TlST
••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
ADORCSS OITS
OF COMMAND REGISTER CAN BE SET ANO CLEARED IN
l••~t6l
002320
002322
002330
002336
0023'l0
002.3'12
0023'+4
Ou2352
002360
002 362
00236'+
002366
00237•1
002'102
002~0 ..
10'i'llJ2
012717
122711
0011101
104ijU0
1044u2
012717
1227l7
0011\lJ l
104tili0
lO'lliUi!
u12111
122711
0 01 llll l
l0'111uO
000020
000220
176llb'I
SCOPE
MOV
CMPfl
176'150
17&'1112
HLT
SCOP[
MOV
CMPfl
176'126
t7b'+20
HLT
SCOPE
MOV
CMPl3
1764 72
U[Q
0000110
0002'10
U£Q
000060
0002bO
U[Q
1120,GIMTC
11220,GIMTC
.....
!ERROR ADDRESS BITS NOT
:z
11110,@MTC
112110, CilMTC
....
!ERROR, ADDRESS BITS NOT a 2
1160,iilMTC
11260,iilMTC
,+4
HLT
IERRORo ADDRESS BITS NOT • 1
,1TEST
...............................................•.
UNIT S[LECT ens ca,9.101 OF COMMAND REGISTCK CAN
··················~··
!;68
569
5':10
591
5'J2
593
!>9'1
595
5%
597
591J
5'J9
600
601
602
603
6011
605
606
607
606
609
610
t.ll
612
613
61'1
615
blt.
61"/
616
619
620
621
622
623
624
625
626
627
R~G.
002406
0021110
Oll2416
00242'1
0024'26
lO~'+U2
012711
022711
0014U1
1011111;0
0031100
003600
17640 ..
176376
SCOPE
MOV
C1~P
B£Q
HL T
6£ SET
1131100 ,ii111TC
113600, iill1TC
....
IERRORo CU READY ANO ALL
U~IT
SELECT BITS NOT SET
···········································~······
1TEST
U~IT SLLECT oITS l819el01 OF COMMAND REGlSTC~ ······•*·············
CAN DE CLEARED
002'130
002't32
0024 .. 0
0024'+6
00245'1
002'l56
0021160
002462
002470
C,02'176
002500
002502
002504
002512
002520
002~22
0025211
002~126
10•11+UZ
052717
0'12711
032711
00141Jl
10411ll0
1011111.iZ
012717
022711
0 0 t •111 l
10'14UO
I,
SCOPE
003400
0031100
003400
1763&2.
17635'1
17611'•6
022 7"
001•1u1
104'11! 0
l04liU2
012111
00253't
002542
1)025114
002546
022111
002~i50
01;;111
002556
0025611
002566
002570
002572
002600
02;,717
0014Ul
104'1~ 0
1044112
012717
llEQ
• +II
!ERROR, UNIT SELECT SITS NOT CLEARED
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
1TEST UNIT SELECT HITS (8,9el0l OF COMMAND REGISTE~ CAN BE SET AND CLEAR~D
OOO'tOO
000600
176332
17632 ..
SCOPE
MllV
CMP
fl(Q
001000
001200
176310
116302
HLT
SCOPE
HOV
CMP
P,(Q
HLT
ll'IOo,@MTC
11600 0 cilMTC
.....
IERRORt UNIT S(LECT NOT
~001
111000,0iMTC
111200, cilHTC
•••
!ERROR, UNIT SEL(Cf NOT aOlO
SC.OPE
0011100
001600
176266
176260
OOl'lvl
1044UO
104'1l f,52
002654
02t''f/1
003000
003200
176200
1 761 72
BEQ
HLT
SCOP£
MOV
CMP
f)[Q
003'100
003600
176156
176150
OOJltul
104'1UO
HLT
SCOPE
MOV
Ci"tf'
HUI
.+'+
IERRORt UNIT SELECT NOT •lul
U3000eilMTC
U3200oilMTC
.+4
!ERROR, UNIT SELECT NOT •110
113'1001ilMTC
ll36o01CilMTC
• +'+
!ERROR, UNIT SELECT NOT =111
HLT
,1TEST
•..•............•..................................•.......•...•.•..•.
l'AHlTY BIT 1B IT 111 CAN
SCT
tl[
tl02G56
002l60
OU2f,66
Ou2t:.7'1
002€.76
l044L2
052717
032717
001ou1
104400
002no
1Ci4'1U2
052711
042711
03?777
0014lJ1
lU4'1UO
004000
00'1000
176134
176126
SCOPE
BlS
BlT
l:lNE
HLT
114000,iilMTC
U40oO,iilMTC
.+4
!ERROR, PARITY NOT SET
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
!TEST PARITY BIT WIT 111 CAN BE CLlAREO
6:11 OU27tJ2
1>~2 002710
653 002716
t.54 00272'1
655 002726
656
657
t>!i6 002750
t,5':1 Ou2732
t>oO 002740
661 002746
662 002750
663
61>'1
665 002752
666 00275'1
667 002762
6t.ll 002770
6b'1 002776
670 003000
671
672 003002
673 00.300•1
67'1 003012
67!J 003020
676 003022
677 003024
678 003026
679 003034
660 0030'12
t.81 003044
682 0030'16
b£l3 003050
f>84
0014Ul
104400
l044UC!
014'717
022711
0014ul
l044vO
104'1lJ2
012717
003D56
SCOPt:
00'1000
004000
004000
176112
1n1011
176076
t:Jl s
BlC
BlT
13EQ
HLT
ll'IOoo,@MlC
n110,10,01l'ITC
U'IOoO,CilMTC
•• 'I
1£RROR, PARITY OlT NOT CLEARED
·····································-············
1TEST DENSITY UlTS 113tl41 OF COMMAND REGISTER CAN ········•····•······•
BE SET
lO'l'IUi!
01<'711
022111
060000
Ob0200
176062
17b05'+
0 l '1 lJ l
104'1u0
SCflf'L
MOV
CMP
f3(Q
(j
llLT
1160000,CilMTC
1160200,@MTC
.+'I
1ERROR1 CU READY ANO DENSITY BJTS NOT SET
••••*•••*••··········
1044112
052717
0'12711
03l711
060000
060000
060000
17b0'10
176032
1160~ ..
0014lll
104'+L 0
104'1lJ2
012.711
0?2711
!iEQ
HLT
020000
020200
17bOlO
176002
0227/7
0014lJl
1044U0
Ol!OOOO
040200
175766
175760
012111
022111
HLT
SCOPE
MOV
CMP
BEQ
10'+ 11 ~2
060000
060200
17574'1
175736
....
1TEST OfNSITY BITS 113tl'll OF COMMAND REGISTER CAN Bt SET ANO CLEARED IN REG
SCOPE
MOV
1120000,@MTC
Cl'IP
1120::>00,@MTC
BEQ
0014Ul
l044ll0
l 0 1<4L 2
012111
·························~························
1T£ST
DENSITY BITS 11311'11 OF COMMAND REGISTER CAN OE CLEARED
SCOPE:
blS
1160000,iilMTC
IHC
1160000,@MTC
UlT
1160000, iill1TC
ltL T
SCOPE
MUV
CMP
• +'I
1£RROR, DENSITY NOT :ol
1140000,@HTC
U'+O;>OO,iilMTC
.+4
!ERROR, DENSITY NOT =10
l160o001illMTC
1160;:>00,iili1TC
·"AIN,
685
686
687
688
689
690
691
692
693
69'1
69!'>
696
697
698
699
700
701
702
703
7011
705
706
707
708
HACRO V06•03 05•NOV·7'+ 12139 PASE 1•12
00306'+
003066
OOlllOl
10111100
003070
003072
0(i3Q76
0031011
003112
0031111
003116
00312'+
0031.!6
003132
10'111112
BEQ
HLT
~YTE
oosoH
ou717
0010'111
0010'1'1
0010'1'1
175720
175712
f)[Q
HLT
....
BlT
lllOOOO,SR
010000
1775 70
0010li2
005237
0013bl
(JN[
001011'1
0010'1'1
00 I ;••t
1756!>6
003150
003156
003160
Oil 1 o ...
175650
003162
00.H 70
003112
032P7
001002
010000
OO!J2-l7
0010'111
710 00317f.
0013ul
001226
00323'+
003?36
0032112
00324'+
0032'16
0032511
003262
00326'1
003266
731 00327'1
732 003302
733 00330'4
73'4
737 003310
736 003.312
73') 003320
740 003322
7 111
!INHIBIT ITERATION?
·•6
JJJC
TEMP
ONE
TUC
~TEMP
·······················~··························
1TEST
ALL BITS OF CURRENT MEMORY ADDRESS REGISTER
SCOPE
CLK
TEMP
TMAI
MOV
TEMP,iilCA
CMP
TEMP,CilCA
001•1Ul
l01tt+UO
lj[Q
HLT
177570
BIT
PATTER~
• +'+
!ERROR, CA NOT : TEMP
1110000,SR
ONE
.+6
Ir•C
TEMP
TMA
ONE
llNHlOIT ITERATION?
,1TEST
•................................................
DlTS 0•7 OF DATA-BUFFER TO ACCEPT COUNT PATTCRN
·············~·······
104'4U2
OO!;-O,) 1
113717
123711
SCOPl
0010'<'1
001 Qlt't
0010'1'1
CLR
1756111
175606
OOl'tUl
l044UO
0321:.1
TOBI
1101/[i
CMPO
ljLQ
177570
T
BIT
001ou2
loti2-H
0013bl
0010'1'1
10•111u2
052'111
032717
01toooo
175556
::>COP£
f:llS
OitOOOO
175550
BIT
0 110000
0'10000
175536
175530
TEMP
BNE
TOB
El IC
Bil
Bt:O
1lNHll:lIT JTERATlON?
INO
11110000,iilMTRO
11'10000,iilMTRO
• +'I
1£RROR, BIT 1'1 OF MTRO NOT :1
ll'+OOOO,OIMTRO
ll'IOOOO,iilMTRO
• +'I
HLT
IERROK, BIT 1'+ OF MTRO NOT :O
1TEST FOR TAPE UNIT READY CBIT 01 SET
SELECT
10't't~2
104'4U0
• t (,
WCB
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
scort.
l04'1U 2
032717
001ou1
!ERROR, DATA DUFFER NOT • TEMP
ONE
ONE
HLT
lO'l'luO
03"711
001'101
1 O'l .. vO
• tit
1110000,SR
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
1TEST OIT 1'+ OF MTRD CAN BE SET AND CLEARED
001001
0'12111
TEMP
TEMP,ciMTO
TLMP,QIHTO
~lL
010000
735
736 003306
IERROR, BYTE COUNT NOT
,0················•····
ACCEPT COUNT
01 3111
111
712
713 003;>00
71'+ 003202
715 003<'06
716 0032111
717 003222
718 00322'1
TEMP
TE:i'IP, iilBC
TEMP,CilDC
0011101
023711
0031311
003136
T6CI
SCOPE
CLR
MUI/
CMP
1C>44U0
o3<:P7
023717
0031'+2
719
720
721
722
723
7211
725
12L
727
728
729
730
!ERROR DENSITY NOT :11
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
&TEST ALL BITS OF
COUNT TO ACCEPT COUNT PATTERN
104402
OO!:O-l 1
10~·
....
000001
175500
nn
BN[
HLT
.....
111,0.HTS
l[RROR TU READY NOT SET
1••*••·······*···································· ···········*·········
.MAIN.
~AtRO
VU6•03 05•NOV•7'1 12:39
PA~E
7 .. 2
7 .. 3 00332 ..
7411+ 003326
7415 00333'1
7'16 003336
7'17
104402
032711
000002
17546'1
OOl'IUl
101t'+v 0
1044U2
750 0033'12
032711
OOl'llll
00000'1
10'l4UO
o3·nn
104400
HLT
• +'+
IERROHo WRITE LOCK IS SET
Ulo,@MTS
....
1lRHOHt SETTLEDOWN IS SET
·····••*••···········
l034U7
lO•ti+IJ2
032711
001'+ll1
101f4U 0
177570
000020
1751112
00U4l. &
oo3i+l41
10'llf U2
003416
u3;>711
001oul
.:;o3<+21f
003426
7714
775
776 003<+ ~o
1041f U0
777 OOJ'•32
771J 003••~"
779 00~ 1 1'12
1D'l'lj2
IJ!l2"111
71lO CJ0.34'1'4
104•11.10
HOH
UCS
SCOPE
BIT
ni:o
HLT
SR
T7CH
U~
TSR
llS
S~U=l
ITES SKIP 9 CHANNEL TEST
1120,iilMTS
....
!ERROR, 1 CHANNEL SET WITH 9 TRACK S£LECTCO
&SKIP 7 tHANNEL TCST
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
1TEST FOH 1 CHANNEL IOIT 41 SET IF 7 CHANNEL S[LfCTCO
T7CH:
000020
175374
SCOPE
lllT
UNE
HLT
1120,iSMTS
.+4
&ERROR, 7 CllAiJNEL NOT SET
····································*·•···········
·················•*••
&TEST FOR UEGlNNlNG Of TAPE (BIT 5) SET
TSRI
lO'l'H'~
0000'10
175356
0010~1
702
783 003<+<+6
1044ll2
7/llj 0()3'150
785 003'156
032711
786 003%0
10"4 uo
167 OU3•t62
78b
OO~O·H
SCOPI:.
SELECT
llll
lllfO,ilMTS
ONE
HLT
.+4
IERHOR, BOT NOT SET IORIVE SHOULD BE AT aor1
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
1TEST fCH 5ELECT/H[MOT£ IUIT 61 SET
7el
SCOPE
000100
CiOlOUl
1753'+2
lllT
l!NE
Ill T
0010'10
CLR
....
11100,.fU:U
00333'1
756 003356
"f57 00336'1
7!:>8 003366
759
7~5
76'J
no
7"/}
1·12
7B
SCOi'l
lllT
ULU
HLT
175450
753
7!:>'1
7b0
761
762
763
U'I
7t.5
1T£ST FOH REWlNO STATUS C6If 11 CLEAHEO
SCOPI:
on
a2,aHTS
BEQ
.+'I
HLT
IERRORo REWIND STATUS IS S£T
···~··············································
&TEST Fok WHITE LOCK CBIT 21 CLEAHlO
7'16
7'19 0033'10
751 003350
752 003352
t•lj
0052.)7
10440.?
00101+2
WllUFl A
!SET TAPE MOTION FLAG
!TEST CONTROLLER READY
ILHROR, CONTROLLER 010 NOT GO READY
!SET BYTE coutJT TO MIN.IS ONE
• l"IAIN.
799
600
601
802
803
80'1
805
806
807
606
809
810
811
812
813
81'1
815
616
017
816
lll'J
820
021
MACRO V06•03 05-NOV-7'+ 12:39 PAGE 1•1'+
003!10'+
003506
003512
00351'+
003516
003522
003526
003532
003!:.3'1
003'.l.'16
003540
003!:>42
0035'1'•
0035 116
0035'i0
003552
003!:>54
003~,<.o
003:.-i62
Ou3~6•+
00.'1'>72
003!:>7'1
003~76
622 0031..00
623
824
825
626
827
8211
829
8jQ
831
832
e33
65'1
835
636
8.H
8.56
839
8'10
841
642
843
84'!
645
646
647
046
64')
650
651
852
653
854
855
00jh02
003(.0'1
003606
003610
003612
01.L~t..l76
00370'1
003706
003710
003716
003720
003722
0(13726
10'+'+.!l
105717 175310
lOOOUl
10441.iO
Ol37U2 001020
012Juj 0000'10
Ot27U4 000005
i o4 .. ! a
104'1U0
10'1'1 v ~
lO•t4vO
1044:.->0
1044U0
1 04 .. ~ i,
001ou1
104'1U0
01lt7'7 1752'+11
OOlOUl
l0'14ll0
022111 0111556
OOl•llJ l
10'1'1 oO
l 0•14 l ..
104'1" 6
0014Ul
17523'+
WREOF
TSTR
llf'L
HLT
MOV
MOV
MUV
TSTRGR
HLT
TSTCUR
HLT
wAITTR
HLT
TSTEOF
BNE
HLT
TST
llNE
HLT
CMP
llEO
tlL T
PWRCLf<
1 STEOF
U£0
lO~'tvO
HLT
....
il'ITC
flTS,R2
ll'+O.H3
#5,R'+
IEHRORe CONTROLLER 010 NOT GO SUSY
!ASSIGN STATUS REG TO eE TESTED
!MASK !JOT
1TEST REG FOR RESET
IERROHt BOT IBIT 51 NOT CLtAREO
!TEST CONTROLLER READY
IEHROR, CONTROLLER OID NOT GO READY
....
....
....
I EHROR, TAP£ UNIT RC:ADY 010 NOT 60 SET
1ERROR 1 EOF 161T 141 NOT ;: I
.iiBC
#WBUF,iilCA
.....
IERROH, urn: COUNT SHOULD NOT INCREMENT ON WRITE EDF
I ERROR, CUflflENl ADDRESS SHOULO NOT INCREMENT ON
~llRI
!ERROR, POwER CLEAR 010 Nor CLEAR EOF !BIT 141
I••••••••••••••••••••*••••••••••••••*•••••••••••••
•••••••••••••••••••••
&TEST REllINO FUNCTION
104'1 Uii!
104'1\J'+
l0411UO
10442
001001
104'1~0
00£,0 IT
1030U1
l0'14UO
01 "37V2
01<' 7Uj
0127lJ4
10'1410
175152
001020
000002
000007
057/lJ2
0327 f1
OOJOUl
1044U0
175122
000010
03;>711
OOlOUl
0000110
....
....
110\J
1044~0
1U44U0
013 7t1 2
01"7U3
!TEST CONIROLLER READY
!ERROR. CONfHOLLfR OIO NOT GO R£AOY
&WRITE EOFt GO
ITEST CONTROLLER READY
IERROH. CONTROLLER 010 NOT GO READY
17!Hl'+
fHH.
till
001020
000010
175102
llO!tll3
MOV
117,R'+
TSTRC:.R
HLT
@MTS,R2
BIS
Ill O, iilMTS
fill
BIT
l3NE
llLT
MOV
MOV
....
!TEST CONTROLLlR READY
IERRuR, CONlROLLER OIO NOT GO READY
!ERROR. REWIND STATUS CBIT 11 NOT a l DURING REWIND
I ERROR, TU READY NOT =O
!ASSIGN STATUS REG TO BE TESTED
!MASK REWIND BIT
!TEST REG FOR RESET
IEHROR, RfllI~D STATUS bIO NOT CLtAR
IDC:LAY A SHOR1 TIME
!CHECK SETTL[ OOllN BIT
!ERROR, SETTLC:DOWN
STAl~S
DID NOT SET
1140, iilMTS
• + '+
11TS,R2
1110,R3
!ERROR, BOT IBIT 51 NOT =l WHEN SOWN CB!T !I SET
!ASSIGN STATUS HEG TO bE TESTED
IMASK SETTLrDOWN STATU~
TE LJlF
•"'AlN.
856
857
858
859
860
861
862
863
86'1
Obt>
866
867
llbB
tlb9
870
871
B72
MACRO V06•03 05-NOV•7'+ 12139
003732
003736
003740
003742
0037'+6
003750
003752
0127U'+
lO'li+J.0
l0'11tUO
006(117
103itU1
00375'+
003756
003760
10
886
003716
004000
00 110 02
00'1004
00'<006
00 1101'1
004ol6
004020
004024
CO'i026
00•1030
00'!032
61H OO'tiJ3'1
BOB
B69
690
691
892
893
89,.
llu'I036
0040~0
004042
00'10116
004050
0040!12
Oll4060
8'J~ OO<;Ob2
B% 00406'1
897 00 11072
69fl 00'107'1
09'J
900
901
902
903
904
905
906
907
908
909
910
911
U04tl76
004100
004102
004104
R~Wl~b
············································$•••*•
•.............•......
1SPACE OV(H cor TCST
873
874
B75
Bib
8 77
878
1•15
10'14U2
10'1'1-'li
104'1 :.io
l044UO
012711
1TEST SPACE FORWARD TO STOP ON FIRST tOF
SCOPE
HE WINO
l.IAIT 1H
177776
175010
lo41t.::o
SPACE.F
TSTB
1711776
10001.11
10'1 1! UO
lli'l
HLT
TSTCUR
10441!~
l.0 1l'!U0
1044-I!•
OOlOlll
l04quO
00!•7I1
ttll
171175'+
10041.11
10'14LO
022711
177777
17'+ 7'1lf
001 .. u 1
10•141JO
022111
MOV
17'+734
IERRORt IBIT Uil OF Col1HAND REGISTER NQT::l WITH (OF SlAiU5
HLT
CMP
10•14.l ~
f'.IHCLH
IJL T
10'!4 'l (,
001'1Ul
lO'+7
OHOU 1
0010110
'}39
10'+4~0
10'1'1.:.~
10'+416
104'11> ..
004232
00~·2·''
0010 .. 0
'i'IO 004?36
032717
001000
941 OO'l2'l'i
001ou1
9 112 0042'16
943 0042~0
94'+ 004'25'+
945 004256
'J4o 00421>0
947 004266
10'1 1 1~0
177570
17'i5t.6
17'1550
uca
l O't'IUO
HLT
014557
171151iO
CllP
urn
9 118 004270
104'+00
HLT
949 004272
%0
951
lO'l'IH
PWRCLR
9~3
95'+ 00'127'i
955 0011276
104'102
95(, 004 300
10'+'1 hO
%7 00'1302
lO'lllUO
0'3'.'.7 II
9bl 004316
9L2 004320
963 00'1322
96'1 00'+32'i
965 00lt330
906 00433'+
967 004340
9bll 004342
9&9 00 11344
!ERROR, BYTE COUNT SHOULO MAVE INCREMENTED FRO" lCKIJ
.+ ..
I ERROR.
cuRHENT ADOt
104'1~0
OB7U2
0127V3
001020
000040
0127u~
000005
104410
lu~tlliO
l(Jii
"u
~
17*1506
......
.~AINe
HACRO V06•03 05-NOV•74 12139 PA3£ 1•17
970 004346
971 0043!:;0
972 00•1354
973 004351'.
974 004360
9·15 004366
976 004370
977 00•1?>72
976 0043"/!I
979 004.376
9110 0041100
981
982
983 004'102
98'1
965
966
987
908
969
9'.lO
991
00'140'1
004~00
0044<0
004412
004414
004416
00442'1
004426
1044li0
005777
00111111
17'1450
l04'1LO
022111
00141.11
l04•1uO
10441 'I
1044-''+
104'100
0111723
174'1'+0
1QljljUQ
HLT
TST
UEQ
HLT
CMP
BEQ
HLT
P.iHCLR
kEWINO
llAITTH
HLT
l04'1U'+
10'14 IJO
022711
00141.11
l01t•1UD
01 .. 561
174370
17'11102
004~30
00~711
oc•l'13'1
Oo44 36
004440
004444
004446
00•1450
OOl'IUl
10
1006 0041;64
1001 004466
Rt1UFCA
10'14'+2
1 O'l'li:O
1000 004470
1009 004•172
1010 01) 114 74
1011 00 1+502
10•14~'+
HEAD
TSTCUH
10'14~0
HLT
lO'•'lvO
174356
lOOOUl
l.)4'1U0
1015 001151•1
1016 00•1516
1017 (J04:'>22
1010 004524
1019 004526
1020
1021
1022
1023
1024 004530
1025 004532
1026 004531/
MlN3UC
014725
001•1111
10•i4UO
1H312
00l4Ul
10<14UO
oo~7f7
lOOOUl
1044UO
10441'+
READ~
DIO NOT GO TRUE
•••••••••••••••••••••
•••••••*••········································
&TEST READ A 3 UYT£ R£CORO
1000
00~1717
!ERROR, TAPE UNIT
1SET BYT£ COUNT TO MINDS THREE
WUUFCA
WRITE
TSTCUk
!TEST CONTROLLER READY
HLT
IENRQR, toNrROLLEN 010 NOT GO READY
CMP
#WBUF+3,iCA
BEQ
0 +11
HLT
tERRORt CURRENT MEMORY ADDRESS OION•T INCREMENT
TST
iWC
i!EQ
.+4
HLT
!ERROR, BYTE COUNT OION•T INCREMENT TO O
TST
@HTC
UPL
.+it
HLT
tERRORt UlT 15 SET IN COMMAND REGISTER
PwflCLR
992
1012 004504
10U 004'106
101'1 004512
!ERROR, BYTE COUNT DION•T INCkEMENT
#RBUF+leiCA !TEST CURRENT MLMORY ADDRESS TO COUNT
.+4
IERROR1 CURRENT MEMORY AOOR£SS DION•J 1NCR£MENT
MlN31lC
104411>
022111
.+4
SCOPE
993
994
955
996
9'J7
990.
959
1001
1002
1003
1004
IERROR, CONTROLL[R 010 NOT GO READY
ITEST BYTE COUNT TO :O
•.................•...............................
••*··················
1TEST WRITE A 3 BYTE RECORD
lOlt'IUl
lO'l'l'+l
10'1'1.:>'t
00~717
mBC
174300
1711324
C~lP
UEQ
HLT
lST
Ut:Q
HL T
TST
llPL
Hll
P.IHCl.R
!ERROR, TAPE UNIT READY DID NOT GO SET
ISLT BYfE COUNT TO MIN11S
nmu:
tTEST CONTROLLER READY
IEHHQR, CONTROLLER DID NOT GO READY
llRElUF+31iCA
e+'I
!ERROR, CURRENT MEMORY ADD~ESS OION•T INCREMENT
ilflC
.+4
I ERROR t BHE COUNT DION tf INCREMENT TO 0
iilMTC
0 +4
!ERROR, BIT 15 SET IN COMM~NO REGISTER
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
&TEST SPACL FORWARO &
REVE~SE
l0'1•1U2
104'1 U'+
1O'I'+Li0
1FIRST WHITE 2 RECORDS FOLLOWED BY EOF
tSPACl FUHWAHO 2 RECORDS, SHOULD NOT REACH [Of
SCOPE
TSTCUR
tllST CONTROLLER READY
HLT
1EHROR, CONTROLLER DID NOT GO READY
.IUJN.
1027
1028
1029
1030
1031
1032
1033
10311
1035
1031:.
10.H
10.HI
103'.l
10'10
10'tl
1042
1043
10 114
10'15
1046
10'17
1048
10•1';1
1050
1051
1052
1053
1054
10SS
1056
1057
1058
10!>9
10i,O
1061
l0b2
lOtd
lOh'I
nACRO V06•03 05•NOV•7'1 12139 PAGE 1•18
00'153£
OO't!>'tO
00'1542
0011544
00115'*6
00'1550
004552
0011554
004556
0011560
004~(,2
004564
004566
004570
004572
00457'1
0U4~76
00 11600
uO6
lOr,~ '10466'1
1066 004666
10u7
10L8 00'1670
10f·9 004672
10'10 00'167'1
1071 004676
1072 00'1700
lOH 00'1102
107'+ 00470•1
1075 004706
1076 0011710
1077 00'1712
1078 OO'li'l4
1079 004716
1000 004722
1081 00'172'1
1082 (104726
1003 004734
k£WINU
TS TC UR
HLT
MlN3UC
wl!UFCA
wRJTL
TS TC UR
HLT
MW30C
W!:JUFCA
wl777
OOl'ILl
ITEST CONTROLLER READY
1EHROR, CONTROLLER DID NOT GO READY
!SET OyTE COUNT TO MINUS THREE
SPllC(f
TSTCUR
HLT
TSTt:Of
10'14~5.
022111
1TEST CONTROLLER REAOY
IEMRQR, CONTROLLER 010 NOT GO READY
!SET Byl£ COUNT TO MINuS THREE
174072
OEQ
• +ii
....
IHIBUF, iCA
!ERROR, UYTE COUNT
NOT~O
0
MAIN.
108'1
1065
1086
1067
1066
1069
1090
1091
10'J2
1093
MACRO V06•03 05-NUV•7'1 12139
00'1736
001+7'10
OOl+7'1b
0011750
001+752
00117511
004756
00•1760
1094 004762
1095 004761+
1096 00'1766
lO'H OU4770
1098 004772
1099 00'177'1
1100 0047,6
1101 005002
1102 005010
1103 005012
1101; 00501'1
1105 oo5ol6
1106 005020
1107 005026
1106 0050jO
1109 0050'l2
1110 C05040
1111 0050112
1112 00!>046
1113
1114
111!'>
1116
1117
1118
, 1119
032717
000040
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
&TEST READ TO FINO EOF
1044l.i!
10411t-'t
oo:in.:.1
012717
0111722
177771
104'1.:>b
10'146
0145&0
MOV
MOV
11•1,llBUF
11-1.wouF+2
ISET ByTE COUNT TO
MlN48C
MJNt~
FOUR
l.lfJIJFCA
1041t•b
w.tUT£
TSTCUR
liLT
MINlllC
SPACEB
TSTCUR
l 04'1ll'+
l044UO
10•14110
l01t4.J0
10'14 U'I
1 QI;:;~ Q
00~.o:..1
TREOFI
01'+722
OOl'IUl
1044V0
0121.:.1
Ol27.:l7
10444 'I
104'1.H
!JCS
CMP
f)EQ
HLT
01'1722
1124
1129 005122
lHO 005130
BIT
177570
BNE
000010
1127 005116
1126 005120
BIT
BtlE
03<:7.),
0014l:2
112b 00511'1
ITiST CONTROLLER READY
IEHROR, CONTROLLER DID NOT GO READY
TSTCUR
HLT
00506'1
005072
1125 005112
1T£ST CONTROLLER READY
llRROR, CONTROLLER OJO NOT GO READY
RLAO
ooo•uj
1120 005100
SCOPE
TSTClJR
HLT
lolH(OF
TS TC UR
Hl T
SPAClB
TSTCUR
HLT
Clk
RBUF
MDV
11-7 0 ilBC
IWUFCA
10114:10
104'1•'2
101140'+
104'1U0
1044.)0
10114li'+
lQ4qtJO
OU5062
1121 00!>106
1122 005110
1123
HLT
IERROK1 CURRLNT ~EMOR~ AOOKESS SHOULDN'T COUNT 0
BIT
lllfOoiilf'ITS
BEQ
.+'I
HLT
IERROH 1 BACKSPACE SHOULD NOT HAVE REACllEO BOT
PwRCLR
17'1052
001401
1011400
10't41+
005060
00505£.
1•19
10'11+00
l 0 34 u i.
0221.:.1
0014Ul
104 1!1JO
005050
PA~E
ITEST CONTROLLER READY
llRROR, CONTROLLER DJO NOT GO READY
ISLT BYTE COUNT TO MINUS ONE
!TEST CONTROLLER READY
llHHOR, CONTROLLER 010 NOT GO READY
l!LT
OH722
CLR
ROUF
r,u\D
.~AIN.
11H
11112
11113
lllllf
1145
11'16
MACRO V06•03 05•NOV•711 12139 PASE 1•20
0051611
005170
005172
005174
0051 76
005200
005202
005210
005?12
00521'1
005?20
0050.H
lO't'l'.3 00522'1
11~'1 005232
1155 ()0523'+
1156 oo~,?36
1157 005:« 1•'1
1158 0052 116
u2;:1:,1
11'17
11'18
1149
1150
1151
1159
00~?52
1160 005260
llt.l 005262
1162
1163 00526'1
11611 005266
1 H.5 0052 7'1
1166 0052·16
Ollt72lf
1044~0
l044U'+
104'1UO
032717
001ou1
104'+L0
005717
001000
173610
173602
1004lJ l
177777
01'+722
000010
177570
01'172'+
000377
01'172'+
0014lll
10441.0
0321;.1
0014 lJ 2
0003.H
02;>7.H
0014Ul
1C4400
10441+
0?;;:111
001 lilJ l
104'+1.10
fllQ
1172 00550'1
11 73 005306
117'1 005310
1175 ou5312
1176 005314
1177 005316
1178 005.120
11 79 005j22
lHlO
llCl
1182
1183
005326
17352'+
Oil
B[Q
HLT
tTEST ILLEGAL COMMAND TO =1 ON A DATO OR OATOB TO ~TC WITH CU REAOY:O
SCOPE
T:;TCUR
!TEST CONTROLLER READY
llL T
1ERHOR, CONTROLLER 010 NOT GO READY
MitJilBC
ISLT BYTl COUNT TO MINUS THREE
WAUFCA
10'14~2
wHEO~
104'1'i
101f'lli0
10'1'1'12
10'1'1.)'+
005.130
1ERHOHtBYTf 3 READ ERROR Ok SOMETHING XFEREO TO
llS DLC/IUH SWITCH IN COHRl::.CT POSITION?
PWRCLR
001000
10'+llll2
005332
Gu5Bt.
• +'I
till
1167
llt.8
1169
1170 005j00
11 71 005302
CLR
R8UF+2
l'IIN3tiC
1S[J BYTE COUNT TO flINJIS THR££
HBUFCA
READ
ITEST CONyROLLER REAOy
TSTCUR
HLT
!ERROR• CONTROLLER DlO NOT GO READY
BIT
#1000 til1TS
O~JE
.+4
HLT
!ERROR, RECORD LENGTH ERHO~ CBlT 9) NOT =1
TST
@MTC
BMI
• +'+
till
IERRORt BIT 15 NOT ;1 WHEN RLS CBIT 91 :1
CMP
11•1,RBUF
lJ[Q
.+II
HLT
!ERROR, BYTES 1+2 NOT READ PROPERLY
fl IT
1110,SR
tIS CONTROLLER CONFI&UHEO FOR ISM
lllfl
• +6
I NO
SwAB
RBUF+2
IYES
CMP
11377,RBUF+2
~1
iMTC
.+4
!ERROR, CBIT 151 NOT 51 WITH ILLEGAL COMMAND
!ERROR, TAPE UNIT READ
010 NOT GO SET
•••••••••••••••••••••••••••••••••••••••••••••••••• •••••••••••••••••••••
001106
002000
0010V'+
0427:,7
000'1 U.5
010000
00541'+
0527.:07
0137:.7
010000
001106
005lfl'+
0010'1'1
1TEST ILLEGAL COMMAND BY ISSUING A COMMAND TO TYPE A UNIT WITH SELECT RE
SCtlf'E
MOV
TCSLtRO
UlT
IMASK UNIT SELECT MSB
N2000tRO
UN(
,+12
!IS UNIT SELECT MSB SET?
lHC
lilOOOOtCINST INO, MAKE CINSI A BIC INSTRUCTION
BH
.+10
BIS
n10000,CINST IYES, MAKE CINST A BIS INSTRUCTION
MOV
rest.TEMP
.~AIN.
1198
11'39
1200
1201
1202
1203
120'1
1205
1206
1207
12011
120')
1210
1211
1212
12D
1214
1215
1216
1217
1210
121 '~
1220
1221
1222
122j
122'+
1225
1226
1227
1220
122')
1230
1231
1232
12H
12.3'1
1235
1236
1237
1236
12.39
12'iO
1;>41
12'+2
12'+3
124'1
12't5
1246
12'+7
1246
1249
1250
1251
1252
MACRO V06•03 05•NOV•711 12:39
0051110
005'11'+
005'122
005'130
005•132
005 113'1
0054'10
0054'12
005'14'1
005•152
005•15'+
005 1156
005•1t.•1
0051166
005470
005•17t1
005'i76
005500
005'.:>02
005506
Ou!l510
005512
00:\51'+
1052j7
01127~7
013711
104411 ..
104'1UO
006017
10.30Ul
104'1110
0.327 '7
052 711
l 04 'I~ ..
l044ll0
005717
tHC
T£MP+1
112000tTEf1P
TEHp,aHTC
173360
000100
HLT
UIT
ace
17Zl:H6
000017
1733.56
....
....
ICAN BE A BIC OR BIS INSTRUCTION
!SELECT OFF LINE UNIT
!TEST CONTROLLER READY
llRROR, CONTROLLER DIO NOT GO READY
!ERROR
NON DESIGNATED TAPE UNIT ON LINE
11100o0ll1TS
BEO
HLT
!ERROR, SELECT REMOTE (BIT 61 NOT :o WITH t~ONElt
104'1v0
lOtt11vO
005717
l04'iUO
0.')5'i6
005560
005!i62
005570
00!.>572
001045
002000
00104'+
PA~E
····································~·············
····~········
1TEST
DAO JAPE ERROR !BIT 61 TO =l
1USE MAINTENANCE OtT 13 OF MTHO TO SET PREMATURE CU REAOW TO CAUSE BAO
SCoPl
!IS TAPE. PHASE ENCODED
ll'toSR
nn
IYE.S
NXMT
om:.
1SEl BylE COUNT TO MINUS FOUR
MIN'iflC
wuuFCA
!TEST CONTROLLER READW
TSTCUR
tLHROR, CONTROLLER OID NOT GO REAOY
11L r
IOHJTL
BC,R2
MOV
ll•l,R3
MOV
111,A'+
MDV
TSTRGH
00102'1
177777
000001
Ill T
020000
173200
~HILE
BIS
.iAJTTH
IASSIG~ BYTE COUNT REG TO 8[ TESTED
!TEST ALL OF H(G
!TEST REG FOR RESET
!ERROR, BYTE COUNT DID NOT GO TO ZERD
112oo001iHTRO 1S£T PHE.MATUHl CU READY
AT BOT
TAP~ ~R~nR
.~AINo
MACRO V06•03 OS•NOV•7'1 12139 PAi£ 1•22
1255 00563'1
1256 005636
101f'IV0
032717
1257
1258
1259
1260
1261
005b'l4
001ou1
005646
10•1'1~0
005650
005654
00%56
l2b2 OO'iL60
12L3 ootif.62
12L'I oos1.·ro
1265 0Q5b72
12L6
12£. 7
12<,ll OU5o'f4
1269 005676
i2-10 oo~,100
1271 Ou!'i/Ob
1212 oo•,110
1273 005712
127'1 005720
1275 005726
1276 005130
1277 005732
1278 oot7'10
1279 0057'12
12b0 005"1'1'1
121ll OC575u
1282 005752
1283 00575•1
1284 005756
005111
l004lil
l041iU0
lO'llf 1 '+
052111
Ou l 'I u l
l 04'100
104402
10 1144 0
012711
173150
llNE
.+4
HLT
IERROR1 BAD TAPE ERROR IBIT 81 NOT :1
TST
ill'ITC
OMI
o+4
HLT
l[RHORo BIT 15 NOT "1 WITH BTE"l
PwRCLR
BIT
#ltoo,CilMTS
U[O
NXMT:
173000
TSTCUR
0 53 711
000060
00111£.
12% 006026
1297 ooeo32
1298 0()6036
032711
001001
10•11JUO
00':>111
000200
17301>0
till
fl IT
11200,ill"ITS
urJE
• +'I
!SET DYlE COUNT TO MINUS ONE
I INlT CURHENT MLMORY ADDRESS FOR NON EXIST£N-f Mti \
&TEST CONTROLLER READY
IEHROR, Cc:'HHOt.Lf:H 010 t.iOT GO READY
l:iLT fl,c.'l
I WI< l Tl ,
r f• · .-. ,
Htl u
(JI' I
, G0
&TLST CUNIHGLLL~ HEADY
IEHRUH, CONTHOLLLR 010 NOT GO READY
!ERROR, NON-EX1STEN1 MEMORY !BIT 71 NOT :1
·. t
TST
OiMTC
\ i.. ._j!'. J
OMI
ltLT
!ERROR, 1BIT 1~1 NOT =l WITH NX~ COIT 71 =l
PwHCLH
BlT
11600oiMTS
HLT
17 3052
lOO'IUl
l04'1UO
000600
11173000 eilCA
1160,iilMTC
TCWT,@MTC
BIS
TSTCUfl
lOIJ&tUi+
1G•14UO
17.303'1
DLQ
HLT
I••••
....
l
104402
Ol27ul>
Ol37°H
013711
012711
012717
005777
005011
104400
00077£.
001110
001110
0060'10
000100
172770
17276'+
177776
17300'1
172774
17277'1
\ >
'.
.+'+
&ERROR, POWER CLEAR DION•T CLEAR BTE CBlT 81 OR
INTERRUPT TESTS •~•*
•..•..............................................
1299
1300
1301
1302
1306
130'1
1305
IERRORo POWER CLEAH DIDN'T CLEAR STE !BIT 81
11011
173102
1730 , ..
1287
1288
1295 00£.020
MOV
173120
HLl
104 1 1~0
12'.i3 006004
129'1 006012
.+'+
SCOPL
MlNlBC
104'1~'+
1286 005766
1291 005772
12'J2 005776
111+00,arns
HLT
1044<'0
012111
005764
1289
1290 005770
010 NOT GO st.T
an
1731'16
000'+00
lt:RROR, TAPE UNIT REAO
17315'+
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
aTEST NON-EXISTENT MEMOHY !lllT 71 AND ERROH !BIT 151 TO =lo
10441'+
0!12717
0 0 l '1 u l
128~)
HLT
000400
····················~
1TEST FOR PROCESSOR PRIORITY LEVEL MTPM TO ALLOW INTERRUPT
SCOPl
UllUFF 1 SP
!SET UP STACK
MOV
MOV
MTPM,CC
ISET PRIORITY LEVEL
MUV
MTP~o@MTVS
ISLT INTERRUPT VECTOR C
UIR\1@MTVIINIT INTERRUPT RETURN
MOV
#lOOtiMTCISET INT 1:.NADLE
MOV
@MTC
IWAlT FOR INTERRUPT
TST
CLR
@MTC
l~AITEU TOO LONG WITHOUT INTERRUPT, CLEAR INT
&ERROR, INT ENAOLE FAILED TO CAUSE INT
HLT
ENA&L~
········~································~········
1TEST
FOH PHOCESSOR PRIORITY LLV[L MTP TO SUPPRESS ···~·················
INTERRUPT
0060 110
OOf,042
0127Llb
0137j7
013717
1306 006064
0137~7
1307 006072
1300 006100
012717
012771
005711
0(•()4Ul
lO't4UO
PWHCLI!
SCOl'l
1044U2
0Ub0'14
00£,050
006056
1309 006106
1310 006112
1311 OQf,11'1
llH I
104 '11 '+
000776
001104
00110'1
00110'1
00611'1
000100
172710
1777 7f.
MOV
MOV
172752
MOV
0000j6
17?.714
MOV
MOV
MOV
172714
IR21
lST
BH
HLT
ttUUFF,SP
ISLT UP STACK
MTP,CC
!SET PROCESSOR PRIORIT TO MAG TAPE LEVEL
MTP,@MTVS
ISEl IN1EHHUPT VEClOH c
MTP,36
UIR?,@MTVIINIT INTERRUPT RETURN
UlOOo@MTCISET INlT lNAOLE
@MTC
!WAIT FOH INTERRUPT
1R2A
!ERROR, SHOULON•T HAVE INTERRUPT WITH PROCESSOR
•"AIN,
"ACRO V06•03 D5•NOV•74 12139
PA~C
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
aTEST CU READY TO CAUSE INTERRUPT WlTtl INT ENABLE 1
1312
1315
1314
1315 006116
1311> 006120
1317 006122
13111 006126
1319 006134
1320 0061 112
1321 006150
1322 006156
U23 OOIS160
1324 OOf, t 62
1325 00616 11
1326 OOf.170
1327 OULl 1'1
15;.'0 00(.200
1329 OQl.;>02
LBo 00621)4
1•23
lOlf'll'+
l Olf4ul
Ol27Ub
0137.)7
0137~7
013737
c 12717
104'1.;2
000776
001110
001110
001110
00621'1
177716
001016
000036
172636
IJNT [NAOLE IBJT6l ANO GO IBlT 01 SET AT SAME TIME SHOULON•T
IR2A:
PwRCLk
SCOPE
MOV
llBUFFtSP
!SET UP STACK
MOV
MTPl"tCC
ISLT PHIOH1TY LEVEL
MTPf'l,MTVS
MOV
!SET INTERRUPT VECTOR C
MTP,..,36
MDV
MOV
11IR3,0lMTV
srucr
TSTCUR
HLT
MOV
TCWF,RO
l04'1U~
I044UO
Ol37uo
001120
O~t'.7UO
000100
UIS
010017
104 'l lJ ~
172622
RO,Q1MTC
MOV
TSTCUR
BR
IR 3A-2
TST
GlMTC
t.B4 0Ub220
00 04 11
005711
1O'l'Iv0
0004Vb
lot•717
l004Ul
1335 00h222
101f 4lJO
HLT
133(, 006224
ilR
1337 00£,226
ooo4Ul
10441>0
13.38 006230
10 11
1331 OOb;;lO
l.B2 OtJf.212
1.3.33 ou6214
172612
HLT
131!
1R31
172602
•u ~
IR3AI
1 J•;O
LH5 OOr,.?'<6
1346 006254
1347 ou£.::>62
1348 00f>264
1349
00626&
1351
1352
1353
ooi:.210
()06272
00627'!
OOL276
006302
uoo
1354
1355 00G306
1.356 006312
u5·7 001d14
use ooi:.:n6
1.359 OOL.322
1360 00632•1
1361
Ou6.3~6
1362 OQl,332
1363 Out.33'1
104%Z
Ol27ub
000776
01.37~1
001110
0137.)7
001110
006326
012717
177776
000036
172532
l 0'14.)2
1 Olf4u ..
l044uO
1044£2
10 1 1'1U~
104'lUO
oi:n•;o
0527uo
010017
001130
000100
172510
10~4J~
172500
10~•1llO
00 O'l l 3
1 Q~, I f7
l0041Jl
.no
IWAIT FOR INTLHRLlPT
tERkOR, NO INTEHRUPT
~
GO
COMPLETION OF WRITE
IR3A
GJMTC
.+'f
!ERROR, INTERRUPT NOT
CAUS~D
BY CU READY
IR3A
HL T
Pi.1RCLR
IERRDHt CONTROLLER DID NOT GO READY
1R-.1
172'170
UR
IR4A•2
TST
HLT
UH
TSTB
@MTC
COfi711
TSTB
llMl
11100
ITLST CONTROLLER READY
ILHROR, CONTkOL.LER 010 NOT GO READY
,••...•.......•...................................
13H
13'11
U42 uo£.£32
13'13 OOf.23'1
JJ•111 0062'10
CAUSE"INTER~UVT
&ERROR, INTERRUPT Nor CAUSED BY cu READY
I ERROR' SttOULOIJI T OE AT eo r so SOON AFTER lST IN n
ll\'IA
tERNOH, CONtROLLfH DID NOT GO IH'.AC•i
1:1dJ1·
I
•"AIN.
"ACRO V06·03 05•NOV•71t 12139 PA;£ 1•24
1369 006351t
1370 006362
1371 00636'1
1372 006366
1373 006372
1374 006374
1375 uoi..Ht.
1376 OOf.•10'1
137'1 006406
1376 006410
1379 00€..412
1380 00f.41't
131ll
1.302
1.383
1384
13tl5 006'116
1386 006420
131J7 006••2'1
1388 OObl\30
13li9 0061134
1390 00644<:
J3'Jl 006450
012711
10'1450
000'112
ou57/7
104•1uO
0004U7
032717
001nu1
l::l~4 lJ 0
00()4U1
1044U0
104'11'+
1721132
IR'IAI
MOV
lllR5tiilMTV
WAlTTR
BR
IR5A•2
172'130
0000110
172'1111
IH5Z
TST
HLT
iilHTC
BR
IA5A
llir 1140,iilMTS
BNE
.+4
tll.T
BR
IR5A I
104 11li2
0127Ut.
0050~7
(1050.l 7
0127-H
014:711
00!>0~7
0121uo
104'11!'.
1'101 001,510
1'+02 UCi6bl2
10<;4t.O
000776
177776
000036
0003'10
011'150
00104'1
014556
OU7~D
001044
02<' 7v0
014602
001016
17231111
OiJl:!ll~
Ul2717
10•1'1.l ..
10'+~
177754
17232'+
u..
l0441JO
10441.l~
!ll27U0
0237<'0
001401
014556
0010114
1044U0
02VJO
01'1602
HLT
IERROR, TAPE UNIT READ
P"RCLR
1•••• DATA TRANSFER TlSTS ****
DID NOT GO SET
!REPEAT FOR ALL BYTE PATTERNS FROM 0 THRU ALL DATA PATTERNS
SCOPE
MDV
llOUFF,SP
ISlT UP STACK
CLR
CC
ISLT PROCESSORPHIORITY TO 0
CLR
36
IS[T ThAP PRIORITY TO
MDV
u3~o.MTVS
ISlT INTERRUPT UECTOR c
f",OV
nMTTRP.~MTV
!SET UP ILLEGAL INlERRUPT RETURN
WBRSI
C.LR
TEMP
IINITlALlZE DAlA PATTERN
l.IBR I
MDV
u~ouF,RO
MOV
TU1P1 (ROH
IS[T UP Wr!lTE OUFFER
·CMP
IHJBUf•24,RO
BNl
WURt4
MOii
11•20,.w8CllNIT UYfl COUNT
;,UuFCA
TSTCUR
!TEST CONTHOtLER REAOY
HLT
IEHROH, CONTfiOLLER DID NOT GO READY
WRITE
TSTCUR
!TEST CONTROLLER READY
HL T
I UlRilR, CONTROLLER 010 NOT «;O REAOY
1AFTER WHITE, CHECK WRITE BUFFlR TO MAKE CERTAIN IT WASN•T MODIFIED
MOV
llWl:IUF,HO
CMP
TEMPo CROI+
WBRlr
OEO
.+4
HLT
!ERROR, DATA BUFFER MODIFIED CURING WRIT~
CMP
#WBUF+2'1,RO
UNE
1'111 0U6536
104'1'+0
16ACKSPACE 1 RECORD
MIN18C
1412 OOLb40
10'1'1~0
1'113 006542
1'11'1 006~·411
1'+15 006546
1416 006552
1417 006554
1410 OJt.!:.60
104'1v'I
11110
1422 006572
1423 001,574
1424 00£.576
1425 00b600
IERRORJ 2ND INTERRUPT NOT CAUSED BY REWIND COMPLEI E
IR5A
001Jfl
1419
1420 006562
1421 006570
IWAIT fOR INTERRUPT
!ERROR, NO INT AT END OF REWIND
•••••••••••••••••••••
1••···············································
CWRITE R[CORU, BACKSPACE• RLAO H[COHO
1392 00645'1
1.393 006'11',0
1394 oor,46'1
13'.15 OOt-'170
1.396 006412
1397 006500
1398 006to02
1399 001>5!Jlj
1400 OilL!:.06
1'103
1404 00651'1
1'105 00<.520
1'106 00652'1
1407 OOl.~126
1408 OOi,r130
1 1109 00653'+
006316
!iPAC[[l
TS HUR
HLT
l044lJ0
01;>700
0050000
0221uo
oi..122
01117%
177754
1044~0
0[)~;711
MOV
CLH
CMP
11Nl
11 READ RE COHO
MOV
HUUFCA
Ht:AO
TSTCUH
HLT
I.ST
WBR21
00131~
012777
1044.H•
10'+4'-0
1044 u lj
Wl:lRt
172216
17223'1
!SET BYTE COUNT TO MINUS ONE
ITEST CvNTHOLLEH READY
1EHROR, CONTHOLLER DID NOT GO READY
llHBUFoRO
CROI+
I CLEAR READ BUFF£R
lllHlUF t<::4, R0
WUR2
#•2o.,@BCIUN1T BYTE COUNT
ITEST CONTROLLER READY
l[HROR, CONTROLLER 010 NOT GO READY
iilMTC
·"AIN.
"ACRO V06•03 05•NOV•74 12139 PA3E 1•25
1.. 26 00660 ..
1 .. 27 006606
1 .. 28 006610
, .. 29 006611+
1 .. 30
1'131
1432
1'133
143'1
1'135
1'1.H>
1'137
1438
1'13':1
l'l'lo
l'l'll
1'i42
1'143
1"""
1<1<+5
14'*6
1 1+'!"1
14'*8
14'<9
1'150
1'151
1'152
11;53
1'15'1
006620
006622
006624
OOf,630
006632
00663'1
006i.40
00664'1
006650
100001
10114UO
0127110
02:n20
BPL
llLT
MOV
01 .. 722
W6R31
0010114
BEQ
HLT
001'+111
1044\JO
0227110
001311
10"4Ui!
0147116
Cl'IP
lOt.2~7
013700
0010114
001116
0427uo
022h0
117777
060000
BNE
SCOPE
INCH
MOV
BIC
CMP
006h54
00111li5
OQ665b
00£.66'1
00€>670
006€.72
0()6700
oor.1011
OOt.712
006720
OOf.726
006730
0067311
OU67'!0
0067'1 ..
006750
11127~
1
1057.:,7
(l[Q
000300
00675'1
0067%
006762
006766
006710
00677'1
007002
001010
007012
00701'+
0070H.
007020
1477
1476
1'179
14110
ll37j7
oooPl
1£,2"f.}1
16n-11
o.3nj7
0010'+4
00611511
c20000
0010115
001116
020000
0011111
060000
001116
WBR .. I
0012::io
ou·rua
001106
0627110
OlOO·H
060003
0627UO
0100.>1
000002
001116
017000
1627UO
0051100
014722
0100.:.r
ol.3717
012717
00101111
00101111
112022
002000
172016
0010411
171764
10'1'10'+
l04qUO
10•1416
l0'1 1 1U~
104401)
1044~0
007026
007030
007032
007040
00"1042
0010•14
10440'1
1044110
013711
104 11 :>f.
10•14<0
TEMP
IOONE FOR ALL DATA PATTERN ?
TCWTtRO
11117777,RO
1160000,RO
llS CORE DUMP MOOE SELECTED?
.+10
1y£S
11300,TEMP
INO
TEMP
WBR4
IYES, lXIT
TEMP, TEMP+l INO
WBR
I REPEAT
1120000,TCWT &CHANG£ DENSITY OF WRITE COMMAND
1120000oTCRO !CHANG[ DENSIT~ OF READ COMMAND
U6oooo.TCWT IMASK DENSITY STATUS
wuns
IRLPEAT FOR ALL OENSIT~S
TCSL,RO
IRLSTOtt( TCWT & TCRO
1160003,RO
Ro.reno
RlA!l
1717116
lOOOiJl
l0•+'1uO
01?7l0
01:<7t.J1
0220•1
.+II
!ERROR, DATA REAO NOT EQUAL DATA WRITTEN
llRl3UF+211•RO
lolElR3
U2,RO
MOV
ROoTCWT
1WRlTE AND READ A LONG RECORO
1USLS MEMORY OCCUPIED BY THE PROGRAM AS A WRITE Sl~FER
SCOPl
MOV
1117000,RO
sun
llflUUF ,RO
!CALCULATE SIZE OF READ BUFFER
IJEG
RO
IGLN 2•S COMPLIMENT
MOV
ROoTEMP
MOV
TEMP,iilEIC
MOV
112000tiilCA
TSTCUR
!TEST CONTROLLER READY
liLT
!ERROR, CONTROLLER 010 NOT 60 READY
wRITE.
ITEST CONTROLLER READY
TSTCUR
!ERROR, CONTROLLER 010 NOT GO READY
HLT
ISET BYTE COUNT TO "INUS ONE
MHJlBC
Sl'Af.fB
!TEST CONTROLl.ER READY
TSTCUH
ILHROR, CONTROLLER 010 NOT GO READY
ltLT
MOV
TEHP,OIBC
RUUfCA
104'&011
1044u0
005717
IERRORt ERROR CBlT 151 s1 AFltR READ
llRBuF,RO
TEMPt IROI+
1100
lO'llllJ2
10•1'1.:>0
BLQ
MOVll
JMP
SUB
SUB
BIT
ONE
MOV
ADO
Mnv
001114
0127UO
Ou1024
007050
007054
00705b
007C60
1481 007064
l'IU? 007070
rsrn
001044
0014115
007022
l47f> 007046
l>ICll
0010'+4
11;<;5
1456
l't57
1'158
1459
1'160
1'161
1%2
1'163
llf6'1
1%5
llib6
1467
1'168
1'169
1470
1471
1472
1'173
1474
11175
Cl'IP
.+ ..
002000
01'1722
WBR51
lSTCUR
HLT
TST
BPL
HLT
MOV
riOV
CMP
....
il"TC
112000,RO
#RBUF,Rl
IRO)+t(Rll+
!TEST CONTROLLER READY
!ERROR, CONTROLL£R DID NOT GO RE.ADY
!CHECK FON ERROR STATUS
IENNOR. ERROR FLAG SET IN "TC
100 A DATA COMPARISON
·"AIN,
1'+83
llt84
1485
1486
1'+87
1'188
1489
1490
1 1191
1492
1'+93
1'19•1
1495
1496
1'197
1'196
1499
1500
1501
1502
150::1
150 ..
1505
~ACRO
007072
0070711
007076
007102
00710'+
007106
007114
007116
001122
007130
007136
0071'10
0071'12
0071'14
007146
OU7152
00715'+
007160
00716'1
1501> 007166
l:l07 007174
1506 007200
1509 007;?02
1~10 007204
1!>11 ·00120&
1512 007210
1513 007212
1514 007"14
1515 007222
1~16 00722 ..
1517 007226
1518 007232
1519 007236
1520 007240
1521 00724'1
1522 007250
1525 007252
152'+ 007260
1525 00726'+
1526 00721'.6
1527 007270
1528 007276
152'J 01)7300
1530 0()7302
1531 00·1306
1532 007312
1533 007316
1!:>3'1 007320
1535 OOE2'1
1536 007326
1537 007330
15~8 007332
1539 007336
V06•03 05•NOV•7'+ 12139 PA•E 1•26
oonu1
BEQ
HLT
Cl1P
BNE
lO'l'luO
022701
00131<'
l044U2
0327.H
OOli+Ui!
oooP7
0127.H
01n:,1
017000
1775 70
010252
177777
177717
01'+556
01'+560
010011
0060·H
1030Uj
0'12111
0052/7
1 O!•
013700
052·1uo
0053"0
IERRORo PATA READ NOT EQUAl DATA WRITTEN
I CHECK THE WHOLE BUFFER
!WRITE 3 BYTE RECDRU OOU PARITY, READ EVEN PARITY
1BIT 14 o~ MTRO ;1 SHOULD CAUSE LPS To RE LOADED IN DATA BUFFER AFTER RE
PAHi
SCOPl
llS TAPE PHASE ENCODED
BIT
11'+ ,SR
Ut:Q
INO
.+6
IYLS
JMP
TllHT
11-1,wBuF
MOV
MOii
11-1,t..1BUF+2
MINJIJC
!SET BYTE COUNT TO MINUS THREE
10'• ~u ..
l01t•1uO
05';:711
111700n,R1
WBR5
,1TEST
•.....................................................................
PARITY
00000'+
104'1-+2
104'1.'.>'+
1044v'+
104'1v O
OB7Ui) 001116
Oo!,31JO
010011 1716'+2
OOt.0~7
177570
1030U5
O'l :>7 17 020000
005211 111622
l0'14U'+
lOt;i+UO
10'1 .. '+0
....
PAR1l
HLT
UK
CMP
uEQ
• +It
IERROR1 LPC NOT :74'1 OR SIT llf OF MTRO OION•T CA
PAR2
N'l77,RO
• +'I
.MAIN.
MACRO V06•03
1~1+0 007340
1541
1542 007342
1543 007344
1544
1545
15'+6
1547
1548
1549
1550
1551
1552
1553
155 11
1555
1556
O~·NOV-74
10411UO
10411'+2
10114,, ..
007346
007352
007.156
007360
007364
007370
007372
007400
00/40'1
007 1106
01.nuo
0521uo
OO!i3u 0
010017
0060,,7
007'110
007412
1044'10
lO'llf jO
10440'1
00741'1
04271 7
005211
1Q44llo+
104'1~0
052711
1044'12
171422
0110000
171110lf
0011111
0053U0
010017
171356
l03QU.i
042 77 l
00!:1217
1::>(;8 007'10'1
1044U~
oot.oH
1569 001'166
I 044 llO
157(1 0071170
0:'>?717
15"11 007476
1572 007500
1573 OJ7502
OOlOUl
15'14 00·1506
l044UO
0177vo
0427vO
1575 00·1s12
1576 0075lb
1034ll
1577
007~120
02?7UO
1578 00752'+
15"/9 007526
1580 007530
1581 007532
1582 007!:d6
1583 00}540
1504 007542
1505 007544
1586 007552
1!:>87 007!..54
1588 007556
1509 007~60
1590 007564
15'Jl 007566
15')2
0014vl
10<14UO
1596
020000
171416
104'1.:.1>
013700
1562 001436
1563 007'+'+0
1564 0074'+4
1565 007450
1566 007•152
1567 uo7•1t.o
1594
1595
1711136
177570
1044v0
1558 007420
1559 007426
l5bO 007430
15'J3
001116
004000
1030U.$
l5!J7 007
PAR41
010000
1712116
HLT
P1o1RCLR
UIT
Pi\R4
1177 ,RO
....
1£RROR, LPC NOT :77 17 TRACK)
lllOOOO,iMTS
• +Ii
OOl'tli l
liEQ
l04'lU0
llLT
SCOP[
HOR
SR
IIS SWC=l TO INDICATE 7
fl((
.+6
INO
JMP
TMRT
104402
OO&Oj7
177570
1030li2
oooP7
010252
!ERROR, POWER CLEAR OION•T CLEAR PARITY ERROR 18
CH~NNEL
lf[S SKIP CRC TEST
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
I TEST me
ANO LPC CltAkACHR
GUJ[liATIOI~
1PROCEOUfOb
1607
11,00
lt,09
1610
007620
007622
oon26
00 7&?>4
OQ?636
1611
Q(); £,4•1
1612 ou7650
)1,,lJ 007t.52
H111 oo7L56
1615 007662
lbl6 llU7£.61t
lt.17 007670
1610
1619
1620
1621
it.22
16.23
162'1
1625
162b
16n
1620
00767'1
007676
oono2
007706
oon10
00771'1
000001
10~701
0010111
000410
1063\J 1
103ou2
105P7
0427..17
llNl
001045
177000
ol37-l7
0 l:H 1J 0
001044
0010114
Ol!.7U1
1044:J2
0101.:l 7
Cl37UO
10411:;•
OlOO-l7
0137111
1044::.2
OlOP7
0137110
001054
001044
001062
010002
010026
104'lu2
1137.)7
1137,:,7
0137;)7
104 11.)4
010030
1647 010032
l044'H
l044.'.l2
01000'+
010012
010020
lf,ljf,
MOV
MOV
XCLOR
MOV
MOV
ROICMP
MOV
MDV
BlC
COM
BIC
001070
01ll(lU1
042(.)7
T£MP,Rl
000727
000050
u1s
001072
177000
Rl ,CRXOR2
Ro,CRl0
RO,CRROT3
TEMP,Rt
R1,cRXOR4
CRXORlJ,RO
Ho,cRROT4
Ro,R1
!COMPLEMENT ALL EXCEPT
~,6
U727oR1
RO
1150,RO
Rt,no
MOV
Ro,c'lCWltT
Olt
U17JOOO,CRCWRTISAVE CRC CALCULATED
&WRITE A FOUR UYTE RECORD
1ALL BYHS l\RE : Tt1ER£FOH£ LPC SHOULD " CRC
CWRITEI SCOPE
TEMP,WRUF
f":OV'I
f":llVll
MOV
TE~P,WBUF•l
WBUF.~BUF+2
WilUFCA
~.Il'H•lC
16'18 010054
1044U~
16 119 010056
10'1'1~0
1650 0100 110
lb:::il 010042
1652 0100 114
1044.l f>
l044U0
SELfCT
TSTCUll
HLT
WRITE
TSTClJR
HLl
lt.>53 010046
l 04 4 'I 0
MltHUC
l044U~
!SAVE ROTATE
ROTCMP
0100H
050liJU
0100.H
!SAVE lST DATA UYTE (+PARITY!
HOV
CRxoH2,RO
kOTCMP
001062
1631 007746
lld;> lll)77:ll
1633 00775'1
lL.34 Oll776U
007766
007710
007774
Ro,cRROTl
MDV
MOV
XCLOH
HOV
MOV
1U44~~
H..36
1,.37
1&3&
1639
1640
1641
H42
16'13
lb44
lb45
MOV
MOV
001060
001044
H3o 007744
U0776~
TEHP,CRXOAl
HMP,RO
XCLOR
001066
001066
1635
MDV
MDV
MOV
0101
0137uo
0'!'701
00511JO
0'12"1UO
CRCT2:
001056
001056
007732
007134
lt.29 007140
:i,
HJO
HOTCMP
1044::.+
OluO·H
001064
001044
uu7726
001044
001052
,+'+
UR
CRCT2
1yES, NOW TfMP=1 CONTAINS PARITY BIT
ASLH Rl
!SHIFT DATA UITS LEFT INTO C BIT
HCC
,+6
IWAS AIT=U?
COMA
T[~P+l
IND, COMPLEMENT PAKlTY
OIC
u177ooo.rEMP
HR
CRCPl
IUO AGAIN U~TIL DATA:o
OOD7u:>
104 .. :...
0100.:.1
OJ :o; 7111
1 O'l•I ''2
007"120
007722
0010'+5
1TE~T IS REPEATED FOR ALL DATA COMBINATIONS.
CRCTST: CLRD
TEMP
IINITIALlZf DATA
1CALCULATE PARITY O~ DATA TO BE WRITTEN IN CRC TEST (MAKE PARITY ODDI
CRCTU MOVil
fl1 0 TEMP .. 111Nl11ALIZ£ 000 PARITY
MOVll
TCMPtRl
CKCPl: TSTU
Rl
llS OllTA=o
!SET BYTE COUNT TO
MlNL~
FOUR
!TEST CONTROLLER READY
llHROR, CONTROLLER 010 NOT GO READY
!TEST CONTROLLER READY
llMROR, CONTROLLER OJO NOT GO READY
l&lr UyTE COUNT TO MINUS ONE
·"AINo
~ACRO
V06•03 05•NOV•74 12139 PA3£ 1•29
10«tlfl.o ..
1656 010054
104'1UO
1657 010056
1658 010060
1659 010062
10•111.)6.
lO't'l'H
104420
lbt>O 010064
10440~
1661
1662
lb6.3
161"'1
1665
1666
1667
1660
1(,(,9
010066
l044uO
010070
0237-H
00J4U1
1670
1671
1672
010076
010100
l04•1UO
010102
010110
010112
010114
010120
01012'1
010130
010134
010136
010140
010144
0231.H
00141J l
1(,73
167'1
lfa75
1676 0101'+6
16"/7 010150
16J8 010152
1679 01015'1
161>0 010156
16&1
1682
1663
1684
1665
lL6t.
l61J7
1606
1689
16')0
lL'Jl
1692
1693
lL'J'I
16':15
1696
1697
16'18
1699
1700
1701
0'12700
04:?7li l
0014Ul
1044U0
0200-H
00141J1
170710
170706
177000
177000
001072
(l[Q
l044lJO
1044•~
1044~0
10440'1
1044UO
0177uO
0'+27v0
!ERROR CRC WRITTEN l~OT a CltC CALCULAflO
ISLT BYTE COUNT TO MINUS ONE
ITlST CONTROLLlR READY
&ERROR, CONTROLLER DID NOT GO READY
ISlT BYTE COUNT TO MINUS FOUR
IWUfLA
Oil 0000
BIS
#'t0000oi'1TRO &ENAULE LPC REAU
HLAD
lSTCUR
ITESl CONTROLLLR READY
tel T
IEHHOH, CONTROLLER 010 NOT f,O READY
17061f0
17062«t
177000
001072
MOV
i1'1TDtRO
!HC
11177000 oRO
CMP
Ho,cRCwRT
0014U1
f1[lo1
• +'t
l 0<1'1UO
0050.H
1ILT
0200.:'>1
005077
(J327.'.l 7
001072
170602
0'10000
177570
001ou~
0102'10
010244
1052:.1
0014U2
001044
0102
1753
1754
1755
1756
1757
1756
1759
1760
1761
010462
tll 046'1
01(1466
010470
010476
01050'1
01050b
O~·NOV•7'1
INC
BNE
HLT
0052U0
0013'5
lO'l'IUO
1044H
0050·H
104'1Ui!
1044i ..
10440'l
104'100
0327J7
00l'IL2
0001:.1
0127Ll2
104412
TSTCUR
0011000
HLT
BIT
177570
BEG
0113011
JMP
0131'1'1
HOV
PHTMSG
llALT
00'1000
01130'1
013 7110
OOllOt.
0.327L 0
0010!.5
002000
OO~i017
1701116
11<:7.H
000060
002000
0121.:.1
0127\i .i!
00'1000
002000
013260
013276
01051'1
lOO'IU 1
llN(
USSJ
@MTC
USSll
UHi
CLR
OR
MOVR
MOV
MOV
MOV
MOV
PHTMSG
llS TESTED UNIT IN HOST SIG SELECT ADDRESSES
IYlS
INO
1160,MSG4+16
112000,usLEN
TEMP
USS
U6'1,MSG'l+16
U2000o@MTC
111tooo.USLEN
U2ooo.TEMP
l!M,;G'loR2
IPRINT MESSAGE lN
R2
SCOPE
0010'1'1
000100
170.\2'1
17031'1
MOV
BIT
BiO
l044U2
013117
!ERROR, TIMER IBIT 151 NEVER =1
RE WINO
0014Ui!
0001,:,1
012717
Ol27;H
••10
PWRCLR
CLR
Tl1TNFL
SCOPE
001042
0.3«'7"7
0127:>7
0050:.1
000'11'1
11 '-'7.H
RO
1•••• MANUAL INTEHVENTION TESTS ••••
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
I
oooouo
010~10
1763 OlO~i4'1
1764 010552
l7b5
1766 01055'1
1767 010556
12:39 PAiE 1-30
001107
170272
BIT
0010'1 ..
UN[
llLT
SCOPE
JNCB
INCB
CMP
TEl1p,@11TCISELECT UNIT
a100,@l1TS1IS SELECT REMOTE SET
.+'I
!ERROR, PROPER UNIT NOT SELECTED
iilMTC
.+'I
IERRORt CU READY NOT SETt IS UNIT SELECTED?
ll'IQ,@11TS
.+'I
!ERROR, l:lOT ANO TUR NOT S£To IS UNIT ON LINE & f.
!INCREMENT UNIT II
TEMP+l
USLEN,TE"P
IOONE ALL UNITS?
11SGit+16
~NE
USS
INO
1TEST ONLINE•OFFLINE SWITCH
SCOPE
MOVB
TCSL+loRO
.~AIN.
~ACkO
V06•03
1768 010562
1769 01056b
1770 010572
1771 010576
11n 010604
1"173 010610
1774 010612
1775 010614
1776 010616
1777 OJ 0620
1770 010(,2(,
1779 01G630
05·NOV·7~
0327110
0527UO
12139 PAi£ 1•31
000017
000060
0100~7
00104~
113P7
0127112
10'1'112
00104'+
013320
013336
oooovo
104'102
10 11'1j2
03?711
OO!t1Ul
000100
1701 72
l0411ll0
010632
0106'10
01064 11
OlOb46
010b50
010652
01005'1
010662
010i.6't
113H7
01271>2
10'l'll2
010fb6
OH670
Oltl674
010700
01C702
01070 11
010706
010712
1801 010714
1802
1803 010716
1804 010722
1605 01072~
1606
1807
1608 010726
1809 010730
1810 010736
1611 010 742
lbl2 01071;1;
1813 0107'+6
1011; 010750
1815 010752
lbl6 0107511
1817 010756
1818 0107611
1819 010766
1020 010770
1621 010772
i822 011000
1023 011002
18.!'I 01100'1
104'+lli!
00:..017
00104'1
013372
013'172
000004
170136
OOlOUl
10411UZ
1137.H
0127U2
10411!2
170110
170076
0010'1~
013700
013525
IERROR CBlT 151 NOT SET AFTER WRlTE WITH WRITE LK RNG REM'D
TST
ilf'ITS
liM I
.+11
I ERROR, ILLEGAL COMMAND tBI T
SCOPE
TEMPt1'SG7+153
Mu VO
MOV
11MS.G71R2
PHTl'SG
IPRINl MESSAGE IN
llALl
l~I
f~OT
SET AFTER WRT CMD
R2
Pw;1CLR
SELfCT
TSTCUH
tlLT
000100
17003~
HIT
ONL
HLT
SCOPE
001112
170022
000100
170006
MDV
....
BIT
aTEST CONTROLLER READY
!ERROR, CONTROLLER DID
~OT
GO READY
uoo.ii:IHS
TCOL 1 iil1'TC
TSTCUR
HLT
104'10~
RE~~OV~D
ITEST CONTROLLEk READY
ILHROR, CONTROLLER 010 NOT GO READY
•••••••••••••••••••••••••••••••••••••••••••••••••• •••••••••••••••••••••
1TEST OFFLINE FUNCTION TO SET UNIT OFFLINE ANO REWIND TO BOT
104'1VO
104'1\JO
032117
..
HLT
lO't't!,.
104'1.H
104'1lJ2
013717
l[RRORt SELECT R[MOT[ StTo UNIT-NOT OFF•LINr
MUVD
TEMP,MSG6+100
MOV
llMSG6,R2
PRTMSG
IPRlNT MESSAGE IN R2
HALT
SCOPE:
SELf CT
HIT
ll~1wMTS
IIS WRITE LOCK SET7
llN(
IYES
~
ttLT
1ERROR1 WRL IBIT 21 NOT SET WITH WRITE LOCK RING
~T
oooouo
lOlt'IU'I
104'1\JO
0 32 711
001001
....
R2
11100 ,iilMTS
SCOPE
CLR
iilBC
CLR
ilCA
WRITE
TSTCUR
HLT
TST
OlHTC
OMI
.+4
170130
170126
1004Ul
1044UO
005717
100111>1
1011'+00
1PRINT MESSAGE IN
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
1T£ST WRITE WITH WRIT£ LOCK RING REMOVED TO CAUSE ILLEGAL COMMAND
l0477
1678
1879
1860
1861
MACRO V06•03 05•NOV•7'1 12139 PAiE 1•32
011012
01101'1
011016
011020
011026
001'101
1011'+110
BUI
.+'I
HLT
1ERROR1 SELR IBIT 61 NOT CLEARED BY
&HE-SET UNIT
SCOPE
MOVB
TEMP,PISG8+16
MO\/
llMSG8tR2
PRTMSG
IPRINT MESSAGE IN R2
HALT
lOlt'+Ui!
0110~2
1137·H
01;>7Ui!
104'1.l2
01103'1
oooouo
0010'+'1
013776
01'+01'1
•............................................•....
tTEST BUS GNANT LATE tBIT 111
TO~l
011036
01111'12
0110•11+
0110'16
011052
()11060
011062
011066
011070
011072
011074
011076
011100
011 lOb
011110
011112
01111'!
011122
01112it
011 t?.6
011130
011132
011134
01113$
0111!;0
011142
0111'1'+
011152
011154
011156
011162
011164
011166
011170
011176
011200
011202
0112011
011206
011<'12
01121'1
011216
011:?20
011222
011224
Oll:d2
0127Ui!
01'1057
lOllllJ.i!
00001.10
00::.2.:.7
C,32'P 7
0010'+2
000002
177570
0010:J2
Ol27ll2
01'1201
10144!2
104402
10~4~2
l044U'+
lO'+'lvO
01:nn
1011 11 ~ ..
104416
oo:o.ovo
022717
oo:.,,o.5
177756
167716
014560
16770'+
00!>200
001•1u.5
000711
BH
HALT
BR
liLT
TSTCUR
ULT
0004Ul
lOll'luO
lO't'IU'I
OO'IOOO
167b22
B£Q
HLT
!CAUSE BGL1 WAIT FOR CONTINUE
IEHROR, tA DID NOT INC EHENT ON WRIT( COHHAND
1ERROR 0 TU DID NOT GO READY
ONE
ttLT
TST
iilPITC
UMI
.+'+
HLT
PwtlCLR
BIT
ll'IOOOeil1TS
0011\Ul
10441!0
ll'IOOOtillHS
.+'+
.....
!ERROR, OGL COIT 111 N0Tc1•,
IERROR, BGL 010 NOT SET ERROR STATUS
!ERROR, POWER CLEAR DIDN'T CLEAR OGL COIT 11)
~COPE
fl!(
l0•11tU2
0004·H
0127u2
10'1'112
10441!2
l044·H
1044U ..
10441.iO
012717
1044.:>'t
....
en
1676'10
00'1000
·············~·······
.-1~
1676'+6
10•1'1l't
03?717
01't2'17
177756
BGLll
167572
C01'"AND
1HALT PHOCfSSOR DURING AN NPR SEQUENCE
MO\/
41MSG9,R2
PtHMSG
IPHINT MESSAGE IN R2
HALT
INC
TMTNFL
Ill T
1!2,SR
ONE
BGL1
Mull
llMSG10oR2
PR rnsG
IPHINT MESSAGE IN R2
SCOPE
SELECT
TSTCUH
!TEST CONTROLLER READY
liLT
!ERROR, CONTROLLER DID NOT 60 READY
MOii
11•18.eilBC
wBUFCA
WHITE.
CLR
RO
Cf"P
llWBUF +2 t·iCA
BLT
.+10
!WAIT FOR NPR SEQUENCE TO START
INC:
RO
l.J[Q
.+10
oooouo
10'14ll0
032711
OOlOvl
l044LO
0()5717
lOOIJlll
10'111\JD
OFFLIN~
TSTfND
MOii
tiMSGlloR2
f'RTMSG
SCOPE
SELfCl
TSTCUk
Ill T
MOV
11•18.,ilBC
WtlUFCA
!PRINT MESSAGE IN
R2
!TEST CONTROLLER READY
!ERROR, CONTROLLER 010 NOT 60 READY
.~AINo
MACRO V06•03
1882
1883
18blf
1885
1886
1887
1888
1889
1890
1891
1092
1893
011234
011236
011240
011242
0!12'1'1
011<'52
011254
011256
011262
01126'+
011266
011270
18')11 011276
1895 011300
16% 011 302
1897
1wrn 01130'+
1899 011.HO
1900 011312
1901 011316
1902 011.~24
1903 011326
190'+ Oll3H
1905 0113 110
1906 0113'16
1907 Ollj50
1908 011356
1909 011362
1910 011370
1'111 011372
1912
191.i
191'+
1915
1916
l'H 7
1911)
19l'J
1920
1921
1'122
1923
1':12'1
1925
1526
1927
lno
05·N0~·74
12:39 PA;E 1•33
oooouo
HALT
WRITE
NOP
NOP
1044lb
0002~0
0002~0
032 711
00101.il
004000
1675'16
1044U0
005717
100401
167540
TST
ilMTC
IJM I
.+4
Ill T
lO'l'li't
f',.jRCLR
16 7!>22
IERR0Rt 8GL «BIT 111
BIT
114000,iMTS
Ut:Q
• +'I
1044UO
104%2
HLT
Ol0
01'155.5
10!i2.l7
1227 :i7
014~52
1227.l7
INCB
CMPB
BIJE
MOVCI
lNCB
CMPCI
00101'+
000012
0010v;
11;>7.l7
OOOObO
10~>717
167'!32
011 1100
011•10'i
10031::>
011'106
01~7/7
011'11'1
011•11(.
011420
011 1122
Ol1'12'1
011426
Oll•dO
011 1d2
011 11.H
011436
Oll•i'iO
0114'12
011•;44
00501.io
OO!l2u0
U01376
000207
01~552
01'+552
BELLl
167420
104'11J~
10•1 11u0
10•1<;.: ~
10 11'1 U'+
1 0 11'IU0
104'1 :..o
0002'+0
l O'l•PO
1172.MSG13+13
!JELL
1160,MSG13+13
1'1SG13+12
1172.MSG13+12
tl(Ll
1160,MSG13+12
MSGJ.Hll
1172,MSG13+11
1Jti£
fl[ LL
MOVH
1160,MSC,l:Hll
O:TCSH
TSrfl
IWL
MO\/
CLR
1 NC
BNE
TSTCUH
HLT
REWIND
TSTCUH
Ill T
1PRlNf MESSAGE IN H2
• •'I
ll2o7,iilTDSR
HO
RO
.-2
!TEST CONTROLLER READY
!ERROR, CONTROLLER OIO NOT 60 READY
ITLST CONTROLLER READY
IEMROR, CONTROLLER 010 NOT GO READY
IOAITTH
l•!Of'
W•HTTH
Ill T
104•11.io
ouoP7
IERRORt POWER CLEAR DJON•T CLEAR BGL IBJT 11t
SCOPE
10'1'112
1o~;>j7
NOT~l
IERROR, BGL 010 NOT SET ERROR STATUS
001'1v1
JHP
001350
1+•••
l'l2':l
1930
1'131
1-J j2
1933
1934
1935
1936
#4000,iP1TS
10<;4ll0
032711
....
BIT
BNE
HlT
DEGtN
IEHROR, TAPE UN1T REAOY 010 NOT GO SE:T
!GO TO START OF TlST
SUBROUTINES ••••
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• $
011'150
011•1'.56
011464
0137j7
0010114
0137.:17
011472
0116.:lT
000036
OOOHO
0010'14
1937 011476
19.31) 011500
10441.JO
0137.lT
001050
0127.l7
0010!>0
0010'16
000036
0010'+'+
1ILL£GAL TAPE INTERRUPT SUBROUTINE
MTTRP: MO\/
TEMp,TEMPS
ISAVE TEMP
MOV
36,TEMPP
ISTOHE TRAP PRIORITY
MOV
11340,36
IMAKE TRAP PRIORITY 7
MOV
~SP,TEMP
lllMP CONTAINS PC OF l~LEGAL INTERRUPT
HLT
IEHROH, ILLEGAL TAPE l~TERRUPT
MOU
T[MPS,TEMP
IHlSTORE TEMP
•"AINo
1939
19'!0
1'"41
19'!2
19'!3
194'1
1945
1';1'16
1947
19'+8
19'!9
1950
19!:>1
1952
1953
1%'1
1955
HACRO V06·03 05•NOV•7'! 12139
011506
01151'!
0137.H
OOOOIJ2
0010116
011516
0115?.2
0116b6
162716
01364&
000002
000002
0L271&
105136
PA~E
MOV
000036
!RESTORE TRAP PRIORlT~
IRLTUHN FROM INTERRUPT
TEHPP,36
RTI
•••••••••••••••••••••••••••••••••••••••••••••••••• •••••••••••••••••••••
011526
011530
01153'1
011536
0115'10
Olb'12
0115'1'1
011546
011550
Oll'..i52
MOV
ADD
i' 111'+
011572
011!:>7'1
Oll!i76
0124<'.'t
01231'+
Ol~'P'+
012'+~
0124~;
..
..
012'lb4
l:lCMl
lJCM3
012'1 I~
EOFT~T
0121 'Ir.
0125v'l
TS TR UY
CHCXOH
fJCr1'1
fa
cncnor
01£·5!•2
oCTPriT
01£6b0
OCTP
012~1
!PUSH RETURN ADDRESS UP INTO STACK
!CALCULATE TRAP INSTRUCTION ADDRESS
i(SP)+t•(SP1 !GET TRAP INSTRUCTION
UTAALE•l0'1'!00t~SP &CALCULATE TABLE POINTER
ilSPl+,PC
IPOP STACKt GO TO SUBROUTINE
n2,~SP
ClJRTST
HGSTST
1-4
iSP,2cSP)
SCOPf.A
0120.}'t
0121<.0
0121 l't
Ol23j'+
012.'i'<'+
0123:.>'+
01160'1
011606
1970 011610
1971 01lL12
1972 01161'1
1973 Ollbl6
1974
suo
0116.!0
Otl5':l'l
011556
1111560
011600
011602
1TRAP tlANOLER
TRAP3'1 l MOV
OB6U7
19'56
1957
1958
1959
1975
197b
1977
t9f6
l'H9
19/lO
1981
1902
l'J8j
t<;J84
1•3'!
··································~···············
l[NTEREO
WITtl SYSTfH TRAP CALLIHLTI
&PRINT Pc, STATUS REGISTER, COMMAND REGISTrH, BYTE COUNT. CURRENT ADORES
llSAVE,k2
PIHtH:
MDV
ISP! tlk2)
MOV
··········•··•·······
011620
0111..2'!
011626
011632
01lh36
0116'+2
0116'16
1985 011652
1986 011656
l'J67 Ollb62
1YUO OlH.66
1989 011672
1990 011676
1991 01170'1
199;! 0\1706
19Y3 011 HO
199'1 01171'1
1995 011720
0127U2
0116ll
00113'!
1627~2
000002
167162
16 7160
167156
167154
167152
177000
16 71'1'1
Ot77C.2
017722
0177£2
0 l 77.!.2
1 77.:.2
04<'7l2
011n2
0137'2
0137".2
0337'7
(J
SUu
MOV
MOV
MOV
MOV
MDV
BIC
MOV
MOV
001044
001072
1"17570
MDV
020000
llIT
001'1\Jl
HEQ
0 Oil.? UT
112,1R21+
iilMTSe IH21+
OlMTCo 11<21+
@BC ti R2 l +
@CA. IH2l+
@MTOelR21+
11177000olR21
iilMTRD, CH2l+
TEMPt IH21+
CRCWRTdR2H
SR,tt200001TEST FOR INHIBIT PRINT OUT
0 +4
PC
01271;2
013027
HTS
MOV
OO!i7~1
001100
TST
PH lrH 1
!JEO
,+6
0014 lJ 2
~MSGloR2
IBRANCH TO PRINT
IINHIDIT, RETUHN TO MAIN SlREAM
.MAIN.
1996
1997
1998
1999
2000
2001
2002
2003
200•1
200~
MACRO V06•03 05·NOV•14 12139
011722
011726
012702
011730
0052.H
0137U2
1044=>t.
001100
001134
Ol.Hv2
10440!.
001136
01371J2
001140
0117311
0117'10
011"1'12
011746
011750
011754
011756
2006 011762
2001 011 u.11
2008 011770
2009 011772
?010 011776
2011 01;000
?G12 U1200'I
2ou 012uot.
2014 01;;012
2015 0120111
2016 012020
20li 012022
20ltl Jl211S
0137u2
1044!::!.
0137L2
104 1P&
0137u2
PRTMSG
INC
MOV
PHTOCT
MOV
PHlOCT
MOV
PRTOCT
MOV
PRTOCT
MOV
PR rocr
MOV
PHTOCT
MOV
PHTOCT
MOV
PRTOCT
0011112
0011'14
001146
1044~!.
G137U~
001150
1044:'.>&
0137v2
10•;4.if,
0011::>2
0137li2
l 0 11'1" &
00115<;
00!:..7;>7
177570
NflSG2 tR2
IPRINT MESSAGE lN
~2
PRINTl
SAVEtR2
SAVC+2,R2
SAVE+ll,R2
SAVf+6,R2
::iAVf+lO tR2
sAvr+12.Roc
SAVft14eR2
SAVf+l6,R2
SAVf+20tR2
PtlTOCT
TST
SR
!CHECK SR FOR HALT SWITCH
BPL
• +4
HALT
IHALT ON lRROR UP
HTS
PC
!EXIT
l'\(JV
lOOOvl
oououo
0002u1
•••••••••••••••••••••••••••••••••••••••••••••••••• •••••••••••••••••••••
0327j7
01toooo
111570
00100!
0116;)7
001102
0002u1
2029 012052
2030 012054
20~1 0120&0
022606
0057jl
00141;)
001042
2032 012062
2033 012070
2034 012072
2035 012074
2C36 01:'100
2037 012104
203£\ 012110
2039 012112
2040 012114
2041
20 1i2
20't3
2044
2045
2046
?047
0 32 71 7
002000
001411
16t.B0
tENTEHfO WITH SYS1£M TRAP CALLISCorEI
1SCOP[ LOOP FOR EACH TEST
SCOPEA: UIT
~40000,SR
!TEST SR FOR SCOPE
BOE
SCOPEB
IYES SCOPE
MOV
~SP,RETURN
1SAVE SCOPE RETURN POINTER
RIS
PC
IRETUHN lNLlNL•N[XT TEST
SCOPEe: CMP
1SP1+,SP
!REPOSITION THE STACK
lST
TMTNFL
!IS PROGRAM IN TAPE MOTION TESTS?
ULQ
SCPRT
INU, RETURN TO UEGINlNG OF TEST
U2000tiMTS
lfLST EDT SlATUS
UIT
U[Q
SCPRT
IRETUHN IF NOT AT EQT
llEWIND
10411<'~
Ol.371J2
0127U~
Ol27U'+
MOV
MTS,R2
MOV
111tR3
U300tR'I
MOV
TSTRl>S
001020
000001
000300
1044~&
1044~0
000111
Hl. T
166762
SCPRT:
.JMP
@RETURN
!SELECT STAIUS REGISTE
IMA!.iK lUI< UIT
ISLT UP UELJ\Y
!ERROR, UNIT OlU NOT REWIND
!SCOPE HETUNN
••••••••••••••••••••••••••••••••••••••••••••••••••
•••••••••••••••••••••
1ENTEREO WITH SYSTEM TRAP CALLITSTCUHI
1TESJ CONTROLLER READY SUUROUTINE
1ARGUEMENTS:
fXIT TO RETUHN lF TIMEOUT
EXIT TO RETURN +2 If NOT TIMEOUT
20'+6
2049
2050
2051
2052
012120
012124
012130
01213'+
0137U2
012703
0J27U*
l044u&
001022
000200
00001 ,,
CURTST: MOV
MDV
tWV
lSTflGS
MTC,R2
U2on.R3
I''.< tH4
1Sll£CT COMMAND REGISTER
!MASK CUR on
!SU UP DELAY
.MAIN.
MACRO V06•03 05-NOV-711
2053 0121.36
20511 0121'10
2055 01211111
2056
20!>7
1213~ PA~t
0002U7
062711>
RTS
ADD
RTS
000002
0002u1
2062
2or,~
Ol211f6
0137Ul
2064
21)t5
206£.
2067
2068
2069
012152
012711.5
012711'1
001020
000001
00001">
lO7lb
000002
000201
2010
2011
20H
2075
2076
2077
20111
2079
01211 ..
0527~1
012202
01220'*
012212
0122111
0004U3
01127.H
000400
012216
0001100
012216
oosoi..:>
0312U!I
20£15 012216
OOl1tU!1
20;J6 012220
2087 01222'1
20U8 Ul2.?26
2089 012230
2090 01:>.'3?.
2091 01223'1
2092 012.?36
06271&
0002u1
0052U:i
001311
C O~i3!•'1
00130&
000002
0002U7
209~
20'.14
2095
2096
2097
2(191!
20':19
2100
2101
?.102
2103
!INCREMENT STACK
!EXIT
PC
POINT~R
·······································*·•········
•··•·····••··•·······
!ENTERED WJTtt SYSTfM TRAP CALLITSTRGR & TSIRGSI
2072
2073
2080
20111
2082
2083
20tllf
llllIT
#2,GlSP
ll[Sf TAPL UNIT READY SUBROUTINE
IARGUMlNTS!
l XIT TO RETURN +2 IF NOT TIMEOUT
I [klT TO RETURN lF TIMEOUT
TSTROY: MOV
MTS,H2
ISLLt.:CT STATUS REGISTE1~
IMA5K TUR !:!IT
MDV
Ul,R3
MOV
111!::,,R'I
1Sll UP DELAY
TSTllGS
RTS
llXll
PC
1100
U2,ii>SP
llNCREMENT STACK POINTER
RTS
PC
IEXIT
2059
2060
20&1
012161f
012166
012172
PC
,1ENTEREO
.....................•........................... •••••••••••••••••••••
WITH SYSTEM TRAP CALLIWAITTRI
2058
012156
012162
1•36
&TEST REGISTER BlltSI SU~ROUTJNE
1Al\Gll£1"'ENTS!
I R2= ADOFRSS OF REGISTER
R3= MASK FOR BITISI TO hE TESTED
R4= II OF SECONDS TO T!M[OUT
fXlT JO RETURN IF TlMLUUT
I EXIT TO RETURN +2 IF NOT TIMEOUT
RGSTST! BIS
U4001TSTIN
tSlTUP FOR BIT SET TEs·r
UR
TSTf1
RGRTSTI UIC
U4001TSTIN
&SETUP fOR OlJ CLEAR TEJT
TST81
CLR
1<5
UIT
iilR2,R-~
TS TIN: BEQ
TSTL
&LOOP IF TEST N£GIT1VE
AO[l
112,iilSP
l!hCkEMlNT STACK POINTER
Id S
PC
llXIT
TSTLI
INC
R~
ONE
TSTttn
&RETRY IF LOOP COUNTER NOT ZERO
D£C
l
1127·H
2109 012306
lO~IJi;,O
21011 012266
210!> 012270
2106 Cll2274
2107 012276
166570
000100
001076
000215
001076
;MOV ADDRESS OF MESSAGE TO REblSTEI\ 2
1lHEN PRINT MESSAGE
f0Pl
UICH
U177tiiifCSRICLR INT FLAG
MOVH
IR21+1£0MK
IMOVE IN [OM MARKER
TOP1:
CMPA
ii1R2,EDMK
!COMPARE FOR [OM
RNE
,+4
IND
RTS
PC
IYLS, lXIT
CMPB
@R2,U'@
BLQ
TOP~
MOVA
(R21+,CHAR
IPRINT MESSAGE CHARACTER
PR TOUT
tlk
TOPl
!BRANCH BACK
MOVB
TOP2:
U215tCHAR
ISLND CARRIAGE RETURN
PH TOUT
•"AIN,
MACRO V06•03 05·NOV•74 12:39 PA6( 1•37
2110 012HO
2111 012316
2112
2113
2114
2115
2116
2117
2118
2119
2120
?121
2122
<'123
2124
2125
212(,
21n
2128
2129
2130
2131
.?l.32
2133
21.34
213!'>
2156
2137
21.38
2139
21'10
21'11
2142
21 113
214'1
2145
012320
012322
112747
000212
HOVB
I SE:ND LINE FLED
112121CHAR
PR TOUT
R2
INC
IINCRHTN R2
INO EOM, SO LOOP
OR
TOPt
001076
lOlf'lbO
0052UZ
0007!:13
,1ENT£REO
......................................................•...........•...
WITH SYSTFtt TRAP CALLSIPWRCLR. WRlTE, READ, wnEoF. REWIND.
012324
012332
012111
0002lJ1
010000
166470
0123-~4
013717
001116
l661too
012342
012344
Ol2j52
01235•1
01'?362
0123,;4
012372
012374
012402
01?'10'1
012'112
012414
012422
01242'1
012432
01243 11
012442
01?444
0002111
013717
000201
013717
0002u1
013717
000201
013711
0002u7
013711
00021J 1
00111'+
166'150
001120
166'1'+0
001130
166'+30
001122
166420
001124
166410
001106
166'100
01'1556
166374
011/722
lbt.36'1
Ol?162 012524
2163 012526
216'1 012532
2165 01253'1
2166 0125'10
oc-1, ec-2,
,........................................................•.............
WITH
21•n
2148
2149
2150
2151 01250'1
2152 012506
2153 012510
215'1 012512
21::i5 01251'+
ISPACEF, SPACED. SELECT. WBUFCA, RRUFCA,
1COMl10NLY USlU MOVE ANO BIT INSTRUCTIONS
src012: MDV
"10000 ,OIMTC
HTS
PC
!EXIT
TCWT ,011HC
ST CWT: MDV
RTS
PC
!EXIT
STCRO: r10v
Tf.HO,OIMTC
HTS
PC
!EXIT
STCEF I MDV
TCWFoGlMTC
PC
IEXIT
RTS
STCRWl MOV
TCRW,iilMTC
RTS
PC
!EXIT
STCSF:
MOV
TCSFoi>MTC
HTS
PC
IEXIT
STCSB:
MOV
lCRSoiilMTC
HIS
PC
!EXIT
TCSL ,@MTC
STCSL:
MOV
HTS
PC
IEXIT
CAwa:
MDV
lllJIJuF, i>CA
RTS
PC
!EXIT
CARlll
MDV
llRl:IUF ,iilCA
RTS
PC
1£XIT
BCl111
MOV
11-1,0IBC
PC
IEXIT
klS
BCl'l3;
MOV
11-3 ,iilBC
HTS
PC
!EXIT
8Cl'i'I:
MOV
11-'+,0ll:IC
RTS
PC
IEXIT
111ioooo,ii!MTS
EOFTSTI BIT
HIS
PC
!EXIT
0'+27u0
006000
103011
0527110
010001
0'f27U 1
OOSilJO
177000
000400
00007'1
1Sil1ULATE CRC ROTAT£1 IF C~l GOES TO 1 COMPLfMENT
CRCROJ: UlC
11177000,RO
kOR
HO
ecc
CHCkl
INO EXIT
BIS
11400,RO
IMAKE BIT1=1
MOV
RO olH
uIC
117'1,Rl
COM
RO
~t5t6t
ANO 71
• l'IA lNo
2167
2lb8
21b9
?170
2171
2172
2173
217'4
2175
2176
2177
2178
2179
2100
2181
2182
218.3
218••
2Ul5
2186
2187
HACHO V06•03 05•NOV•711 12:39 PASE 1•38
Oli'5'*2
0125%
012550
000703
CRCR11
BIC
BlS
tHS
11703tHO
kl,RO
PC
1R£COHBIN£ toHPLEHENTEu BITS
IEXIT
,l[NTLH[D
.................................................
·····················
WITH SYST[M TRAP CALLCPRTOCTJ
012552
012560
012562
0125bli
012572
01257'1
012~76
012600
012606
012610
012612
0126111
012620
0!:'626
2106 Ol2b3'1
2189
2190
2 1 ')1
2192
2193
2194
2195
2196
2197
2198
21 ':19
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
Oll27UO
0501UO
0002U7
012636
012£,'IO
(11 ;it, '!!
Ol2t.'+6
0127.H
OO!:i7U2
ooooi>o
001076
0000.:.1
001076
177773
00101't
00101.:.
177770
000060
00101.:.
001076
lOOOU~
0127j7
104'lb0
OOL1U2
OOLlUl
0127j7
0061U2
0061U2
OOLllJl
0102.:.1
04r7; 7
o:in;)7
OOLOU2
lO'!5'1
012656
0127U2
104412
0002u7
011+535
01?660
012666
012&70
012672
012676
012700
01<'701)
012710
0327H
0014lil
000201
105717
1003/:J
013711
0002u1
020000
1PRINT OCTAL VALUE IN REGISTER2
OCTPiH: MDV
IINITIALIZE 2ST NUMBER AS O
11•0,CHAR
TST
ll2
IIS VALUE POSITIVE
Uf'L
OCTt
IYES f'H INT (j
u•l,CHAH INO PHlNT 1
MDV
PH TOUT
OCTl I
1WL
H2
HUL
R2
ll•:l,OCT ICOUrH 5 OIGITS
MOV
HOL
OCT21
R2
HOL
R2
ROL
R2
MOV
R2tCHAR
ISAVE DIGIT
!HC
Al77770 1 CHARICLEAR OTHER BITS
U60,CHAR l~AKE ASCII DIGIT
BIS
ROR
ll2
Pk TOUT
KOL
H2
INC
UCT
1+1 TO DIGIT COUNT
UNE
!NOT DONE
OCT2
tlYPE 2 SPACES
MUV
llMSGl 2 t R2
PRTl'ISG
IPHINT MESSAGE IN R2
RTS
llXIT
PC
,...........................................•....• ·····················
177~ 70
1661110
001076
166126
ouo
1£NTER£O WITH SYSTEM TRAP CALLIPRTOUTI
OCTPI
lllT
1120000,SR
OE.Q
llNHIOIT PRINTOUT?
.+4
IYlS, f..XIT
HTS
PC
iHCSH
INO, PRINT
TSTB
I lllA IT FOR READY
OPL
CHAR, iTDbR I PR INT
MOV
1£XIT
HTS
PC
....
(01'\KI
.uvn:
1••••
012711
012714
012717
012722
012125
012730
0127 33
012B6
0127'11
012744
012l47
012752
o:i 1
123
0'10
111
110
105
lU'I
100
124
127
103
122
111
105
101
117
111
1v1
ll 7
O'+O
12'1
040
lU~
1 i.'5
1 c'I
040
11.17
1<:<+
040
lU~
ld
ll2
103
122
116
0
HESS~GES
••••
,.................................................
······•··············
SWITCH HL61STLR ACCORDING TO I
HSGO:
, ASC ll
1/~SET
.l'IAIN.
MACRO V06•03 05•NOV•7«i 12139
2213 01275«1
012757
012762
012765
012710
012773
Ol21i6
013001
013G04
013007
013C12
0130 1 ~
015021)
01102.5
ill3D26
221'1 OU027
013032
013035
01.3040
0130'lj
013046
2215
2216
2217
2218
117
122
Hl
O'+O
t.:3
Jl5
lll
U.5
l!b
1~0
ld
1 ~ .5
1£'l
1d
Q.l 7
0~7
(J'+
0
O'+O
01t0
120
101
116
111
12'1
103
117
0'10
104
122
123
117
111
105
100
120
O'+O
12.5
lUl
12'1
lH
Hot
040
117
116
040
131
O'+O
O'IO
101
O'+O
101
Hl
O'+O
o~o
0 110
101
114
O'+O
115
O'+O
103
101
057
100
100
124
127
075
111
115
01~051
Hj
013054
}Ul
0130~7
o~o
013062
Ol .306!>
013070
01.3073
U13076
013101
0131 O'I
013107
013112
01311.5
013120
013123
013126
013131
013134
013137
013141
01314'+
013147
013152
01.5155
013160
013163
0 1.3 lf.6
013171
013174
013177
013202
013205
013210
013213
01321'+
01321 7
lVl
1(J5
o-.o
}U.5
O'+O
1u5
O'+O
o~o
l lJ:;
O'iO
1.:2
l lJ .s
lU()
o::i7
oo 1
H5
ld
Ot> 1
010
0'*0
110
lH
tlb
1n
l!f>
l! 1
1 ~ ..
l ~ '+
lUO
O'IO
PA~(
CoNTINUEi/I
107
116
1~2
12«1
]1!>
101
1 Oil
105
o~o
116
116
]00
0 110
103
O'IO
1 (!Ci
125
HSGll
.ASCII
""
.ASCII
IOATA B
•ASCII
l/i/1
.ASCII
l/iStT SWtlcl IF MANUAL lNT£AVENTION TESTI
PC
STATUS
COMANO
BYTE
CA
o~o
115
l 04
o'+O
12'+
0 110
O'IO
O'+O
0 110
124
102
READ L
TEMP
CRC CAUfll
l;i;:>
104
O'IO
1.!'+
l.!O
103
o~o
11'+
o::i7
123
HSG21
"1SG3:
O'IO
111
124
123
117
llb
ANOm~R[SS
12«1
105
12~
.ASCII 10P£RATING INSJKUClJONS
105
0.:.1
061
106
101
101
111
105
105
111
0'+0
123
040
12'+
126
12'1
1•39
.ASCll lmlS TO BE BYPASSED + PRESS CONTINUt/I
1
l'IAIN.
MACRO V06•0.5 U5•NOV•74 12:39 PAGE 1•'+0
013222
013225
01.3230
013233
013236
0132 111
0132'+'+
01.3247
013252
013255
2219 013260
013263
013266
013271
Ol.327't
O'+O
O'iO
1 1
1 ll5
1u5
1")
ld
013277
001'
013302
013.105
013310
013313
013316
2220 013320
013.32.3
013.326
013331
01333'+
013337
013342
0133 115
015350
0133'.13
10.:2
013.~56
013.361
01336'+
013.367
2221 013372
01.3375
013400
013'+03
013t;06
013•111
01341'+
013'+17
013422
013425
Ol.3 1130
013•1.33
013436
013441
01344'1
0134 '11
013452
2222 013•15!'>
OD460
013463
013 1166
OU471
1~5
117
lH
1U5
O!J 7
1u:>
lU.5
102
102
101
105
053
122
123
111
111
105
100
114
124
lH
1 l> ::i
1'10
i.·3
1U5
lC'.'t
ld
0!:>7
111
111
1c'+
1U1
o:>'+
lu5
1ci.
1"7
! "
1'10
123
103
12 11
o'lo
llb
0 .. 0
0::.11
040
125
O'+O
120
123
10!>
l<-i
l l&
o~
o
l lt:.
040
111
ObO
l'fSGl+I
.Ascu
l/iSELECT UNIT Ot PRESS CONiiNUE/1
l'ISG5&
• ASC JI
&/iSELECT UNIT Oo OFf•LINEt PRESS CONTINUE/I
MSG61
.ASCII
1/iDISMOUNf TAPE, REMOVE WRITE LOCK RINGt MOUNT JAPE1
• ASC lJ
liSELECT UNIT Ot ON LINE, PRESS CONTINUE/I
O'iO
0'10
105
lH
111
ll 1
10<11
lli 1
1uo
11:+
12.3
105
111
117
l(J6
116
116
Q57
Ot:.0
l
oa11
O'+O
O'iO
t' ..
l"~
O'+O
ius
116
116
057
100
114
124
116
040
040
lOt.
111
05'1
122
123
117
111
105
100
12.3
125
0'10
120
040
115
105
122
105
14'11
10!>
131
123
lo'+
t.i!5
123
105
o~
o
111
ObO
117
o::.s
116
O'+O
105
O'+O
116
116
o'.l7
10'+
115
116
12'+
105
122
117
O'+O
111
040
10.5
122
1 tl 7
ll~
116
12'1
105
105
103
125
124
0:>4
.HAIN,
MACRO V06•03 U5•NOV•74
01547•
Ol3't77
013502
013505
013510
013513
013516
013521
013524
2223 013525
013:0.~i)
013533
01,,~136
Ol35'+1
01354'+
013'•'+.,
Gl3'.152
013555
013561)
013563
013561>
013~71
01 !'.;(If
0135"/7
013602
OD605
013610
2224 Ol!.611
01361'1
013b l 7
01.3622
01362!>
Ol3b30
013633
013636
013f,'ll
Ol36'+1i
01%'17
013652
o•o
O'IO
11r.
12:39
PAGE 1•41
117
116
11'
111
O'IO
1\15
O'IO
05•
in
ur.
105
120
123
103
124
123
117
111
llb
125
105
100
123
104
125
116
12 11
105
122
114
1 O!I
1'12
105
O:l 7
001
111
l l 7
1
110
1.!*
111
1Ul
u :l
U7
lUl
115
105
101
0'10
117
O'IO
123
117
O'+O
120
ld
122
104
12 11
l 0.5
106
u13b5~
O*O
116
0'10
122
1£2
106
1 J. 7
115
Q'IO
013660
2225 013f,63
013666
013671
01361'+
013677
013702
1u2
1uo
117
123
11'1
105
1 <: ~
llf>
040
O'+O
111
060
o~o
117
01370~>
Q'tO
013710
0 l .'171.'l
0J.3H6
013721
u l .'l 7 24
013727
2226 01373:?
013735
013 7'10
llb
Q't 0
lU:i
040
!l!'i
1 u.
114
105
120
123
10.'l
12'1
125
125
12'+
110
124
105
103
125
1
05'1
116
111
c;5'1
122
l
JVO
111
ld
127
1 U'I
122
0
ASCll
liSELECT UNIT Ot ON LlNEt PRESS COtlTlNUEI
"'+
123
11 7
111
105
116
0'10
117
.ASCll
1auNIT SHOULD GO OFFLINE ANO REWINDS/I
.IMIN.
"ACRO V06•03 U5•NOV•7 .. 12:39 PASE 1• .. 2
0131'13
0137'16
0137!51
01375'1
013757
01:3762
013765
013770
1'15
O'+O
O'+O
lU C.
llC.
1 IJ l
o'+o
1£ 1
013773
}Lo'+
2227 013776
014001
014 00'+
014007
014012
014tll5
014020
014023
014026
014031
014034
0:.1
01 1•0.H
014C42
0140'+5
Ol't050
014053
01'1056
2228 014057
Ol4C62
014065
01'10'/0
Ol40H
01'+0 76
01 11101
01'11 O'I
014107
01'1112
014115
014120
01 11123
01'1126
2229 01'112/
01If132
01 .. 135
014!"0
0141'13
01 111'1£.
01'1151
01 1115'1
01415'1
Ollf 162
014165
014170
01'+173
01417&
2230 01'1<>01
014201f
014207
tu:>
llJ 3
10::5
1<:<+
o::>'+
l • c.
111
c:.'+
lC:'+
117
o'+O
tu5
O'+O
llC.
1u.
11 ..
107
117
11'1
105
116
122
111
100
100
114
12'+
116
04()
O'+O
O'+O
116
O'+O
040
124
120
123
103
124
125
10'+
117
106
111
O'+O
10'+
1 o':l
116
0:>1
1<'~
"SG8;
.ASCII
1/9SELECT UNIT Ot ON LINEe AT BOT, PRCSS CONYJNUE/f
"SG9J
• ASC 11
l/91F PROCESSOR IS A P0P11•'+!5e SET SW tell
.ASClI
lmIF
.ASCII
l/iPROCESSOR WILL HALTo PRESS CONTINUE/I
105
0'10
l ll
0£.0
117
11'+
105
101
102
O:l'I
122
123
117
111
105
o:i 1
0::.1
hb
1c:2
l1J5
ur
111
1(I1
1 U'+
Qbl
0"!>
1d
Olf 0
01to
0"1
1uo
O'+O
1~1
1 <. ..
1
057
1~2
1 u:i
l.i. 1
Q'l 0
1 <'+
10::3
117
116
Q'ti!
110
124
120
040
055
123 .
123
12:l
103
1111
040
O'+O
0'10
O!l5
123
131
105
120
123
uo
lO::'l
10::0
O'+O
iu.
11'+
110
11~
1uo
1~ ..
1.:3
ll!a
o:.i:>
1u2
01'13!:17
01 11362
Olti.!165
014.HO
014.H3
01'1376
014401
01440'+
01 '+'107
2233 01'1412
01•1415
014'120
0141123
014'12b
014'131
0144 34
014'137
0 1 11'1'12
22.H 014•1•13
O'l 0
014'151
01445'1
014457
1"2
127
114
101
054
125
042
101
105
101
0'+2
127
11 'l
Cil'1~5'1
014~4b
11'1
040
105
O'+O
116
llb
051
100
117
123
lU.3
O't2
1~1
11!.
1~3
1"~
1U ~
11'+
lVO
1u~
120
103
1~5
1iilPR£SS "CONTINUE" 6 JIMESI
, ASCII
1G1PUT
O'*D
103
0'+2
122
123
103
124
1£5
111
115
1211
105
120
040
041
0'10
103
125
123
123
11)2
113
O'tO
1• 3
}Ul
• ASC 11
CYClf~l
1<'3
l 31
105
1 <:3
117
o'l2
102
ot.Ea
O'ICI
liPUT •S•INST•li•OUS CYCLE" SW ON • •BUS
o~5
0'12
040
1-' ..
1d
.ASCll
WILL HALTt PUT "ENAB E•HALT• SW ON MHALT•1
042
111
124
lU~
iuu
1/ii1PROCESSOR
l .?3
0 112
116
.ASCll
O'HJ
111
0411
l l '1
O'+O
124
105
102
o:o5
114
040
0 .. 0
040
101
0'>2
o~ o
117
111
116
MSGll &
sw•s
BACK To "ENABLE" I "5• NST•tl
.11AIN.
MACRO V06•03 U5•NOV•74 12139 PASE 1•44
Ol44i>2
0141165
014'170
01'1'+73
014'176
014501
01450'+
014507
2235 01'+!:112
O'IO
O'+O
U6
1 l't
0 .. 0
042
141
li''t
o'+o
01"~·15
llJ s
014520
01'1523
014526
014531
()145 3li
2236 014535
014540
2237 01'15'+1
0145'1'1
Ol'l547
014552
014555
2236
223<; 01'1556
?240
22'+1 014722
2242
2243
o'+o
117
111
1U5
0=>1
057
os 1
0=>1
Pl
lUj
ot.o
(. :..1
oooouo
01470::2
oooouo
OOOOUl•
124
042
101
105
046
123
116
0 112
1?.0
123
Olf 2
116
116
0'+2
117
105
lll2
0'+2
0'10
o:>s
123
0:14
• ASC 1I
122
I PRESS "CONTINUE"i/I
)23
103
l .!4
125
100
040
040
MSG121
.Ascu
100
103
0'10
060
103
MSG131
• Ase u
WBUFI
0
RUUF:
0
II
II
l/iC'i'CLE 11001/1
U'I
0'13
061
.EVfN
.::WOUF+lOO.
••••••••••••••••••••••••••••
.ENO
.l'IAIN. MACRO V06•03 05·NOV•74 12:39 PAiE
SYMBOL TAOLE
BC
BCf'l4
BtiLl
CllRl:l
CHAil
CRCROT
CRCTl
CllCXOR
C1UiOT3
CR)(OR2
CUR l ST
(OMK
IIHST
IF<2A
IR4
IR!>A
'llN4BC::
"1SG10
'ISG13
'ISG4
MSG7
'I Tl\ AO
'11C
MltJS
MfPM
MTTRP
"!TVS
OCT
Ot Tl
PMlt
i>l\f(lj
PRTMSG=
PWtlCLK:
RU·O c
1HiHTST
SAV(
SCOP[B
SPAC(8:
STAHT
srrno
SlCSF
TAOLL
TtOL
TCHW
TCSll
TCwr
TEMP
TMA
TOP
TtlAl'3'+
TSR
rs TENO
TSTL
TSTHGS::
USS
.JOH
w'lH2
001024
0121f611
011206
0121/31f
001076
012516
00"/576
012504
001064
001056
01?120
012710
001040
00{-.116
006326
0064111
104~4'+
014201
01'15'11
013260
01.3j25
001002
001022
001006
001110
01145()
01)1016
0010711
012572
007332
0075'12
10'1'+12
10441'1
10'1420
01220'+
001134
012052
10'1430
001160
012.H'+
012374
011536
001112
001130
001036
001116
001044
003142
01?2 110
011516
003430
01130'1
012226
10•1 1106
010'156
00645'1
006!'152
012114 ..
001350
000776
0124211
(105'!14
0125!:>0
007636
OOlOtl4
001010
0010&2
o lrlu 02
= 104400
HLT
OObO'+O
IRl
006214
IH3
1R4A
0063:14
MINtUC:: 10'+440
MSGO
012711
MSGll
014?'17
MSG~
Ol31H
MSG5
0133
TO Pl
TklOF
Ot.l:.01Jo't
TSTfl
012212
TSTEOF= 1041146
TS TROY 012146
T7CH
Oll3'i l '1
USSl
010426
OOf,4~0
w!lfiS
0061.14
W8H3
BCM1
OEGIN
Buff =
CAWB
CINST
CRCHl
CRCT2
CRROTl
CRROT4
CR)(0R3
CllRITE
=
1·4~
012'*~ ..
0111100
CA
001026
cc
= 177776
CRf Pl
007610
CRCTST 007572
CRCllHT 001072
CRROT2 001060
CHXOR1 001052
CRxOR4
001066
EOFTS.T 0124 ., ..
IOBYP
004250
00(,114
IH2
JR3A
001'230
IH5
001'376
MlN31J(: 10'14'+2
MSGl
01.3027
MSG12
014535
MSGJ
01.31 114
MSG6
013372
MSG';
014U~7
MTAV
001010
MINAO
001000
MTP
00110'1
MTS
001020
MTVN
001320
NXMT
00~67'1
OCT PKT 01255:.!.
PAft
007104
pAH3
007532
PH I MTl 001100
PHTOUT: 104460
IWUFCA: 10•1436
R£WHHJ= 104424
ROTCMP: 10'1'15'1
SCOPE.A 01?03'1
SELECT: 101<'13.:?
;:; 177570
s~
01;>!54
STCEF
ST CSU
01;>40'+
01:>334
stci..1
00!1076
TDC
TCRS
00112'1
TCSL
001106
TCl..iF
001120
TUB1(
001034
TE:'~PS
001uso
TMTNFL 001042
TUP2
0 l?-~00
BCl'l3
Sf.LL
Till(
00~>112
TSTCUR:::
TS TIN
TSTHGR:
USLEfl
wAl TlH:::
104404
012216
104410
001132
10445Ci
00f>tl20
006704
.ifllH4
.l'IAIN. MACRO VU6•03 05•NOV•7'1 12139 PA&E 1•'16
SYMOOL TABLE
wBR5
WBUF
01'15!l6
WRIT£. : 1041116
007070
wREOF s 104422
WBUFCA: 10'1'13/t
XCLOk :; 10'1'452
OllO
01472'1
out
000000
ERROflS llfTECTEO I 0
F~££ CQf![;
1116 7. wu~os
P466,P466/CRF(P466
• AOS.
CHOSS
BC
flt~lKENCl
1- 30711
1- 693
1-10'16@
1~1396"1
BC Mt
3Cl13
BCM4
3£GIN
tlELL
BGL 1
CIUFF
CA
l-196.S
1-19€.5
1-1966
1-1967
1• :Bu
1-1902
1-18 111
1- ;>8511
l•U86
1- :50llU
1- @
CINST
1·119'1ol
CRCPl
l·lb0211
CHCUOT 1-1971
1·2162
CRCR1
CRCTST 1·15')611
CACTl
l•H>OOU
CRCT2
1-160'1
CtlCWf70
CRl!OTl 1- 31911
Ctll 190l
l-2!05iil
l-2!37iil
1-1 dbal
1-lt.09
1-21&011
1·2lb911
1-tb38
1-1t>to11
1- ,J~ljiil
l•1270i
1-21 :>111
1-lbl3@
1-lbl'Jiil
1~1LZ5Ql
1-lldliil
l•lblOiil
l-l1>l6iil
1•1L22iil
l-1L2iliil
1-1617
1-1623
1-1029
l-2~~911
1-21~511
11'.)3
l-2!00
1- '111
1· 'l&O
1- ~10
1- :i~o
1-220711
1- '118
1- '168
1- 518
1- !)55
( 1'\ ,
, -
,
11- !:03
l- ~~ ':i
1~1013
1-121l8
1-1880ii
·. ·iU
-
'·!I
',I
1- lj 75
1- 525
h~'l
.... ,
'496
5'10
5fl2
l•
11·
11l·
11-
629
676
733
760
811+
838
867
895
1- 920
1- 960
1- b!a+
1- 1>81
1· l'lO
1· 786
1• b17
1· l>H
1- b70
1- t>5'6
l• ':10!4
1- ';1!>8
1- 639
11·
1·
111111-
686
71+6
7%
620
846
878
902
934
970
1•
1·
1111111l•
6'lT
691t
7!12
1102
1121+
650
IH'l4
908
9~2
973
111·
11·
11111-
6~5
706
758
1107
829
853
8%
911
9'15
976
1·
l•
111l•
1111-
662
118
766
809
63:?
8511
689
914
9'11!
980
1111·
111111-
670
729
773
1111
835
861
892
917
957
966
CROSS R(F£RENCE TABLL
1· 991
1-1018
1·1049
1-1075
1-1099
1-1139
1-11 72
1·1206
1-12:53
1-1:>65
1-1311
1-1359
1-1399
1-1464
1-1~109
S•2
1- '"flt
1-1Li!6
1·11152
l•lv 78
1-1105
l-ll.'t6
1-1176
1-17
1-P13
1-1~59
1-1"~6
1 .. <'A
1-1557
1-1652
1·16110
1-1756
l-11116
l-lb64
l-1'Jl9
1· gJ6
1- 31311
1-1 29'+
1-1307
1-1310
lR3
Ill3A
1-1-32'.1
1-1 i.ll(,
1-1159
l-ltl19
1-11'·!>7
l-l')l2
1- ';1~8
l• I !\7@
1-1.:.0111
1-Pllll
1-1.:.1511
1-1.:l.5311
1-P52
lR'I
l•l.3'16
1-P~lll
IR'IA
l~D57
l·Pl>O
1115
l•t•H511
1.p14
1• I 'J7
1-1 <+e.a
1• '1S4
1-1 ~ ':17
1-un
1·2'1211
1-2.:1•111
1-2do11
1-2• 3111
1-2•'5611
1- ~52@
1-1')05
1·2"1611
1·2<'.l7U
IDBYP
IDTST
IRl
IR2
1-1:~21
'11 AS
1•1369
1-i:n1
1- 27211
1-1411
1- 27311
1-1173
l• 27'>11
1- 3'17
1·1993
1•16'12
1-187'+
1-219'1
1- 351iil
1-1 'JO'liil
1-1'196
1-1726
1-1738@
l-l 7710l
1-1782@
l•lll09iJ
l -1 fl2'J;..)
l-1036
1- 2'1811
1- 302h
>HAV
1• .301U
1- :;r,7
f'ITC
1- ~0611
1- 514al
11-
Ii<5A
MINlllC
'1IN3tlC
'11N'+BC
"ISGO
MS Gt
MSG to
'1SG11
11SG12
'1SG13
'1SG2
MSG3
'1SG4
MSG5
MSG6
"ISG7
'1SG8
MSG'J
'ITAAO
l-11~2iil
1-1112
l-J/63
1-1010
l•}L50
l-2Ci?BN
1- .;,!)9
1- :;e.e
~09
:J
l
~Jiil
1- 997
1·1029
1·1055
1-1081
1-1108
1•1149
1-1181
1-1214
1·1246
1-1276
1-13-H
1-1366
1-1'107
1-1'171
1-1526
1-1572
l-lhl1l
1-1691
1-1 779
1-11123
1-1671
1-1926
1- 9'1311
1· 937
1•100'+
1•103'+
l•lOf>O
1·106'+
1•1115
1·1152
1-1184
1-1218
1-1252
1•12 T9
1-1135
1-1368
1-141'1
1-1476
1-1529
1-1579
1-1 f, ,, ..
1-1707
1-1 790
1-182£.
1-1879
1·1937
1·1009
1·1039
l•lOb3
1·1067
1•1122
1·1155
1-1166
1-1224
1-1255
1-1282
l-J .B7
1-1373
l-J '12'1
1-14 79
1-1536
1-1583
1-lf.&7
1-1713
1-1798
1-1l:Jli7
1-teaa
1-2039
1-1012
1-1042
1·10£.6
1·1093
1-1128
1-1161
l·H'O:>
1-1221\.
l-1258
1·12Bf.
1-1349
1-1377
l-1'127
1-1484
1-15'+0
1-1587
1-1073
1-1722
l-1801
1-1659
1-1891
1·1015
1·10'+5
1•1072
1·1096
1·1135
1-11f,6
1·1205
1-1230
1-1261
1-1296
1-U52
1-1379
1-1'+.51
1-1500
1-1553
1-1649
1-1336
1-13381
\•1367
1•136911
1·1378
1- 930
1-1510
1·1006
1·15H>
1-1243
1-138011
1 • %1
1·15511
1-10 30
1-1221
1-1677
1•1008
1·1269
1•16~6
1-1136
1-1653
1•1035
1-1559
1-1656
1- 353iil
1-1907iil
1•1898
1-1906i
1-l'JOOiil
1·1909
1-1901
1-1746
1-222011
l-2221tl
1•222311
1-222111
1-17£.li
1·221911
1- 456
1- '19'1
1- 523
1· 3750)
1- 374@
1- 41p;
1- !>lb
l·lt• 76
i-1 n3
1-1805
1·1661
1-1895
1- 939i
1-1~~2
1- 522ii
1•11412
1·1681
l-1911iil
1-1903iil
1-2d7#
1- 507iil
1- 527iil
1- 506
1- 528
CROSS REFERENCE TABLl
l• 532iil
1- 5'16
1- 568
1- 5910)
1- 611@
1- 627
1- b5l@
1- 666
1- 600
l-1162
l-1295oJ
1-1333
1-1503iil
1-1550.i
1-115ow
l-2o'l9
\-2131@
1- 30911
"TD
1-166~
IHNAO
l · 2'HU
"lfNS
MfrJV
11ff'
1- 30011
1- 29511
1- 33111
1- 3.Bll
l•J 3 11'1
1- 310u
l· 7 H
l·lL'Hal
1- 305U
1·- 756
1- 8390.
1- !168
1-llH
IHPM
1o1rno
loll$
-
1-1~56
IHTRP
IHI/
1-1570
1-11117
1-2032
1· 254
l• -'03u
1-1.S%al
'ltVN
1-
MTl/S
1- 30'IU
l·l369iil
l· 26'111
1-12'12
1- 32 711
l•l97:i
1-19/2
1-2176
1-210211
1·1119111
1·153j
1·1537
1·156111
1-1576
1- 29311
1-20(,7@
~OP
~KMT
OCT
OCTP
OCTPHT
OCTl
OCT2
PAk
PllH 1
PAl!2
,>AR 3
PAR4
PC
~66
l-?1240:
1- :>33
1- ::.52iil
1- ::>7'1iil
1- =>92
1- b12
1- b.11@
1- "~2iil
1- <>13@
1- 062
1-1'-00@
1-1~96
1-13550)
1-1~06@
1-P~lcil
1-1 /j4
1-211%1
l-2d3iil
1- ~!17
l•tL67
1- .; ~(,
1- jfow
1- .1&9iil
1- jel9b9
1- jf>7iil
1-Pf>9iil
1- .) 7211
1- .)b6iil
1-1,&811
1-2J.8liil
1-2<::0011
1.2i 111n
1-217811
1-2192
S-3
1• 537iil
1- 553
1- 575
1- 5960)
1- 616iil
1- 632
1- 653
1- 074
1- 090
l-12(J':iiil
1-1297@
1-1358
1-1507@
1-1563@
1-1799
t-212liil
1- 538
1- 559il
1- 579il
1- 599il
1- 617
l • 6 36iil
1- 65'Jiil
1- 676iil
1- 995
1-1259
1·13QAGI
1-13&1
1-15£.6ol
1-1021@
1-2123@
1- 5'12iil
1- 560
1- 580
1- 600
1- 62liil
1- f,3 7
l· f>6U
1- 679
1-1016
l-1213iil
l-13Q'i
1-1372
l-1523iil
1-1567iil
l-1Bo5
l-2125iil
l• 5'1!
1- 566il
1- 58'liil
1- 606iil
1- 62:>
1- 6'11iiil
1- 66b@
1- 662\iil
1-1106
1-12711@
1-1327@
1-1425
1-1524@
1-1737@
l-11.lll9
l-2t27iil
1• 5't7il
1- 567i
1- 585
1- 607
1- 626i
1- 6115
1- 667iil
1- 66'1
1-1150
1-1260
1-1330
1-1 1H7
1-15'1701
1-1743iil
1-1982
1-2129iil
l • 'IB-1
1-1965
1- 715i
1- 716
1·1530
1-1573
1-1305
1·1293
1-1306
1-1318
l-1Jl9
1-1320
1· '151
1-1253nl
1·170':1
1- 416
1- 771
1- fl'17
1- 958
1-1206
1-1277
1-1751
1-1062
1-2063
l• 37'1
1· -'72iil
1-1390iJ
1- 501
l-J5111i
1·19S7
1- '166
1· 778
l• 6'18
1• ,,~ ..
1-1212
1·128'+
1-1757
1- 726Ci
1- 727
1-166'1
1- 730i
l-15~tli
1- 738
1- 78'1
1- 851
1-1085
1-1216
1-136'1
1-1777
1-Illl.l6
1- 7'116
1- 803
ln 8511
1•11"7
1-1231
1-1375
1-1786
1-1893
1· 750
1- 836
1- 659i
1-llb'I
1-123'1
1-1527
1-16()3
1-1981
1- 3!11
1• 3!Hi
l·D90
l-12':1'1iil
1·1'.133#
l-1307i
1-1.Si?li
1- 3 73iil
1- 382iil
1-1293iil
1-l305i
1•1.H%l
1-202oi
t-2092il
1-2130iil
l-2028iil
1-2102iil
1•2132@
1-2053iil
1-2120iil
1•213'1@
1·2055Gl
1·2122iil
1•2U6GI
1- 373
1- 372
1-130'1
1-12\i2
1-1s2oai
1-16~9
1•?1~5
1·1663ii
1•219liil
i-1::i1e11
1-P4211
1-1::iao
1-l '>48iil
1-<>uf>90l
l-212t>w
1-1581111
1-1992@
1·2067@
l-212ilal
CROSS REFERENCE TABLL
PRINT
PRINTl
PRTMSG
1-2138QI
1·2196QI
1·19'19
l• .32911
l• 261"
1-2l'toai
1-uo2a
l•lll'H
1-11.l-'7
1-2000
1-2ul'I
1-2106
1- ~ 57
1- u21
t- :J:38
1-FE>2
1-1117
1- ':I 1 A
PRTOCT
1- 27911
PR TOUT
1- 20011
1- 26211
1- ~00
1- 977
1-1215
1-1584
1- 896
1-1120
1-1417
1-2137
1- 27111
1-1'121
1- 26'111
1·11·5'.I
l· BOii
1- 2b611
1-1002
1-203 11
1-1753
1-1';52
1- 27811
1- ;>Ohu
1- .:.94ol
1•1325ol
1-1393QI
1-1417
1-1 lt49iil
l-1'159iil
1-1517@
l-~·012
PwRCLR
RBUF
IHJUFCA
READ
RETURN
Rf WINO
RGRTST
R(;STST
l'IO l
RO
ct'.P
1-1~>38
Rl
R2
S•lt
1-1563
l-1617ol
l-lb3'1ol
l-!687 ..
1-173•1 ..
1-lfl5•1ol
1-216liil
1- 2117n
1- 400
1-161 11Ul
1-11..330!
1-216'10!
1- 208;+
1- 1147ol
l-1783iil
l-1'178@
1·1'1tl5oi
l-J 9'J'.I@
l-20130.
1-2100
1-21112@
1·2206@
1-2tttlti
1-21'16i
1-2155a
1·2169i
1-1994
1-1727
1-111113
1-2002
1-2016
1-2109
1- 465
1- 8b2
1-1019
1-1.?83
1-1613
1- 97'1
1-1141@
1-1'132
1•19,Biil
1•1H7
1•1675
1-2004
1-1773
1•1699
1-2006
1-1784
1-1997
1-20011
1-1811
1-2195
1-2010
1-2111
1- '172
1- 6 71
l·lO!IO
1-1301
1-181i8
1-1010
1·1153
1-1'156
1-2178
l• lj 79
1- 899
1-1125
1-1315
1-1892
1-1100@
1-1158@
1-1'181
1-2189
1- 486
1- 921
1-1163
1-1331\
1- 493
1- 949
1-1187
1-1300
1-1159
1-lLb2
1·1119ii
1-1'115
1-1665
1- 905
1-l!:>lb
1-1007
1- 962
1-15&0
1-1103
1-1005
1- ll!l 1
1-1144
1-1102
1-11'13
1-168;>
l-1'122
1-1471+
1-20.?7iil
1- 865
1-104 3
1- 876
1-11 76
1- 922
1-1222
1- 955
1-1720
1· 978
1-1920
l·lblb
1·16~'1
1- 306iil
1- 369
1· 398
1-1353ii)
1·1405
1-1452
1-1 1152iil
1-1452
1-1520
l-15%iil
1-1577
1-1625
1-1637
1-1 Jn;>iil
1-171i8
1-2152
l ·<'l £>6
l -H.22
1·167liil
1-1630
1- 390@
1- 399iil
1-1354@
1-1408
1-l't3bill
1-1 1153
1-15Qliil
1-15300l
1-15'17
1-1581
1-162':lol
l-Jf.(,8Qi
1- 391
1-1191il
1•1355
1-1415iil
1-1437@
1-11157@
1-1502@
l-153liil
1-1561@
l-16llii'.
1-1631
1-1670@
1- 393iil
1-1192
1•1392il
1·1416iil
1-1438
1-1'158iil
1·1503
1-1534
1-15b2iil
1-1613
1.1632
l-1b74
1-1711@
1-1851@
1-1~1611
1- -'63@
1·
j~O
1-11•ooi
1-l'*l8
1-llL'!
1-2·~qlll
1-
IJ8Q
1-1~73
1- '>&3
1-lfdc;
1- jf6iil
1· b33
1-H27
1-20~0
1-2ue211
l-2u~Oll
l·lbl2
1- ;;67iil
1- ~95
1-U2b@
1-P94
1-1~211@
1-1 ~~o@
1-lH>Q
1-1'>18@
1-1 "'l'liil
1-P13ol
1-lbl9
l-lb.15@
1-1<>~8@
t-113':)
l-l'J15iil
l-21 &.5ol
1- .:>~f.@
1-1 '1 tlliil
1-1<>1(,
1-1 t,, j()
1-215~@
l• H7@
1- L54@
1-1"10@
0
l-l~f9Q)
1-PO&Lil
l-2u01@
1-2vl~@
1-2103
1- 39biil
1-1327
1-1'10 1tcil
1-1'12':1
1-1451
1-1480@
1-1519@
1-15'15@
1-15"14@
1-1623@
l-ltd60l
l-lt.8'J
1-U67ol
1-1916@
1-216'1
1- 35':;@
1-1482
l -H,20@
1-lbl..'.1@
1-21&0
1- 355~
1- %'1@
1-llUO@
1-1980@
1-191\7'11
1-200.1@
1-2035@
1-210!'>
1- 3!.0iil
1·12~8iil
l-lll3biii
1-1981i>l
1-19 'lllol
1-<'oos@
l-17U~i>l
1-170~@
1-1769@
1-2153@
1-21£.7@
1- jf>lOJ
1-lf.Qliil
l-Jf.26@
1-2151
1-1770
1-2154
1-21£,Biil
1- ;j'J 7iil
1-160:?
1-1621\
1-2152@
1- 362
1-172.biil
l-lt> 112@
1-1982@
1- 80.5@
1-17'16@
l-11>7'1@
1-1963iil
1-1993@
1-2009@
1-2084
1-2179@
l-l~(l9iil
1-2()~9@
1-2001@
1-2063@
1-21 t;;>;.J
1-?l 75
1•2lbOiil
1- 390@
1-16U5iil
1-1632@
1-215401
l· 042@
l-1'172@
1-18':180.
l-l ':18'1iil
1-1':1%@
l-20lliil
1·2U'J9
1-2l80iil
CROSS HCF[RlNCl TAOLL
R3
R'I
R5
SAV(
1·2182Ql
1- 211911
1-2050al
1- 29011
1·20510!
1- 29111
1- 34 11U
1-2oG'J
SCOP(
11l·
1·
111-
25711
4'19
499
5 1H
583
62:i
f., 72
1- 736
SCOPE A
SC OP CB
SCPRT
SCLCCT
SP
SPACfB
1- 783
1- 'Jl.13
1-1221
1-1385
1·1719
1-11\08
1·1':50
1-2026
1"2031
1- 2(.911
1•1787
1- 2nu
1-1.38£.ai
1-1979
t-
neu
1-1412
SPAC[F
SR
1· <'67"
1- 28211
1- 719
1-1241
l-1575ill
srAHT
STCU12
SlCfF
ST CHO
s TCf{w
Sf CSB
STCSF
ST CSL
STCi.IT
f Jl!Jl[
JAMO
TBC
TCUL
1-2u17
l• 2%
1-1955
1-19:58
1-1957
l-1 '.i59
1·1961
1·1960
l•l'J62
1-1956
l•l'l'U
1- j!.i8
1 • 1-'Hll
TCfHl
1· 33511
1- 33611
TCHS
TCl133
1- 31211
TCSR
l-2ll'l3iil
1- "0'1@
1-206'1@
1· 1105@
1-20:.5@
1·2U63@
l·l '178
1-2U11
1- ~ 07
1- ~~6
1- :>Of,
1- :>H,
1- :i:io
1· b~O
1- b17
1- H3
1- ; ~4
1-lliOl
1-l'°~O
1-1·13'1
l·l H9
l-1U2Q
1.2u2511
1-2v2911
l-2U!i3
1- /;17
1-lb)lj
1- .)%iii
1-1 'df,
1·2U27
l· 906
1- l '* !>9
1 • !• ~l
1- ,:,:,7
1- I f>liil
1-1'1 :!;>
l-t:J89iil
1-2v~5
s-5
1-218'1@
l· 843@
1·2081+
1· 844iil
1-2090@
1·2080cil
1-19'39
1-2013
1- 414
1- '164
1- 51.3
1- 551
1- 597
1- 635
1- 682
1- 749
1- 027
1-10?.'I
1-1268
1-1 1156
1-1760
1-1828
1-204011
1- 777
1-18115
1- 377cil
1-19'1'1@
1-2029
l-1070
1-1511
1·1047
1- 365
1- 935
l·l50'!iil
1-1£,94
1-2200
1-21 !l!'i
1- 855@
1·2151ii
1• 856@
1-2188@
1- %5iil
1·2153
1· 9b6iil
1-2190&1
1·121+9@
1·219 .. i
1·2036@
1-1250&1
1·2037@
1-2001
1-2015
l • 421
1 • 4 71
1- 521
1- 551
1- 605
1• 6H
1· 6!19
1- 755
1·2003
1·2005
1-2001
1- 428
1- 476
1- 526
l• 565
1- 610
1- 650
1- 701
1- 765
1- 875
1-11 ~6
1-1302
1-1 tl/\S
1-1775
1- '135
1- 485
1- 531
1- 573
1- 615
1- 658
1- 713
1- 770
1- 929
1-1170
l-lll72
1-1 f-'11
l-J78f.
l·Hl76
1- 442
1• '192
1- 536
1- 578
1- 620
1- 665
1- 725
l• 776
1· 954
1-1190
1-13'12
1-1701
1-1793
1-ltl96
1·1347
1-1647
1·1776
l-13031il
1-J9 116iil
1-2068iil
1-IOY7
1-165'1
l-1317iil
1-19 117@
1-2066@
1-1157
1-11>711
1-l .i'l 3iil
1-19 .. 8
1- 3'13
1-1111@
1-172'3
1- 695
1-1117
1·15'18iil
1-1640
1· 707
1-ll5b
1•1!>6'111
1-1990
1•1621
h1517
1-1561
1-2123
1-1449
1·1734
l • !I !)lj
1-1091
1-1290
1·1431
1·17&6
1-184'1
1-1322
1-1817
1·129lii
l-1945@
1-2054@
1-10 76
1-155'.:l
1-10511
1- 3!17
l • 1109
1·1521ii
1"1723
1-l~jj2i.l
1-1~16
1-1228
1- :,~511
1-211911
1-212511
1-2l~311
1-212711
1·2!3111
1-212'Jll
1-21 ~:~11
l-2121U
l•l HYU
l• ;)bQJj
1- 363
1- b9[1
1- !d7
1-lH&@
1-2!31
1- 400
1·1451@
1-P~3
1·2127
1-212'1
1- ;)95@
1-1191
1·1197
l-1~1;>
1·2090@
1·2203
1-1767
CROSS REFERfNCE TABLL
TCW[
$·6
WBHS
l• 311111
1· 33611
1- 33711
1·151f't
1- 71511
1- 31111
1- 315h
1- 704
1•119f\ol
l-1435ciJ
1-1598@
1-tt.l't
1-17450.
1-1809
1- 31611
1- .31711
1- 70311
1·149'+
1- 31'111
1-1954
l-2!00U
1·210'+
1- 2'+8
1-1112
1-1110
1- 767
1-2081
1- 2se11
1- ll85
1-1028
1-1071
1-113 11
1-1223
1-13'+11
1-1463
1-1525
1-1660
1-lll46
1•1725
1- 27511
1-10£.1
1-20600I
1-2065
1-1'J69
1- 26011
1- 2591J
1- 762
1- .31f 3u
1-11 111
1-1 736
1 - 2 7611
1-1185
1-13921!
1·13Jlll
wHf< l
1-l '1 O'ill
1-1~09
wtl1<2
wflfl3
wBH'I
1·141611
1•142'Jll
1-1 11'12
1-1418
1"14'3
l"l H511
re Wf'
TCllT
TOB
TDBR
TE.MP
f[MPP
JEMPS
T.. A
nun
TMTNFL
fOP
TOPl
TOP2
ri.AP3'1
Tkl'.OF
TRL[
TSH
TSTB
TSTCuR
TS TEND
fSTEOF
TSTJN
TSTL
TS TROY
TSlRGR
TSTHGS
T7Lll
US LEN
USS
USS1
.iA ITlR
WBH
1-1~25
1-1~ 111
1·2125
1·11136
1•11tlt5i
l•lltltl
l•llt531i1
1-1501
1 • 692
1- 715
1·139lci
1-14'+.3Cil
1-1607i
1-16n
1-1763
1-1936i
1- 697iil
1- 716
1-1393
1-11160@
1-1t.ue01
1-1£.113
1-1771)@
1-1938@
1- 702iil
1- 721iil
1•1405
1·11161
1-1610
1-16'J6ii
l-1771
1-1988
1- 703
1.11 nil
1·1'129
1-11172
1-1611
1-l 7110iil
1-1782
1-110111
1-11111@
1-1639i
1·2030
1- 831
1- 987
1·1 O'+ll
1-1098
1-1177
1·1275
1-11101
1-1499
1-1£.'18
1-1797
1-1 nl
l· 8311
1•10011
1-10116
1-1104
1-1201
1-1323
l-lltl3
1-15011
1-1651
1-1815
1· 8f>6
1•1025
1·1059
1-1127
1-1210
1-1328
1-1423
1-1512
1-1655
1-1622
l• 'JOO
1- 909
1-1050
1- 967
1-1251
1• 956
1-1923
l• 979
1•1925
1-2121
1- 122
1-l~llf@
1- b:IQ@
1- IO%)
1-ll 9%l
l • 1 Oiil
1-lbOoiil
1-1020
l-11:io
1-1ti29
1-1 ';1~4@
1-1':133iil
1- 110
'* ..
1-1:;i:n
1- :i111ui
1-21.11811
1-211)7
1-210811
1-1 :i-1411
1-111711
1-1116
1- I /bll
1-2US3u
1- /35
1- 'J07
1-ll!B
l-lv77
1-1Ull
1-1.:29
1-P:il
1-1'1&6
1-P=>2
1-lb/9
1.1ti60
1-11.s1
1- u12
1-11J13
1-2us2@
1•2U!!Bn
1-2116311
1- 1106
1-..!il36
1- : ()"
,
l·ll39ii)
1-11%11
1-11 .. 211
1- 010
1-1" l5
1-1.:l ~5
1-14~/j
1-2205iil
1- 691
1- 711tiil
1-1200
1-14'+1
1-1601
l-lt.2b
1-176;?@
l·l'B3
1-1'J39
l·l'J.38
1-lt.'H
1- 793iil
1-2113
1-1125#
1-2089
1- 808
l<> 933
1-1036
1-1092
1-11 115
1-1245
1-1356
1-1470
1-1556
1-166t;
1-1078
1-11173
1- 62<:
1-2091
1- 828
1- 969
1·10"1
1-1 0 ~5
1-1171
1-1211
1-13 98
1·1'+75
1-15&8
1-1721
1·1918
1•1698#
1- 6!17
1·206511
1- 8'15
1-2052
1• 8H
1-2066
1·17'1'+iil
1-1 76'+
1•1763
1- 677
1-125'1
l•l'l'l'I
1- 923
1•1370
1•1003
CROSS R(FERENCf TAOLL
WBR5
1-1lf6211
1- 616
1•13911
. 1-1611'1iil
wBuFCA 1- 27011
1-11.32
1-1 u 11':l
1- 26511
wREOF
1- 26J11
WRITE
1-1'100
1- 27711
XCLOR
1- 2'1211
1- 401
1- '152
1- 502
1- 544
1- 586
1- 626
1- 675
1- 717
1- 757
1- 816
1- l)(,Q
1- 901
1- 'J'I .,
1-1011
1·1U7li
1-1121
1-1180
1-1217
1-12111
1-11t<:6
1-1522
1-1578
1-1666
1-1710
1-1178
1-1855
1-1890
1-2101
olBUF
1-.11186
1- ~'16
1-l'IDll
1-lb!.2
1- 196
1-111'1
s-1
1- 969
1•llt08
l-lf.65
1- 931
1-12411
1•1062
1•11t95i
1·1852
1- 985
l·LB7
1- 830
1- 986
1-10110
1-10 52
1-1796
1-1627
1- 25011
1- 4 24
l• 47'+
1- 5::?'1
1- 5!>1
1- 608
1- 6~t>
1- 693
]• 75:>
1- 779
1· 637
1- 898
1- 'HG
1 • 'H!i
1-1051
1·1129i
1•11t96i
1-21.35
1-1031
1-llf'M
1·1130i
1•161t:>i
1-223911
1•1036
1-15113
1·1392
1•16113i
1-22110
1·10&9
1-16115
1-1175
1·1133
1-1883
1·1350
l•l2H
1- 2%11
111•
11•
1111-
1-lllfll
1- /99
1- ':132
1-1'l65
1-1t.1!'>
1- ~'16
l - lj 10
1- ~ :,9
1- :>09
1- :..'19
1- :Jj3
1- b~3
1- b60
1- 120
1- I E.5
1- 1>19
1· cJ69
l• 'JlO
1- ':159
1-1Ul4
1-1 ~ tio
1-1148
l·l•SJ
1-1''~?
1-1~65
1-1430
1-P211
1-P!l2
1-]b72
1-1112
1-116?
l•lo56
1-1tdlj
1.2.;01
t-1650
1-1621
1- 24711
1- 1117
1- '167
1- 517
1- ~J54
1- 601
1- 6.~8
1- 685
1- 728
1· 77:t
1- 823
1- 1~63
1- ';13
1- 972
1-1017
1-1083
1-1151
1-1193
1-123'.J
1-1334
1-143\1
1-153!:>
1-1'>86
1-lC.75
1-1724
1-1800
1-ltJ58
l-1Yl3
1-2204
t-10%
1-11 5'1
1-1195
1-1257
1-13!>:;>
1-1476
1-1539
1-1590
1-16'10
1·1 BO
1-180'1
1-18&3
1-1917
1-22~011
l•l O'H
1-1037
1-1850
1- 29411
1- 431
1- lt&l
1- 529
1- 5t>9
1- 613
1- 654
1- 696
1- 739
l• 785
1- 840
1- 891
1- 'H9
1- 'J'JO
1-105'1
1-1107
1-1157
1-1204
1-l~hO
1-1365
1-11183
1-15•19
1-lb03
l•H'J::i
1-1 7 ";2
1-ll\16
1•1866
1-1991
1l·
11l·
1l•
4311
'1811
534
576
6111
bbl
7U5
1- 1'15
34411
'1'15
'195
539
581
623
669
708
751
l• 601
1- 8'19
1- 813
1- ll9q
1- &'J1
1· 941
1- 993
1-1062
1-lllli
1-1160
1·1207
1•126'1
1-137€1-1493
1-1!>6!'1
1-1601'
1-17011
1-1755
1-1825
l-lu7o
1-1995
1- 9'14
1- 'J'J6
1-1065
1·1118
1-1165
1-1213
1-l:t76
1·1'+06
1-1505
1-1!:171
1-161)3
1-1706
1-1756
1-1653
1-1887
1-2018
1- 852
...•
u
..J
.J
ER MUST OE IN MEMORY.
2, l'Ll\Ct lllNflfly TAPE. lN HEAflLH.
3, LOAD AUUkl~S •7500 I• OETLRMINEO BY LOCATION OF LOAOERJ
~. PRESS «STflHT" (PROGRAM WILL LOAOlo
43
'+4
45
'16
'17
<+9
TRACKI
STORAGE
.53
311
'Ill
~
STARTING PROCEDURE
I Ii•
I
50
.. '1
:11
CGNTkOL SwlTCH SlTTINGS
FOR INITIAL
52
51
O~E~ATION
OF PROGRAM ALL SWifCHES SHOULD BE s 0
(OH DOWN),
~lj
I
55
56
57
11112
STARTING
AO~RESS
I
I
200 • RASIC fEST
IAUTO~ATlC
PARAMETER ANO UNIT SELECTION)
FOR PDP·\\, St.T COt,f1FdH.lE. \\
TD f:)l\S L[Vt.L 'S
MACRO V06•03 12-DEC-74 12124 PAGE l•l
P'+68
511
59
60
204 • OPERATOH CONTROLLED PARAMETER TEST CwllH
r.1
I
(,3
1413
1>4
I
I
I
I
I
(.6
&1
66
PROGRAM ANO/OR OPERATOR ACTION
L040 PROSRAM INTO MEMORY
SET oEsI~EO ru10 TAPE UNITS ON-LINE
LOAD ~TA~TlNG AOOHESS 200 1204 OR 210 TO SELECT PARAMETERS ANO
UN!TSl
FRI.SS START-PROGRAM WILL BEGIN TESTING FOR LOAD ADDRESS OF 200
OTHERo1lse:
SlLECJ TAPE UNITS IREFEKENCf 4e3tl•ll
SELECT PARAMETERS (REFEHENCf 4,3,21 .
TYPE CAH~fAGE HfTURN ANO PROGRAM WILL BEGIN TESTING,
&9
70
71
72
B
7'+
75
76
11
I
I
I
f 4 I 3 ol
I
I
76
79
80
81
82
83
6"
65
66
67
86
f .•
'
,.
j
69
90
'.11
92
'H
94
95
96
97
98
'H
100
101
102
103
MEMORY AVAILABLE
210 • OPERATOR CONTROLLED PARAMETER TEST lwITH 6K MEMORY AVAILABLE
62
b5
4K
TAPE UNIT SELlCTION
STARTIN& THE PR~GRAM AT 200 WILL RESULT IN AUTOMATIC SELECTION
OF THE UNITS TO BL TESTLO IREFLRENCE 4o3olo2l OTHERWISE STARTING
AT 20• ON 210 WILL ALLOW OPEHl\lOR TO SELElf UNITS,
THE PROGRAM ~ILL TYPE "SELECT UNITS"• ANY CONFIGURATION OF
TO l'i UNITS l'IAY BE SLUCTEO HY TYPING Tiil UNIT NUl'OERS ON
THE TfLLTYP[, A~Y SEUUENCL OF NUMBERS MAY BE TYPED, AFTER
EACH NUMHfR IS TYPED A COMMA Col WILL BE PRINTED, TYPING THE
SAM[ UNIT NU'1llf"'l TWICE WILL Cl\USE THAT UNI r NUM!IE.R TO Ot: DELEH:o.
TYPING ANY KL Y :Htil.R Tt1AN 0 H1RU 7 WILL CAUSL A QU[STJO~l MARK
I?) TO bl PRlNT!O ANO THAT KEY ~ILL OE IGNORED,
1
I
I
I
I
I
I
TO TERMINllT[ UNIT SELtCTION TYPE A CARRIAGE RETURN, WHLN
CAR Ill AGE Hl TJHN IS lYP[(l THE PROGRM1 WILL CONTINUE TO THE
11 PARllMETEH StLECTION" UNLESS NO UNITS WEHE SLLECTEO ANO
IN
THAT EVLNT WILL RETUR1i TO THL llEGil\INING OF ":>ELECT UNITS",
•13tlt1 TAPE UNIT SELECTION LXllMPLES
SELLCI
SELECT
U~ITS
3,4,5
U~ITS
5,3,4
IN EITHlR CASE, UNITS 3,,,5 ARE SELECTED,
SELECT
A CARRIAGE
U~ITS
RElU~N
WAS TYPED WITH NO UNITS SELECTED,
1011
105
106
107
101!
109
110
111
112
113
11 11
SELECT
U~ITS
lo97olt2
ONLY UNIT 2 &ELECTED, UNIT 1 WAS DELETED ITYPED TWICEI
ANO THE 9 WAS IGNORED,
14t3•lt2 STARTING AT 200 WILL RESULT IN AUTO~ATIC SELECTION OF UNITS TO
SE lESTlo, A UNIT ~lLL Uf SELECTED FOR TESLING IF IT MEETS THE
FOLLOWING LRlffqIAJ
lo IT ts ON•LJN[
?. IT l& WHITE f NA!ILEU
CR
Plt68
115
116
t17
110
119
120
121
122
123
1<'4
125
126
127
120
129
MACRO V06•03 12•0lC-7'1
121~4
PAGE 1•2
IF TH[ ABOV£ CRITERIA ARE NOT MET BY AT LEAST ONE Ill UNITt
OPERATOR SLLECTION WILL OE REQUIR[D !REFERENCE 4e3ellt
14,3.C!
PARAM[TER SELECTION
I
I
STARTING THE PROGRAM AT 200 WILL RFSULT IN AN AUTOMATIC SELECTION
OF TlST PARA~lTERS !REFERENCE 4e3e2el0l OTHERWISE STARTING AT
ADDRESS 204 OR 210 WILL ALLOW OPfR~TOR TO SELECT PARAMETERS,
FOR 7 Tl 3
l&'I
165
lf,f,
tf,7
1611
lf,9
1 70
l 71
4
WRITE 1 ~ECORD, HEPEAT FOR ALL UNITS, REPEAT FOR 256
kECOHOS, BACKSPACE 2~b RECOROSt R£PEAT FOR All UNITS,
HEAU l RECORD, HEPlAT fOR All ~NITS, RlPLAT FOR 256
krcoHOS, CONTI1
257
258
259
uo
261
21>2
263
2b 1t
77
~
67
75
H
73
7'.l
75
75
I
I
I
I
I
I
I
26~
I
I
276
2 7'J
280
281
21'2
2B3
21l4
2115
37
37
37
57
57
57
67
67
21.6
2E>7
21>8
2b'J
270
271
272
273
27'1
275
216
217
CEVENI THREE o•s EACH TRACK EVERY
6TH llORO
76
76
7b
EfC
~
f000) THREE 1'5 EACH TRACK EVERY
6TH WORO
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
40
'10
'10
20
20
20
10
10
10
Olf
Olf
0'+
02
02
02
01
01
01
£TC
6 COOOoEYENI ALL
1•s
77
17
£IC
MACRO V06•03 12•0EC•71+ 12121+ PAGE 1•5
P4168
CEVENI RANDO" CNO ALL o•s1
286
7
287
288
7 (000) RANOOH llNCLUOING ALL o•s1
?
?
269
l+.~.2.2.2
290
2'.ll
292
293
29'1
295
PATTlRN 19 TRACKI
TllERl ARE 8 OATA PATTERNS AVAll.ABLf FOR SELECTION 10 THRU 7>
296
PA TT£RN
DESCRIPTION
DATA
CHANNELS
.
INCREMENTING PATTERN
000
001
002
003
0410
200
002
202
297
298
299
300
301
302
303
30'1
..
.
I
I
I
..
.
I
377
777
I
I
ETC.
£Tc,
0'10
0'10
0'10
OOt;
001/
00'1
010
010
010
020
020
020
100
100
100
3:.>8
329
000
000
000
200
200
200
100
100
100
0110
0'10
0'10
020
020
020
010
010
010
00'+
00'+
00'+
002
001!
002
BO
001
305
306
307
308
309
310
311
312
313
31'1
315
316
;)17
318
319
320
$21
322
323
32'1
325
3.?6
I
I
5
EACH
C~ANNEL
3 SITS
I
I
I
I
I
I
I
I
I
I
I
I
.527
331
J32
333
Bil
3j5
336
337
l38
339
3110
I
I
I
I
I
I
I
I
llll
I
6
HIGH
F~EQUlNCY
ALL CHANNELS
002
CR
Cl<
CR
Ck
CR
CR
CR
CR
Cl!
CR
CR
CR
CR
Cit
CR
CR
Ck
CR
CR
CR
CR
0(11
001
LT Co
ETC.
377
117
717
CR
CR
CR
?
CR
ETC.
RANDOM
001
001
'100
'100
1100
002
002
CR
CR
CK
CR
CR
CR
CR
200
200
200
371
7
Olll
CR
CR
CR
CR
CR
Ct<
CR
CR
CR
CR
CR
CR
Ck
CR
CR
?
4•5.2o3 PARITY 17 TRACK ONLYI
ere.
CR
342
·~
MACRO
P-.68
12•0EC•7'1 12:2'1 PAGE 1•6
V06~03
3'13
PARITY
SELECllO~
311'1
3'+5
lS EITHER EVEN OR OOD,
PAR
DESCRIPTION
0
EVEN PAHlTYt
1
000 PARITY
.5'16
3117
.)'HI
3•19
350
351
352
3~,3
'103,2,'I DENSITY 17 TqACK ONLY)
THERE AHE
'I
CR
TYPES OF OfNSlTIES FOR SELECTION 12•5o8tCI
354
OEN
DESCRIPTION
2
200 BITS PER INCH,
5
556 RITS PER INCH,
361
8
800 RITS PER INCH,
362
J63
c
800 BPI
355
556
357
3 ~Jll
359
360
COH~
DUMP,
364
H.5
'1•3,215 RECORD
LENGT~
SEQULNCE
366
367
THERE ARE 'I TYPES oF Hf.CORD LENGTH SEQUENCES FOR SELECTION CO THRU 31
3f,8
369
RLS
DESCRIPTION
0
MINIMUM LENGTH RECORDS l'I BYTESI
1
MAXIMUM
370
Hl
372
373
37'1
375
376
2
3
360
3111
3112
.H'.3
364
3~5
RECORDS 1102'1 BYTESI
VARVJNG LENGTH RlCOllDSt MINIMUM 10 ~AXIMUM ClST RECORD=
AYTES, EACH SUCCESSI~E RECORD IS 'I BITES LONGER
UNTIL 25&TH HECOkU=1024 UYTtSI
q
317
378
.H9
~ENGTH
~t5o2t6
VARYING ~(NGTH RECOHDS, MAXIMUM TO MINIMUM ClST RECO~Oa
1024 OYTESt LACH SUCCESSIVE RECORD IS 'I BYTES SHORTER
UNTIL 25&TH RECORD~4 UYTES)
WRITE
THERE AHE
STA~T/STOP
3
MOOl
TYPES OF WRITE MODES FoR SELECTION I 0 THRU
~1
.H\6
3117
3l\8
3!19
.i':IO
Hl
392
WMO
DESCRIPTION
0
NONSTUP : NO WAITING BEfWEEN WRITE OPlRATIONSt NEW
COMMAND IS ISSUED WHEN CU REAOV SETS,
1
START1ST~P
2
RA~DOM
3':13
39'+
395
5%
397
390
399
• FULL STOP OETWEEN WRITE OPLR•TIONS, NEW
COMMAND IS ISSUED llHEtl TU l•f '«IY SLTS,
• FULL STOP WITH RANDOM DELAY
11-~~D
'1•5o2t7 REAO START/STOP MOOE
THERE ARE 3 TYPES OF MODES FOH SELECTION 10 THllU 21
MlLLlSECONOSI
P468
MACRO V06•03 12•0EC•74 12124 PAGE 1•7
'+00
<+01
1102
'103
'10'1
405
406
'+07
406
409
'110
1+11
'+12
413
41 'I
'+15
1116
417
418
09
ft?O
'121
11?2
'123
RMO
OESCRIPTlON
0
NONSTOP • NO WAITING BETWEEN READ DPCRATlONSt NEW
COMMAND IS ISSUED WHEN CU RCAUY SETSt
1
START/ST~P
2
RANDO~
• FULL STOP AETWflN REAU OPERATlONSe NEW
COMMAND IS ISSUED WHEN TU REAUY SETSt
• FULL STOP WITH RANDOM DELAY C1•256 MILLISECONDS>
... s.2.a FINAL TEST SELECT APPROVAL
AFTER SELECTING RMD• IF ALL PARAMETERS SELECTED ARE LEGALt "OKH
WILL OE PHlNTEo. lF THE PARAMETERS SELECTED STILL cORRESPONO
TO THE OPERATORS INTENTIONS HE MUST TYPE A CARklAGE RETURN
TO SAVE THl PllRAMETEf, 0
:,,,1
OPERATIONAL SWITCH SETTINGS
70
THE OPERATIONAL SWITCH SETTINGS ARE USED TOI
it71
.. 72
4 73
1174
'175
476
'111
478
'179
'fllO
'lfll
'lll2
:+83
'+8'1
'l!\5
i+ll6
4117
'188
'11\9
'190
'+91
'192
'193
'19'1
'195
'196
A,
ALTER ERROR RECOVERY PROCEDURES
81
DELETE
C,
CAUSE A TfST SEYUENCE TO BE REPEATED WITH A \/Al1
552
553
5~'1
6t
ERRORS
6•1
WRIH ERRORS
557
558
559
560
561
562
563
56't
565
566
567
568
569
570
6
0
2
0
0
0
WITH swo=l
TlST 3 WILL BE EXECUTED 6 TIMES (PATTERNS 2•71
ANO THEN TlSf r+ WILL BE EXECUTED 2 TIMES !PATTERNS 6171
N01[; x~x PRINTED FOR PAMITY AND DENSITY IF ONLY 9 TRACK UNITS
555
556
TST ?AT PAR OEN RLS WMO RMO
j
2
0
2
1
0
0
THE FOLLOWING
OPERATION,
Ao
E~ROR
CR
TYPEOUTS ARE POSSIBLE DURING A WRITE
WRITE STATUS ERROR
COMO
xxxxxx
STATUS
RECORD
LENGTH EXPECTED ACTUAL
XXX>&
627
STATUS
xxxxxx
RECORD LENGTH EXPECTED ACTUAL
'11
"
THIS ollLL OCCUR WHEN E.RROR IBIT 15 OF COMMAND REGISTER)
SfTS DURING A Rf AU OPERATION, THE CONTENTS OF THE COMMAND
ANU STATJS RlGlSTlRS IS PRINTED ALONG WlrH THE RCCOMD NUMBE
AND RlCO~O LlNbTHo
6;!3
6?4
625
READ STATUS ERROR
a.
kEAU DATA ERHUt<
MACRO V06•03 12•0EC•7'+ 12&2'+ PAGE 1•11
Prt68
COMO
628
STATUS
xxxxxx
629
630
RECORO LENGJH EXPECTED ACTUAL
107
102'+
177777 115777
X)()(XXX
THIS WILL OCCUR WHEN THE OATA READ DOLS NOT AGREE WITH THE
OATA WRITTEN• THE CONTENTS OF THE COMMAND ANO STATUS RC:GISTE:RS
IS PRINTEOt ALONG WITH TltE RECORD NuMOER ANO RECOHO LENGTH,
ALSO PRI~TEO 1$ THE CONTENTS OF THE MEMORY ADOR[SS FROM
~HJCH THE DATA UAS WRITTEN IEXPECTEOI ANO THL CONTfNTS OF TH[
MEMORr AJOHESS INTO WHICH lT WAS READ (ACTUAL), THIS INOI•
CATES TH~ FIRST DATA TRANSFfR ERROR FOUND FOR THE RECORD,
NO ATTf.M=>T IS MAlJE TO O[lEH11INE IF THEHl. ARE OTHfR DATA fHRORS
IN Tiil RC:CORU,
631
632
63j
63'+
635
636
C.37
638
639
6110
Ct
&'11
READ PASS
642
.;113
ENO OF TAPt:
"""
6116
ORV
PAT
PAR
3
'I
1
6115
OEN
CD
MOOE
NSTP
RECORD
1276
LENGTH
M·MAX
6117
kEAO STATUS ERRORS : 3
DATA ERR:>RS : l
NON RLCO~ERABLE ERRORS : 0
6'18
!;'19
6!>0
651
ON UNIT 5, USING PATTlRN ~. 000 PARITYt CORE OUMPt READ "ODE
NONSTOP, 1276 RECORDS OF VARYING LENGTH I'+ TO 102'+1 WERE
READ, OUUNG TttAT TIM£ 2 READ STATUS ERRORS ANO 1 DATA
ERROR occuHRE[.), THERE WERE 0 NON•RECOVLRABLE ERRORS WHICH
INDICATES THAT THE STATUS AND DATA ERRORS WERE ELIMINATED BY
RE·REAUl~G THE RECORD UP TO THREE TIMESt
652
&53
65'1
655
656
657
6~6
NOTEl THE SA~E :>UTPUT CONVENTIONS FOR PAHITI ANO DENSITY ARE
APPLICABLE HERE AS IN SEC. 6,1,C
659
660
&61
662
61>3
664
io3
ERROR
RECO~ERY
6,3,1
WHITE
ERRO~
PROCEDURES
CR
CR
CR
6&5
&E.6
667
RECOVERY
6&8
THE PROCEDURE TO RECOVER FROM A WRITE ERROR IS DETERMINED BY
THE FOLLOWING!
t.69
670
671
672
673
67'+
675
676
677
678
679
660
6Al
682
683
61!4
I
I
I
I
I
I
At
IS IT A uwRITE ONLY" TEST OR WILL THE DATA BE READ?
Bt
IS "WRITE STATISTICAL RECOVERY" SELECTED CSW 6=117
c.
IS "DELETE WHITE WITH XIRG" SELECTED ISW 5=11?
'•3olo1 IF IT IS A "WRITE ONLY" TEST •NC "WRITE STATISTICAL RECOVERY•
IS NOT SELlCl[O c•w 6=01 Tit[ WRITE ERROR IS SIMPLY COUNTED
ANO THE PHOG~AM PROCEEDS TO THE NEXT RECORD,
1603•102 IF IT IS A "WRITE ONLY" TEST ANO "WRITE STATISTICAL
I
RlCOVERY" IS SE~ECTEO CSW 6=llt A WRITE ERROR IS COUNTED ANO THEN
A RECOVERY scnu~NCE (UACKSPACE 2 RECORDS, SPACE FORWARD 1 RECOROt
MACRO V06•03 12•0EC•7'+ 1212'+ PAGE 1•12
P .. 68
685
6116
687
6118
689
690
t:.n
b92
;:,93
694
C.95
6.96
697
6'J6
REWRITE RECORD) JS ENTfREO, THlS RECOVERY SEQUENCE Wlll BE
REPEATED UP 10 7 TIMES IF THE WIUTf ERROR PEt&RAM AT AUDfilSS 200 OR 210 WILL EXPAND THE WRITE
ANU RCAD UUfFERS SO THAT MlNlhUM LENGTH RECORDS WILL OE
P1168
MACRO V06•03
6
7112
7113
71111
ANO
~YTES
~AXIHUH
12~0EC•711
121211 PAGE 1•13
LENGTH RECORDS WILL BE 20118 BYTES,
9•
PROGHAM
OESC~IPTlON
9tl
GENEHAL
OlSCRIPTlO~
H5
7'16
7117
7411
THE PROGRAM lS DESIGNED AROUND TWO MAIN SUBROUTINES "WRITE" ANO
HRlAD" ANU A SERIES OF MINOR 5UBROUTINES FOR MANIPULATING UNIT
SELECTIO~, HANDLING ERROR STAlISTlcS, AND HECOHO POSITIONING,
IF MORE THAN ON[ UNIT IS SELECTED THE UNIT WllH THE LOWEST
NUMBER IS SlLECTEU FIMST ANO WHEN THE SEQUENCE IS COMPLETED
THEN THE NLXT L~WEST UNIT NUMUEH IS SELECTED UNTIL ALL UNITS HAVE
BEEN SlLECTlU, THIS PROCESS IS REPEATED UNTIL ALL UNITS REACH
ENO OF TAPE,
7119
750
751
752
753
7511
755
756
7'.J7
758
91l
THIS IS A "WRITE ONLY" TEST, THE PROCEDURE IS TO ~HIT[ l HLCORO,
RfPEAT FOH ALL JNITS, CONTlhUE UNTIL EOl1 WHITE MOOE OF NONSTOP
fWMO=OI Will NOT bE A~ fFFECTIVE SELECTION FDR THIS TEST ULCAUSE
THL WRITE ROUTl~E IE LXITEO AFTLR EACH HECOHO TD ULTEHMlNE lF
ANY OTllLR UNITS ARL SLLECTEOt HEAD MOOE IRllOI HAS IJO £FF£CT ON
THIS TEST,
759
760
7bl
7&2
763
76'1
76'.J
766
767
9t11
TEST 1
THIS IS A "WRITE ONLY" TEST SIMILAR TO TEST 0 EXCEPT A SEQUENCE
OF 256 HECORDS IS WRITTEN ON EACH UNlT·OLFOfiE CllANGING TO THE
NEXT UNIT, READ MODE CRMOI HAS NO EFFECT ON THIS TEST,
7£,1}
769
770
771
712
TEST 0
9•'
TEST 2
773
THIS IS A ~w~ITE ANO HEAD" TEST, T~E PROCEDURE IS TO WRITE 256
RECOKDS ON EACll UNIT, THEN BACKSPACE 256 RECORDS ON EACH UNIT,
THEN READ 25b RECORDS ON EACH UNIT, lND THEN KEPLAT THE SEQUENCE
UNTIL ALL UNITS ARE AT EOT,
17'1
775
116
171
118
779
700
7111
7112
7113
764
785
7116
787
7811
91~
TEST 3
TlllS IS A "Wi{fTE AND Rfl\0 11 TEST, TljE PROCEDUHE IS TO WRITE 1
RlCORO, UACKSPACEe READ 1 RECORD AND REPEAT FOH EACH UNIT, THEN
HrPEAT THE SEOU~NCE UNTIL ALL UNITS ARE AT [Of, WRITE MOOE OR
READ MOOE OF NO~STOP IWMO:O OH RHO:OI WILL NOT BE EFFECTIVE
FOR TrUS Tf.!;t,
916
TEST
Ii
THIS IS A "WRITE ANO HEAD" TEST, IT IS SIMILAR TO TEST 2 EXCEPT
UNITS AHE CHANGED B~TwEEN EACH RECORD DURING WHITE, BACKSPACE,
ANO H[AU. wRiTE MOOE OR REAU ~OU£ OF NONSTOP CWMO=o DR RMO=ol
WILL NOT bl EtF~CTIVE FOR THIS TEST1
NUTE: TliIS TEST WILL NOT FUNCTION PROPERLY WHEN OPERATING
ON A DUAL Uf~SITY SYSTEM CNRl/PEl ~HOSE DENSITY SELECTION
IS COMPUTER CDNTROLEO,
789
790
7'11
792
793
794
795
79f,
797
796
9•1
TEST 5
MACRO Vb6•03 12•0EC-7'1 12124 PAGl 1•14
P'l68
THIS IS A "READ ONLYn TEST, THE PROCEDURE IS TO READ 1 RECORD,
REPEAT FOR ALL JNITS, ANO CONTINUE UNTIL ALL UNITS ARE AT EOT,
THE MAIN PURPOSE OF THIS TEST IS TO PROVE COMPATlUILlTY AMONG
TAPE UNITS, A T4PE THAT IS WHITTEN ON ONE UNIT SHOULD OE AHLE
TO Hl HLAU O~ A~Y OlHlH UNilt TLST PAHAMETfRS THAT SELECT
PA TTEfW AIJD REC ORU LENGTH St: lllJf NCE MUST llE THE SAME AS THOSt: USEO
TO WHITL THE DATA ON TAPE, AN·1 OF THE OTHLR TESTS (0 THRU '+I
CAN BE USLO TO ~ENEMATl THE DATAt
799
800
801
8Q<'
A03
804
805
Sllf,
I
807
808
809
810
Sll
I
I
I
I
I
I
I
!l 12
813
814
815
616
617
816
619
820
821
STATUS ANO COMMAND KEblSTER BIT ASSIGNMENTS
l:OMMANll HlGISTfR
115
f.flROfl
00 = 200 UPI 7 TRACK
01 : 556 UPI 7 TRACK
11'1
DEN 8
113
DEN 5
112
POWLR CLEAR
I
111
110
19
I
824
8:'5
17
d26
16
PARITY
UNIT SELt BIT ~
UNIT SEL, BlT l
D
= ODO
1 :
I
6?1l
1!5.
1129
14
630
831
13
I
832
12
11
10
ADORE.SS !JIT 17
Allllf6
857
658
859
1\60
861
A62
I 2
I 1
I 0
WRITE LOCI< CWRI
REWlNU STAfUS iRWSI
lAPE UNIT REAOY !TURI
.ENABL
.ENABL
000000
.NLIST
863
864
865
8&6
861
TT14
I
•••••••••••••••••••••••••••••••••••••••••••••••••• •••••••••••••••••••••••••• ••
I
I TITLE DATUM DATA RELIABILITY • 7 ANO 9 TRACK
RO="o
Rl=io1
R2=:112
R.5::"3
R4:i<4
R5=:i5
Sl"'=%6
pC::07
oooouo
OOOOUl
OOOOIJ2
000011.5
OOO(iu't
00001.5
6b8
8&9
870
871
872
8H
8H
875
OOOOIJ !i.
0000w7
.=o
oooouo
87£.
IH7
878
879
800
081
88:!
eo3
8tl'I
885
886
807
8ll8
889
690
8'Jl
892
893
694
895
89&
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
AMA
ABS
000010
0000115
000034
000200
000204
000210
000214
000216
000220
Ou0222
01)0224
000226
000230
000232
OU0234
000236
0002'10
0U0242
0002'•'+
000246
000250
000252
000254
OUD256
0002r.o
000?.t'..2
ll0026'1
000266
000270
000272
0000:. ..
01:>00&
ooc2uo
OOOP7
00(11 j,
oooPT
1725<'0
172522
1725«'1
1725d·
001152
001552
001556
IHSI
11TC I
BCI
CAI
oooouo
0000110
11n1e.
1775., 0
177~"0
1H5b2
1775t...
1775L6.
00201io
OO~OU'I
0133£~
0153~~
0002•~
oooouo
oooouo
ouoouo
OllfJOllO
000000
.=10
.REPT !I
.+2
HALT
.ENOR
.=34
TRAPj4
.=200
JMP
AUTOST
JMP
14E'4'1K
JMP
l'IE148K
172520
172522
172524
172526
0
CR
CR
1TRAPPEO TO PREVIOUS ADDRESS
&PKll'IARy INTERRUPT VECTOR LOCATION
0
ORVSEL
STRLE.N
oooouo
t.ENGJH
oouo~o
MSBlTS
0
0
0
0
CR
CR
CR
CR
CR
0
177776
CCI
177570
SRI
1 77~&0
TKSI
TKBI
177562
TPSI
1175blf
Tl'BI
1775b6
MAXLEN: 1024.
I
I
MlNLENI 'I,
I
UUFFlR
wUUF:
RBUF:
8lJfFER+1024.
I
MTV:
224
1TEMPORARY SfORAGE AREAS
ATST:
0
0
CK
"AX KECORO LENGTH
MIN RECORD LENGTH
STARTING ADDRESS OF WRIT~ BUFFER
STARTING ADDRESS OF READ BUFF
ISECONOARy INT£RRUPT VECTOR LOCATION
CR
CR
---·- - -- __
.,.
MA(RO V06•03 12•0(C•7'1 1212'1 PAGE 1•16
P'16ft
913
91'1
915
916
917
916
919
920
00027'1
000276
000300
000.302
00030'1
000306
000310
9~1
Q(J(J,jllj
000~12
'J22 000316
923 000320
92'1 oou322
':12~ 00032'1
926 000326
927 0l)l)33Q
928 000332
9.!9 0()033'1
910 000336
931 0003 110
932 000~'+2
933 000.H'I
9.3'+ 000346
9.3~ OQQj50
93b 0003!12
937 00035'+
'il36 000356
'J39 000360
'J'IO 000362
9'11 il003G'+
9'+2 000.'166
943 ooo.no
Cj~lj 000372
9'1'5 00037'+
946 ooo.H6
9'17
948
'3 119 000'1'50
950
951 Ou051'1
952
'3:d 000560
954
%5
956
'j57
958
959
960
%1
00062'1
000670
SVRt.CR:
COMAr-jO:
CORVBT:
C0RlV£:
RUPASS!
00(J4:l0
DoTAB
DlTAU
D2Tll8
03TllU
OlfTl\0
05TAll
06TllB
D7TllU
STACK:450
.='150
DO TAB I 0
.=ooTA8+1f4
OlTA81 0
.=01TAB+lf4
02TAB: 0
,=02TAB+'l'I
03TABI
0
,:03TAU+'l4
O'ITAB:
0
,:04TAB+'+'+
o:.TAB: 0
,::05TAUi'l'I
06TAO: (l
,:06lAB+'+'+
07TABI 0
,:D7TAB+4'1
I NUMBER OF n:sr
NUMTSTI 0
PARAMl
I TfST PARAME:TERS
0
TST£X:
I POINTS TO TESTS PARAMtTE: S TO BE EK£tUTEO
0
TlST:
I CONTAINS CURRENT TEST NU BER
0
TSTTBL: 0
I TEST TABLE
oooouo
OOO~i'+
OOO~bO
OOf16i: +
000610
0007.)'+
001 ouo
0010~'+
0004:.>0
0004 ::io
oooouo
00051'+
oooouo
ooo5uO
000000
00062
971 001124
oooouo
972
'J73
974
97:>
001126
OOOOuO
001130
001132
000000
001134
976 001136
977 001140
978 0011•12
979 0011'14
9BO
961
9il2
983
984
OOl I 116
001150
001152
9eb
001~00
oooouo
oooouo
oooouo
oooouo
oooouo
ocoouo
0
oouo~o
pGMODl
oooouo
STFLGS
AUTOST
037745
'J67 001206
012P7
01('7.>l
0127.'.l 7
968 001214
969 001222
01:?7.17
0127.17
030265
021540
000003
123456
000256
001120
001122
001124
176543
001110
007260
0072b2
0127H
001241*
ooonu'I
oo~P7
023324
990
000•1u3
022£.d·
l0 114jf>
00l)4Ul
104440
998
999
1000
1001
1002 00125'1
1003 001262
100•1 001270
1005 001274
1006 001300
1007 001304
lOOb 001310
1009 001314
1010 0UJ~l6
1011 00132'1
1012 001330
1013 0013~6
1014 OUJ ~40
1015 00l.H2
1016 OOU4'>
1017 OQ!.Hb
1018 OCl 15'+
1019 0Ul~56
01'>7.17
012717
0050.'.l 7
0050.)1
000006
0050~7
012no
000272
000200
10~7/7
176702
1000.15
013711
0127l!2
032717
BE RUN IN CONSECUTIVE OR ER
0
0
0
0
Ol:'J.17
997 001252
UP TO 10 TESTS CAN BE SE ECTEO
0
0
0
0
0
0001150
177777
'.i'Jl 001230
9')2 001?36
993 001242
994 001244
99!> 00124l
9% 001250
12•0EC•74 12124 PAGE 1•17
00001J0
0127Uo
0127.17
001156
OOllb'I
91.1:> 001172
V06~03
010000
000004
176726
000261+
001150
00026'1
1766 72
000024
000100
1766!>6
001QU3
!PATTERN GEN, MOOE • 1 7Tt 2=9T
17 TRACK FLAGS•BIT SET FOR EACH 7T UNIT
ISET STACK POINTER
0
0
llSUCK,SP
MOV
11-1,ATST
MOV
1137745, TS TT BL
1130::>65, TST TBL+2
HOV
MOV
1121540, TSTHlL+'I
MOV
113,NUMTST
MOV
U12!'156eLONUM I PRIME RANDOM NUMBER GENERATOR
1117f,5 1!3,1HNUM
MOV
I DETERMINE TllE SI/[ OF TH[ WRITE AND READ BUFF£RS
llNXMRETe@~4
I SET UP NSM VECTOR
MUV
TST
6UFFlR+4096.
I ovrn 4K OF MEMORY
BR
OVER~K
I on IF YlS
NXMRET: CMP
ISPl+tCSPI+
I POP THE STACK
S£TM4K
BR
ru.sEL
oVER'IK: SE TM8K
I DETERMINE PRIV(S TO 0£ TESTED
I A UNIV£ WILL Ul TESTED lFI
I
lt IT CAN B£ SELLCTEO
2, IT IS WAITC ENABLED
I
TU.SELi MOV
U6,~U4
ISET TRAP CATCHER
MOV
UlOOOO,~MTC
IPWR CLR
CLH
DHVS[L
ICLEAH DRIVE TABLE
CLR
STFLGS
!CLEAR 7 TRACK UNIT FL 6S
CLR
M.SIJJTS
MOV
1120u,RO
1Ro=DllIVE 0
TSTB
@MTC
IBR IF NO CU READY
ElPL
IOS[LF
ISlLCCT A LJfllVt
NXT.ru: MUV
DRVSEL.~MTC
ISET UP R2 FOR WAIT LO P
MOV
lf20.1R2
IDO£S DRIVE EXIST?
USSTSTI BIT
11100,@MTS
I Btl IF YES
UtJC:
USS. OK
MOV
0U~>.1U2
PLC
R2
0033/2
AGT
USSTST
0004n
032717
001010
032717
1:111
1020 0013611
0 0 1•1u2
000004
176640
uss.oK: HIT
UN[
000020
17bfd0
NO,SEL
114,iMTS
NO,SEL
till
u20.oi·~TS
fl[O
USS10
fl
1052
1053
1054
1055
1056
1057
10!:18
105')
1060
1061
10<>2
1063
106'1
1{!65
1 OC.f,
1067
1068
1069
1070
1071
1072
1073
107'1
1075
1076
1077
1078
1079
1080
lUBl
1082
1083
- - - . - .....
001410
001'11'1
001'116
001422
001'+24
0011130
001'132
001'136
001440
0127Ui?
10'14Ui
0137U2
10'14d•
0137Ui!
10'14<:t.
0057:>7
001ou.?
012502
0001~7
001564
0014'14
001450
001452
001456
001462
ll01464
0127Ui!
l0114u'+
1oso.H
012701
0050UO
0127U2
012604
001•170
001 •172
10507v&
0127~7
Ol<>P7
01;>7u2
1044U'+
0050.$7
0(15QJ7
l044L0
1227U~
000100
01.5324
002602
000256
000450
123456
176543
012077
000272
001150
000015
001010
OOlt.~2
00~,7~
001636
001640
00164'1
001646
0011:.,2
1
00~7:>7
B"IE
000272
TST
f3EQ
000256
001'1'11
00UP7
0072f>O
007262
!MODIFY RECOKO
HEM4KI SETf"l4K
HH
1MOOlFY RLCOHO
HEM8K: SETM&K
STAKTI CLR
START1: MOii
MOV
MUV
MOV
TOP
CLR
CLR
sELDRv: wAITKY
CMH3
002602
TST
tJEQ
.JMP
LENGTHSt
ED?
ELECT DRIVES
EXIST?
TEO
LENGTHS ANO BUFFER AREAS FOR '+K•
CR
START
LENGTHS ANO BUFFER AREAS FOR BKt
INOT AUlO START
llNITIALIZf STACK
Ul2~456 0 LONUMIPHIME RANDOM
b176543,HINUMINUMBER GEHERATOR
llMSGl•R2
IPIHNT •SE.LECY UNITS•
MSiJ JTS
!CLEAR SELECTED DRIVE NOICATOR
SHluS
1CLEAR 7 TRACK UNIT FL GS
CR
ATST
llS TllCK, SP
IH5,R3
SEL!Jl
MSBITS
STARTl
ATST
SELTST
E.XECUT
!NO
artS,kERE ANY DRIVES & LECTED
INO
IY~S
;'
CR
CR
NOW SELECT TESTS
--·~ ~
- ......,,""""''
.
MACRO V06•03 12•0EC-7'1 12124 PAGE
P'+68
108'1
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
10')')
1100
1101
1102
l t 03
1104
1105
1106
1107
llOA
110'1
1110
1111
1112
1113
1114
1115
1116
1117
1116
1119
1120
1121
1122
1123
1124
1125
1126
1127
112£1
1129
1130
1131
1132
1133
11,H
1135
1136
1137
1136
113'J
1140
0016~2
0016~6
001660
001664
001666
001672
00167'+
001676
001702
001704
001710
001712
00171 11
001716
001720
001724
001726
OOlB2
0 0 1 7 3'1
001740
UUI 7'l'+
Olll"l'l6
001750
00175 11
0U175f,
UU11tl
00176£.
001770
00171'1
001776
002002
00200'+
002010
00201'1
002016
00:?022
OU202'+
002030
12270,,
0031iU.S
12?71.13
003'+u,.
0127U5
000070
000060
000077
10'1'1.'.>~
0004d
1427u~
000270
1051U~
0127UO
l052U3
0014l>2
00b2v0
000200
0007(~
1.300:>7
001ou5
1!)(10.'.> 7
oou4 u7:; 1
OQ J '110
001110
00(J1:.,
12~1~3
0034U3
1221u5
0031\U'f
012ni
l044U'f
002602
000066
000060
012072
0020.~2
0001::i5
002034
002036
002040
002042
0020 114
002(J%
002050
0020i4
01Q3U'f
0'127v'+
1044.:>0
107777
002056
•002060
OU;>J64
002066
OU2 1•72
002074
0020"16
l044UO
12;?7U .5
0037!:J7
1227U.5
000070
OOQ3V~
oo.;.1u~
OOulli'+
00£.Jv~
00£,H~
002~:.~
0003U~
OOblU~
000057
1·1~
Cl1PB
1170,R3
IIS CHARACTER A VALID
HLE.
SEL02
INO,PRINT "?"
Cf'IPB
1160,R3
11~ CHARACTER A VALID
Bl.E
VAL JD
IYE.S
11'?,R5
S£LD2l MOV
PRC
IPIHNT •?•
BR
VALii
1HAVE VAt.10 DRIVE NUMBER
VALID: BICO
IMASK OUl NUMBER
1127o,R3
CO~fl
R3
MDV
11200,RO
llNITIALlZE BIT POSIT!
lNCB
1+1 TO DRIVE SLLECT
VALll
H3
BLQ
VAL2
IHAV£ DRIVE OF EQUAL T
ASR
!MOVE OlT POSITION TO
Ro
BK
I TRY AGAIN
VALl
ROol1SBITS
ICUMPARL OKIVE SELECT
VAL21
BITB
fl NE
VAL3
RO ,p'ISBITS
IJISCJ
IDKIVE WASN'T PHEVIOUS
V,\L'+
IJR
VAL31
ill CA
l::.
11~6
1157
11~8
11!:>9
1160
1161
1162
1163
1164
1165
1166
MACRO V06•03 12·DEC•74 12124 PAGE 1•20
002100
00210'+
002106
0427u5
170777
0503~~
10 .. 4.>0
002110
002114
002120
002126
UU2132
0021 110
0021'+2
00214'1
002146
0021!:>0
0021:>6
002160
00216'1
002170
uu;n12
00217'1
ou2t76
002202
00220'1
002210
002212
0050.:>7
0127U5
0137'7
0127u2
03271/
OOlOU.S
00221'1
00221&
002222
0022;>4
002230
002232
lO'l'tUO
000264
000200
00026'1
0 0 0 02'1
000100
17605'1
000020
176036
0053~2
003312
0QQ4Ub
o.~2111
00 I 'I lJ 01
o5ooH
10!;2)7
001150
000265
0002~1
U060U3
0013:Jl
OO!J7.H
OOlOli i
OP7l•2
OOll!'lO
013315
1 Ql;<1 ~'I
OOu'l·H
1167
1166
1169
1170
1111
1172
1173
117'1 00?23&
11 75
117&
1177
1176
1179
llllO
1181
1182
1183
118'1
1185
1186
1187
1188
1189
1190
1191
1192
ll'J3
ll'J4
1195
1196
ll 97
0022'+0
00?242
0022'16
002250
00~25'+
002256
002262
00226'1
002270
Ou2212
002276
002300
0U2304
002306
002312
002314
002316
002322
00232~
002330
002.332
176070
1227~}
oooot.o
001'+05
12;·1~ ~
000061
00121!1
05;,70'1
104'1:00
000'100
104 11U0
1227l<5
000062
OOl'ld
1227t.5
OOJOli3
0527"'1
OOO'tl5
12271J3
001Qli5
0527u'I
0004U!i
1227\.3
000065
000100
000070
000200
000103
0012~7
0527V'I
000300
1044~0
10'l4UO
1227U3
001'•~ l
122703
0010113
052?U~
BIC
1117o777,R3
BIS
R3,R4
!COMBINE PATTERN WITH
SP3
10ETERMIN( WHICH, IF ANYo ORIVlS ARE 7 TRACK ANO S
I BITS IN THl SEVEN TRACK FLAGS WORD (STFLGSI
OR\/Sf.L
CLR
!INITIALIZE FOR 7 TRAC
MOV
11200 1 R3
ORVS£LoiiMTC !SELECT NEXT DRIVE
OET7T: MOV
1120.,R2
MOV
IS~T UP WAIT LOOP
Ill Oo, @MTS
OETHll UIT
IDOL~ DRIVE EXIST?
l:JNE
OET7T2
I YES
DEC
R2
IWAlT A WHILE
UGT
OET7T1
UR
007T3
ITRY NEXT URJVl NO.
OET7T21 UIT
llS ORivE 7 TRACK?
U20,iilMTS
BlQ
I NO
OfT7TJ
UIS
Ro,sTFLGS
!SET CORRESPONDING 7 T
DRVSlL+l
!INCREMENT DRIVE NO.
OET7T31 INCB
CLC
ROR
R3
!HAVE ALL DRIVES BEEN
UN(
OET71
I NO
TST
STfLGS
IAHE ANY ORIVlS 7 TRAC
UN[
SE.LPRO
I YES • RrQUf ST PARITY
MDV
llMSG31oR2
I NO • POSITION PAST P
TOP
OR
SELON3
1WAIT FOR PARITY SELECTION co-EVEN, 1-0DO)
SE LP HO: WA ITKY
CMPll
U60,R3
IIS CHARAClfR•O
BEQ
SELPf<
IYES,EVEN PARITY
I IS Ctil\Hl\Cf[H;.:1
CMPO
1161,H3
INOoHAVE JLLEGAL KEY
l:lNE
SELT3
BIS.
11'100, R't
1YES1000 PARITY
SELPRl SP3
1WAIT FOR DENSJTY SELECTION
1ojAITKY
CMPD
!IS CHARACTER::2
1162eR3
U[Q
IY[S, DLNSIIY=200 BPI
SELON3
I IS CHAKACl[fl::5
CMPB
1165,R3
f!N(
INO
S[LONl
ISlT 0£NSITY=556 BPI
BIS
lllOo,R'+
Ull
SELOtJ3
1170,R3
IIS CHAllAC TER::8
SELDNll CMPfl
fiNE
SE.LllN2
11200,R'I
rHS
ISlT OENSlTY=800 BPI
tiR
S£LDN3
If I c ,R3
IIS CHARACTER:::C
SELDN2: CMPO
ONE
INOt HAVE ILLE.GAL KEY
S£LT3
UIS
I0300eR'I
!SET CORE DUMP MOOE
SELDN3: SP3
1WAIT FOK RECORD LENGTH SEQUENCLS SLLECTION
EST
T CORRESPONDING
UNIT SEARCH
ACK DRIVE BIT
HECKED?
?
& DENSITY
&0
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
"AITKY
()00060
CMPB
fllO
000061
000020
<.:MP fl
BNE
UIS
1160,R3
SLLH3
U61,R3
!IS CHAHACTER:O
IYLS, RLS::MIN
I IS Clb\HACTER::l
SELRl
ll20,R4
ISL.T RLS=MAX
CR
CR
..
~
... ,
- -.
·-
-
--~
P%8
MACRO V06•03 12•DEC•74 121'4 PAGE 1•21
1198
1199
1200
1201
1202
1203
002336
002340
002341+
002346
002352
002354
l~O'I 002:!:60
1205 OU2362
120t. 0023U.
1207
1208 002370
120q 002372
1210 002376
1211 00?400
1"12 002404
1;?13 (l£l2406
1214 0U(4l2
1215 00?414
1211> OO:C420
1217 002'+22
l<'lA 002426
1219 002432
1220
1221 00?43'1
1?<'2 002431>
1223 002442
12211 OO?•t400
1235 00250'1
1236 002506
1237 00?510
1<'.10 00?'...1 11
000416
1227U6
OOlOU'
0527U'I
ooo•+u5
ISET RLS=MIN•MAX
IIS CHARACTER=3
SELR21
000060
1044UO
l?.27U.5
001415
121'7U'
000060
ISET RLS•MAX·MIN
01s
SELR3: SP3
1WAIT FOR WfllTE MOnE SELECTION
WAITKY
CMPB
lt60,R3
BEQ
SELW2
ISET WMO=NONSTOP
CMPA
111>1,IU
BNE
S£LW1
BIS
114tR4
l~ET WMO:START•STOP
OR
SELW2
1162,R3
sELw1: CMPB
BEO
SELW15
JMP
S£.LT3
1110,R4
SE:LW15: BIS
!SET WMO=RANOOll
S£LW21 SP3
1WAIT Fon R£AO MOU[ SELECTION
IJAITKY
CMPU
1160,R3
illQ
SELRM2
!SET Rl'\O::NONSTOP
(MPO
116l,R3
BNE
SEUlMl
BIS
ttl, ll4
!SET HMO~START~STOP
BR
S[LflM2
H62,R3
SELRl111 CMPO
BEQ
,+6
JMP
SELT3
BIS
112,R4
ISET RMO:RANOOM
SELRM21 SP3
1HAVC ALL PAHAM[l(RS
MOV
llMSG6tR2
TOP
IPl'llNT "OK"
WAITKY
IWAIT FOR CARRIAGE RET RN
CMPA
1115,R3
BLO
,+6
JMP
SEl. T3
TSTB
OITPS
llPL
• •'+
MOV
1112,@l'PB
@TPS
TSTll
llf'L
• -4
1140,0ITPB
MDV
R'I,
I 0 I+
MOV
NUMTST
INC
l+l TO TEST COUNT
CMP
1110.,NUMTST IE~UAL TO TEN YET
ll[Q
S£LOK1
IYES
JMP
S£LT1
INOoACCEPT NEXT SET
l!MSG5,R2
SELOKll MOV
TOP
I PRINT •MAX TESTS SELE TED•
1EXECUT[ SELECTED TEST
EXECUT: CLR
!INITIALIZE MODES
MOES
OOlOU~
o:i21u~
ooo•Hi 1
1227l>.5
00!4U2
oooi.:.7
osnui+
1o~4:.
000061
0000011
000062
002024
000010
o
l044ll0
1227US
001415
1221us
00tOlJ3
0527U'+
000•101
l<'C'7U3
00141.12
0001-=>1
os;?7u'+
000060
000061
000001
000062
002024
000002
1044-=>0
Ol27U2
104 •1 u ..
104400
12;'7vj
012205
000015
OOl'Hl2
00?~16
oooP7
105117
002024
175512
10031~
01;>7 f1
10!:> 711
10037:)
000012
17~4 -, ..
11550'+
012111
0000'+0
175470
0104<0
00:.2.:.1
0227-H
OOt•1V2
001110
000012
00111'1
oooP7
0127~2
001 "161>
0121t.O
1044 U'+
00~10~7
000356
CR
llS CHARACTER=2
000063
00?5<'2
eio:>5:>6
002530
00£>'.,36
0025 112
0025 114
002552
00255'1
OO~'l.02
SELR3
1162,R3
Sf LR2
1140,Hlt
SELfl3
lli.3,H3
S[LT3
1160,R'I
12~7u-'
12~9
oo;>st.o
0000110
BR
CMPEl
BNE
BIS
OR
CMPfl
l:INE
0012<:1
0527U'*
10•14.:>0
1240
1.?41
12'+2
1243
121111
1?45
12-.6
1247
124A
124')
1250
1251
1?52
1253
1254
002566
00?570
00:'574
002bll0
SELRt:
000062
CR
·--~
--
CR
CR
CR
c~
CR
CR
CR
CR
CR
. ..
,
---
.-
,., ""_, .
MACRO V06•03
P1168
125~
1256
1257
1258
1259
1260
1261
1?62
1263
1264
1265
12U,
1267
12ufi
002606
0026tll
002L22
00?626
002632
002f.36
00?642
.1026 1;4
00?£,')0
no?t.52
OO?f,56
llTSTTBL,TST£X
@TST£X,PARAM IGLT T£ST PARA"S
MOV
PARt1M1RO
BIC
CLR
MOV
PGMOOE
R(J,TEST
00112CJ
010000
CMP
020000
CMP
OO;>t,f,O
02?7UO
0015UI
02(>7UO
002664
002r.66
02nuo
1762711
0011111
001112
001112
007777
0011'16
001116
11[0
llEQ
030000
00154~
040000
00} 4l•2
ooop7
003526
oooP7
003206
1273 002704
127•1 002710
1275 OU2 712
1276 00;>716
1217 002720
1278 002724
0127U2
013310
1279 OU2730
OV7UO
001•1u ..
0030~4
10•14 ll ..
OOf.Q/7
0137U0
04:>7uO
o;:.21::.1
001112
170777
007000
001000
001112
0001i:f>
005.1.H
001010
OL'\7U2
001ou1
001110
000042
1120nOO,RO
T£ST2
CMP
1130000,HO
fH.:Q
Tt::ST3
CMP
11~0000,RO
HEGI
.+6
rm£
ENOAORI JSR
240
000?~0
00(12 110
0002'+0
0 (,;.·.,.;, 1
T£STO
lllOnOO,RO
HS Tl
ENO AOH
IFINISHEO ALL T£STS
Hiil T
0047l2
PC tC 21
&••••••••NOP••••••••
l*****•**NOP••••••••
240
000002
0011111
OOAGNI
00010 ..
2'10
ADO
tiR
l••••••••NOP•••••~••
112,TSTEX
EX£C
I TES TO
11.:RITE ONE HECOHO, CHANGE
os21::.1
10•14t'.O
000002
0003=>6
000040
000115b
104410
104'f l ..
0327-H
BlS
112tf'IOOES
T01ENTI CLRALL
kSFORV
ro:
TOAi
MVCTHS
TESTO:
001ou2
l044u2
l044Uf>
OOO"lb7
0030'10
00 ~0 1 1'1
003046
0047.H
0527.H
1140,MOOC:S
UNE
TOB
DRIVES, LO TO EOT
IE~IT WRITE fVEHY RECO Ot NO REAO PASS
!CLEAR ERROR COUNTERS NO REWHiD
!RESET DRIVE SELECTION TO LOw£ST NUMBER
!RESTORE OHIVE COUNTER
iJS THIS DHIVE AT EDT?
IYlS,
ISAV£ DRIVE COIJNTEHS
IYES
IAHE ALL OHIVES AT EDT
BR
JMP
OONf
l'l'l:..S, EXIT
JSR
00270'+
CR
51\Ip Ufl lll
TOA
PCoALLEOT
TO
Bil
000356
TEST
IANY MORE OHIVES S£L£C £0?
CHGllRV
004'+00
000001
100 NE.XT
IWHIH
svcrns
TOO I
0007b5
oooP7
£lIT
i.illJTIT
1044~2
!ENABLE PATTERN GENERA lON
T£ST5
JMP
T£ST4
1RETURN tffRE AFT£H COMPLETION OF TEST
OONE I
MOV
llMSG30tR2
TOP
ROR
iSR
llS swo:l To REPEAT TE T WITH ALL PATTERNS
!ICC
DONFl
INO
MOV
i'AHAMtRO
DIC
#l 71l777 ,Ro
CMP
u7ooo,HO
IRLACHEO PAT 7
FIEO
oo~r1
&YES
AOO
lllOOOtPARAM INOt +1 TO PAT
BR
Exrr1
I REPEAT
NUMTST
OUNEl l
UEC
RNE
l:OAr.ti
MOV
O:lt4?tR2
oooouo
00.'1036
003052
175314
103tll~
117777tRO
H£Q
,Ji'IP
1272
1280 00"7:'14
1281 002736
12(12 00274674
1271 002100
1304
1305
1306
1307
1.301)
1309
1310
1311
1?.~D£C•7'+
lf
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
132'1
U25
132(,
000005
000356
000040
000356
10'+'+~2
0007b7
1C4'+H
0 32 7"' 1
OOIOL5
00•17J7
104'11J&
10 114<: 2
0007bf>
000020
000356
0105'10
1G'+4l~
03<'7:> 1
001ou1
104'1' ~
10•1•1U&
1044<'.2
oou7b7
00'+7.H
000740
oooP7
0527.H
0001J1
000020
000356
004400
002704
000006
000356
1350
J ~51
1352
1353
1354
135!)
1356
1357
1~5A
1359
136 0
1361
13b2
J 363
1.%'l
1365
1366
1367
1368
003206
00321'1
003222
00322'1
003232
003240
003242
0032 114
00 3?'+6
003?5'+
003256
00::::?60
OUJ?62
003270
003?72
003?7'1
003302
0527.H
0327'17
0010U6
O'l27.'.l7
0527.'.l 1
000006
000014
000356
175672
000007
000005
0003!>6
000356
00033i>
0003'10
104'1~0
l04'+l0
1(14 '+ 11+
013P7
10'+406
1044.176
003400
000340
0002H
000271i
000.31t0
lO't'tlJ !>
'fit[:
HFI
10~410
T'tGI
10441 ..
032P7
T'lHI
000020
0003t.6
00lOU2
0105 110
T'+.J I
11)4 •1~2
00~·402
00(17t.b
00)'104
003•1fl6
003•110
003•116
10441 ..
03;>?.}7
0010<5
000020
000356
00~ 1 120
023.,.} 1
000342
000336
1395 003426
001•1:.1
0137:>1
032'7.:i7
000342
000003
00027'+
001112
000336
0003112
000342
00027••
000.342
13')6
139-1
139!1
1 ..\'J9
1400
1401
1402
1403
140'1
1•105
1'106
1'107
14011
1409
11110
1411
1'<12
1•>! .~
1414
00~430
no .-.•1 j6
003444
003 11 116
0014~5
OU.~454
on~2!>
003460
003462
003'l IO
003472
003474
00347£>
Ou3500
00.,'.>06
104 •1•'~
Uu~SlO
O I 37:i1
1
0137°:.7
1044Lb
10 114"2
0007'H
l 0 11 11! ..
02:~].) 1
T4Hl
T4NI
TltPl
OOO.H2
000336
001.5~&
003~14
1 0 fjlt l
000711
00« 7.'.> 1
003520
OOOf.~~
oo.~!122
OOUl .;7
OU3'.i12
T4KI
T'IL I
104~!0
L
00'1400
002704
1'115
1416
1'117
141 ti
1'<19 003526
1420 00~534
1'<21 0035~6
1422 0035 114
1423 0035•16
14;~4 0030.54
1 1125 00~556
0527~7
000002
000356
10'+'1-'0
01?7.H
l01J4U 2
177777
00400'1
0321.:.1
OOC010
000356
00)'lV2
0047.H
005201'.
MOV
WRRECK,SVKECRISAVE START OF RLS
wRITIT
!WRITE
MOV
SVRfCR,WRRECR!RESTORE START OF RLS
svcrns
!SAVE DRIVE COUNTERS
CHGOHV
;ANYMORE DRIVES SELECT 07
Bil
IYLS
T'+D
HIT
Ill 0 ,MODES
IAkE Wl AT fNO OF RLS
llNf
T4G
IYES
MVCTHS
IRLSTORE DRIVE COUNTER
[ll T
1140,MODES
lllHE I.IE Al fOT?
H£Q
!NO
HC
CHGOHV
~ANYMORE DRIVES SELECT 07
HR
I 'flS
T4F
HSFORV
ISLT DRIVE SfLECTION T LOWEST NUl1BER
MVCTtlS
IHLSTOkE ORIVE COUNTER
UIT
1120,MOll(S
11$ TllJS DRIVE AT EOT?
bNI:
IYlS, ~.I'. lP flACKSPACE
T4.J
JSR
PC,G0l3KWO
IUACKSf'ACE
svcrns
1SAVL GHIVE COUNTERS
CHGDHV
IA~Y MORE UHIVES SELfC EO?
rm
IYLS
T4H
RSFllRV
ISET ORIVE SELECTION T LOWEST NUl'IBER
MVCTHS
IRLSTOHE OKIVE COUNTER'
BIT
1120,HOOES
IIS THIS PEAD AT COT?
llNf
T4N
Ins. SKIP HEAD
CMP
LASRCR,RECORDIHAVE 1o;E kEAD LAST HEC RO WRITTEN?
BEO
T'+N
IYES
MOV
LASRCR1SVHlCR1SAV( LAST RECDHO
113,PARAM
IJ IT
l!S READ MOOE NONSTOP?
!lEQ
T4M
IYES
MOii
RECORU,LASRCR
LASllCR
Il4
l'i55
1'+56
1•157
1451\
1459
14!,Q
003562
003570
0035711
003602
003604
003b06
00361'1
003616
00362'+
00_%:'12
1'4t>l
003760
QUO 7<>!.
}4t.2 003"162
l~h~ 003770
l'+b'I 003n'2
14&5 00-377"
1'+66 004000
1467 00400'+
1'168 004006
1469
1'170 00•1010
1471 004014
1472 00~016
1'+73 004022
1'17'1 004024
1•175
14"16 00'1026
14-,7 004032
1478 0040'\lf
1~ 79 004040
1480 004042
111 bl
1482 0040'+'+
03<'7" 1
00!>0~7
OOOH6
000336
000010
00'+006
T5A;
0003~6
T5Bl
000020
000356
000336
00'1006
0003112
00031t2
003f.36
OU.%40
05?731
104'+.l.0
104'+1,.
03,f.72
03e>7.H
0010£1
0137-H
032Jj1
00111u:>
0137:.1
00,HOO
00~>2-H
fJO.HO•t
0(1370b
0113714
003716
00:'.720
003722
003726
U0.3130
1044£14
1 (i4a,U6
1044<'.7
0037.~4
10~•110
003736
UOS7110
0037116
003750
003756
104•11 't
02.37.H
0010115
000.336
0003'+2
O'l;:nl
000010
000356
00~63'+
0036~2
0137~7
T5CI
T501
T5£1
000020
000356
000342
000003
00027'+
001112
000336
00031t2
00031+:>
000274
0003'+2
!lNE
T5FI
T5SI
004'100
t.JSf{
00270'+
T5HI
T5Jl
T5KI
000010
001-'<'+
0041100
0 0 (II.:, 1
oooP7
oooouo
0040'1'+
Ol?Od
0227UO
000360
0013(~
OOO?U7
00'17~7
000356
JMP
RSFORV
MVCTHS
CMP
ANE
f.lIC
CllGDHV
flR
BIT
BNE
JSR
1111
002704
OOOOIJO
0047S1
MOV
BIT
SEO
l':OV
INC
R[AOIT
MOV
SVCTRS
Cl1GORV
BR
BR
1044~2
00'1'1~1
MOV
CLR
OIS
FISFORV
MVCTRS
!HT
ANE
MOV
ADO
SVC ms
ClfGDHV
OH
RSFnHv
MVC ms
BIT
00'+0'+'+
0121~0
0227UO
00)3114
0002117
000360
0121uo
00031'1
JMP
RECOROtT5INC
RE CORO
!INDICATE AT STAkT OF
1110. MODES
ISET DRIVE SELECTtON T
IHESTORl DRIVE COUNTER
1120.MOOES
llS THIS DRIVE AT EOT
IY(S
T5D
RECORO,LASRCR
T51NC,LASkCR !CURRENT ~ECORD + SEQU
!SAVE URIVE COUNTERS
IANYMOf1168
11183
11184
1485
11166
1487
146A
1489
1490
14':11
1492
149~
1494
1'1':15
1'196
l 11 9 7
1498
1499
l!:iOO
1501
1502
1!>03
15(14
1~u:i
1506
1507
15 0 R
1509
1510
1511
1512
1513
1514
1515
1516
1517
1!J10
1519
1520
1!':>21
152.?
1523
1524
1~25
MACRO V06•03 12•UEC-74 121P4 PAGt 1•26
OOlfO'!SO
00110~11
004060
0040611
00406£.
012101
0637Ul
OE.37ul
0111u1
00021J7
004070
004072
0011076
004102
0041011
004106
004110
004116
0 0 4 12 2
1011410
00'+7j7
0047.;)7
1C44Vf>
l044d
000711
004124
00 11130
004136
00111411
0011146
004152
0041s2·1jf
0050.H
00021.17
01~7~7
0337:>7
001 ou&
005:>.)7
000360
000302
000302
0011342
004506
000010
004004
000302
000200
000272
00035&
000300
000300
000302
0002~1
OOt.O.H
000300
0007t.>ti
Ol3P7
0003"7
03!7-:>7
0(10302
000276
001150
000276
060000
001000
000276
174012
004000
00027£>
000300
00101~
0527.ll
032717
001"lJ3
O:S27.;) I
0002U7
l 057:,1
001112
1000~5
0527·!>7
0 32 7.;) 7
040000
000100
000276
00111?
020000
000400
000276
001112
05;>7H
ooo:>u7
004000
0002n
0052.H
000302
00140~
0527:>7
0 3"7 .ll
OOlOU~
l~lh
1~127
1!.J28
1529
1530
1531
153?
1533
1!'34
1 ''35
1536
1537
l !>38
1539
001/.30 11
004310
004312
004316
(1011 ~;>O
004322
004j26
00~ 330
004~36
004340
00~342
000.?~1
0060.:>/
000300
001ou~
10 .. 410
0627!1'·
0002u1
033·p7
0017L2
000710
10!>711
000002
000300
000272
MOV
lllJHVAUR elU
ADO
COHIVEtR1
AOO
COH!VE,Rl
@Rl,Hl
MOV
HTS
PC
1CLEAH ALL DHlVE COUNTERS
CLRAL: RSFDHV
.JSH
CLRll
PC,REWINO
.JSR
PC,cLRTBL
SVCTRS
CHGDllV
OH
CLRJ
HIS
UlO,MOUES
IAT ENO OF RLS
CUl
T5FLAG
HTS
PC
1RESET OHIVE $£LECTI0N TO LOWEST NUMBER
RSFOR: CLR
COHJVE
&START WITH OHIVE O
MOV
11200,CORVBT IBIT FOR ORt\/E O
RSFll
BIT
MSBITS,COR\/BTllS DRIVE SELECTED?
fWE
HSF:>
IY£S
me
CDHI\/E
INO + 1 TO DRIVE
CLC
kOR
COHVBT
akOlATE ORI\/( HIT
flf{
RSF!
IKLPEAT
RSF21
MOV
COHlVE,COl'IANO
SWAR
COMM•O
BIT
STFLGS,CORVBJ1IS DRIVE 1 TRACK?
fl SF 3
BNE
I YES
BIS
1160000,COMAN01800 BPI• 9 TnACK
nIT
1110110,iiSR
ITEST PARITY SlLECTEO
fj(Q
I ODO
,+10
BIS
U'IOOO,COMANO I £\/[N
RlS
PC
RSF5&
T:::TB
PAKAM
ISET APPROPRIATE 7 TRA
OPL
,+10
BIS
1140000,COMANO
#loo,PARAM
l:lIT
b(Q
• + 111
HIS
1120000.coMANO
11 1HJo,PAHAM
Lill
!TEST PARITY SELfCTEO
IDOU
Ot49
1s5o
1551
1552
1553
15!:>4
1!:>'.>5
15:06
l::i'.i7
15!:>8
1559
MACHO V06•03 12•0EC•7'1 1212'1 PAGE 1•27
ll0'1.H6
0043!iO
U0 1d56
0011362
004%4
0011372
004376
lOOH:>
013717
OOf>0/7
004400
00'+402
uoi;404
004412
004414
004<.16
004420
Ou4422
CQ4430
00 11'•32
004440
101;'1.LO
1044111
0327.H
000016
004532
17362'1
000060
000356
000400
173602
000010
000356
0014U.~
104'1.:2
0007/l
0004<7
O3~ 7 I 1
0014..:5
0327.H
001'1~1
10'1'110
00 1•44'+
00'•446
00•«152
oo:.1:H
l~bl
17361;0
10331~
05?111
00•17j1
0002v1
15£,Q 004'142
15&2
1!'>63
15{,lj
1 !>b5
1!:>66
1!>67
1568
1569
1570
lSH
1572
1573
1574
157!>
1576
lf117
tsrn
000276
173632
104"
l ~
0044~'1
OOJOU6
0047j1
ou 114<>u
004'!66
004 11·10
00<147'1
00•14 76
004'.;00
00450'1
o5nH
OOl'lt. 2
0047:l1
1044'2
0007L2
Ol..2716
0002u 1
004506
OUlf 512
Ol:?"fiJO
004~>1'1
0200~1
004520
004!'1?2
0013/~
00'+00'+
005542
000004
000356
010110
000002
00031'1
00!'>0~0
000356
0'1?7j7
ouu2u1
000070
0003:>6
1 ~;tlO 004 5.52
15Ul 00<15'10
l!J82 00'1546
1583 004!'-~1'1
15fllj 004~»~>6
012717
012711
052717
OUl11Jl>l
000200
00'1566
000101
1734 70
173506
173•142
01;•//7
0003 110
173'144
158~)
004~64
1586
l 58-/
lSllll
lO>!l'l
]590
!!:>91
1592
15':13
15'.J'I
004~)66
OOO?U7
00fl01Jl
uu 1 1~30
1579
1~95
004570
004'.>74
00<1576
004604
00 11612
OO•ii.20
004622
004630
)~,')(,
Q(Jll(.~6
0057j7
000336
0010.::.1
0137.H
01?7-H
03?7j1
OOlOU!>
Ol.37·H
0127.H
OU7H
0002 114
177774
000020
000266
000310
001112
000246
00000'1
000266
000266
000310
000352
Bl'L
MOV
ROR
fl CC
....
COMANO,ill1TC
iill'ITS
._,.
IWAIT FUH CUNTHUL UNIT
ISlLECT DRIVE
IWAIT FOR TU READY
1116,@'1TC
1REwrno
.JSR
PC tGOWAIT
HTS
PC
IEXlT
1ARE ALL DRIVES AT END OF TAPE
ALLEOT: RSFIH{V
MVCTHS
ALLll
CJ IT
1160,MODES
IAr £OT?
BEQ
ALLf OS
INO
CllGDHV
IOONE ALL DRIVES?
Bil
ALLI
1r.u
llH
ALL3
ALLEOS: BIT
11'100 ,OJSR
!TEST SWITCH 6 TO EXIT
BEQ
INO, GO TO EOT
ALL:>
BIT
1110,MOOf.S
IAT ENn OF SfQUENCE
B[Q
mo, EXIT, DON'T DUMP
ALL:>
IOUl'IP EHROR COUNTERS ON ALL DRIVES
CTHOMp: HSrllRV
MVL THS
TST
T5FI. AG
IHI[
CTRnl
I DUMP READ OtlU
JSll
PC, EIWT 1
fill
U'I ,l'OOES
IREAO PASS SELLCTEO?
COMFNO
INO
UEO
JSR
PC,HNOTPl
CTRDl:
CDl'IENO: (HGDH\/
!DONE ALL DRIVES
£111
CTROMP+2
INO
AOD
!INCREMENT
ALL3:
RETURN POIN
112. 161
HTS
ALL2l
PC
1CLlAK READ ANO WRITE TABLES
CLRHlLl MOV
uv;Hrti£KtRO
CLRTl: CLR
I 0 I+
CMP
Ro,uMOOES
BNL
CtRTl
1170,MODES
BlC
HTS
PC
1INTEHRUPT ENAOLEt GO, WAIT FOH INTERRUPT
!SET PHlONITY LEVEL ~
GOWAIT: MOV
11200,@CC
UG0/1 ,.,L'IT\/
MOV
1S£T IrJTEHRUPT RETURI~
IINTERPUPT fNAHLEt GO
11101 ,ii!MTC
BIS
IWAIT FOR INT£RHUPT
IJArT
MOV
IHLSTORE PHlORITr LEVE
11340,@CC
IEXIT
HTS
PC
H rI
IHtTURN FROM INTERRUPT
GWll
1WRJT£ RECUHU ~ECTrON
TST
HE COHO
IIS TlllS TH[ FIKST HEC
WHIT I:
INO, SKIP SET UP OF RE
NOil\ICR
!JNE
MOV
'°AXL[N,STRLlN
MOV
11-'1, ,OLKINC
1120,PARAl'1
lllT
llIS
Wll
nr.r_
1<1
MO\/
MOV
MINLEN,STRLEN
U'I, ,OLK INC
S THL E1\I, WR TLEN
MOV
AT END OF SEQUENC(
RROR COUNTE:RS
1
RO
ORO LENGTH ANO BLOCK
I
INC~[
EN
•••
MACRO V06•03 12•0£C•74 12124 PAGE 1•28
P'l68
1597
1598
1599
1600
1601
1602
1603
1L04
1605
1606
1607
16011
1609
1610
1611
lbl2
1613
1614
1615
lb16
1617
i618
lbl9
1(,20
it:.21
1622
1623
ll.24
1625
lf>2f,
1627
004644
004652
00'165'1
004660
004(,66
0(J4b74
004700
004702
00 11704
004-rlO
004712
004ll4
Q(J47?.0
0047.?4
004726
00473'•
00•1740
00 117 1lf,
004754
000040
0050~7
000310
000336
000276
173316
0137.H
OU.7f7
10!>771
100:'ll5
10•14'12
00!.17~7
001112
0003'10
l\IOJNCR:
173~22
004C04
W31
000306
173270
STRTOi>:
oon2u1
001.011
103 3 / :>
013n 1
00!.411
OD117
o:,·dtr
001;·p,
004760
0041'-6
004772
00 11774
ou~ooo
C05002
005U06
OO~iOtO
OU5014
005016
oo:,D22
005032
005036
00'>0'10
OO'.JC'l4
005052
00';051;
OU50b.?
005064
0 U!J06(,
OU5n74
005076
005100
005106
Ql "/7.l 7
005717
000352
173260
000250
oor.oo4
173264
NONSTP:
173254
1732'12
004~32
173230
17 3?24
000312
10 0 5~ 2
005P7
001•110
013no
OOI0.31JO
Ob27U0
00',?10
000306
ooso.H
000306
000014
o?.21:. 1
OU l O•: 3
0057~7
0013.J3
0047:'7
000306
000314
001112
TSTSTP:
000306
005206
000001
000356
000010
0003!>6
000002
0003::l6
WlOI
03;:>7.) 1
0014l ..
000010
001112
STOPOPI
00'17.)7
0527:.7
01':'7U'I
00 7126
177400
177'170
03<·7~1
0 01 '+" :i
O.H:7H
0017•1
0002U7
0327.H
0017H
ooo,.u7
lf.42
11> 113
16'14
16'15
164f,
16 117
1(,48
1649
lb50
1651
1652
16!.i.3
OO!illO
005114
00!.122
005126
005130
005132
0051%
005140
0051'14
0052lJ ..
001376
0052-) 7
001311
007256
00~>7.H
000306
oa12t)5
NGE?
er~E
00l 41J 1
oo~oj7
1140,PARAl'I
IOOES RECORD LE~GTH CH
NO I NCR
IYES
CLR
BLKJNC
INO
RECoHO,WRRECR
MOV
COMllNO,@MTC
MOV
I St:LECT UNIT
TSTB
iilMTC
llPL
IWAIT FOR CU READY
.-4
GENPT
&Gt:NERATE TEST PATTERN
TST
T5FLAG
l![Q
.•4
RTS
PC
llXIT WRITE ROUTlNE IF
Clll
1.iHPASS
HOR
iilMTS
!WAIT FOR TU READY
occ
.-4
MOV
loRTLENoGISC
!SET BYTE COUNT
@BC
NEG
MOV
Wbllf ,@CA
ISET CURRENT ADORESS
114, ;,>MTC
BIS
llllUT£
JSR
PC ,r.OWAIT
!INTERRUPT ENABLE, GO,
h[HE Afl[R INTERRUPT
O:MTS,STATRO ISAVE STATUS
MOV
lST
@MTC
UMJ
EH HOR
IHAVE ERROR FLAG, CHEC
TST
l.IRPASS
&WAS THIS A RECOVERY P
nr.a
11~0
lSTsTP
MOV
llRPASS,RO
IYES
ASL
RO
ADO
lllJRCHEKJSlP
INO
IHS
PC
HES
112,MODES
IEXIT EVERY RECORD?
lllT
[l(Q
NONSTP
INO
IYt:S
RTS
PC
1110,PARAM
llS WRITE f'IOOE RANDOM?
BIT
lf;O
UlQ
Wll
lHT
!RETURN
lf.28 00'>030
16;<9
11>30
1L31
1632
lb.33
lf,34
lb35
1636
lb.H
lb3tl
1639
16'10
1£.41
r
0010112
0327~
0072:>6
!RANDOM STALL DELAY
PC 1 kANGEN
RANSTPl JSR
11177400,RANOOM
BIS
11-200,,R4
MOV
RJ\Nll
IOLLAY 1 f'llLLISECONO
H4
INC
flNE
.-2
INC
RANDOM
BN(
RArH
TST
WRPASS
Wll I
llNE
SHITOP
"\
'
CA
CA
CR
CR
TEST
~
CR
WAIT FOR DONE
FOR EOT
SS
VERY PASS COUNTER
RLS7
&
~.
-.
MACRO V06·03 12•0EC•74 12124 PAGE
Pll68
1651f
H.55
1656
1657
16511
1659
1660
1661
1662
1663
0051116
005152
005160
005162
005170
OO~il 72
00517'+
005?02
0052011
00'17.:17
032731
0014U5
0327.!>7
1&6'1
1665
1666
1667
1668
lbb'J
1670
005?06
005212
005?20
00522'+
005?26
00523'+
005?'+2
0052H
0•127.!i 1
lf,71
005206
000001
000356
000010
0003"'6
000002
000356
000336
000010
000310
000356
000310
000352
0003'.:12
0002't6
000352
0002'+'1
OOlf,:.>S
0002U7
0327.!>7
00164&
0002u1
00~".7.:17
Ou~124'+
001 IJ .. f,
Q637:J7
023U 1
00;>4U'l
0257:,7
1672 00!:1252
0034U~
lf>73 00525'+
1674 005?62
0137.!>7
Hi57j7
00lQU3
OOO?E6
00033&
0003'.:12
0~)?7H
000010
000356
1675 OO'.i?66
1676 ous;no
1677 005276
1678
1(, 79
ouo2u
r
1 LIJO
16111
lb82 005300
l<..&3 OOS:>Ot>
1&8•1 005.HO
lbf:l~l
168G
lLti-t
lf,QI\
005314
005316
00'.)j22
005.BO
OO!d32
0053%
160'J
1690
lf,':11
1692
lt,9.3
lh'.14
1695
1696
lb'J7
005366
li0!>374
lb'hl
OO~iHb
005.~'+0
005.346
OO~i352
005360
005362
0327.!>7
001510
0 0 !i 7 .17
001002
00!'>2.H
03,,711
175600
000314
020000
172702
012212
03?117
001410
OO!J2j7
02:?'1.lT
0010<0
OO!i2-l 1
WllCllEK
llNE
1120000,QlSR
HSHEC
nMSG7,R2
nn
000270
TOP
MOV
JSR
172652
TESREC: lllT
000306
000010
000306
INC
CM 0
urn
f)f;(
0003.H
1703 005422
l '/011 OU5•1
rn
03<'7:!. 7
OulU.l7
1705
OO~,•t.52
00111:, T
0051'10
1706 UIJ!i4.16
1707 005•1•12
0047:>7
004 P7
G32717
010032
01003;>
000040
0014u2
OOOP7
00412(j
1
ERR1
INC
000352
010756
000100
0327:>7
001402
0047.H
oo~.nj
t:ttRll
00000'+
000356
010322
00030&
002uoo
000312
INC
TESRC 1; 11 lT
,+6
JSR
CLR
PCoXRGREC
WHPASS
JMP
STRECll JSR
JSH
1725'10
HIT
SH BELOW
T?
7
ERROR COUNTERS
GISTERS AtJO R£CORO NUMBER
G wITH xIRG,
IFIRsT ERROR?
!YES, +l TO WRITE ERRO
!TYPE ALL. ERNONS?
INO
!PRINT •WRilt STATUS E ROR•
WRTLEN,LENGTH
PC,pRTS
!PRINT STATUS, COMMAND RECOROt LENGTH
nlOOo~SR
1RLCOVER STATISTICALLY SELECTED?
TESH Cl
INO
WRPASS
l+l TO WRITE HECOVER
nu •• wRPASS
!HAVE WE TRlEO TO WRIT RECOVER 8 TIMES?
INO
STNFCl
PER"ns
IYES, +l TO PEHMANENT AOSPOT?
ni+,MODES
IIS READ PASS SELECTED
BED
BIT
f]Nf
RLS?
lolflPASS
nr.E
MOV
l 04'+ U'I
0137.:11
0047.l7
PC,TESINC
llltf'IODES
!EXIT AFlE:R RLS?
W12
INO
1110, MOOt:S
l'l'ES 1 ARE WE Al ENO OF
fl[Q
STRTOP
!NO
RTS
PC
!YES
BIT
U;>ef"ODES
I t.X IT E\/ERY RECORD?
1.112'
AEO
STHTOP
IND
RTS
PC:
IYCS
1SEE IF RECORD LENGTH SHOULD BL CHANGED
TESlNCI INC
RECORO
1+1 TO RECORD COUNT
lll C
ll l 0, MODES
INOT END OF RLS UNLt:SS
l!>T
ClLKJNC
l!(ll
lSlNC2
ADO
llLKJNC,WRTLEN
CMP
~NrLEN1MINLEN1HlCORD LENGTH TOO SHO
BLT
k(Sfll
IYt.SoRl!:ill
CMP
WRTLUJ,MAXLEN1RE.CORO LENi>Tlt TOO LON
lllE
TSlNC2
!NO
RESETL: MOV
STRLEN,WRTLENIYLS, RESET
TSINC21 TSTA
HECoRO
lltJf.
TSINC3
IND
UIS
1110,MOOES
!INDICATE AT ENO OF RL
7SINC31 RTS
PC
1HAVE AN ERROR FLAG DURING WRITl OPlRATlON
tlF EMROH JS CAUSED BY ENO OF TAPE FLA&, QUMP WRIT
1FOR Al.L OrHUl ERHnRS: PRINT COMMAND AtJD STATUS R
tlf kfAD PASS IS srLECTEO, TRY To RECOVER By WRllI
[kROR: BIT
Ul7~h00,5TATROIAT [OT?
B(O
ENOTAP
IYLS
TST
OOlnlO
0127U.1
JSR
l:!IT
0£Q
UIT
000306
1699 OU5t+02
1700 uU5•1 l 0
1701 ()C5412
11ll.0 OU~>4lb
1700 005 1!4b
1709 005•15'1
1710 0U54%
000312
1•2~
HJO
112000,STATRO
£NOT AP
lolll
pC,f't.CKl
PC,~ACKl
1140,@MTS
UEQ
,+6
d~P
STHTOP
!BACKSPACE
~
RECORDS
Plt68
MACRO V06•03 12•0EC•7'1 1212 .. PAGE 1•30
1711
1712
1713
171'1
1715
1716
1717
171&
1719
172ll
1721
1 "f'o!.2
1723
1724
1725
1726
005'162
005471)
00">476
0055011
005510
0055t6
005!:.2'1
1121
005530
00553'+
005fi42
012111
0115777
052111
00'17H
0527(7
177177
000276
000010
004532
000016
OOOOOlj
OOOP7
OO&t 720
0052~7
000336
0000•10
0131'12
Olj2111
0!>27.!17
oo~.~>5'+
012102
10 .. 40~
01nv2
1044 lii
005556
0047~7
00~.~62
Ol37U5
0110?0
00 l 112
17211 OU':;',£.6
O'ltn5
1"17"1L3
11;;9 ou:J:>n
lBO 005576
01;>71J 2
012675
00000'1
1731 005602
1132 005b04
CJ010U2
(J1<7U2
02<'7U5
0010112
Ul:> f ~ 2
OO~i546
0U!;5f>0
17!'.3
OO~il10
l U'I
l ns
17.:i(,
17-37
l 7 311
1739
1"/40
17 11 l
17 .. 2
17'13
005b1'1
005616
00'.16)2
00~>£.2'1
OO~fdO
0137U2
O;_l:-·?v3
OU5652
CJOl ov2
U1:>"/ u 2
()2;:>7lJ:I
0UtfJl>2
012702
OO~>f,(,6
0056 T2
OO!if, 76
on~i7GO
00570'+
005706
OO'i712
oot.71'1
17~15 005720
1156 00~> 7 22
1757 UO'>l'26
lFifl U0513't
00~1740
17<.0 005H2
1761 005"7'1'1
17l><' 00'>750
1 H.3 OU'i7::i2
176'1 00~1754
l 7£i5
ou.s·::ic..
1766
OL~
1767
ou~H.4
760
0003!;6
UlMTC
BIS
JMP
STRrOP
1DRIVE IS AT EOT
RE COHO
ENOTAP: INC
ll!S
11'10,MOOES
UMSG2'1,R2
ENDTll MOV
TOP
MOV
llMSG8.R2
TOP
!DUMP WRITE EHHORS
wRTDMP: JSH
PC.l'RTO
l'AAAM.R5
1'10V
BIC
11177763,R5
MO\i
llMSG1'1oR2
CMP
U'I .t-15
IJN[
,+6
MOV
hMSG12tR2
CMP
U10,R5
fl1JE
,+6
MOV
llMSG1.3,R2
TOP
MOV
RECOHO,R2
DlCPHT
l 0'1lj1.6
00~,;,•16
005U>0
00',btA
172500
112•172
li~ lj" ~
oi;, 1u~
17'Pt OU .1iJ5'•
17!'>9
l
00'11:.32
00565.:.
OQ',6'+2
1
1745
17'16
1 "f'17
174&
17'19
1150
1751
1752
1753
t 754
02.C7v 5
172530
172520
17;>t,l2
0lf ('7U 5
01;:·1e2
0227u5
OOJOU~
01;>7~2
001112
177117
012723
000020
l 1<:1.'.>1
l0!>2j'
005710
0014ll5
0127ll2
104'+v,.
012B2
0000'+0
012705
000060
MOV
CMP
llMSG15tR2
1160,R5
,+6
llMSG16,R2
f>tl(
RITE
llNOlCATE ORIVl-AT EOT
!PRINT DRIVE• PATTERN, PARITY, OENSIJY
CR
CR
CR
CR
!PRINT WRITE MOOE
CR
CR
CR
CR
CR
01271'+
M:JV
TOP
0127'11
Mllli
00031'+
MOV
WRCH[K1H2
llf.CPRT
tPRINT "WRIT( ERRORS:"
llWRCHEK+2,RO
MOV
MOVB
1160.MSG20+17
MSG?0+17
INCB
IPRINT STATISTICAL REC VERY
ii'HO
TST
WRTP2
BEO
llMSG20,R2
MDV
TOP
MDV
C0 I ,R2
UECPIH
tRECOVEREO AT )(
TST
COi+
!JUST INCREMENTING
CMP
R0,11WRCHEK+20
!PRINT RECORD LlNGTH S QUENCE
UMSG19,R2
TOP
000316
000060
013002
013002
WRTOl:
012763
011ou2
10 11•1< (,
00!'.7<'.0
0200<1
()Ul 3b.i
• +&
CMP
CINE
10111\d>
01;>7U0
llNl
MOV
104'1U'+
01' 7U 2
104 11u ~
Ol 3'7l. c?
MOV
CMP
UIC
!CHANGE FROM SPACE TO
!PRINT RECORD NUMBER
PARAl'1.R5
11177717,RS
llMSG17oR2
ll20.R5
.+6
llMSG18,R2
1140.R5
MOV
!SPACE FORWARD 1 RECOR
WRTD21
000.33'1
Uf·JE
wRTOt
Pll68
1768
1769
1770
1771
177?.
1773
1774
1775
1776
1777
1778
1779
1780
1781
17b2
17U3
178'1
1705
1766
171l7
MACRO V06•03 12•0EC-711 12:211 PAGE 1•31
00~766
005772
00577'1
005776
006002
00600'+
006010
00(012
0057.)1
001ou1
0002v7
0127U2
1041llJ'+
0137U2
10'1'1<'. r.
0002lJ7
0060111
006022
006026
006032
0060311
Oof.0%
006042
006046
006052
0127.)7
0137U2
0137lJ3
OOf.051+
006062
0060611
00f;072
oot.n74
006100
0061011
006110
Ou6112
0061111
17'.19 006116
1800 oor.120
1801 00£,122
1802 006124
1803 o Of.126
180'1 006UO
11105 OU6132
11J06 00613'+
ltl07 0 Of. l ,6
1808 ou&1 110
1009 00bl'l2
1810 00614'1
0327.)1
0014U4
0327.)7
OOJOu7
OB7l 2
TST
BNE
0003311
RTS
013005
0003311
000001
000250
001112
001)116
Q()(l3U3
00f31Jj
Q'l;>7U3
06?7U3
0127'of.
0113lJ7
1 777'1 l
00611'1
006054
l7!J8
1789
1790
1791
1792
1793
1794
17'15
1796
1797
1798
11111
OiJt.146
1812 ()06150
1813 006152
0427~2
0?:~7u2
000100
001112
000200
001112
000250
1110300
000252
0013/.5
0002u7
OOf>l :>'+
0061°2
00(.110
00f)2\J*
PATOl
PATf2
PAT02
OQ£,2.:0
PATf3
OUf,2~2
PAT03
PA1[11
00E>2::.o
00( 7.>0
OUt.21 ..
PA 1'1
f'A T£ 5
00b3.:~
p;, 10'.)
0Qf,:'P2
00• 3::.2
00 £, 31.> 0
PA16
p;\ Tf.
PATF7
PA 11
OOHu~
ltll5
Ol27v.5
1110701
ooo~B
0127v.5
ooos10
1110301
0127\J.5
(i0lJ5l 2
006176
1 /)~~ J
11122
!PATTERN 0
1HIGH FREQUENCY OUTSIDE SKEW
PATEO: MOV
nl'+0701,R3
1'101
HR
PFll 1
1HALF FREQUENCY OUTSIDE SKEW
PATOO:
MuV
Ulll0301,R3
11
l!H
PFil 1
1PATTEf\N l
15LIDJNG O
l fJ? 3 006170
lll~4
ISKIP PRINT IF
<106174
~
0
MOV
TOP
MOV
PERMBS,R2
!PAINT MPERMANENT BADS
UECPrlT
RTS
PC
1GENERATE 7 TRACK DATA PATTERN
1ALL PATTlRNS HAVE BITS 15tlllt7t6 SET IN CASE CORE
GENP7:
MOV
nl,PGMOOE
tSEl 7 l~ACK PAlTERN G
MOV
WBUFtR2
MOV
Pf,RAl'l,R3
S'111!l
R3
ASL
H3
nrc
u1111111,R3
AUD
UPATPST,R3
MOV
hPATCK,.(SPI
IPUSH STACK RETURN
MOV
iN3,PC
160 TO PAT GfN SUBROUT
1FINISHEO PATTERN Gf NERATION
1lF CORL DUMP NOT SELECTED CLEAR BJTS 1511111716 IN
PATCK:
BIT
nloo,PARAM
115 CORE DUMP SET?
B[Q
PATrN
INO
HIT
U2001PARAM
IMAYBE1 IS CORE DUMP S
B~f
PATfN2
IYES
WBUF1R2
IND
PATEH: MOV
PATENll BIC
Ul403001121+ ICLfAR BITS 151111 17 16
CMP
RHUF,R2·
IOONE ALL?
RNE
PATENl
l~O
PAT£N2: NTS
PC
PATPSTI PAH"O
PA TOO
PATfl
00&2.::&
0062~ ..
1814
1616 00615••
1817 006160
10 l ll
1111 'J llvl; 162
lh?.O 006166
PCRMBS
o+ll
PC
nMSG20A,R2
PATLl!
MOV
Bil
#PE1oR3
PF ll 3
\
OT"
CR
OUMP SELECTED
N, MODE
CR
CR
NE
ALL WORDS OF WRITE OATA
T?
eu
FE
...,,. ._..,_
MACRO V06•03 12•0EC•74
Pl+68
1825
1826
11127
1828
1829
1830
1831
lll32
11\33
1834
1835
18.36
lll.37
1838
006176
006200
006202
0062011
006210
006212
0062111
OOf.216
17~7b7
17737:1
006212
OOO!'iu~
l!:ifJ3'10
142310
006220
006224
C.127u3
000'111
152725
til39 oor,221:.
11140 006232
ltl'l l
18'12
1843 006:?3'1
lflljlj 006;!'10
lb'15
18'16 0062•12
1fl47 00!>2'16
1048
18'19
1850 006250
18'.ll 00625'1
11\52 006256
0127u3
0004i:.6
1653!:>2
0127li3
OOO'lt.5
177377
0127U5
OOO'lbD
177701
0121lJ ~
000301
165!; 0Qf>;>62
0010~1
185•i
ltl55
1856
)857
1058
1859
1tl60
1661
1!162
11J63
1fl64
1()65
lflb6
11Jb7
1660
101,9
1870
1871
1872
1873
OC6:?64
OOt.?66
0002u1
006~70
0 0 ]71; 7
OG071D
0061'72
1611.n
17!'i7t.7
1 n:n5
1SLIOHJG 1
PAT01: MllV
11P01,R3
OR
PFIL3
1;crq37
1351\67
137075
POU
1100110
12010
1402
1~03'10
142310
1'1071)2
1'107~2
110.3~2
0237U2
PAGE 1•32
PEtl
1677~1
012703
1~:21+
000252
lO!>l'U 5
!PATTERN 2
1tHGll rtit.QUfNCY EVfRY OTHLR TRACK
MOV
PATf2:
11152725,R.3
112'125
llH
PFIL 1
1HIGH FHEOUfhCY EVERY OTHER TRACK
pAf02l MOV
IH6!>352,k3
125052
UH
PF IL 1
1PATTlRN .3
1llALF FREOU£NCY OUTSJO£ TRACKo HIGH FREQUE.NCY INSI E TRACKS
pAT[3:
IU77377,R3
137071
MOV
UH
PF It 1
I HIGH FREOUrNC '( OUTS IOE TRACK, HALF FREQUENCY INS! E TRACKS
PAT03: "IOV
IHH701oR3
137401
BR
PFit 1
1PATTERt; 'I
1INCR(M[NTING PATTERN
1574;>7
1677:>7
1677:>7
1737b7
1717b7
171713
17L715
17731&
0127US
000'1::>2
1603'•0
1503'10
1503"0
l'l43J. 0
1'1?310
1875
18''6
1877
1871\
11179
181!0
006:BO
006.B2
00633'1
01)6336
0UL3 112
'. 4 ;> ~IJ ~
ltllll
UOb3 11't
l413U2
006.~40
006302
006330
1PAYTE.RN 5
1THRE.E 3•S EACH TRACK EVERY
PATE.51 MOV
nPE5,R3
UR
Pfll9
P£51
t57'1.H
167737
16 77~7
173767
171707
171773
176775
17737b
1THRLE l':i EACH TH4CK EVERY
11P05,R3
PAT05: MOV
flk
PFIL9
1603 110
P051
150340
1503<'.0
l '14 310
142310
1 112 ~04
141 ~1)2
6TH WORD
117''37
1271137
127457
133467
131%7
1.31473
1.no15
l.37C76
6Tll wORO
1200'10
1100'10
110020
I '1010
12010
12004
11002
.... -·
-
MACRO V06•03 12•0EC-711 12:211 PAGE 1•33
Pll68
1862
1883
168'1
1685
1BU6
11187
186B
!£189
11190
111'11
te'J2
lfi'J.'I
189'1
1895
1896
18'J7
11J911
1899
1'100
l'IGl
1'1U2
1903
1904
1905
l ')06
l'J(J7
1906
1909
tY10
1911
1912
1913
1914
1915
l':ll6
1917
1918
1919
1920
0063116
006350
006352
OOf,35£.
}')jQ
1951
19.12
l 'J.B
1 'J3'1
l 'J35
1936
1937
0127U5
0047.H
006410
OU6't12
006416
006'>20
0103•'2
0237U2
006422
00£.4211
006430
OU6432
0Ub•J36
00&4•10
Ouf,442
oor,•14'1
OOf,446
OlO~u*
1~27 .:>
1
001712
1137'2
02371.>2
0013b5
0002u 1
1PATTEHN t.
aALL 1•s AIL
PAT6:
MOV
177777
llH
007126
000077
0072!>f.
007256
000252
000252
000006
01<~•2
02~71J2
000252
001(ltJ1
0002u7
020.'>C~
00JOU2
1627~3
0007c.b
006454
ou&456
OOL462
OOf,'lf.11
006470
01)(.•172
OUf.47'1
0103\J~
000006
0627U~
000022
0123 ;.;z
0237U2
001oul
000252
THAC~S
U•l,R3
PF I l l
PATr7
PC
&FILL WRITE UUFFER WITH CONSTANT PATTERN
PF I LU MOV
H3, I 21+
IHJUF ,R2
CMP
EWE
PF IL l
HTS
PC
1FILL WRITE tlUfFER WITH 3 ~ORO PATTERN
MOV
H3,R'I
PFIL31
AOD
116.1<'1
PF1L3A: MOV
131+tl21+
CMP
R8UF,R2
BNE
• +'I
RTS
re
CMP
RJ,R4
o:JE
,+6
SUB
llb1R3
!JH
PF" lL 3A
1FILL WRIT[ BUFFER WITH 9 WOHO PATTERN
MOV
H3,R'I
PFIL91
,,oo
ll.?2,R4
PFIL9A: MOV
(31+.121+
CMP
R0UF,R2
nr;E
• +'I
00021J7
0627L~
11102
11101
1PATTEHN 7
1HANOOM INON[ ALL o•s1
PATE7:
PC,RANGEN
JSR
Ill Tfl
1177,RANOOM
p(ll
P/\Tf7
MOVB
RAN001'1d21+
CMP
RBUF,R2
fl NE
llTS
00131~
00L4~12
006500
00650'+
1 .. 0702
1110701
OOOllH
006360
00636'1
0063 72
Oll63711
006400
00640'1
006406
J 'Jd Ollf,4 76
1922
l'J23
19211
1 'J25
19"'.6
1927
1926
192'3
l .. 07Ui!
1110701
OOO?U7
RTS
PC
0203lJ~
00 l Q\i 2
CMP
IH1E
sun
1<3,R'I
,+6
1122,R3
Bil
PF IL 9A
lf27u3
0007t-f>
000022
1GENERATE 9 TRACK DATA PATTERN
G£NP9;
MlJV
112,PGMOOE
ISET 'J TRACK PATTERN G N, HOOE
llfl!JF,R2
MOV
1INITlALlZE DUFFER
PAHAM1R3
MOV
ICHCCK PARAMElfHS FOR ATTERN SELECTED
006506
00&51'1
006520
OUf.52'+
0127j7
0137lJ2
01371d
00Q3L3
000002
000250
001112
S.lilB
R3
Ollh~?6
u427U~
177761
nrc
006532
0627li3
0113U7
006540
AllO
Hl77761eR3
uPATPNT,R3
01!6~,%
006~·"0
0 llb5 1• 2
00654'1
006546
OOL550
006'.i52
J 93S OOL'.,'i'I
0011'16
GOtJ,4~
MUV
PATPNTl PATO
PATl
PAT2
OQf,t.<>0
PAT3
00l7~0
PAT'I
0065b0
00651 ~
00ti7~:.
PATS
007012
f'AT6'J
wll3,PC
.,
CR
Cf\
CR
CR
P1168
193-i
l 4 006616
1955 OOht'..20
0127lJO
0120'2
0237v2
006622
19~,t.
0Ub6~2
195 7 0 Ut·62'1
19~8 0 Q6(,;>6
1959 OObtdO
l'J60 00b632
1%1 0UL631+
l'lb2 OOU,36
196.3 OUf>f,'10
196/t 006642
190:>
OOlOUl
0002u1
0227UO
C.01310
0007b:S
loouuo
0201uo
0040<'.0
{I 01 OlJ ~
oooou1
01to2uo
0100"0
1102010
000 111· 2
000252
0066 1111
1 %6
1967 .0066 1111
1 %11 006650
196'~ OU6654
1970 OOf..656
1971
1972
1'.17:5 00b660
197'1 0066611
1975 006666
1976 006672
1977 Oof,6 74
1978 OOf.676
1979 006702
1900 006704
1':101 006706
l'J02 006710
1':!8:~ 006712
1984 006714
1965 006716
1906 0067?.0
l'J07 006722
1988 Ouf,72'1
1989 006726
1990
1991
19')2 006730
199.3 OOE.734
l'J9'1 OOf.740
1 'J95 006 7114
012u2
0237U2
001.3 I .S
0002u 1
Ol27UO
0120<: ;z
02.3711Z
001001
0002ll7
0227UO
001310
13627'4
000252
006706
0002:S2
006730
0007b~
l'IOOj7
10Q41b
00151~
oo.n10
0171&0
0.373LO
3BOO
76201
174003
170007
07t2Ll
17'1QU.3
1700lJ7
1050->7
1137~2
1052;>7
0237U2
PAT7
1PATTERN 0
1HALF FREQUENCEY OUTSIDE S~EW
PATOI
MOV
n2012.c21 +
110101100111
CMP
RBUF,R2
fJNE
PATO
HTS
PC
!PATTERN 1
1SLlOING 1 BIT I ISOLATED IHTI
PATl:
MOV
11P1T,RO
PATlA: MOV
101+. 121+
CMP
RBUFoR~
fl NE
.+4
FITS
PC
CMP
jjPllT2,RO
lltit
PATtA
BA
PAT1
PlTI
100000
20100
4020
1004
1
40200
10040
2010
402
1PATTERN ?.
!HIGH FRlOUENCY EVERY OTHER TRACK
PAT2;
MOV
#13627111121+ IC2741C27'41
CMP
RBUF,R2
flN[
PAT2
HTS
PC
!PATTERN .S
1THREE o•s, THREE t•S, THREE o•s1
MOV
PAT.SI
llP.3T,RO
PAT3AI MOV
(01+.C2)+
CMP
R8UF!R2
UNE
.+4
IHS
PC
CMP
llPAT4oRO
ONE
PATJA
UK
PAT3
l't00.37
P3TI
100470
1574
.H70
17760
0067511
006754
00675'1
000252
1PATTERN 'I
1INCREMENTING PATTERN (0•3771
cum
PAT41
P4A
MOVB
P'+:
P'IA• C21+
INCfl
P4A
CMP
HflUFtR2
\
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
c.~
Coi
CR
Cil
CR
Cl{
CR
CR
Cil
f.R
CR
CR
CR
CR
CR
(ft
CR
ca
Cfl
CR
CR
CR
CR
Cit
CR
c~
c~
C1l
CR
CR
CR
CR
CH
CR
CR
CR
CR
CR
CR
c~
CR
Ctl
MACAO VD6-D3 l2•0EC•71+ 1212'1 PAGE 1•35
P'l68
1996
l1!','l
I'.
I
0067511
006752
006754
006756
006762
00676'1
OOt.770
00b772
00677'1
007000
001no2
()0700'1
007006
007010
007012
oo·rol4
007016
007020
007022
0070?'+
007026
0()7030
007032
00703'1
U070 36
0070 110
007042
00701'1
007046
00'7050
01J70!'i2
00705'+
007056
oo·ro6o
007062
007(16'1
Otl7066
007070
6NE
001311
000201
000000
0127~0
0120-'2
0237li2
001ou1
00021.i,
0227v0
001310
RTS
007001+
000252
007072
OOQ7b~
oooouo
lOOOUO
1ou2uo
040 J (J 0
0201vo
020040
0100.:0
!J040L0
0040JO
00?.0ll~
00100~
001ov2
000 11u1
OOUOll
oooouo
PllAI
0
1PATT£RN 5
1£ACH TRACK 3 HITS
pAy5:
MOV
nP5TeRO
PAT5A: MOV
IOl+.C21+
CMP
ROUF,R2
fl NE
• +lj
HfS
PC
CMP
llPAT69eRO
fltiE
PAT5A
BR
PATS
P:>TI
0
100000
100200
40100
20100
20040
10020
4020
4010
200'i
1004
1002
'+01
0
lOO;>OO
100200
U'I02lJ 0
0•101uo
02ou'f O
40200
40100
20040
0100'10
100'10
Cfi
CR
CR
CR
CR
CR
CR
CR
CR
c~
CR
CR
CR
CR
CR
CR
CR
C.R
.
OQO;lul
10020
4010
2010
2004
1002
'102
'101
tPATTERN 6
tHIGH FRLOU[NCY ALL TRACKS
PAT69: 1"10V
·-~· (21+
CMP
ROUF,R2
lrnC
PAT69
HTS
PC
1PATT£RN 7
tHANOOM
JSR
PC,RANG£N
PAT7:
RANOOM,(2lfMOV
R8UF,R2
CMP
IHlE
PAT7
HTS
PC
010046
1RANUOH NUMAEH GENERATOR
1£XlT WITH RANDOM NUMD£R IN LOCATION NA~[O "AANOOM
RANGE1~: MOV
H0 1 -(SPI
tSAVE REGISTERS
0100~0
004010
OO;>OlO
002ov~
0010\Jl
OOO'IU2
0004lJ 1
.•u 36
007072
007U76
007102
00710'1
012u2
02.3 7lJ2
001373
Ci0021J 7
177777
000252
007106
007112
007116
007122
00712'1
00•17.)7
0071.26
007256
000252
0011;::6
CR
CA
CR
CR
CR
CR
CR
CR
l
;'o.n
20.38
2039
20'+0
20'+1
2042
204.3
204'1
204!:>
2046
20 117
;>041J
20119
2050
2051
2052
Pl!
PC
OLH'-2
02?> 7v2
001311
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
MAtRO V06•03 12•UEC•7'+ 1212'+ PAGE 1•36
P1168
2053
205'+
20!>5
2056
2057
20::.11
2059
2060
2oc.1
20(,2
20b3
?Ob'I
20b5
20f.6
2067
?061l
201>9
2070
2071
2012
2013
2074
2075
207u
2071
20·111
2079
;>OllO
2081
2082
2083
20114
2085
2006
201l7
20tltl
20tl')
2090
20'Jl
:>092
20'.13
2094
2095
20%
007130
007132
00713'+
0U7136
0071'12
0071 116
007152
00715'+
007156
007160
007162
00716'+
OU7166
007172
0U7t74
007200
007?02
007<'06
007210
007212
Ou721t..
007220
007"24
0012?.6
001; 30
OlOl'tll
0102'+6
Ol03'lf>
0137110
0137Ul
0127U3
OO!:JOU2
0063UO
OOblUl
OOt>ll>.?
0053U5
u013 I-'
0637110
00!·'.>U l
0637Ul
06<'7v0
0£J:'l5~ l
oos5c2
(J627U1
(J05!:ilJ.?
0627U2
OC7260
007262
001057
0<+ 7'101
000006
0602\J 0
1\00
oo:.su1
0100~7
010o:H
007<' 110
00724'1
007"'16
00i250
007252
00725'>
010P7
00726'+
007270
007:>72
007300
007306
00731'1
007 3?.0
2091 oon22
20'10 007326
2099 oon~o
2100 00733'1
2llll 0073 110
2102 0075'<2
2103 00734'1
210•1 00 73 116
2105 00735'1
2106 007360
2101 ool.H,6
211Jll OOFH'I
210') Gu/316
RANGll
0055~2
007234
007256
007260
0072b2
007260
007262
000007
ADC
MOii
MOV
MUV
MOV
1'011
HOV
MOV
RTS
007256
()07260
007262
01?6U~
Ol2b~Z
Ol;>Gul
012bUO
0002u1
oooouo
OOLOl. 0
000336
0010lJj
oi:n.H
0127j1
013711
10f17/1
000266
177775
00(1276
170676
000:35'+
00030'1
170702
tno,H:>
00t>Of1
170666
1033/:)
OJ 37••0
0137Ul
000252
OOO.'l5't
10~,o~o
013711
00035'1
1706'10
000?5;>
000276
17064'1
1706.'l'+
170622
000002
170t>l2
1!)44" ~
Q :..i',!
7 17
Rl
RO,RANOOl1
flO • l ONlJl1
Rl ,utrWM
!SP1+,R3
tSP1+,H2
ISP1+,Rl
ISPlhRO
PC
CR
CR
CR
!SET UP LOW DIGIT
!SET UP HIGH DIGIT
ISET UP SHIFT COUNT
!SHIFT RO LEFT ANO
!ROTATE CARRY INTO LSB OF Rl ANO
&ROTATE CARRY OUT OF R INTO R2
I ULCRE~UJT R3
1CONTH1UE SHIFf LOOP
IAUO NUMOER TO MAKE Xl ~
lf'ttOPAGAT[ CARRY
IAUO NUMUEH TO MAKE X 2'j
IPHOPAGAlf i:Afli1"+
170600
17057'1
007424
007430
007434
007440
007442
001•144
007'i"l0
Ou7452
007460
0137UO
0137Ul
OD7v2
0220"1
000252
000250
000354
007~/02
0047.'.17
0237.lT
001.:115
00021, 1
001762
0003~6
OOO?l't2
0321~1
000002
001112
007126
177400
l 7 74 70
007256
007 1166
007 1•7 11
2130 007476
2131 007500
2152 007506
2133 OU7~10
;>134 007~>14
2135 007522
2136 007526
2137 007!:i30
0010~:)
l627L2
001313
000002
05~'7.H
000003
uo1ou1
001112
00l4l~
0047.:>7
o~.21~1
0127U+
005~1>'+
001316
21J1l 0{J7'.i.32
0052~7
2139
2140
2141
2142
2143
21'<4
?.145
2146
2147
21 116
21'+9
21!>0
2151
2152
?153
01J7~,36
001311
(IU75'•0
0047?,1
001~,44
0237.>7
0012!;:)
007552
Ou7!:i54
000312
007256
007762
OOC336
0003'+2
020000
170446
0002u1
007556
007:.6'+
032111
007~166
01 ;>7Li .!
10•141. ..
012373
0137~7
000354
010756
000210
0227-17
0010ll2
177775
00030'+
00~2~7
0003'+6
OU7572
007574
ouno2
007606
OU7610
oun12
21~4 oon14
2155 007616
2l~J6 (,07624
2157 007£,26
?1511 007632
2159
?lf>O 00763'+
2lt..1 GU7G42
2162 007&44
:>11,3 cun52
2164 00765'+
?.J(,5 007660
216i, 007662
OOltlH
Ofl4P1
014] lJi!
10'<4•2
Ol'+Ou2
1044l~
ouo••cb
0327.)7
001515
175600
000312
C32711
020000
1703!>0
001010
012·ru2
012346
1041tl~
013·p7
000354
000270
PCoGOWAIT
1RETUHN HERE AFTER INTEP.HUPT
MOV
@MTs,STATHO
@MTC
TST
IANY STATUS ERRORS
RO[RRO
DHI
IYES
1CHECK FOR DATA ERRORS
MDV
RBUF,RO
MOV
11/BUF,Hl
MOV
READLN,H2
OOLLRs: CMP
IOl+olll+
!CHECK FOH PROPER DATA
Ut;E
DAT[RR
!HAVE DATA ERROR
SUB
!CHECKED ALL TRANSFERS
112,n2
IND
BNE
DOLLR5
#3,PAHM1
RTSSTP: !HT
HNE
~DSTPC
PC ,ROitJCR
JSf<
!INCREMENT FOR NEXT BL
CMP
RECORO,LASRCR
BIJf.
REAOGO
RTS
PC
!EXIT READIT
ROST PC: lllT
li2tPARAM
IJS REAU MODE RANOOH?
!!LO
RDSTP
INO
RNDRDS: .JSR
PC.~AIJGEN
!llS
11177400,RANOOM
MOV
RNDSll
11-200 •• R'+
&DELAY l MILLISECOND
INC
H4
BNE
.-2
INC
RANOOM
l:WE
RWJSl
RDSTP: .JSR
fJC .1<1HNCR
CMP
RECQHO,LASRCRIOONE LAST RECORD?
HNE
ROST PO
INO
RTS
PC
IYES EXIT
1HAVE DATA ERROR
DA1Etrnl !llT
1120000, iilSR
!TYPE ALL READ ERRORS?
£JN[
DATrRl
INO
UMSc;9A,fl2
MOV
TOP
I PH INT •READ DATA ERRO
REAOLN,LENGTH
MOV
PCoPHTS
JSR
• 111 oR2
IPRlNT EXPECTED DATA
MOV
OCTPRl
MOV
·I 01 oH2
!PRINT ACTUAL DATA
OCTPRT
11•3.kDPASS
OATERll CMP
,+6
FlNE
OAERRS
l+l TO DATA ERRORS
me
HTSR1
HR
1STATUS INDICATES AN ERROR, CHECK FOR EOT
11175600,STATRDIIS ERROR LEGITIMATE
tWrnRo: BIT
RtJUTf,P
HEQ
!HAVE £OT
fllT
U21l0001cilSR
ITYPE ALL READ ERRORS?
lHJ(
HTSR[C
INO
MOV
UMSG9oR2
TOP
I PH INT •READ SIATUS ER
REAOLN,LENGlH
MOV
f
TRANSFER
CK
•
R EOT?
OR•
MACRO V06•03 12•0EC•74 1212 ..
P .. 68
2167 007670
001+7.H
010756
0227j7
001002
0052jJ
177775
000304
0003 .. 4
000020
170314
2160
?.169
2170
2171
2172
2173
2174
2175
2176
?177
0076711
007702
C.0770 ..
007710
007716
007720
00772'1
007726
032711
OOltll l
0077~2
0052..l7
001 'I[,~
00'17;)7
oool.:'>7
2116 007736
00~2:.1
2179
2180
21111
2182
;>163
:>15'!
2105
21116
2187
OU17 1>2
007750
007756
007760
0127.H
0527;)1
OO!J2~7
:>U:lll 0077H
oi.11.:i r
2189
2190
2191
21':12
21'13
2194
2195
21%
2197
2191\
2199
2200
<'201
2202
0231:.1
01ouo2
010010
010012
010020
010022
010030
000201
0100)2
010036
0100110
010046
010054
010062
010066
01001 ..
0()6077
10337:)
OU771
013777
052717
OO'l'P 1
0•12·n 1
00(J2l' 7
010076
010102
010110
010114
010116
010122
<'<:ll
2212
?<'13
2;!14
2215
2216
2217
22111
2d9
2220
2221
01012 ..
010130
010134
010140
Ol01 11't
010150
010152
010156
010162
010164
22"::! 010170
2223 010172
000304
000312
0010~ ..
ootJ7.H
001416
220'1
2205
2206
2207
22011
2209
2<'10
010032
007.306
00021:.0
177775
002000
OO(Jf,b 1
007"f62
0(177&6
007172
2~03
000304
000336
000310
000310
000354
000354
000<''+6
000354
0002'14
000266
0003:)4
002'l >J~
0237~7
003'l1J'
0137~7
00117~7
05;>7 :i 7
0127ld
10411V'+
0127L'2
104'1 u'+
co .. 1:.1
013705
042705
0127u2
0227li5
001ou2
0127~2
U227U5
001oul
Ol:'7U2
170156
177777
OOCJ276
000012
OO'l532
000016
170122
007762
000020
0132o::i
0122'10
011020
001112
177774
012675
000001
0126::i5
000002
012665
000336
000356
1·38
JSR
PC,PRTS
1+l TO RO£ERS IF FIRST ERROR PASS
RTSK[CI CMP
ll•l.ROPASS
ONE
,+6
f'IOEllRS
INC
1+1 TO STATUS ERRORS
ti20.@SH
RTSIHI lllT
IOLLLTE READ RLTRVS CS
~~NE
RPASS.3
!YES
INC
HOP11SS
!DONE ALL RE~REAOS?
ll[Q
IVES
RPASSl
JSR
PC,tiACK1
INO, BACKSPACE TAPE
Jt~P
HDSlPD
!GO AGAIN
NflRf Al)
RPASSll me
l•l TO NONRECOVERAULE EAD
RPASS31 MOV
11-3,ROPASS
OIT
112000,STATRO IAI EDT?
l1NE
i-INOTPl
I YES, TYPE "[Of'•
BR
HDSTP
1S£T UP POINTERS FoH NEXT RECO~D
RE.COHO
ROINCkl JNC
TST
llLK me
fj[Q
HESTHl
1RECORO LENGTH IS CHANGING, courn Ji
A1J0
fll.KINC,READLN
U1P
REA0LN,HINLEIHIS LENGltl LESS THAN I'! Nlf'IUl'I
kt:STHL
INtl
hLT
CMP
REAOLN,~AXLEN!IS LENGTH GREATER THA
l'IAXIl1U11'1
fJLf
Hf5Tk1
INO
Rt:STRL: MOii
STRL£N,REAULNIRESET INITIAL LENGTH
P.ESTIHI HTS
PC
18ACKSPACE ONE HECOkO
BACKl: kOR
o:M rs
fJCC
• -'I
IWA1T FOR TAPE UNIT RE OY
MOV
11-1,@HC
!COUNT 1 RECORD
MOV
COMAt•O, OlMTC
&St.LECT OHIVE
UIS
1112,QiMTC
!ISSUE BACKSPACL
JSR
PC ,c,o.iAIT
UIC
#l6,iilrHC
. ,.,
RTS
J044lJ~
OU7v2
170152
1701'+2
170134
P~GE
PC
1DRIVE HAS REACHED £OT IN READ MODE
RNOTAPI JSR
PC,llOINCR
llNOICATE AT EDT
llIS
1120,MOOES
llMSG25,k2
RNOTPll MUV
TOP
MOV
llMSG8tR2
TOP
1DUHP ERkOH COUNTERS
PC.PHTO
REAOMP: JSR
!PRINT ORIVEe PATTERN 1 PARIT1t DENSITY
PAR~M,fi5
t'OV
LllC
11177774,RS
MOii
llMSGl'l.R2
CMP
liloR5
u1;E
,+6
MOV
llMSG12eR2
CMP
112.R5
BNE
,+6
MOV
llMSG13,R2
TOP
!PRINT READ ~00£
MOV
R£CORU,R2
CR
CR
CR
CR
MACRO V06•03 12•DEC-74 12121f PAGE 1•39
Plf66
22216 010176
2225 010200
?22& 01020'1
2227 010210
?228 010214
:>229 010<'?.0
2230 010222
2231 010226
.?232 010232
2233 0!0~316
::!234 010240
2?35 010?1111
22.36 010246
2237 010252
22.38 01025'1
:>239 0102<.o
22 11c 010262
2241 Oloc66
2242 010270
2243 0102H
2<'11'1 010276
22'15 010302
2<:46 010 30'1
2247 010310
22'1b 010312
22119 010316
2250 010~20
2251
2252
225J
1041f.i6
013705
04271J5
01211;2
0227U5
0010\Ji!
01211;2
0227U!l
0010lJ2
u1:nuz
0227u5
001ou2
0127U2
l 04 lj (J ~
0127U2
000306
OECPRT
IPRINT RECORD NUMBER
MOV
PARAM,R5
BIC
U77717,R5
HOV
llMSG17eR2
CMP
#20,R5
ANE
.+6
MOV
11MSG18,R2
CMP
1140,R5
ti NE
,+6
MOV
llMSG15,R2
CMP
1160,R5
BNE
.+6
MOV
llMSG16eRZ
TOP
IPRlNT RECORD LENGTH S QU[NCE
MOV
11MSGZ1,R2
TOP
MOV
ROERRS,H.!
UE.CPRT
MOV
llMSG22,R2
TOP
MOV
OAERRS,R2
DECPRT
llMSG23,R2
MOV
TOP
NRR[AO,R2
MUV
UECPHT
HTS
PC
1WRIT£ RECOVERY UTILIZING EXTENDED INTERRECORO GAP
1USEO AFtER [VfRY 7 REWRITES OR AFTER
1EACH WHITE ERROR JF STATISTICAL RECOVERY NOT SELE TED
1USEO ONLY If HEAD PASS SELECTED
lCRGREC: f1U\I
11-lf,\,jHPASS
!COUNT If REWRITES
11110,@SR
XRGO:
fl l T
IULLETE WRITE XIRG IS 51
!ltiE
XRGRCO
IYES
JSR
PC,RACKl
TSTH
@MTC
OPL
• •If
MOV
COM~NOtiilMTC
11111, iilMTC
IWRITE XIRG
OIS
ISLT tlyTE COUNT
IORTLEN,@BC
MOV
;;:uc
~JLG
MOV
WElUF .<~CA
!SET CURRENT ADDRESS
ROR
O'MYS
llOAlT FOR TU RLAOY
,.4
tlCC
JSR
PC ,GOWAlT
1RETURN HERE AFTER JNTERRUPT
@MTS,STATRO ISAVE STATUS
MOV
@MTC
TST
BMl
XRG5
IHAVE ERROR FLAG, CHEC FOR EOT
IORP.ASS
xRGRCo: Cl.R
HTS
PC
IEXIT IORITE XIkG
lilT
11175600,STATRO
XRG51
BEO
XfiGRCU
IONLY EOT, EXIT
ItlC
loRPllSS
l(JOrJE 'I XlRG
012212
1PRlNT STATUS AFTER 4 XIRG EHRORS
MOV
UMSG7tR2
001112
177717
012723
000020
012732
0000110.
012705
000060
01271'1
013035
10441;~
0137V2
10411<'.&
0003'14
01<'7~i!
013065
10114lJ ~
0111nc?
101111
01<'7l>2
L"
1
0003"6
013106
Oll4l>~
01.Hl•Z
000350
1044~&
0002u1
22~4
2255
2256
2257
2251l
2259
2260
2261
2262
?.263
~ ~-
01Qj22
0127~7
OlODO
032717
001 Q.)i>
0047.:lT
010336
010340
01034'+
0103~0
010.~52
010360
010366
22blf 01037'+
2265 010400
2266 010'106
2261 0101112
22(>8 0104l'i
2269
?270 010•120
2271 01011?6
2272 010 1132
2273 01043'1
?274 010440
2275 010442
?2 76 010•150
?217 010'152
2270 010456
2279
22110 010460
10~711
10031!'1
013717
05<'7 7 1
013717
00!..411
013711
OOLOf7
103315
00117;, 1
177771+
000040
000306
1676716
010032
1676'+6
000276
000014
000352
167620
000250
167602
1676.56
167630
167&2'1
!676116
004532
0177:,7
OO':J7f7
lOO'tlJ ~
167570
167564
OO!)Q.H
000306
000312
0002u7
o.321.:i1
175600
001711
0052:,1
001!•~
i.l127l!2
000312
ll!JE
XRGO
~·
''I';
CR
CR
CR
CR
CR
Plf63
MACRO V06•03 12•0EC•74 121211 PAGE 1•'+0
2281 01011611
2262 0101/66
2263 0104711
2;>64 010500
2265 01050'1
2286 010506
2267 01051'1
?288 010516
2289 01052'1
?2';10 010'i32
22';11 010536
lOll'+f.'+
000352
010756
012627
000270
0327:-7
00111.>2
002000
000312
042"f11
0527f 1
000016
000003
00'<532
167472
1674£,4
000336
000340
oou:H2
000336
0137.37
00'17.>7
01:.'7v2
10441.i~
00•173 7
OE~
0002U7
22';12
2293
2294
2295
2296
0105'10
Ol05't6
010!15'1
0105:)6
?297 010'..162
2298
22';!9
2300
2301
2302
2303
2304
010564
010572
010600
0137.:>7
0137,;7
0010L5
00111:.1
0002u1
013711
163 711
005417
010£>0'+
0137~2
?305 010610
i3n:.1
2306 01061£>
0010ll7
2307 OlOC.20
0047.:>7
2308 01062'+
0004ll
2309 0 l Of,26
1527~7
2310 0101',3'1
2311 OlQG.36
2312 OlOf,•12
2313 010£,'•4
2314 OlQC,52
2315 010660
2.316 0106(,4
2317 01Qh66
2.316 010672
0004~6.
2319 010C7 11
?320 010702
?321 010710
2322 01071'1
00 117·H
00'1342
000342
000340
167414
000300
000004
16742&
167420
000277
010716
00000'+
000277
010730
0004U3
142"1.:>1
OU7l7
105717
000004
000276
1£>7332
000277
1673.i6
l00.31~
001,017
167322
1033 7!1
0'12777
000016
16'(314
()5~711
000012
167306
04 ·7.; 1
00 11532
(J
0002ll7
2323
TOP
MOV
JSR
MOV
TOP
BIT
OIC
UIS
JSR
RTS
IPHINT
WRTLEN,LENGTH
PC,PRTS
!PRINT
UMSG11,R2
!PRINT
U2000tSTATRO
XRGREC
Ul6,iMTC
#3,@MTC
!WRITE
PCoGOWAIT
PC
ON TAP~ X RECORDS
fi[CORU,LASRCR
WHITE STATUS ER OR
STATUS, COMMAND
"XIRG WRITTEN '+ TIMES"
AN EOF
1GO SACK~ARD
GOBKWO: MDV
HOV
WRRECR,RECO~D
UNE
GO~t
IIS NEW R[CORD~o
JSR
PC,REWIND
IYES, HEWlND
RTS
PC
IEXlT
MDV
LASRCR,@BC
tSET BYTE COUNi TO DIF
GOBll
SUB
wRRrCR.@OC
1BLTW£EN LASHCR ANO WR
NEG
@BC
1THE FOLLOWING CODE INSURES THAT BACKSPACE REQUEST
1 MOUL ARE PHOCESSFD FIRST JN THE SITUATION WHERE
I BOTH SELECTED FOR TESTS ON A DUAL DENSITY UNll
MDV
COHVDT,R2
IGLT CUHR(NT UNIT NO.
BITA
U4tCOMAND+l 115 CURHENT UNlT NO, '+
ONE
GOB2
I YES
JSR
PC,TSTUP4
tIS UNIT NO, PLUS 4 Al
UR
GOB3
I NO • PROCEED HITHOUT
BISA
U4oCOMAND+l I YES • ADU 4 TO COMAN
RH
GOU3
G0B21
JSR
PC,TSTUM4
IIS UNIT ND, MINUS 4 A
BR
GOU3
I NO - PROCEED WITHOUT
OICO
H4oLOMAND+l I YES • SUBTRACT 4 FRO
GOB31
MDV
COM~NO,@HTC
TSTA
@MTC
IWAIT FOR CU RLAOY
OPL
,-4
ROH
@MTS
!WAIT FOR TU ~LAOY
ucc
RECORD• LENGTH
ERENCE
ECK
IN PHASE ENCODED
RZ AND PE HODES AHl
5o 6t OR 7?
0 SELECTED?
CHANGE
UNlT NO,
SO SELECTED?
CHA~GE
COMAND UNIT N0 1
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
.-4
BlC
Ul6,iMTC
RIS
a12,@MTC
JSR
PC,GOWAIT
HTS
PC
1TSTUPq & TSTUM4 T[ST FOR SIMULTANEOUS SELECTION 0
A DUAL DENSITY
CR
2324
2325
2326
2327
23?6
?329 010716
2330 010720
23:H 010722
2D2 01072'+
23B 010726
23.3•• 0 l 0730
2335 010"/32
2.336 010734
2337 010736
0062Ui.!
0062Ui!
0062lii!
0062Li!
0001\li~
0063Ui!
0063li2
0063L2
00f.3Ui!
I UNITt SUCH AS UNIT NOS, 0 & 4, 1 & 5, ETC,
I IF THIS CONOITION EXISTS, CONTROL RETURNS TO CAL
I OTHERWISE RlTURN IS TO CALL LDC, + 2 1
TSTUPq: ASH
R2
!UNIT NO, IN RANGE 0•3
ASH
H2
ASR
R2
ASR
A2
UR
TSTPM
TSTUM4: ASL
R2
!UNIT NO, IN RANGE q.7
ASL
A2
ASL
R2
ASL
H2
1.oc. +
'+•
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
.. .
MACRO V06•03 l2•0EC•7'1 121211 PAGE 1•'11
?'168
2338
2339
23'10
2341
2342
23'13
23411
2345
2346
23'17
23'18
23'19
235::l
2351
0107110
0107'111
010746
010750
01075'1
0302~1
001001
0002U7
062716
000201
000002
SIT
CR
CR
CR
CR
CR
I
010756
010762
01076'1
010770
010772
010776
23~2 011000
;>3!:13 011001;
21~4 011006
23!)5 011010
23~i6 01101'1
2357 011016
23!:>8
:>35'1 011020
23b0 01102 11
23f.l 011026
236;> 011032
23b3 01103'1
?364 0110 1!0
23£,5 0110 11'+
2.366 0110 116
Z3b7 0110'10
23£.8 01105'+
23b'3 011056
?370 011060
2371 01106'1
2372 011070
2373 1)11072
:?.37'1 01107'1
2375 011102
2376 011106
2377 011110
?378 011116
2.379 011120
2380 01112'1
231ll 011126
2362 011130
;>j03 011132
2.3114 0111!,6
23115 0111 110
?~86 011144
2%7 Olll50
0127U2
0177~i!
10•1412
0137lJ2
10'+412
oi:nu2
0052U2
1044<'!.
Ol37U2
1044<'6
00t2U7
01?7U:)
10'1'1 j~
Ol37v5
1'127v5
05n1.15
167226
000312
00()336
000270
0002110
000276
000170
000260
1044j~
1044.:.0
01371!~
001112
0003v5
OObflu~
0'+27v 5
05~71!5
000170
000260
104'1j~
104'1j0
013717
105711
100375
0327'11
000276
167110
000020
001 Ov :S
u121u2
013315
#MSG91loR2
MOV
TOP
MOV
OJMTC ,1:2
OCTPHT
MOV
STATR01R2
OCTPRT
MOV
RECOHO,R2
ItJC
R2
OECPRT
MOV
LENGTl~tR2
Ot:CPHT
kTS
PC
1PRINT ORIV£, PATTERN, PARITY, DENSITY
MOV
112110,Rs
PRTOI
l'RC
&PRINT SPACE
MOV
COMAN0,R5
S~Afl
R5
UICll
nPo,R5
f31 s
1126Q,R5
PRC
!PRINT DRIVE NUMBER
SP3
MOV
PARAM1R5
SI.AA
R5
ROR
R5
BIC
11110,RS
UIS
IJ2601R5
PRC
!PRINT PATTERN NUMBER
SP3
MOV
COMllNO,iiHTC
I S£LECT UN IT
TSTA
OiMTC
UPL
IWAIT FOR CU READY
• -'+
1120,@HTS
IIS UNIT 7 TRACK?
on
(lN[
PRTOl
I 'l'ES
MOV
#MSG31,R2
19 TRACK UNIT - POSITI N PAST P & 0
PIHSI
OOQ3d5
1671114
167076
CR
CR
CR
CR
CR
CR
CR
CR
CH
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
CR
1u~4U~
TOP
10~ 1 1:,Q
SP3
RlS
MOV
H
CR
PAllAM,R5
CR
So;AB
RS
CR
BIC
BIS
PRC
MOV
lJ IC
MOV
U1P
11171' ,R5
1126o,R5
CR
lJt~E
,+6
MOV
CMP
UMSr;27,R2
11200,f\5
0Ll1J2v 1
Ot3n5
001112
0003\J 5
0427U5
0~2
7LI 5
000176
0002£.0
1044j~
0137~:.>
2.3il'l 011 l':i6
04;'71.15
01271.12
02271.15
00101.2
01?7li2
0?27L:,
011162
011166
011172
011174
011200
012'116
l(J44U~
231\lllllll~l2
23'JO
23'.11
2392
2393
2394
R2tMSIHTS
tU0£S SIMULTANEOUS SEL CTlON EXIST?
BN£
SETSTK
I YES • ALTER RETURN
I NO
kTS
PC
SETSTK! ADO
112,ii!SP
HTS
PC
1PRINT COMMAND, STATUS, HECORO NUMBER, LENGTH
TSTP11:
000272
001112
177477
013250
000100
OD260
000200
PRTDll
CR
!PRINT PARIY't
c~
PARllM,R5
11177'177,R5
UMSG26oR2
CR
CR
lllOOtR5
CR
CR
\
\
·~
~
. - ...
MACRO V06•03 12-UEC•711 121211 PAGE 1•112
Pi166
2~95
2396
2397
2398
23'J9
<'400
2401
2 1•02
2403
240 11
24v5
2406
2407
2400
2409
2410
;?411
2 1112
21113
;?414
2415
2'116
2'll 7
2418
2419
2420
;?421
24;?2
2'123
2424
2425
2426
2427
2428
2'129
2430
2431
2432
2433
2434
2435
2436
2'137
?.1138
2'139
2440
2441
2 11'12
?443
24 11'1
2445
2446
2447
2••48
2449
24:>0
2'1~1
0112011
01120t
011212
011216
011220
01122'+
011:>?6
001ou2
01271•2
022n5
011230
011234
01123,,
011240
011211'+
011246
011250
011252
011260
011262
01126'1
011266
011.!70
011274
011300
011302
01130 11
011:306
011312
01131'1
011316
0113?0
Olt3n
011326
011330
01133'1
OH7u~
00~)7l>2
Oll336
01134'1
011352
011360
011.566
Oll.H2
011376
011400
011'10'1
011410
01141'1
011'116
0111120
011422
011430
011432
011436
0114'10
011446
011'150
0114:>6
011•160
BNE
MOV
CMP
BNE
MOV
013270
000300
001ou2
012111 .!
013300
0002U7
HTS
PC
1PRINT OCTAL VALUE IN REGISTER 2
otTPR; MOV
ll•O,R5
!INITIALIZE lST NUMBER AS 0
T:iT
R2
IIS VALUE POSITIVE_
lJPL
IYES PRINT 0
OCH
11 1 1,R5
MOV
INO PRINT 1
PHC
OCTl:
HOL
R2
r
000060
000061
OGt•l u2
00(,llJ2
01~707
177773
011320
ooc,1(J2
OObliJ.!
0061U2
0102~:>
0'l27U:)
0527U5
0060U2
1044~ ..
00f-llJ2
117770
000060
0052~7
011320
001~<>2
1044~0
oooouo
OCTI
105717
100315
010577
0002u1
166712
0121n
177773
011514
0000'+0
0127H
0127-'1
0052-'7
lb17l;(.
100313
0677L2
00'11~1
oo~~j7
oCTPI
00~7~7
0121.:.1
PC
CR
CR
CR
CR
CR
CR
TSTB
GlTPS
BPL
MOV
....
BH
cr:o
MOV
llbO,ZERO
IEXIT
l 7 7777
011506
011510
01150'1
000060
011510
OEClt
177777
011506
01151?
011510
01150'+
011504
000114
000106
011 1!32
011506
000002
011512
0007~>3
001010
02;>7.)1
OU 14lJ,.
Ii 13 7.:, 1
0004lJ6
HTS
0
IWAIT FOR READY
R5, iilTPB
I PRINT
RTS
PC
1PRlNT DECIMAL VALUE IN REGISTER 2
#•5,DIGCNT
OECPRI MOV
MOV
llOECPIH +2 tDECPNT
MOV
1140,ZERO
11-1,DIGIT
TYPTl: MOV
INC
D lCd T
TYPT2l
SUB
iil0ECPNT,R2
Bl'L
TYPT?.
OIOECPNT,R2
:wo
PC,OECOUT
J:iR
OlGCNT
me
flNE
T'l'PT3
SP3
RTS
PC
112e0£CPNT
TYPT3: AllD
llR
TYPTl
OIGJT
oEcour: TST
fHJE
DEC!
CMP
11-1,DIGCNT
BEQ
OEC1
MOV
LlRo,DlGIT
lf.6706
001ov2
10'14.'.>0
0002u1
0627~7
CR
SP.~
0002u7
0127~1
CR
TOP
1044~ II
lOOOU2
0127115
1044-H
.+6
llMSG28,R2
#:500tR5
.+6
llMSG29,R2
.
011504
CR
- .. - .. -·
P•168
2452
2453
2454
2455
2456
2457
2456
2459
2'160
2461
2462
24b3
MACRO V06•03 12•0EC•74 12124 PAGE 1•43
011466
011474
011500
011502
011!>0'1
011506
011510
011~.12
0527.)7
013711:>
10114.)'f
00(12U7
oooouo
oooouo
0000'+0
011 51'+
01151'1
023'1~0
Oll~il6
001 700
0001 4 '*
uoooJ..?
011520
Oll!:,22
24b'I 011524
2•1(,5
2466 011526
2467 011532
24b6 01153 11
2469 011540
2470 0115 112
?471 011550
2'•72 011554
2473 011560
2'1.,..
2475 011 ~62
;;> 1176 011566
2477 011570
24 76 011572
011575
2479
2460
;>"61 OllbOO
2462 0116()6
2•163 011612
;>•164 0111'>16
2•165 0116?.0
2466 011622
2'11J7 011626
2488 011f,>;O
2489 01Hd4
2490 011L%
2'191 011642
249;>
2493 01164'1
2494 011L50
2495 Ollh52
2496 011656
2497 011660
2498 011662
249? 011£,64
2500 011(,(,6
2501 011674
2502 011702
2503 011710
250 11 011712
2505 011720
250f. 011726
2507 011 no+
000060
011504
011504
OOOOlll
l 05 7 11
1003f5
166502
10:0717
166500
1003(,
117717
1177(,5
04;:7U .S
0002U7
0127U2
166470
166462
000200
166'172
011572
1044U~
00021;1
O:> 1
0'10
1'12711
1122.:.1
1212.:.1
OOlOLl
0002U7
121<'<'1
Ci01 111'b
105717
10031 :S
11<>2' 1
00011.d
0127U~
0'10
057
000177
011664
01166'1
0'10
1661fj2
000100
166'104
166400
000215
BIS
1160.DIGIT
MOV
DIGIT oft5
PRC
RTS
PC
DIGIT: 0
OIGCNT: 0
ZERO:
40
OECPNT: .+2
10000.
1000.
100.
10.
1.
I KEYBOARD INPUT
WAITK: TSTA
iTKS
OPL
•• 4
TSTB
O!TPS
BPL
•• 4
MUVH
OITKfltiilTPB
MOVB
@TKfl,R3
BlC
112uo.R3
RTS
PC
1TYPE 3 SPACES
SP3XI
MOV
llSP3A1R2
TOP
kTS
PC
SP3AI
• ASC 11 II
II
ot:c2:
,(VfN
; lELEfYPf OUTPUT PACKAGE
ll!Cf1
TOI
11177,iHPS
t'10VB
12)+,EOMK
CMPH
@R2,t:OMK
TOPll
llNE
.+4
RTS
PC
CMPA
iiJR2. ll•il
g[Q
TOP;;>
TSTB
iilTPS
BPL
• -'I
MOVA
12l+oiiilTPli
BH
TOPt
1CARRIAGE RETURN, LINE FEED
ll21!',R5
MOV
TOP21
1044-H
012'1U:I
MOV
000212
f'I{(
1052~.!
INCB
BR
0007:J3
oooouo
0127.'.> 1
0127j7
0121.s1
00000'1
002000
015324
0002'16
000244
000252
000010
00'1000
01732'1
000241>
000244
000252
E0"1K:
S£T'IKl
1'1011
oou:>L7
0121-'1
0127H
0127j7
0 OU,R5
llF
CR
CR
CR
CR
f!2
TOP1
ll'lol'llNLEN
ISET RECORD LENGTHS AN
lll0,4.tMAXlEN !BUFFER AREAS FOR 'IK
UUUFFER+102'1.,RUUF
PC
Utl,,MINLEN
ISET RECORD LENGTHS AN
112046,,MAXLEN IUUFFEH AR£AS FOR 6K
llBUFFER+204B,1RUUF
PC
-~
CR
CR
CR
CR
CR
CR
CR
CR
,...,~
?'166
2508
2509
2510
2511
2512
2513
2:.14
2515
2516
2517
2518
251')
2520
HACRO
011736
0117'12
0117'16
01175'1
011756
01176'1
011766
011770
011772
012000
01?002
012004
0050.)1
oosu.:ir
032717
00111u6
0227-H
001'1U7
l 01141 b
0002111
02?7.:>7
0014li1
104'1-H
007260
007262
000020
lbb2'10
000001
001146
000002
00114b
00~2u1
;>~,21
25<'2 012006
2~>2~ Ol2lll2
2524 012016
2'.:l.!5 01?0;>0
2526 01202•1
:>527 017026
2528 012030
2529 012032
2530 012034
2531 012036
2532 0120•10
2533 Ol?0 .. 2
2534 0120'+'1
2535 012046
253(, 012050
2537 012052
2538 012054
2539 012056
:?540 0120£.0
25 111 OL'062
25'+2 01206'+
2'..>43 012066
2544 012070
2545
2'..> 116
254 7
0116<>6
16?7 • !>
000002
000002
OB6~i>
062"1 Jc.
105426
0 l.\(,U 1
0115.:6
004510
(Jl 16l>O
004010
00'11"-4
011230
0040d•
00(.0l o+
004010
0043U'l
0072bl
V06·0~
12-occ-74 1212'1 PAGE 1•4'1
1PATEHN GENEHATION CUNTHUL
Clll
LONLJM
!RESET RANDOM NUMBER G NERATOR
GENP'
fHNIJM
CLR
!llT
1120,0IMTS
IIS UNJT 7 TRACK?
c; 1
!Jl:Q
I NO
Cr-IP
111,PGMODE
IIS A 7 TRACK PAlTERN VAILABLE?
BEQ
G2
I YES
G£NPT7
I NO • GENERATE IT
HTS
PC
UlP
U2tPGMOOE
llS A 9 THACK PATTERN VAILABLE?
Gll
llUl
G2
I YES
(,UJPf':l
I NO • GENERATE IT
HTS
PC
G21
I TRAP HA1JULUI
@SP,2C6)
TllAl'3i+: MUV
StJA
112oii15f'
MOV
@161+.-161
ADO
11TArLE-104~00o@SP
MOV
Cll61+0PC
TABLE I wAITK
WH I Tl
TO
SVC TR
OCTPH
MVCTH
G(l'
0113•.2
Ollf,u!">
01171.!
Ol17j&
1044 L0
10441J2
GENP9
OCTP
SET4K
104'+~2
1 044 ...
2'.>!:i6
1044.:6
2'.>S7
lO'l'PO
?558
2559
104 11-'2
2~LQ
10'14~b
2'..61
2'.JL2
25t>3
25b'I 012072
10•1'1~0
lll'\11~2
GENl'T:::t(i'l'l4?
2~i52
2~i!:i3
1044L~
l044LI.
1044~0
104'1•2
l044H
1044!&
10 114< 0
1 Qljll.:. ..
o:.. 7
CR
CR
CR
CR
Sf. T81'.
2!:>54
;>5!:>1
CR
Sf'3X
2!:i5!:i
2549
2550
CR
CR
CR
H~FDH
GUJP
WAITKY:104'100
WRITIT=l04'102
T0P=10'l40'+
SVCTl l 'I 2
012145
012150
012153
012150
2567 012160
012163
012160
0121·11
0121 H
012177
012202
2568 012205
012210
256'3 012;.>12
012215
012220
01222.5
012??.6
012231
012234
Ol:.>c37
2570 0122<+0
O'tO
0122•.:5
111 ~
012?46
012?51
01225'+
1 u I)
012~57
012262
0122f,5
012210
012273
012276
2571 012301
01230'1
012307
012312
0123]5
012320
012323
012326
012331
012334
012337
o:>'
1U5
1113
1<:5
1
;!,.
oito
oo 1
1d
1, ~
o&;o
1'2
]U5
tc2
Q'I 0
117
U5
O'I 0
0;; 1
ljO
1V5
1•d
1115
lli 3
lU'I
o:i 1
p 3
o::i1
l t' 2
1U5
1 c'+
1<5
1115
l I 1
o::. 7
o::.r
lUl
0:..2
0::.2
0:.2
o:.c!
o:i2
o:i2
o:.z
llJ'+
Oi O
1"' '+
1u1
lV'+
O'+O
\l 1
O'IO
1u.s
lli'+
lU5
057
100
11'+
12'+
116
123
057
100
124
101
120
040
116
114
127
040
117
057
11:>
0'10
123
0'10
114
124
100
040
057
100
111
040
101
123
122
122
lil5
040
040
120
052
052
052
052
052
052
052
122
120
040
122
105
040
104
122
117
040
116
1/wSELECT UNITS
123
105
0'10
111
0'10
JollSl>l:
• ASCII
124
0'10
11SG21
0
ASCII
1/wTST PAT PAR OEN RLS WMO Al10i II
101
12'1
12'+
123
105
105
057
117
ptSG51
0
ASCIJ
l/PIAX TESTS SELECTEOi/
ptSG61
.ASCll
II OK/I
127
124
123
12'1
!'1SG7:
•ASCII
l/wWRITE STATUS ERROAi I
11sG&1
.Asen
I/ENO OF TAPE•••••••••
• ASCII
IORV PAT PAR OEN
II
124
101
104
C'IO
1.23
115
t22
100
O'IO
122
100
116
117
124
105
052
052
052
052
•••••••••+ii
0:>2
052
100
1~6
101
120
040
116
115
105
105
122
11'1
107
~'!<;
"ODE RECORD LENGTHi/I
CR
P'l66
MACRO V06•03 12-0EC-7'1 1212'1 PAGE 1·'16
012342
0123'+5
2:i72 012.S'f6
012351
012354
012357
012362
012365
Ol?.370
2!:173 012373
012376
012 'Hll
012404
012407
OU412
012'+ 15
2574 012416
0 l 24 21
lir:'+
0:>1
o:>7
110
100
JOO
12?
).U:i
101
123
124
040
122
100
100
101
104
101
122
122
i
o<+o
1(1
l
1£3
122
1'.?
0!.>7
ll5
O" ll
1 ~ '+
iu5
ll 7
o:> r
o:.ir
11 :>
012~24
O'+O
012 1127
o~o
o lc'.32
lUl
0124)5
01?4 110
0124't3
o'+O
012~'16
012 1 1~\l
tc~
1113
1U4
()4 0
11 !)
110
012'15'1
0 124 'i 7
Ol24(,2
012465
012'•70
012•173
012'176
01:>501
2575 012502
012';05
012510
012513
012516
Obl
0 l ?'..21
o:.i:>
0125?4
012527
0125 :12
2576 012534
012537
01?5'12
0125'15
01?".50
012553
012~~6
(1125€.1
2577 0125€.3
01?5C':l
012571
012574
012517
012602
PO
}l.5
iu'I
I"'
JCl
103
10'1
O'+O
123
12'+
040
122
117
040
114
107
040
120
124
04 0
12'1
125
105
117
0:>1
122
104
101
117
0'1 0
1J. ~
OS6
1u~
lU 'I
111
1-' 'I
lll
ii. 2
l U5
1uo
111'>
11&
tl~
11 'I
1uo
122
11 7
040
115
123
116
131
1?3
115
114
0110
101
105
057
HSG'JBI
•ASCII
1/~READ
DATA ERRORi/I
STATUS
I/COHO
RECORD
1 i)5
124
105
105
105
101
10'1
1uo
.ASC IJ
040
100
12'1
QI; 0
120
O'+O
071
122
122
1~'+
MSG'JAI
040
124
1.!5
040
1 05
122
]25
115
1 u 'I
.
040
100
1~1
STATUS LqRORi/
O'+O
12'1
051
l/~REAO
.ASCll
122
100
11'1
o:i 1
HSG'11
or+
'1SGlOAI •ASCII I /ii ;
1
PDPll 1•9 TRK RtL. I
125
120
0 f>]
06 7
040
113
105
105
.ASCII 1@RECORD
Ll~ITS
IN BYTES!
lU
114
l 11
o~n
040
12't
111
lOf>
040
130
116
.ASCll 1@'1JNLEN
HAXLENii/I
LENGT
EXPECT(O ACTUALi/I
-
-· .....
---
.
MACRO V06•03 12•0EC-74 12:21+ PAGE
P'l68
2578 012601+
012607
012612
012.:,15
012620
0126?3
012626
2579 012627
01n32
012635
012&40
012643
012646
012651
01265'+
2580 012655
012(.l;(i
012663
2581 012•>65
012670
012673
2582 0126'15
012100
012703
2583 012705
012710
01?713
256'+ 01271'f
012117
01?722
2585 012723
01? 726
o:i 1
Ol?Bl
0~1
1-'0
103
lll
040
111
100
105
111
116
125
12'+
105
122
123
107
130
l 0 .,
122
111
040
111
105
06'1
0::.1
o::ir
lc2
1 i.7
MSGlll
,ASCII
1/XlRG WRITTEN '+ TIMES I
10:!.!I
l ;/0
MSG121
.ASCll
I/ SSTP /I
10!2
11!\
11SG131
• ASC ll
I/ RNDM /I
116
l'ISG!ltl
•ASCII
11 NSTP /1
055
po
MSG15:
, ASCII
I /M-MAX/ I
115
111
055
116
l'ISG161
• ASC 1l
l/l'l•MlN/I
115
0'10
111
11SGl71
•ASCII
l/MltJ
/I
MSG181
.ASCll
I/MAX
/I
11SG19:
• ASC 1I
1/wWHITl ERRORS s /I
11SG201
• ASC ll
l/wRECOVER£0 AT 0 II
l~q
1~4
11 f,
040
115
o::i7
o::i7
1-' ~
O'+O
124
105
O'+O
O:> 1
J.l ~
O'+ 0
o::i1
ld
o~o
Q'.>1
ll :>
0::.1
0::. 7
115
o::ir
o!;> 1
11 e.
040
124
057
0'10
104
057
04 0
124
057
ll5
101
111
12J
l.!0
O'+O
o:> 1
PO
o:.. 7
115
O'+O
101
0::.1
100
01<'744
1-'l
111
012747
012752
012/!i!i
012760
2588 01?763
01?!66
012771
01277'+
012777
1 ll5
0'10
122
127
12'1
1 ll5
117
ld
040
0 1f O
100
10'3
057
122
117
1 ~ f,
1U5
105
122
10'1
1u1
124
040
040
0'+0
ouno2
Jt2
1<2
015
o::i r
1 u :s
01,0
0:.> 7
100
040
057
120
115
1 u :>
lUl
122
116
10~
01302'+
l~:I
12'+
101
120
123
040
100
040
01!:0<'1
1 le.
1 IJ .!
01.1010
Ol;>;Ul3
013016
11SG1081 • ASC 11 1/mfXEKCISlNG UNITS/I
116
123
2586 01?7 ,2
012B!i
012 7'10
2587 0127 1!1
2589 013005
1~47
Ul3D27
01:3G32
l <~
0 I:>
2!>90 Ol.30S5
0~7
MSG20A: ,ASCII
1/wPlRMANENT BAOSPOTS
II
11SG21:
1/mREAD STATUS lRRORS
II
104
117
040
C'Cl7
12?
,ASCll
-".
'
~
...
Pi168
MACRO V06•03 12•0EC•7'1 121'4 PAGE 1•118
0130'10
0130'13
013046
lU:>
013051
!£~
101
123
12'1
0'10
01305'+
013057
013062
2591 OUOf.5
lc.2
122
1<'2
075
001
1u1
otio
JOO
013070
0!?'073
013076
013101
01310'1
2592 OLH06
ul31 ll
01311'+
013117
0131?2
013125
UUl 50
013113
013U6
015141
25'33 013142
013145
0131 ~·O
013153
~b,11
O'+O
lUl
O'+O
1.: 2
ld
0 110
O'ltJ
.ASCll
1/aDATA ERRORS :
HSG231
, ASC ll
1/iNON RECOVERABLE ERR RS a /I
HSG2'tl
,ASC11
Iii••••••••••••••••••• WRlTE PASS
II
HSG2~l
• ASC ll
!/~•••••••••••••••••••
II
040
060
HSG261
• Ase II
II
200/1
040
065
HSG271
,ASCII
I/
556/1
HSG261
.ASCII
II
80011
M::iG29:
• ASCl I
I/
co /1
116
116
O'IO
105
126
Hl
10'5
12<'
103
105
1 lJ ;>
0'+0
1 <'2
123
0'10
117
1£2
lH
1ll5
117
040
o;i7
057
0 :>2
o:.i2
o!:>2
013161
0 L5lf.'1
013167
OL\172
015175
013200
013<'0.,
002
·002
o::i2
l!l
Q'tO
122
075
100
052
0::.2
0~2
0'52
0'52
052
1?7
12 11
12 0
ld
1~3
o~
057
100
o
Oti1
o:iz
Q:>'
013??.IJ
o;il
0~· 2
0::.2
Ol.'1227
01.3232
052
0132~5
lUl
013240
013?'13
0132 116
l <: 0
1£5
o:.>2
O'2
052
052
052
105
OLJO
123
OIJO
0:..1
otio
OIJO
o~o
070
057
04 u
060
ooo
o::i 1
/I
0~7
117
1.:2
013253
013?5b
2596 013260
013263
013:?66
2597 013270
OU273
013276
25':!6 013~00
25'35
105
11 7
HSG22:
100
O~l
ou.-n!I
124
o::ir
0131~6
01!·210
013213
013216
OLP21
1?3
10'1
12'1
125
10'5
11 1
040
057
10 •1
101
122
122
075
0•10
READ PASS
MACRO V06•03 12•0EC•7'1 12l2'1 PAGE 1•'19
P'l68
013303
013306
2599 013310
013313
2600 013315
013320
013323
2601
2602 01332'+
2603
O'+O
O'+O
o:i1
1uo
o:i1
O'll>
012714
'ISGl'J
012741
'ISG20A 013005
"ISG23
013106
MSG26
013250
)'ISC29
013.300
.'ISG5
012160
"ISG6
012240
MSG9B
01<'416
000254
MTV
OU4032
.'11/ 1
NO.SEL 001376
fJXMllLT Ov12'1'1
OCTP
011322
OCTl
011244
PAR 1111
001112
PAT[Nl 001,100
PATEl
006170
PAT[4
OOf.250
01)6162
PllTOO
006?42
PAT0.3
PATPST OOE.114
00£,(,00
PATlA
0011 .. 00
00'1500
Ol00.12
01332 ..
0044H
00430 ..
004070
004512
U0404 ..
or.urns 00034(,
DEC OUT 011432
OECPRT= 104426
OET7T
002120
DET7T 3 00.tlt...
0027711
OOAGN
OONE
00270'1
OHVSfL oou2&11
02TAll
000560
OST.if!
0007.i'l
ENflAOH 002764
EOMK
011£,64
DEC
002614
&ENP
011736
GENPT9:: 10'1432
GOfH52
Gl
011712
IOSELF 001410
LONUM
007260
M[~'IK
001552
MODES
oou3'.l6
MS&l
012077
MSH1
012627
0126.,5
MSG14
MSG17
01?723
MSCi2
012120
MSG21
013035
MSG24
0131'12
ouno
MSG27
MSC.30
01.3310
011!;'05
~l~G6
012346
MSG9
MTC
000216
004026
MVCTR
NOIUClt 0041.GO
NRREAD 000350
NXT,TU 001316
OCT PR
011:>30
OCT2
0112'.0
PAlCK
OGf.054
PATEN2 006112
PlllF:2
000220
PATF:5
006? , ..
PATOl
006?0 11
PA105
00b322
PATO
00b5b0
PA12
OUU.~'l
ALLEOT
Alll
!lACKl
BUFF(!{
CCMEND
CHG OH
CLRAL
CLRTl
CTRnE><
0041102
000256
BC
000220
CA
000222
C.ORIVE 000302
CH(.OHV: 104'122
C.LRAL l" 10'11120
CLR1
00'1072
CTHOMP 001!4'12
OAHHH oon,s6
lJ£CPNT 011512
OECl
011460
OET7Tl
OU?l32
lJlGCNJ
011506
DOLLI~ 1
007~00
[JON[l
00?7'16
OOTAB
oor,450
D3Tllll
00062'1
D6lAU
001000
END TAP 00~530
ALLl
ATST
urnoH
00~'300
lX( CUT
Gft4PT :::
GlNP7
GO!ll
GOWAlT
(,2
LASRCfl
LOCiPLR
MSBilS
MSGlOA
MSG12
MSG15
MSGlll
l'!SG20
Mt;C.22
MSG!>~
MSC.28
MSG31
002602
104442
OOf.01'1
Olo56'1
004532
01;>004
0011342
001476
001556
000272
012502
012655
01:>705
01,.732
012763
013065
OU205
013270
01!1315
•~SG7
01"2~2
MlMBK
MSG9A
012373
MTS
000214
MVCTKS: 104'11'1
t.OiJSTP 004726
NUMTST 001110
OCl
011320
OctPRT: 104412
OV[Hlft\ 001252
oor.07"
PATEN
OOf-15'1
PATE:O
OOf.234
PATO
00f360
f"Alf7
0 Of.226
PAT02
OOf.5 110
PllTPNT
OOf.574
f'A 11
PAT3
00<,660
....
·~
-- . -· - ..
·--~·-
...
P36
T >i fl
TOP
104404
Tf'U
000242
TSINC2 00~1262
TSTPM
010740
TS TUM'+ 0107 50
TYPTl
011360
TO
00301'+
HlEfJT 003012
T211
003112
r::>E
003142
14
003240
00~270
l4C
l4F
003340
003376
f'IJ
003460
T'IM
PAT~\A
=
=
r~
003'i 36
MACRO VD6•03 12•DEC•74 12124 PAGE
PAT4
PAT6
PERMBS
PFILl
PFIL9
POl
PfHO
f'lT
P•1A
R/INGEN
kANl
ROfRtlS
ROSTP
Rf AO GO
RE.AOUJ
Hf SE TL
Rt:wIND
HNOSl
RPl\SSl
HSFOHV::.
kSF3
RTSSTP
SELON3
SELD2
S[LPR
SlLH"12
SELk3
S£LT2
SEU115
SETMbK:
St:lOK
SPY•
START
STFLGS
STRLftJ
SVCH2
00033'+
006410
006454
006212
011020
006622
0067~4
007126
005122
000344
007~i40
007330
000352
00"312
00lb66
002?36
OO?j't
011612
000240
00'.:.>276
005022
010716
0113&6
OO?•Ol&
00:307?
tl
0 .311 (,
0 0 31 ~6
003?42
005<'.1?
0033:.&
003404
00.,472
00 3~.t.2
1·~1
PAT5
PAT69
P£1
PFJL3
PFIL9A
006756
007072
OOf.176
OOf.422
OOf.462
P05
OOf.330
PRTOl
011132
P3T
0 Qf, 706
PST
007004
RANGl
0071!>4
IHllJF
0011252
RDJr;CH 007762
kUSTPC 007t>OO
HEA()l
00726'+
READMP 010124
kESTHL 010022
RG1
0073'•0
HNOT AP Olo076
HPl1SS3 0077'+2
HS fl
004136
!574
SELPRO 00:>21'+
St:LfH
00;>340
S£tTST 001750
S[LT3
00202'+
SLLw:!
00?432
SETS T11
010750
SP3
;; 104430
SH
000232
S rAfHl 001564
STOPOP 005100
STflTOP 004720
S\/Cl
004014
TLSINC C0~206
TEST
001116
T£ST2
C03062
TEST!>
00:>.526
TO
011600
101'2
0116'1'+
TkAPjlf
01;>006
TSTtX
00111'+
TSTTllL
001120
TU,SlL 00125'+
TYPn
011422
Hfl
003034
T2A
00!5074
T20
00.'1136
12 3ENT 00.'1070
T40
003244
T4l
003.324
T4H
0033&0
T'll
00~406
T4P
TSB
00:>-476
00357'+
~
'\
..
MAC~O
Plt68
Sl"MOOL TAUL[
T5C
f5F
T5M
T5K
uss10
Vf•L2
WlllTK
WRCHfK
.!RPllSS
WflTOl
wt
w12
l56
1-1554
1- '.!0611
1- ll6'5
1-H06
l• 119011
1-n63w
1- 919U
1·2188
1- 'J02
1-2:;,06
1- 69111
1- f9<+11
1•1566
1· 'H611
1- 'i l '511
1-23114
1 -15?.llU
C TRllEX
1-130 11
1-13!!8
1-15S2
l-lti3l
1-l<+tl'JU
1-1297
1-1491
1-157411
1·1'190U
1- 91411
1-1524GI
t-?261
1-1470
C T'lf1~1P
1-l 5bllll
CTlllll
1-1563
l),~filHS
1" ')
CHGl
CLRllL
CLR/\LL
CLRTBL
CLRTl
CLRl
COM II ND
~·111
s-1
1-i:>!i511
1-P~O
1·1411
1•1'1'52
1·146'1
1·151;811
l-P53
l·P:ill
1•157111
1-1!:>7011
1- ':103@
l• '>B211
1-1'07
l •1<>11 Ol
1-2L:l'.4iil
1-15H@
1•1068iil
l•lO!H
1-2176
1·2256
1·2104iil
1-«'300@
1-H66
l ·2105iil
1•21'18ii
1-2298@
1-1595@
1•2196#
1•17lliil
1•2299iil
1-1599iil
1·1668
1·2185
1- '>03
1- 'i/92
1•10l!Oi0
1•10<+1
1·1059
1•250i!
1-21060!
1·15840J
1-22f,5iil
1-1•165
1-1501
1•11199iil
1-1505@
1-1~03@
1-1~09
1•1507
1·1530ii
1·1528i
1-1535
l • l 336
1-1'+36
1·1362
l•lll5U
1•1373
1·1460
1•1580
1•1'+93
1-1357
1·1420
1-255311
1-l508iil
1-1601
1-2309@
1-148211
1•1511i
1-15140l
1-2094
1-?314
1·1518ii
1·2107
1•2361
1•1521i
1·2199
1•23714
1·1612@
l-2b0211
l-lbl301
t-PBoo;
l-t:ii:.011
1-1~~4
1-POO@
l•l:J36
1-1.12'1
1·1'1Uq
l-P~6
1-2536
1-1331
1·1'109
1-255411
1-t:d~U
1-2:>~5
l-P17
l·P731l
1-PT6
1-1~7'1
1-P07@
1-1:.>H
1-2~05
:-1<+16
i -1;:, &9
1-1:..e.111
l-:11J7J
1-2?44
1·1712
l-?313~
!~
t
·~
...~
---
-·
-
---- .. -
~
-
~
...
--·-·
OATfRR
l-2122
OATfkl
1-2146
1·2436
1-243161
1-2113011
1-1031
1·:?:>'11
0£COUT
DECPNT
Of:CPR
Of'.Cl-'kT
DE Cl
DEC2
DfT7T
OET7Tl
OE T7T 2
OET7T3
1-2'146
1-2~~8
1-2~5311
1-115011
GONEl
OHVACJH
1- 93911
OOAGN
OOLLRl
00LLk5
OOtJE
1-2~35
1·2:J36
l·lL.53
1-2c:'+5
1•2450
1-114811
1-1151
1-115'1
1-2430@
1-243.3@
1-1284
1•2091
1-212111
1-127311
1-1276
D!GCUT
DIGIT
1•2H511
1·215!\t.t
1·2'*'+511
1-lH.1
1 • l l :>3
1-11!>511
1-1156
1-2~ 39@
1-24 34@
1-1<- ~211
l-2LBll
l-2J24
l-P08
l• l< 'O
1·1'172
1·2'137
1 •21flt3GI
1•245'3#
1·1736
1-224':1
1 •2'1511#
1•1755
1·2351i
1-176'+
1·2!56
1-177'1
1•2457#
1•241t9i
1-2'1!>2@
1·2453
1•1'113
1·145'1
l-1'166
1·115811
1·2447
1-2'145
1-1342
1-128311
1•1't78
1•1'183
1-222'1
1·255~11
1•245611
CROSS R£f(RENCE TABLL
ORVSEL
OOTAB
01TAB
02fAli
03Tl\ll
04TAU
(~fCl
1· 90911
1- 939
1- 9110
1- 9'+1
1- 942
l• 'H3
1- 94'1
1- 9'15
1- 946
1-1206
1-1£,83
1-156'1
1-2482QI
1-1619
l•l6£l5
1-125611
1-1061
1-125711
GfNP
Gf NPT
G[fJPl 7
Gff·PT9
GEtJP7
1-2~.0911
1-20~4
1-1t.u'I
1-2515
1-<'519
1-177811
1-2•08
1-2::-:i2u
1-2=>5811
1-2~ 34
05T/\fl
OF. f All
07TAB
0J[)A!JR
[ND TAP
£•J0fl
(OMK
(HllOR
(IH9U
1- '.>bl"
l• '7&311
1-1925~
1-2=,~o
liOllKWO
1-P56
1-2.:11.111
1-2.:.1111
l-2j10
'1SG1
1-1329
l-22Y5
1-2.506
1-2.508
1-1545
1·22YO
1-15111
1-2512
1-2514
l - ·rn9w
1-1009
1- 93211
1-1433QI
1-2120
1- 91 lll
1- 9flll0i
1-lO'Hll
1- 900U
1- 086
1- 887
1- "JOU
1- 931111
1-U:?7
1-1367
1-14280.
1-1557
1-1655
1-2206iil
1- 91211
1-1009
1-1122
1-1072
11SG10A
1-10211
1-2:>7511
'ISGlOl:I
1-10 :'Ill
1-2.>7~11
GCH2
GO!l3
G0!.11\ll
GWl
Gt
G2
>UNUM
IOS£LF
LASHCR
LfNGTH
LOtJUM
LOOP£R
'1AXUN
"1£M 11K
"1£M£1K
l5711
1-td3
l-lliS3
1-1•82
GfNP'J
(jQ!il
s-2
1-P~Oll
1-171911
1-211991i
1-1117
1•125411
1·256211
1-2293#
1-2312
1-1615
1-231 .. 11
l•l 71'+
1-2110
1·2201
1•2268
1-252011
1-2057
1-2067
1-207901
1·208811
1·2510il
1-2:ii1
1-t~9t.ll
1-2:>l711
1-2=-1e
1-lL 1101
1-1L21l11
1-1.:> ~4
1-1396
1·1'+'12
1-2293iil
1-2t49iil
1-2056
1·1H9i
1•14 .. ~ii
1-1110001
1-1'1'1601
1-1110201
1-11148ii
1•1407
1-H57
1·2H6iil
1·2065
l-2282@
1-207801
1-2355
1-208711
1•2509iil
l-1590
1-1671
1-2191
1·250101
1·2505iil
l·lbE.'J
1-1300
1•1352ii
1-2189
1-131101
1-13~4
1-14.51
1-i:.J!.5
l-ll<)7
1-15911
1-1296@
1-1.5'17@
1-1378
l-1'140
1-1575
1-1660
1-11;:,!)iil
1-1392
1-1%2
1-1632
1·1L7601
l-2500iil
l-1316iil
l-135f..iil
l-11119iil
1-149!'-iil
1·163<+
1-1699
1•250'+iil
1-1320
1•1364ii
J-1423
1-1550
1·1637
1•1720lil
1-lUO(,Ql
1-1101@
1-1U22iil
1-1103@
1-10 ::14
1•1501
1-1047
1-Hi35
1-107'+@
1-23311
1-1079
l-1"~4iil
1-2!~1
1-tHliil
1-lU 70iil
l-1U:J6
1-lld2
1-lti&'lll
l-lU!.711
1-llJ30
1-l" :>qa)
1-P~'I
1-1~75
2-n;a
1-1'159iil
1-1~77i
1-13~5Ql
1-2~>6411
1-2J~~ll
~
...
CROSS
R~FERENCE
HSGU
f'ISG12
11SG13
"ISGl'+
'1SG15
"ISGle,,
l'ISfil 7
MSG 111
"ISGl ')
'I'> G2
1·226't
1-1732
1•1735
1-11n
1-17'+7
1-1750
1-1741
1-1 74't
1•1752
"ISG20
1-1 757Di
1-1711
1·2238
1-;>242
1-1108
MSG<>OA
MSG21
MSL.'2
'ISG23
MSG24
M~.G25
'1SG26
"1SG;>7
MSG26
'1~G29
11SG30
M5G.'ll
MSG5
MSGE)
MSC.7
'ISGB
"ISG'J
1-2246
1-1121
1-2201
1-2390
1-23')3
1·23%
1-2399
1·1273
1-1164
1-1251
1-1234
1·1689
1•172~
1-2164
l-?147
1•2346.
1- PO'JU
1-1544"1
1-171.'I"
1-2114
1-2271
1•23 118
l • f1A811
~SG'JA
'ISG'H.l
.,, c
"ITS
1-1(,0'Jiil
"ITll
"IVCTR
"l\/CTRS
1-2?70
1- ')0411
1·147t.ll
1-1?'.J'J
1-1383
1-1~61
''IVl
~GlNCH
~ONSTP
!110, St L
"IRRfAO
1-1'17711
1-15119
1·16llli
1-1016
l• G3511
'llUMTST
1 • 9h5U
T
1- 9'11
1-101011
1·2410iii
l-242::ill
1·2403U
1-2152
1·2405
1-2<11111
!\IYMHf
'Jn ,TU
oc r
OCTP
OCT PR
QC TPH T
OCTl
OCT2
TAbLL
S•3
1-2:>1911
1-2<:15
1-2~21
1-2~15
1-2'-'3
1-20::~6
1.2,27
1-2,,0
1-2::is111
1-2:Ji.611
1-11 5fliU
1-2:>8')jl
1-258011
1·2511111
1-258211
1·258311
1-258'111
1-251\511
1.2::.ot.11
1·1761
1•2586#
l-2~7011
1-2~· ~111
1-2:;7;>11
1-2:>9311
1-2~d'lU
1-2~d511
l-2cd&11
1-2:..9111
1-2::>%11
1-2::.H11
1-;<.) 19
1-2'.J!.711
1-2:-E.011
1-2.:tl(J
1•2L0'J
1-2:.1211
1-2:.. nu
1-2"1411
1-2600#
1•256')11
1•257011
1-l~il.3@
1-1006
l-PB2iU
l·lC.Oliil
1-111~@
1.:1116iil
1-2200@
1·2289i
1•2.375
1-1017
1-1706
1·2377
1-2j79@
l-2<'1lll0:
1-2;· 111iU
l-1L12
1-1"17
1-2.)17@
1-lC 61.il
l-2::i3.3
1-P19
1-P'll
1-1326
1-1406
1-2"=>1 Ii
1•1H9
l-l:>-111
1-tt ~o
1-ll• 18
i-211e.01
1- .,!17@
1· '17411
1-1''26
1·160011
1-1635
1-102.311
1·2246
1-1110@
1-2~20@
1·2'12411
l•lOlOi
1·1602
1•209'ti
1•?202i
1·23l'ti
1·1148iil
1-16l'tiil
1-2095
1-2259
1-2315
l•Hi39
1-1616
1·2107il
1-2261 iil
l-2319iil
1·15'tli
1-1112•
1·2109iil
1-22&2i
1-232oiil
1•1019
l-2097i
1-2511
1·1150
1-2113
1-1155
1-21%-iil
1·15112iil
1-2266il
1·133.3
1-14.30
1-D!"i9
1-1439
1-1366
1•1'+56
1•1377
1-15'19
1·1115
1·12't7iil
1•124~
1•1283i
1·2351
1-2550li
l •1658
1-2:0~1
1-2:>~2
1-2 l 5'1
l·2't07H
l-24?1
1·2349
r'?l
_,:"i
'
'i:
...... -
'
..... ...
,,
s-4
CROSS REfERENCE TABLL
OVER'+K
1- 993
PAR AM
1- 'J6611
PllTCI<
PllTtN
p11·roH
PATEN2
PA TEO
PATEl
PllTE2
PATE3
Pl\ Tf4
PATES
PAIE7
PA TOO
PA rot
PAT02
PA103
PATO!:>
Pl\TPFH
PA IP::>T
PllJO
PATl
Pl\rl A
PllT2
PAT)
1·1!°>16
1-1727
1-2131
1-17115
1•1790
1-1 7'1'+11
1-1792
1-1 7'Jll
1-HIOO
1-11102
1-180'+
1-1806
1-1808
1-1812
1-1799
l-181Jl
1·1803
1-1805
1-1809
1•1';1~0
1-176'+
l•l'J32
1-1933
1·19'l911
l•l'i3'+
1-1935
Pl\T~A
1·19~'+11
PAT4
PATS
PllT5A
Plllb
PAT69
PllT7
PC
1-lll07
1-1937
1-2002u
1-1810
1-1'331:1
1-1013
1· ll75U
1-14250!
1-11Je101
1·1545Qi
1-11,0 7al
1-lb'>9cil
l-1714ol
1-1890@
1-1952iil
1-;>048Q)
1·?143oi
1-22050:
1 ·:>?90oi
PER MOS
i>[l
PE5
Pf I l l
PFIL3
Pf!UA
1 • ':1'J711
1-14:560!
1-Pl9
1-1 '-'9
1-2.:13
1-178911
1-119:311
1-1 l·U;.
1-119711
l-1<>1611
1-1257
1•1522
1-1780
l-:!225
1·1277
1-1592
1·1HCJ
1-?3(,7
l·l28lii
1-15';7
1-1791
1-2363
1•1397
1-1627
l-1':127
l-?388
1•Hlt3
1•16'+0
1-212')
·-
l-1L~311
l•lU3bll
l-1U~311
1-10:>011
1-1ut.211
l-tt70h
1-101911
1-lt.2911
l • ll· ~'J II
l-1t.H,11
1-1t· 73#
1-1 ~~?.~
1-1856
1•1857
1-1892
1-1895
1-11:ia11
1-1"'1211
1-1 ·,~eu
1-19'+4
1-1':155
l-l~:i4
l··l :t:l3
1-1~7311
l-P79
1-1 ~df.
l-2~0111
1-1%711
l·l'J60
1•1969
1•1978
1·2008
1•1992#
l-<·OJ07
1-1011
1-2v06
1-1 ::159
1•1< 91)@
1-166611
1-203!111
1-20'l'lll
l-1'+~2iil
1-1 11 :lo@
1-14b'I@
1-l'l'Jl@
1-1564@
1-1631@
1-1!. 77iil
l·l 7700l
1-l'lOl@
l·l'J77@
1-;>llOOJ
1-2167iil
1-2:'500:
1-22%@
l-2:'\ 1120l
l-2'1'120!
1-25160l
1-1768
1•20'+0
1-2on
l•l329il
1•l'l70iil
1•1'1970!
1·1%7iil
l•lb360l
1·169?01
l·l 7750l
1-1908@
l·l'H7iil
1·?1270l
1•?17bial
1-225i10l
1-22'l7i>l
1·?3570l
1•<''15501
1·2520iil
l•l 773
l-ltl20
1-1'>00
l•\837
l ·ltl'IO
1-lu~'lal
1-2150@
1-2;:1?@
1-2~:lliil
1-·?~VOI
1-2~
1•2428Q)
1-2503@
1- 92911
l·lll23
1-1862
1-1817
l·lil98fj
1-lil24
1-1')0511
1-2438@
l-2:>07al
l•lb3f',Ql
IOUI
l•l.31J6iil
1·13401il
1•1'+7'+0!
1•1386&
1•1'+76iil
1-1~15@
1•152~iil
1-t5710I
1-1578@
l•l6 11!iOI
l•l70f.OI
1·17971>
1·1931@
1-20111@
l•H .190!
1-1101@
1-178t>iil
1-l~ll'Jiil
1-2(Jf);)@
1·2DO@
1-?1 ')4@
1-?:'l,8@
1-2307~
1-23!12@
l-247593
RfSETL
RE STAL
1-1 ~93
1-2L0911
1·1"-:>0iil
1-2138@
1 • l t JO
1•2U&4
1-1'143
1-2046
1·2115
1- ~13311
1-2127
1- 91711
1-2n2
1•209011
1-1336
1- 93111
1·21R8@
l•2<:12U
1- 93011
1-1'133
1-17l'Jiil
RSFl
1-l~OlU
RSf 2
H~F 3
1-1502
1-1510
......
· - - .. - · .
1 r 2 \i~7 r
1r2372.
1,255911.
1;2~117.
11"<'4?6
1t?li.P7,
1·2167
1•2283
1-234611
1·1994@
1•1'H811
1-18'31
1•1893
1·2045
1•2077iil
1•208611
1-2044
1•205211
1·2133
1-1852
1·1968
1-210b
1-18911
1•1975
1-21111
1·1899
1-1995
1-2b02iil
1-1906
1•2003
1·2506il
1-1917
1•2039
1-2240
1-216'+#
1-2155
1-2162
1-2205
1-21!.9
1-21 niil
1·21 Ni
1-1'1'17
1-2100
1-2191
1·25551f
1•2104
1-2120
1•2149
1•2166
1-139'1
1-1457
1-2090
1·2352
1•1H9
1-1588
1•2128
1•1407
1·1600
1-21'+1
1-1426
1·1664i
1-2184i
1·11127i
1•167'+
1-2223
i
1r?3&!i
1-2.:0~311
1-2.1.:>o
P3T
P4
P4A
P5T
RArJOOPI
R~NGEN
r J f:I ~,flit
lr?.51~ 1
1rll7llil
1rHju..
lr1U7511
1-U05
1ri'360
l ~ 2 4 :)q
1 .. 2494
1·235'111
1-2<12
1-1"5f.ll
Rl\tJGl
,~
lrHllflf.,
1r1~~3
1,.1~59iil,
l·l'Hll
1·1992@
1-2001
1-lt,4[,ii)
1-2134@
1-1£,45
1-206011
1-lt,4511
1-164 711
........
S~5-.
lrlHfl·.
I'll
1-19'.ljlj
<
1-1~01
1•2c:i2iil
1-2109
l·Pf>O
1-14~5
1-11 t!.7
1-2~ "4iil
1•1' 7311
1-21 77
1•?193iil
1•1~~9U
..
1-219'+11
1-2296
1-2~03
,1
1-2159
1·2<0511
1-<:l~l
~
"
1-21 :1311
1-;2-".12
...
1•220711
1-2• 71\li
1•2•79rt
1-2--.31
l•PlB
1-1"55
1·1358
1•1'+89
1-1 06
1-1 0711
1-1 1611
1•1537
l•L!li;!5
1-1532
1·1362
1·15't8
1-1'!190
1·1560
1•1429
1•25'+9#
'~
·'
......
.,,1, ,•
.
,, CJ\OSS REFERENCE TABL'SELON3
SfLDRV
$(l01
SEL02
SfLOKl
SfLf'AT
Slll'R
SfLl'HO
S£LRMl
1-1166
1•107611
1-10711
1•1085
1•1249
1·1121
1·1170
S£LH~-2
1•1223
St:lf>l
1·11%
1-1200
Sf LR2
Sf"Lf8n
1-1~ 5111
1-ll 251l
1.11 ''"'
1-1 J &1111
1-11 91\
1-110811
1-1124
1-1119
l·Fl 7
1-121.~
l•l•l5U
1-1«1811
St:l M4K
.,,&tlMOK
SETSTK
SET41\
Sf:TBK
1- c;.9::.
.-
.
S rACK
START
STAflTl
STATRO
STFLGS
sroPllP
STR!Cl
STHLEN
STRTOP
SVC
rn
. "SvCTRS
svct
SVllCCR
Tfl'_97
1-:?339
l • l 14
1-1 ~ b'I
l•ll 67
1-26'+111
1-i'!;OOll
1-:>:-~2
1-2:0.0411
1- 1!7'111
1-205.5@
1-
1•123211
1-1202
L
1•1156
1-1239
1•1138
1-1112
1-1111&
1•1069i
1•2060
1-2525i
1-1190
1-2422
1·1f..33iil
1-2oa1
1·1765i
1-2062
1·20!:i2i
1·2083
1·1206
1·2'1111
1-121'9
1-2557#
1·1232
1•1555
1~1667
1-1693
1•2HS
1-1080
1-1682
1-228b
1-1021@
1•1703
1•2350
1·1075i
1·211.5ii
1•2160
1•2180
1-11571i
1-1162
1•150'1
1·1591tiil
1·1658
1·1596
1•16&1
1•1673
1·1710
1-2092
1·1717
1•2193
1-1330
1·14'+9
1-1337
1-14 92
1-1361
1·254811
1-1372
1·1567
1·1371
l·13%iil
1·1402
l•lll42iil
1•11148
1-165'<
1•16(.i+ll
1-112211
1-1230
1-121911
1·256011
1•2!>6111
1-2~~3
1-23~1@
1-2~22
1-11.!.2
1-2.366
1-1H3
1-2.:>13
1-2.381
1-<: .. 75
1-2• lbll
1-247511
i . 89511
1·2162
1• '.1"7U
1-1,75@
1-2112
1·103.;
1- 92011
1-2210@
1- 981"
; S;?QI
1-2~~4@
1- 91)2
1-ll bllll
1-11.0911
1-lbl7iil
1-:u 75
l•lU05@
1-l<·~Oll
1-1G97
1- 91011
1-1106#
1-1o'10iil
1-ll>!i.3
1-.:!~ -'O
1-1.:.23
1•1470U
1-130~
1- 913U
1-1~55
1-1~73
1-1~5')@
1-2~25
1-2:·2111
1-1425
1-16'l ..
l·ltllO
1-1'-~1
1-1~: 1 '111
1-1403
1·l'i7lll
l· 9r,s11
1-1261
1-1<:63
l-1265
t-117'1
1-2:.~9
1-lb~ll
l • l f..O'Jll
1·120611
1•1250
1- 99'+
1-2055@
1-25;;>.5@
l·l(l(,5
1·119011
1-111811
1-1216
1·1210
SP.,A
SP.3)(
SR
1•1186
1-ld;'!ll
Sf.LWb
Sfll...12
SP3
1-11e2
1-1,·2e11
1-1<27
1-1'-'.1'>11
SELloil
Sf>
S•T
1-1' ;1311
1-1• bO@
1-1.: ~611
1-Pllll
1-1:1511
1-1512
1-2256
1·1069
-
... ... ..._...
--
...
~·-·-·
- . ---
·-- ........
--
........
-·-- ·---. ........
-··~
.
--- ____ .
CROSS REFERENCE
TEST3
TABL~
TK£!
1-1267
1-127!
1-1210
1- 89711
1·1"'l711
l-P5211
1•1 .. 1911
1-2~ 70
.. , TKS
l• 11'.lbU
1-2~&6
TEST'+
Tf.ST5
TO
TOP
...
TO Pl
TOP2
TPB
Tt>S
THAP3 ..
rs1~.c2
TSJNC3
TST[X
TSTPM
TS'ISTP
TSlTBL
TSlUM4
TSlUP'+
TU.SLL
1·248111
1-2~29
1-111"9
1·1060
1-lc.~2
1-1274
1-11!>3
1~2 .. n
1.;~~BB
1-2~~7
1·1762
1-2237
1-2j8Q
1•2498
1-248!11
1-2 1;87
1- 8'3911
1- 89811
1-
eej
1-2~:11
1-2'' 9.311
l-124Ziil
l·l'~D
i-~~22u
1•247Diil
1-2466
1·2490iil
l-2481Cl
1-1.:.~5@
1-1256
1·12!12iil
1•1353
1-16?1
1- %911
1·2911
1·1u0211
1-2"~"
1-1~~7
1-P05
1-1.:0411
1-1-12
1-10:."1
T2fJ
T2C
1,129911
1-no1
1-129711
1-131811
1-131911
1-1321
1-13,'bjj
l20
1-U..'8
1-P~lll
T?E
1-t3Dll
1-1.;j9
1-1.:in11
1-13~5
1·1.H711
1-i:-~a
1-13~'1
l•P3711
1-1·•12
1•1 ·H3
1-1..:.19
l•P74
1-1-7311
1-P81
1-1.it1211
1-J .!)89
1-13~011
1-135911
T4C
1-U65tt
Y40
J4E
1-136t.u
1-1 %8
T4F
1-13 7711
l'tG
T'IH
1-1371>
1-1311311
1-1385
1•139tlU
1·13'1111
1·13 98
1•1255
1-1~6711
1•1'>06
1-1 .. 0~
l-1"0111
1·13'H
1-1.l~S
T•IP
1-1401',ll
T'!I
T5A
1-1 11 .''I
1-1 .. 10
1-1·•55
1-1-u.11
T!.>B
l-1'1?5~
1-142111
1-167411
1-1~25
T23ENT
fljfj
1-2'+88
1-P24U
1-1 "'~2
T2F
• • , T'I
T 4,~
1·1165
1·1736
1·2208
1-2281
l•2~'13U
1·1298U
T4.J
T'+K
l4L
.·• T4M
T4fl
1·2427ii
1-2'+25
1-23~3
1-2" ~6
T2A
1-21'+8
1-22'+3
1-2 .. 76
1-1123
1-112 ..
1-2165
1-2247
1•25'l711
1-17?2
l-1~7711
l-2433U
T2
1·1109
1-1-r2
1-243'111
1-2440
TOU
1·1245cil
1-1243
1-1073
1-1690
1-1772
1-2239
1-l''IOO
l-lt.67
1-1675
1· 'J67U
lYPTl
To 1 ENT
1·2 .. 71
1-1029
1-1235
1-17!11
1-,,no
TYPT2
TYPT3
.• ' , TO
TOA
s~a
1•140411
(:~~
_
·-·
--
-- ·-.··-,
·-
-- --- -.. ·---
.............. .............
~
.
, 1 CROSS
REFlRE~CE
1-143011
1·1432
1•1439U
1-1441\
1·1421@
1-1'157
1·1"3611
1-1 .. ~l
1-1~5011
T'hi
1•1441
1-l6
Xt!GkCO
XRGR(C
l(!:Go
l(ftGS
zrno
ZlRGOO
. ''
TAAL~
s.. 9
1·1463
1-l~Hll
l-1'16711
1•1'+%iil
1•1562
1•1605
1-1•5511
1-146811
l~lt.9211
l-1u:te
l•lll~'JA
l-li0311
1-1•02
1-1100
1-2~·a
1.1.112
l-1d6
1-1•·13
1-1.,a2
1-2::,28
1-P22
1-1<>08@
1-l' 95@
1-1.:.50@
1-1 /f,7
1-11 !>511
1-1:..3&@
i-2·:&3
!·1"%11
1-1134
1-254511
1-1779
1-1573
l•lU.8
1•1176
1-1192
1·1208
1•1793
1•1624
1-1926
1·1666Ql
1·2119
1-1754
1·2265
1-1756
1·1370
1-lt.20
1-16%
1-1369
1•1422
1·1622
l-1702il
1•137li
1·2511611
1-1626@
l-2<'55iil
l•lbOGiil
1-1629
1-227Ji
1-2294
1·1652
l-2277iil
1;.229'J
1·1611
1-2282
1·1668i
1-1669
1•1671
1·16nli
1- 88411
1- 96011
1-124'1
1-15'+3
1-1731
1- 950#
1- 96411
1-1513
1·1606
1-20%
1• 941811
1- 96211
1-1269
1-1603
1-1734
1-1910
1-2098
1-<'220
1-2229
1-223~
1·2318
1-2467
1-2376
1-211(,9
1-2392
1-248'1
1•1<>~7U
1-1' 5211
l•lboOll
1·1705
1-2.:!7311
1-2276
1-2267
1-u>osu
l-<'257
1-1101
1-?25611
1·2272
l-;>11~2@
1-1 QI; ti
1-2<~511
1·2'- /ll
1•24 7511
1-2 .. ~9
1-1 ll:.>211
l· 876U
1- 01111
1- 95211
l·Ul35
1-1517
1-1610
1-17-16
l-19?1
1-21 'i6
1-2?.35
1·2:.s'l5
1·
l·241l9
~~~u
l-1·:~9
1•2'151iil
1•245811
1- 681
1- 95611
l·P38
1· 88211
1· 95611
1-1241
1·15'10
1·1709
1•1ll53
1-20 04
1-2217
1-2316
1•<'459
1-P2o
1-152~
1-l'-'~9
1-1700
1-171'.9
1-1976
1-2197
1-22f, 7
1-2•1?t>
1-1 n9
l-1'>:>1
1-2l7Q
1-2~&0
1-? .:i 11\
1-2"02
1-1~·07
1·17~3
1-1918
1·2137
~·~ ~~.\
~
..
-----
- -··-
'
--
.......
..
-
.
··-
··----. -- ......... ··-- ......... _..
"
I
...
v
J
CXI
...J
<
,_
....v
""'cc
ci::
N
...
...
"'I
-D4
;
ERROR RETURN ADDRESS
RETURN FROM SP.Ci.GE SlJSROUT!NE
,.
,.
;
JSR
WRITE AN END OF FILE
Rs,w~OF'
;
SETUP WORD
;
;
ERROR RETURN ADDRESS
RETURN FROM wEOF SUBROUTINE
,.
;
JSR
R5.10F'LINE
?UT DESIGNATED UNIT OF'F LHJE
;
;
SETUP WORD
ERROR RETURN ADDRESS
,.
RETURN FROM OFLI NE
;
;
;
;
JSR
;
SUBROUT I i\i'E
RS,REWIND
REWIND
SETUP WORD
ERROR RETURN ADDRESS
DESIGNATED
UNIT
RETURN FR. OM. R Ew I ND SUB ROUT I NF.
;
;
;
R5.1CMPLTE
CQ!:"'PLETE PREVIOUS COMMAND
ERROR RETURN ADDRESS
END OF FILE RETURN ADDRESS
;
NORMAL RETURN
;
JSR
;
.
.
,
,
;
;
JSR
RS1TAPSET
SETuP WORD
RETURN
R3 = %3
R4 = %L!
RS = %5
S? = %6
PC = %7
;
FqQ~
TAPE SETUP
TAPS ET
StJEROUT I NE
;
TA?RW SUBR OUTI NS
TAPRW: JSR R4,CHECK
.wo~rn 4
MOV ARR.A Y+2, 172-525
N'EG ARR.I'.\ Y+4
MOV ARRAY+4,l72524
TST ARRAY
BMI READ
READ:
;
;CHECK wRITE LOCK
;SET RETRY COUNTER TO -5
WOR
TAPS ET SUBROUTINE
MOV f IRET·,224
f1TS RS
RTS RS
•WORD 2
BR
r..;oR
•WORD 3
TST ARRA. Y+2
BMI S?B ·
~ov
flll,EXTRA.
0JEG · ARRA Y+2·
ARRA Y+2, 1_ 72 524
BR
WOR
s OR:
~ov
S?B:
MOV fll3,EXTRA
BR
WEOF:
;OTHERWISE SAME AS OFLINE
JUSER ARG AND CHECK READY
;3 ARGUMENTS
;TEST· P OS OR NEG S?AC I NG
= BACKSPACE
;ENABLE,GO AND 4 FUNCTION
; NEG
; FORM 2 'S COMPLEMENT
JLOAD MT8RC
;ENABLE, GO AND 5 FUNCTION
SOR
WEOF' SUBROVT I NE
MOV #1Q7,EXTRA
JSR R.4,GHECK
TWL:
;ENABLE BIT, GO BIT + 7 FUNCTION
SPACE SUBR OrJT I NE
SPACE:JSR R4,CHECK
;
;
; G 0 B I T + 0 FU NC TI 0 N
;GET USER ARGUMENTS AND CHECK HARDWARE
;NUMBER OF USER ARGUMENTS +
;usER SETUP WORD + GO BIT
;.LOAD COMM.AND REG
-;RETURN TO USER
REW'! ND STJBRO!JTI ~TE
REWIND:MOV ~117,EXTRA
JSR
R4,CHECK
;
;?UT ?ROCESSOR PRIORITY IN 226
; ISSUE P OWS?.. CLEA?.
;?UT INTERRUPT RETURN IN,224
OFLI NE SUER OUT I NE
OFLINE:MOV fl,EXTRA
ORt
JSR R4,CHECK
•WORD 2
BOR:
BIS EXTRA,CHSET
MOV CHSET,172522
;
;
INTO MTCMA
; ?"ORM -NUMBER OF 9YTES
;3 •s COtwPLEMENT OF' NUMBF.R Or BYTES
;CHECi\ F'OR READ
; MI NUS = READ
; WR I TE
MOV I 103 >EXTRA
MOU f-S,TRY
TAPSET:MOV CRSJ+,226
MOV flOOQ0,172522
,.
;4 ARGUMENTS
;CORE START ADDRESS
MOV illQ5,£XTRA
BR TWL
SR
;
;GET ARG AND CHECK READY
•wORD 2
BIT #4,172520
;ENABLE BIT1GO BIT AND 3
;CHECK HARDWARE
~~D
FUNr,TION
GET USER ARG·
BNE EER
;TEST 'WR I TE LOCK
;ERROR, PTJSH STACK A.ND TAKE ERROR EXIT
wOR:
INCB BUSY
;sET SUSY FLAG
,.
BR
SOR
A-3
;
INTERNAL. SUBROUTINE TO CHECK FOR CU READY AND SELR READY
MOV
MOU IARRAY,R3
CHl:
CHEH:
EER:
~OVE
MOV CRS)+, CR.'3) +
;
DEC CTR
BNE CHl
MOV -,ER
;DECREMENT NR OF ARGU~ENTS COUNTER
;IF NOT FINISHED,CONTINUE
;LAST ARGUMENT = ERROR RETURN TO USE~
MOV +,R3
BIT 1200,172522,
BEQ CHER
;RESTORE R3
;TEST FOR CU
;ERROR., ....
ARG!JMENTS TO ARRAY
RE~DY
MOV ARRAY,CHSET
;NQ,MOVE SF.TU? wORD TO TSMPORARY LOC
9IC
~l 10317,CHSET
MOV CHS ET, 1 72522
;sE"f UP PSEUDO COMMAND
;?UT INTO COM!"IAND REG
BIT 1102,172520
;READY OR
3NE CHEXIT
;SELECTED UNIT READY CHECK
MOV
+,R4
;RESTORE R4
A~D R5 FROM STACK
; GO TO USER ERROR SX IT
iSET NOT BUSY
CLRB ERROR
RTS R4
EXTRA: •WORD
0
CHSET: •wORD
0
CTR: ER: •WORD
0
Q ,Q
ARRAY:: •WORD
BUSY:
·BYTE
0
ERROR: ·BYTE
0
·WORD
OK
REwI~~ING
;ERR.QR, NOT READY OR CU NOT READY
MOU +,R5
J~.P @ER '
CHEXIT:CLRB. BUSY
·TRY:
iSAUE R3
JSET ~3 = START OF ARRAY
;sET NO ERROR
;EXIT -,AND RESTORE R4
,o ,.Q
0
; l'-4.AS KED SETUP WORD
;TE~~ORARY STORAGE
iSET UP FOR OTHER ROUTINF.S
;susY FLAG
; ERR OR FLAG
iRF.AD RETRY COUNTER
;
;
Ci"P LT E SUB ROUT I NE
CM?LTE:TSTB SUSY
BNE
C~LTE
MOU NO, ERROR
?TS
INCB ERROR
GAP?
IT A READ
•WORD 0
INCB ERROR
CLRB BUSY
I~CP.
.iEOF EXIT
;ERROR EXIT.
.iCLEAR BUSY FLAG
RTI
•END
A-6
LOADING PROCEDURES
OPERATING INSTRUCTIONS
TAPE DIAGNOSTICS
PDP-11
A.
TC-130 DIAGNOSTIC
1.
2.
Load Diagnostic tape on Tape Transport at BOT.
a.
For PE use first BOT marker for load point.
b.
For NRZI use second BOT marker for load point.
Load bootstrap loader into PDP-11.
Example: 16K Core
a.
Enter 037000 into switches and depress LOAD ADDRESS.
b.
Enter bootstrap per Figure 1. Depress DEPOSIT for each entry.
c.
Reenter (a) above.
d.
Depress EXAMINE to verify bootstrap is correct.
e.
Depress START. Tape Transport should read one record.
f.
Enter 772520 into switch register.
refer to Figure 2).
g.
Depress EXAMINE - good status is 000105.
h.
Enter 000200 into switch register.
i.
Depress LOAD ADDRESS.
j.
Depress START.
(This is to check status -
CRT or Teletype will print the following:
k.
Set switch register according to operating instructions and
Press CONTINUE.
Remove Diagnostic tape and mount scratch tape on transport.
Depress ON- LINE.
1.
Set switches normally to 11-7-5 on and depress CONTINUE. Note;
there will be a short pause while test on addressing performed.
Refer to diagnostic manual for switch settings.
m.
Diagnostic is now running. Each good run will result in printout of:
n.
CYCLE #001
CYCLE #002
CYCLE #003
Etc.
Depress HAL'!' to terminate test.
B.
TC-130
1.
2.
RELL~BILITY
Load Diagnostic tape on Tape Transport at BOT.
a.
For PE use first BOT marker for load point.
b.
For NRZI use second BOT Marker for load point.
Load bootstrap loader into PDP-11.
Example: 16K Core
a.
Enter 037GOO into switches and depress LOAD ADDRESS.
b.
Enter bootstrap per Figure 1. Depress DEPOSIT for each entry.
c.
Reenter (a) above.
d.
Depress
e.
Depress START. Tape Transport should read one record.
f.
Depress CONTINUE. Tape Transport should read one record.
g.
Enter 7725 into switch register.
refer to Figure 2.)
h.
Depress EXAMINE. Good status is 00105.
i.
Enter 000200 into switches.
j.
Depress LOAD ADDRESS.
k.
Remove Diagnostic tape and mount scratch tape on tape ha nsport.
EXA.~IINE
to verify bootstrap is correct.
(This is to check status -
Depress ON-LINE.
1.
Depress START. CRT or Telecype will print the following:
PllP I l 7-~ nut am..
UCO!Ul' 1.IM:lTS Ill SYT%S
M.INLEN-.. MAXI.EN
a
204&
!XERClS-ING tl?ll. ~s.~ ll
m.
Reliability should now be running. Unit will run complete tape,
then stop.
n.
CRT or Teletype will print following:
. . . . . . . . . . . . . . . . . . .-n-ITE P'AS.S ma· OF
mnr- PAT-. PAR- DD MO-OS- RECORD t.ErfGTlt
0'
7
x· X
SSTP- J7 l S
M.-MAX
WRIT£ ERROR£
s
0
· ********************READ ?ASS
END OF
ORV ?AT PAR- DEN MODE RECORD I..E?IJGTH
0
1
X .X
. SSTP- 3715
M•MAX
RE:AD STATUS ERRORS s
OA1'A ERRORS
a
?«>S. llECO~DABLZ- E:RROHS •
S'
=
o.
·····l·--
T'APE•--···......
a
Depress HALT. Test is complete.
TAP~***•*************'•**
NOTES
BOOTSTH.AP LOADER/4K READ ROUTINE
37000
12737
Move
37002
10000
PWR CLR
37004
172522
To CMD.REG.
37006
12737
Move
37010
16000
BYTE CNT.
37012
172524
To BYTE CNT. REG.
37014
12737
Move
37016
60003
Read Command
37020
172522
To CMD. REG.
37022
12700
Move following location
to Register ¢
37024
00000
37026
5200
INCR. R¢
37030
1376'
BR;t
37032
5200
INCR. R¢
37034
1376
BRf
37036
00000
HLT.
0
¢
( 4K)
•
;._pril 11, :l.973
Ed Sr:·i th
e
•
•
•
•
•
•
•
•
Operating Instructions:
:rnd place des ired block number in t'."1e S,,,-i c:.ch
°S-2:;? :_st er
then pn:s s St,""':· t .
LOC.7.\TION
xxxoo
12737
10000
06
13702
177570
Move Sw Reg to R2
12
5402
5202
l·~·:;ga.te
16
1411
20
10237
172524
24
12737
0011
172522
32
32737
0001
172520
42
12737
160000
}/72524
Move 160000 to Wd CNT
50
12737
60003
172522
READ
56
32737
0001
172520
66
12737
0017
172522
74
0000
?WR CLR
172522
R2 Inc R2
3EQ + 11
~c~e
1774
1774
R2 to Wd CNT
Wait for
·ruR
Wait for TUR
Rewind
HALT
REVISIONS
I
LTR
I
A
DATE
DESCRIPTION
APPROVED
?IC.OD.REL
I
PURPOSE
The purpose of this specification is to define type, layout and content
of W.P. Diagnostic Magnetic Tape.
1. Material shall be 250 feet of magnetic tape as defined in ANSI.X3.401976 mounted on a six inch reel with mailer.
2. The information (data) shall be written on the tape in NRZI, 800 CPI,
at the beginning (first BOT) of tape.
A second BOT marker shall be placed on the tape approximately 10'
beyond the first data field.
The information (data) shall be repeated at 1600 CPI, PE, beginning
at the second BOT.
3. On the front of the reel and the front of the mailer a label shall
be affixed containing the following information:
WP #68000009-;J...._
BOT #1 NRZ
" - LA.TE~T 'REV. LrR,.
BOT #2 PE
-oF 1'"Hla uWG.
4. A copy of the Directory and Loading Procedure, WP document. no. 66000001,
shall be included with the tape.
TOURANCU UNLESS
OTHEMISC SPCCJP11.D
'lltACTIONS
DCC.
ANGUS
PROGRAM W.P. MASTER DIAGNOSTIC M.T.
Al'f'ftCNALS
OAn:
w#~!bv y-n-1f/
A
SIZE
l
ORAwtNG NO.
68000009
00 NOT SCAU: DRAWING
I SHEET 1
of 1
REVISIONS
LTR
DESCRIPTION
A
MASTER DIAGNOSTIC TAPE
BOT #1 NRZ ~~- c
BOT #2 PE 30-JUN-78
1.
2.
3.
4.
s.
6.
7.
8.
9.
10.
11.
12.
13.
14.
I
DATE
APPROVED
?ROD. !Zt:L.
PD?-11 BOOTSTRAP LOADER
TC130 DIAGNOSTIC
TC130 RELIABILITY
TC120 "'.:::>IAGNOSTIC
TC120 RELIABILITY
DC220 DIAGNOSTIC
DC220 RELIABILITY
DC220-10 FORMATTER
DC220-10 RELIABILITY
DC220-10 DIAGNOSTIC, lST 4K
DC220-10 DIAGNOSTIC, 2ND 4K
DC230 DIAGNOSTIC
DC230 RELIABILITY
TC130 DIAGNOSTIC 11/34
TC130 RELIABILITY 11/34
INST
--
37000
12737
MOV NXT ADD INTO
CMD REG
2
10000
4 172522
6
12737
POWER CLEAR
C1·1D REG
HOV NXT ADD INTO
BYTE CTR
10 160000
12 172524
14 12737
T~UNLDS
OTMUWtSC 9"CJP11D
'RAC'T10HS
LOC
--
DCC.
APPWOYALS
AICGLD
DATE
( 4K)
BYTE CNT REG
MOV NXT ADD INTO
CMD REG
16 60003
20 172522
22 12700
CMD REG
MOV 0 INTO REG 0
24
26
30
00000
5200
1376
INC P.0
BR:PO
32
34
36
1376
5200
00000
INC RO
BR=#O
HLT
~western
peripherals
~
AHNtClW. CM.J~IA
DIRECTORY AND LOADING PROCEDURE
FOR WP MASTER DIAGNOSTIC M.T.
'7t1~A.Ibvr~-;i;-7' l/
Sill
A
I
DRAWttifG NO.
66000001
DO NOT SCAU: DRAWING
I SHE£T
1 of 2
I.
REVISIONS
LTR
I
IA
DESCRIPilON
I
DATE
APPROVED
PRDD. REL.
PURPOSE
The purpose of this specification is to define type, layout and content
of W.P. Diagnostic Magnetic Tape.
1. Material shall be 250 feet of magnetic tape as defined in ANSI.X3.401976 mounted on a six inch reel with mailer.
2. The information (data) shall be written on the tape in NRZI, 800 CPI,
at the beginning (first BOT}_ of tape.
I
A second BOT marker shall be placed on the tape approximately 10'
beyond the first data field.
The information (data) shall be repeated at 1600 CPI, PE, beginning
at the second BOT.
3. On the front of the reel and the front of the mailer a label shall
be affixed containing the following information:
WP # 6 8 0 0 0 01 7 - ~·-\1~.
BOT #1 NRZ
BOT #2 PE
....._LATEST REV. L TR.
OF THI~
nwa..
4. A copy of the Directory and Loading Procedure, WP document no. 66000019,
shall be included with the tape.
.'iUG 2 2 1918
TOUltAMCU UNLDS
OTHUWIU '"°P1lD
~NS
DCC.
ANGLES
::t:
~western
peripherals
~
AHNo!ClW. CAUPIONflA
:!:
.....-------.-PROGRAM M.T. WPDP DIAGNOSTICS
Al'f'i'RrNALS
CATE
1(;7i!VJ:;/~y &-n·T~
SIZE
A
ORAW1NG HO.
6aooaa11
DO NOT SCALE DRAWING
I SHEET
1 of 1
,,,
I
REVISiONS
IL~
I
I
OESC.~IPTICN
r,
,;.-..
.......
~,.................
r-"' '_-.- ._,
IB
'f.1-PDP DIAGNOSTICS
30T
NRZ
SGT '.T " P:S RE':T. . '"':..J
.J, ,
'.T.;..
;.,
F II.~'1'A1·1 • ZXT
:r
000001
000002
000003
000004
000005
000006
000007
000010
000011
000012
000013
000014
000015
000016
000017
000020
000021
000022
,JQ0023
000024
000025
000026
.SAV
THDP
.SAV
THDP
•:a IN
T!10P
.BIN
OPDl . BI~I
UPD2 . BIN
R..T{DP
.BIN
. 3 I')l
RXDP
COPY
.BIN
FOR..111.AT. BIN
iTl? D!A..'1. 3 I')1
WPREL'1. 3I')l
WPD IAD . .3 I:'1
WPRELD .Bnr
T~1DP
"tlPDLSM. 3D1
WPRLSM. 3I}1
~11-PDLSD. 3D1
""'-PRLSD. 3!)1
\11-PD I 3 4. BIN
WPRE34. BIN
WPDIOJ.3I')I
';11"7REO 3. 3IN
TOl.DtAHCQ Uflll.DS
OTHEIWtSC ~~US
,~OHS
=
~-·
.<....: t_ .
i
A?f'~VED
DATE
3-a-1~
CORR£C.TED iNSTR.j 12·18-&0
/vif~
~
OCC.
D..:\~E
26-JUN-78C
26-JUN-78C
26-JUN-78
26-JUN-78
26-JUN-78
26-JUN-78
26-JUN-78
26-Jl'JN-78
26-JU~I-78
26-JUN-78
2 6-J"'iJN-7 8
26-JUN-78
26-JUN-78
26-JUN-78
26-JUN-78
26-JCN-78
26-JUN-78
26-JUN-78
26-JUN-78
26-JUN-78
26-JUN-78
26-JUN-78
l
UIGU:S
:::::
I
CATE
I
I
I
~western per;phe1'31S
j
>.HAH«llil. CMJl'O-IA
I
=
;.pt(lllflt,(JYALS
~~?..:SCTCRY
FCR
~"-P!JP
.:..ND LCADI:!G ??,CCZ:JU?.E
~·1.
:' •
51Z! I CRAW.NG .'40.
I
A
I
I
I
I
I
l
l
1;
'sc;.u
I
'
i
!
f
w lfw '>I , -r ! &-·,,1·1*
CRAWfll
-
i
.
.J,""
?.:~·JTRY
'
I
00
.\lQT
l
i
166000019
SCAU: DRAWING
SHEU
!
t oF3
l
REVISIONS
LTR
I
I
DESCRIPTION
DATE
I
APPROVED
OPERATING INSTRUCTIONS
WPDP DIAGNOSTIC MAGNETIC TAPE
1.
Load program tape on transport, position at BOT, and place ON-LINE.
2.
Enter the following bootstrap loader into the computer:
.., .
.)
PDP-11:
D.i\TA
LOCATION
10 000
12737
10 002
3
10 004
172522
10 006
777
(Location) LOAD ADDRess,
(Data) DEPosit,
LSI-11:
(Data)
(Location) I
(Data) LINE FEED,
DEPosit, etc.
,
(Data) LINE FEED,etc.
Execute the bootstrap program:
LSI-11
PDP-11
10000,
LOAD ADDRESS,.
10000 G
START,
HALT1
Break key
10000,
LOAD ADDRESS 1
10000 G
START,
HALT,
Break key
102/
LOAD ADDRESS
402,
DEPOSIT 1
402
701
LOAD ADDRESS I
70 G
I
102 I
LINE FEED
START
4.
Follow printed instructions.
SIZE
A
f
DRAWING NO.
66000019
DO NOT SCALE DRAWING
I
SHEET
2 of 3
REVISIONS
LTR
S.
Type:
DESCRIPTlON
DATE
APPROVED
R(Sp) WPDIAM (Return) for tape
Diagnostic
R(Sp) WPRELM (Return)
for tape
Reliability Program on PDP-11
R(Sp) WPDIAD (Return)
for DC-230 Diagnostic
R(Sp) WPRELD (Return)
for DC-230 Reliability Program on PDP-11
R(Sp) WPDLSM (Return)
for tape
R(SJ:J) WPRLSM (Return) for tape
R(Sp). WPDLSD (Return)
Diagnostic
Program on PDP-11
Program on PDP-11
Program on LSI-11
(no panel switches)
Reliability Program on LSI-11
(no panel switches)
for DC-230 Diagnostic
Program on LSI-11
R(Sp) WPRLSD (Return) for DC-230 Reliability Program on LSI-11
R(Sp) WPD134 (Return) for tape
Diagnostic
R(Sp) WPRE34
Reliability Program on PDP-11/34
(no panel switches)
(Return)
for tape
R(Sp) WPDI03 (Return) for tape
6.
Diagnostic
Program on PDP-11/34
(no panel switches)
Program on LSI-11/03
Remove the program tape from the drive and load a scratch tape, positioning at BOT and placing the drive ON-LINE.
SCAL£
I
SIZE
A
DRAWING NO.
66000019
DO NOT SCALE DRAWING
ISHEET
3 of 3
I
REVISIONS
LTR
I
A
I RELEASE
DESCRIPTION
I
I
f
-
APR 3
TOURANCl:S UHl.CIS
~western peripherals
OTHERWISE Sl'E:lfllD
,RAC'TIONS
oe:c.
~
AHGLES
~PPROVEO
DATE
--~
T
-
1981
TM
TUSTIN, CALIFORNIA
±
APPROVALS
CATE
"l-OZ-31
4·tJ!·
I
.~
\
DIRECTORY A.~D LOADING PROCEDURE
FOR WP MASTER DIAGNOSTIC TAPE
CARTRIDGE
SCALE
SIZE
A
ORAwtNG NO.
DO NOT SCALE DRAWING
66000068
I SHEET
1 OF 3
I
REVISIONS
LTR
1.
J
I
APPROVED
I SHEET
2 OF 3
DATE
Program
TC160
TC160
TC170
TC170
TC180
TC180
1
2
3
4
5
6
DIAGNOSTIC
RELIABILITY
DIAGNOSTIC
RELIABILITY
DIAGNOSTIC
RELIABILITY
DEC BOOTSTRAP LOADER
Loe
--
3.
DESCRIPTION
MASTER DIAGNOSTIC TAPE CARTRIDGE
Record
2.
1
Inst
-12737
37000
2
4
10000
172522
MOV
POWER CLEAR
CMD REG
6
10
12
12737
160000
172524
MOV
( 4K)
BYTE CNT REG
14
16
20
12737
3
172522
MOV _
READ
CMD REG
22
24
26
30
32737
1
172520
1774
BIT.TEST
FOR TUR BIT
IN STATUS REG
BRANCH IF NOT READY
32
0
HALT
DATA GENERAL BOOTSTRAP LOADING PROCEDURE
Clear Accumulators to 0. Load first test by starting Read
routine. Load succeeding tests by pressing Continue.
NOVA Read Routine - Load in top 8 locations of memory.
67022
72022
61122
63622
777
74422
63077
771
DOC 1
DOB 2
DOAS 0
SKPDN
JMP-1
DIA 3
HALT
JMP-7
AFR 3
SCAL£
I
SIZE
A
\SS\,
ORAW1NG NO.
66000068
DO NOT SCAU: DRAWING
REVISIONS
I
LTR
I
DESCRIPTION
T
DATE
I
APPROVED
NOVA Read Routine (Cont'd)
Accumulator
COM.MAND
WD CNT
STRT ADDR (DIRECT)
STATUS
Commands
No.
0
1
2
3
=
=
=
=
Read
Rewind
Not Used
Space Forward
4 = Space Reverse
5 = Write
6 = w""EOF
7 = Erase
0
1
2
3
4.
REMOVE THE PROGRAJ.''1 TAPE FROM THE DRIVE Ai.'l'D INSERT A SCRATCH
TAPE.
5.
REFER TO THE APPROPRIATE DIAGNOSTIC MANUAL FOR REQUIRED PATCHES
AND FOR OPERATING INSTRUCTIONS.
t\PR 3
SIZE
A
I
19Bl
ORAW1NG NO.
66000068
DO NOT SCALE DRAWING
I SHEET
3 OF 3
PROGRAM PATCHES
NOTES
DIAGNOSTIC PATCHES
Enter the following changes when
1.
the controller diagnostics:
Operational delay !or unusual timing- related errors.
Location
2.
rnnnjng
Was
Should Be
Descriotion
366-l
7'
u.
Controller not n!ady:
!2132
s.
12
Controller not ready
Non-existent memory error (systems with extra memory):
Location
5702
Was
Should Be
Descriotion
17:3000
176000
Non-a'"tistant Memory
NOTES
MODIFICATIONS REQUJRED FOR NON-STANDARD
ADDRESSES OF CONTROLLER TO RUN
FUNCTIONAL AND RELIABILITY DIAGNOSTICS
FUNCTIONAL DIAGNOSTICS:
LOC
IS
CPU
SW4
OFF
1000
172520
CPU
SW4
ON
1002
172720
Function Should Equal First Address of Controller (Status Reg.)
CPU
SW4
OFF
1004
224
CPU
SW4
ON
1010
260
Should Equal Interrupt Vector Address
CPU
SW4
OFF
1006
226
CPU
SW4
ON
1012
262
Should Equal Interrupt Vector Address +2
RELIABILITY DIAGNOSTICS:
l-79
214
172520
Should Equal Status Reg. Address
216
172522
Should Equal Command Reg. Address
220
172524
Should Equal Byte Count Reg. Address
222
172526
Should Equal Address Reg. Address
254
224
Should Equal Interrupt Vector Address
western peripherals
TM
TECHNICAL AID BULLETIN
TITLE/DESCRIPTION:
LSI-11 Tape Diagnostic operation with Real Time
clock enabled
PRODUCT/MODEL:
TC-150/TC-160
SY:.1PTOM/ACTIVITY:
ACTION REQUIRED:
System halts with illegal tape interrupt at PC 11476.
Modify .address 100 with a 102
and address 102 with a 002
and restart the program.
NOTE:
Reliability program will also fail but can not be
modified for this problem.
DATE:
4/2/80
NOTES
MODEL TC-160 AND TC-180
FUNCTIONAL DIAGNOSTIC PROGRAM PATCHF.S
(SETTLEDOWN &: IDENT STATUS)
ADDRESS:
WAS:
SHOULD BE:
3706
104400
400
4246
104400
400
NOTES
PROGR.AJ.'1 PATCHES
FOR TC-190 OPERA'l'ION
RELIABILITY PROGRAM
DIAGNOSTIC PROGRAM
SHOULD BE
SHOULD BE
LOCATION
WAS
3202
5037
137
100
0
10001
3204
1044
3244
102
0
6200
3270
40000
60000
104
0
6200
3554
5777
403
106
0
60100
4262
14557
14562
110
0
5400
4362
14723
14726
112
0
10037
4420
14561
14562
114
0
172524
4476
14725
14726
116
0
62702
5052
11423
46114
120
0
4
5254
377
170000
122
0
10207
6474
177754
177747
4726
13777
13700
6564
177754
177747
4732
10702
6706
60000
6714
20000
20000
173264
5477
173260
100
6760
17000
17377
7346
13777
7100
17000
16766
7352
170644
13700
10702
7322
744
777
7354
5477
137
7522
4
777
7356
170640
100
10140
20037
137
10366
13777
10142
1072
10252
10372
167624
13700
10702
10374
5477
137
167620
100
60000
WAS
LOCATION
I
I
I
l
l
4734
4736
10376
!
137
REVISIONS
LTR
DESCRIPTION
10-2. '3 ·80 \(~_.//I_/
"' ..,.-"' ---- i/
PURPOSE:
To test PDP-11/LSI-ll tape controllers that have been modified to a
non-standard vector address.
1.
Load diagnostic into memory.
2.
Modify the following locations:
LOC
--
1004
1006
1014
1016
.
EXAL'1PLE:
WAS
--
S/B
new
new
new
new
224
226
224
226
vector
vector +2
vector
vector +2
If the new vector is 320, then 1004, 1014 would contain
320 and 1006, 1016 would contain 322.
3.
If the controller also has a non-standard device address, the program
must also be modified. Reference test procedure 92000165.
4.
Run diagnostic using standard method successfully for 3 passes.
NOTE:
RELIABILITY CANNOT BE RUN WITH NON-STANDARD VECTOR.
TOL£RANCU UNLESS
OTHERWISE Sl'!ClFIED
FRACTIONS DEC.
ANGLES
±
AA'ROVALS
~western peripherals
~
TM
TtJSTIN, CALJFORNIA
:!:
TEST PROCEDURE PDP/LSI-11 ALTERNATE VECTOR
SIZE
DRAWING NO.
A
DO NOT SCALE DRAWING
92000157
I SHEET
' OF\
NOTES
RUNNING THE DIAGNOSTIC ON LSI-11 OR
PDP-11/34 SYSTEMS WITHOUT SWITCH PANELS
This information documents the special diagnostic versions
and allows modification of the standard diagnostic.
Location
36
1166
1232
1262
1366
1370
1430
1454
3122
3122
3232
3370
3372
3374
4220
5036
5042
5044
5046
5070
5242
5566
5776
6002
6050
6054
6126
6132
6240
6244
6424
6426
6706
6714
7112
7160
7162
7164
7244
7246
7250
7364
7366
7370
Standard
340
12711
177570
177570
5037
177776
177570
177570
177570
177570
177570
6037
·177570
103407
177570
177570
6037
177570
103406
177570
177570
177570
13737
177776
13737
177776
13737
177776
13737
177776
5037
177776
20000
20000
177570
6037
177570
103003
6037
177570
103003
6037
177570
103003
-1-
PDP-11/34
LSI-11
0
14556
176
176
5037
177776
176
176
176
176
176
4737
17002
1007
176
176
4737
17002
1006
176
176
176
13737
177776
13737
177776
13737
177776
13737
177776
5037
177776
60000
60000
176
4737
17002
1403
4737
17002
1403
4737
17002
1403
0
14556
176
176
106427
0
176
176
176
176
176
4737
17002
1007
176
176
4737
17002
1006
176
176
176
106437
240
106437
240
106437
240
106437
240
106427
0
60000
60000
176
4737
17002
1403
4737
17002
1403
4737
17002
1403
DIAGNOSTIC MODS
Location
Standard
PDP-11/34
LSI-11
7512
7514
7516
7560
7562
7564
10234
10332
10356
11056
11700
12024
12040
12664
6037
177570
103411
6037
177570
103002
177570
177570
177570
177570
177570
177570
177570
177570
4737
17002
1011
4737
17002
1402
176
176
176
176
176
176
176
176
4737
17002
1011
4737
17002
1402
176
176
176
176
176
176
176
176
-2-
NOTES
DIAGNSOTIC FEATURES (Switch Register)
NON-STANDARD
The diagnostic uses location 176 as a switch register and must be
loaded as follows:
15
14
13
12
11
10
9
2
8
7
~
2
6
5
4
3
2
1
~
HALT ON ERROR
SCOPE LOOP
INHIBIT PRINTOUTS
INHIBIT INCREMENTING
DATA PATTERNS
INHIBIT MANUAL TESTS
UNIT SELECT BITS
BUS INTERRUPT LEVEL BITS
(Standard: 5 for PDP-11, 4 for LSI-11)
MAG TAPE ADDRESSES
AND INTERRUPT VECTORS
ALTER..~ATE
TEST IBM PACKING MODE
(Controller Requires Special Mod)
PHASE ENCODED MODE
7-TRACK TAPE DRIVES
STARTING/RESTARTING
The diagnostic may be started at location 16000 the first time only.
Thereafter, the diagnostic must be restarted at location 200.
When
restarting at location 200 the printed message should be disregarded,
however, location 176 may be changed at this time.
the program at location 200) .
(Again, restart
The program is executed by continuing
or proceeding from this programmed stopping point.
-3-
SPECIAL TEST LOOPS
NOTES
TAPE ROUTINE
Location
Instruction
DescriEtion
37000
12737
10000
172522
Move
Clear
To Command Register
12737
177774
172524
Move
Byte Count
To Byte Count Register
2
4
6
10
12
14
16
12737
17000
172526
Move
Memory Address
To Memory Address Register
12737
6000X
172522
Move
= (Write)
Command
X = 3 (Read)
To Command Register
34
36
32737
00001
172520
1774
Bit
ForTest
Tape Unit Ready Bit
In the Status Register
Branch if Not Ready
40
42
44
46
32737
2000
172520
1754
Bit Test
For EOT Bit
In the Status Register
Branch to Sta.rt if not EOT
so
00000
Halt
20
22
24
26
30
32
17000
2
{x s
·l
(DATA)
{DATA)
For Single Record Operations (press CONTINUE for each record):
37030
32
00000
762
Halt
Branch to Start
NOTES
TROUBLESHOOTING LOOP
xxxoo
START
02
04
12737
10000
172522
POWER CLEAR
06
10
12
12737
177775
172524
BYTE COUNT
14
16
20
xxxxx
12737
ADDRESS
172526
22
24
26
12737
172522
30
32
34
36
12702
37000
5302
1376
40
42
44
46
32737
2000
172520
1754
50
52
54
12737
17
172522
56
750
x
COM...J\1AND :
3=READ
MOV #37000, R2
DEC R2
BNE
EOT?
REWIND
RESTART
5=WRITE
DELAY CONSTANT
NOTES
PDP-11 Modified Manual
Write/Read Program
Dutch Hamilton
11-4-77
NOTE: THIS PROGRAM ALLOWS IBM TEST
-LOC
CODE
DESCRIPTION
36770
2
4
6
37000
2
4
6
10
12
14
16
20
22
24
26
30
32
34
36
37040
42
12737
6001'?'
172522
000000
12737
10000
172522
12737
RE\VIND
44
46
50
52
54
56
60
ooxooo
172532
12737
77777X
l72524
12737
17000
172526
12737
600XX
172522
32737
000001
172520
1774
32737
2000
172520
1754
000000
743
}
}
HALT
POWER CLEAR ...,.,,....,___ START
}
IBM TEST
x = 0: Non IBM
x = 2: IBM
l
BYTE COUNT
X=7: 1 BYTE
x = 6: 2 bytes
x = 5: 3 bytes
x = 4: 4 bytes
j
DMA ADDRESS
I
l
COMMAND REGISTER
XX=03 (READ)
xx= 07 (WRITE EOF)
XX=OS (\'JIUTE) xx= 17 (REWIND)
Test for Tape
Unit Ready
}
Branch to 37036 if TUR
Test for EOT
Branch to 36770 if EOT
HALT
Branch to Start
NOTES:
(1)
For continuous operation, enter 1751 @ LOC 37054.
(2)
IBM Test (4 Bytes)
a. Write (IBM)
=
b. Zero Out
=
c. Read (NIBM)
=
d. Repeat a, c above,
(3)For single record
174400/174400
17000, -01
000377 /000377
Write (NIBM), Read IBM.
37036= 000000 HALT
37040= 757 BRANCH TO START
PRESS "CONTINUE" FOR EACH RECORD
REVISIONS
LTR
A
TOURAHCES UNLCJS
tEET 5
0
f 5
NOTES
BOOTSTRAP MAG TAPE PROGRAM (RELOCATABLE)
xxooo
2
12
7CO
172 522
1
Move to RO
CMD REG ADD
._/
4
12 760
6
160 000
l
I
>
!'
WORD CNT
'
j
10
12
2)
12
14
71:}
READ CMD
16
105 710
TST (B)-==i
20
100 376
READY?
22
0
HALT
710}
PWR
24
12
26
10 000
CLR
30
763
JMP
NOTES
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.6 Linearized : Yes Author : Western Peripherals Create Date : 2017:11:24 22:36:04-06:00 Keywords : Scanned, 11/24/2017, chiclassiccomp.org Modify Date : 2017:11:25 10:43:01-06:00 XMP Toolkit : Adobe XMP Core 5.4-c005 78.147326, 2012/08/23-13:03:03 Metadata Date : 2017:11:25 10:43:01-06:00 Creator Tool : FUJITSU fi-5750Cdj #2 Format : application/pdf Creator : Western Peripherals Title : DEC-Compatible Tape Controller Diagnostic Manual 91000448A August, 1980 Subject : Scanned 11/24/2017 chiclassiccomp.org Document ID : uuid:3276a08b-9d3d-4c57-bd42-be64740650f7 Instance ID : uuid:1b391ea8-57fd-4e01-972a-caf79d51051b Producer : Adobe Acrobat Pro 11.0.10 Paper Capture Plug-in Page Layout : SinglePage Page Count : 168EXIF Metadata provided by EXIF.tools