60220800F_SMM17_Program_Listings_DP1_Feb75 60220800F SMM17 Program Listings DP1 Feb75
60220800F_SMM17_Program_Listings_DP1_Feb75 60220800F_SMM17_Program_Listings_DP1_Feb75
User Manual: 60220800F_SMM17_Program_Listings_DP1_Feb75
Open the PDF directly: View PDF 
.
Page Count: 86
| Download | |
| Open PDF In Browser | View PDF |
o
o
(J
l)
o
CONTROL DATA®
SMM17
o
10
o
o
c
Program Listings
DP1
o
o
o
o
o
o
o
c)
o
n
""""-........
!CONTROL DATA
,CORPORATION
CUSTOMER ENGINEERING MANUAL
(
\ ....
'
RECORD of REVISIONS
REVISION
A
NOTES
Manual released.
Information complete
throu~h
SMM17 Edition 2.
o.
(9-20-h7\
Technical change on oage 10.
R
(11-6-68)
C
p
Information complete
throU:~h
SMM17 Edition 2. 3.
This edition
ob~olptp!,: ~11
c
-'! • •
(9-15-70)
D
(4-12-73)
Information complete through SMM17 Edition 3. O.
This edition obsoletes all previous editions.
E
(5-1-74)
Information complete through SMM17 Edition 3.1.
This edition obsoletes all previous editions.
F
Information complete through SMM17 Edition 3.1-1.
This edition obsoletes all previous editions.
(2-4-75)
' ........
r-.
(
"
~'"
(
' ......_-
~
(-.,
\
...
U)
.!.
;;
....
'
("
'......._0'
w
0:
0
II)
N
c:r
u
('
--
\" ..
2
0:
0
II.
Address comments concerning this
manual to:
Pub No. 60220800 .. /
© 1967.19686 1970 6 1973. 1974. 1975
by Control Data Corporation
Printed in United States of America
Control Data Corporation
Technical Publications Department
4201 North Lexington Avenue
Arden Hills, Minnesota' 55112
or use Comment Sheet in the back of
this manual.
C
C~
("
.........
C'"
0.
}
o o o
o C)
OP1006
C) C)
PAGE
....
0001
NAM
OP1008
o
(
o o
DATEI 01/04/75
1
1015,. COPVRIGHT CONTROL DATA CORP 1974
'00001
000'02
••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••..
0002
0003· .
0004
0005
0006
. 0007
• • .. • • • • • • • REVISION RECORD
·,HODAYR VERSION
WHAT DONE ,WHY
•
0008
·0009
."
.....•
032074 V 3.1
.....................•
··00·12.
0013
0014
·.•
··0015
.
0016
0017
0018
....... . ... .
0023
0.02,...
0025
0026
. , ... 0027... ·
0028
•
•
•
•
SYSTEM RELEASED
ADDED OPERATORE MESSAGE DURING AUTOLOAD SECtION
1704 - 1714 -
.
'
0034
.............................. .....................................
~
00015
00016
00017
00016·
000lQ
~0'020
00021
OD022
. 00021 .
00024
~
00025
. 00026
.. ,00027:
00028
00029
00030 .
00031
.00032
....
MINI HUH
~EHORY
REQUIREMENT IS BK
.•.
••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
•
•
.........................................................................
.,0038.
.0039
60220800
F
00014
..~,
!.. .
•
....•
VER 3.0.3 1. HADE MAX HAlT TIME IN SECTION itA SUBROUTINE
WITH ENTRY=SC11E. ADOED WAIT CALL TO THE
READ/WRITE SUBROUTINES TO ELtHINATE'~RROR 42CAUSED BY THESE ROUTINES RETURNING CONTROL TO
THE TEST SECTION WHILE STILL BUSV.
2. DELETED EXT REJECT COUNTER FROM. INPUT
ROUTINE BECAUSE THE HARDWARE SHOULD
.
NEVER REJECT STATUS.
0032
0036
0037
~
000D9
00010
00011
00012
00013
178~A/e
OO!l
: B03-5· ."
. 00008
•
•
•
THIS TEST HAS BEEN MODIFIED TO RUN ON THE FOLLOWING CPUS •
.'•
0029
-." OGlC·
00006
00007
..•
•
....•
•
00004
00005
1738/853/854 DISK PACK TEST
.••
... .•
00003
•
AND WHO DID IT
•
CHANGED SECTION 6 - SU~FACE TEST - TO CHECK DATE FROH
•
START OF BUFFER TO END OF BUFFER
EJW
•....................................................................
0010
0011
0019
0020
.··-- . 002i·
0022
o o
00034
QQ035
00036
00037
00038
00039
PAGE
1
DP1008
PAGf.
...
..
0041
0042
A1 = 1
•..
A2
...
0049
0050
1
A3 = 1
A4 = 1
A7 :I 1
A8 :: 1
Aq :: 1
..
...
0048
>1-
..
0052
0053
..
....
0055
0056
0057
0058
0059
0060
00&1
0062
0063
0064
0065
0066
OU67
0066
0069
AD .: t
A1 = 1
A2
1
A3 = 1
A4 = 1
AS
1
A6 = 1
A7 = 1
A8 = 1
A9 = 1
Al0= 1
A11= 1
A12= 1
A13= 1
A14= 1
...
...
•..
....
..
..
..
..
...
.IS
60220800
00041
00042
CLEAR INTERRUPTS
NEXT READY AND NOT RUSY tNTER~UPT REQUSET
END OF OPERATION INTERRUPT REQUEST
ALARM INTERRUPT REQUEST
RELEASE (ALlOH CONTROL BY UNPROTECTED PROGRA H)
UNIT SELECT
UNIT SELECT conE
00044
00045
00046
00047
00046
00049
00050
1736 STATUS
00052
00053
READY
BUSY
INfERRtJPT
ON CYLINDER
END OF OP~RATION
00055
00056
00057
Doose
00059
00060
01)0&1
OOr:J&2
00063
00064
00065
00066
00067
00068
00069
AlAR~
NO COHPA~E'
PROTFCTED
CHECKWORO ERROR
LOST DATA
SEEK ERROR
ADDRESS EP.ROR
DEFECTIVE TRACK
STORAGE PARITY ERROR
PROTECT FAULT
PAGE
F
(')
()
'.
\
/
1738 DIRE"CTOR FUNCTIONS
------ .. - ---------
...
0044
0045
0046
0047
OATEI 01/04175
?
/
/
)
()
2
()
t ' ,I
0
C) 0
0 ,,-> 0
f\
DP1008
•
-
.,
.. _0."
0 0 C)
PAGE
3
(
',--
")
J
f)
'---~
/ '\
,
,--j
0 0
(\
,,-~
Il
()
(~)
'--'"
DATEI 01/04/75
...
0071
0072
00730071t
007S
0076 .
0077
0078
·0079
0080
0081
0082
0083
008 ..
0085
0086
0087
.0088
0089
. 0090
0091·
0092
0093
.009 ......
0095
0096
0097
0098
0099
0100
0101
0102
0103 -
0104
0105
- -.010&
0107
0108
--0109
0110
0111
.~ .. 0112 .0113
0114
-.4115
0116
0117
.0118
0119
0120
.. ·0121
0122
0123
0001
0002
0003
0004
ODDS
0006
0007
0008
0009
OQOA
0008
OOOC
0000
00 .. 2
0043
oo .. lt
0045
0047.
0048
00 .. 9
0056
OO&B
0068
OO&C
OD&O
006E
OD6F
0070
0071
0072
0073
0074,
0075
007&
0077
.. 0078
0079
OO'7A
.0078
a07C
0070
-. ,0OlE007F
0080
0081,.0082
0083
.006.4 .
0085
0086
0087.
0088
0089
60220800
F
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQLJ
Eau
EQU
EQU
EQU
EQU
EQU
EQU
EQU
, EQU
EQU
EQU
. EQU
EQU
EQU
EQU
EQU
EQU
fQU
EQU
EQU
EQU
EQU
EQU
EQU
Eau
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU
EQU'
EQU
EQU
EQU
EQU
EQU
EQU
EQU
CONTROL(U ..
STOPX (CONTROL +1)
EXIHSTOPX+U
REQINT (EXIT+!)
FCLRINTIREQINT+lI
JUHPCREQINT+Z) ,
GENRANCJUHP+1)
TYPEOUTCGENRAN+l'
TTVBZVCTYPEOUT+l)
HEXASCCTYPEOUT+2)
OVRLAY (HEXASC+U
RELPOSCOVRLAY+l)
HA'INLCRELPOS+U
SETHASKCHAINL+53)
ST JP CSETHASK+1)
LASTVALU'STJP+1)
LASTAO(STJP+2)
LDLCORECLASTAD+2J
LDL1CORCLOLCORE+l)
INFORHCLDL1COR+l)
SHMCNTCINFORH+13J
BITOO'SMHCNT+?11
8ITOCBITOO)
BITl (8ITO+1)
BIT2 (81Tl+1)
BIT3 (BIT2+ U
BITlt (BI T3+1)
BITS(BIT4+1)
BIT6 (81T5+1)
BIT7 (BIT&+1l
91T8(81T7+1I
BIT9 (BIT8+0
BIT10 CBtT9+1I
BITll CBlTl0+1)
BIT12(8IT11+1)
8IT13( 8IT12+U
8IT14 (BIT13+U
BIT15 (81T14+1)
HOOOD CBIT15+1) .
HFFF~CHO 000+11
HOOOFCHFFFF+U
HOOFO (HDOOF+U
HOFOOCHOOFO+iJ
HFOOO (HO FOO+U
HOOFF(HFOOO+1J
HFFOOCHOOFF+1)
HFFFO (HFFOO+U
HOFFF CHFFF 0+1)
HFFOF(HDFFF+U
HFOFFCHFFOF+ll
H7FFF CHF(JFF+i)
H7FOO (H7FFF+U
H0780 CH7FOO+1)
RETURN SHM CONTROL ADDRESS.
00071
ALL STOPS AND ERROR TYPEOUTS
00072
END OF TEST~PASS EXIT
00073
REQUEST INTFRRUPT AOORESS
0007 ..
FAKF. CLEAR INTERRUPT ROUTINE
00075
CHECK $KIPSHITCH FOR PARAH ENTRY '00076
RANOOH NUMBER GENERATOR
00077
MESSAGE TVPEOUT ROUTINE
00078
ROUTINE TO WAIT TTY NOT BUSY.
00079
·HEX TO ASCII CONVERSION
00080
OVERLAY CALL ROUTINE.
00081
A/Q RELATIVE POSITION TEST.
00082
MANUAL INTERRUPT ROUTINE. ~-.
00083
M REGISTER RESET VALUE. ~
0008 ..
STOP/JUHP PARAMETER HORO.
00085
HONITOR AREA LHA+~
00086
AVAILA8LELOAO CORE FHA.
00087
000'88
BANKO LAST AODR
BANKl LAST AOOR
00089
8KO SIZE, HASK SIZE, BUSY SWITCH' 00090
SMH'PARA"ETE~ WORD.
00091
XXXXXXXX CONSTANT TABLE XXXXXXXX ' 00092
00093 .
0009 ..
,00095
00096
00097
00098
00099
00100
00101
00102
00103
00104
00105
00106
00107
. 00108
00109 .
00110
00111
00112
00113
00114
00115
00116
00117
04118
00119
,00120 .
00121
00122
00123
~
PAGE
3
(~
"--.1
(
----, .("
I
'----./
PAGE
OP1008
0124
0125
0126
0127
0128
0129
0130
0131
0132
0133
0134
0135
0136
DG8A
0091
0092
0068
0056
0043
0007
DOOA
0006
0004
0005
DOOA
0137
0004
60220800
,--,\
!
)
1'\
'(\
"
/'
~)
\.
EaU
EQU
EQU
EQU
EQlI
EQU
EQU
EQU
EQU
EQU
EQU
EQU
Eau
EQU
ooa8
!
OATEI 01/04/75
H007F (H0780+U
H2020 (HOO7F+i)
TSACTV(H2020+6)
TSFREQ(TSACTV+l)
CONST(BITOO)
SMMPAR CSHMCNTJ
SJPARCSTJP)
RANDOHCGENRAN)
CONVERT (HEXASC)
HESSAG(TYPEOUT)
REQNO C~EQI NT)
CLRNO(FCLRINT)
CONVMCHEXASC) .
INFOBKC$04)
TABLE INDEX TO TEST IN CONTROL.
TEST. FREQUENCY TABLE
)
00124
00125
00126
00127
00128:
00129 '
00130
00131
0013'2
00133
00134
00135
00136
00137
PAGE
F'
f~
,
4
I~
!
:
0,
(j
4
c)
o
o
DP1008
PAGE
0139
•
.01lt1
0142
01lt3
01"
•
•
•
.•
•
•
•
•
•
•
•
•
•
•
•
.•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
.0147.
0148
0149"
···0150
0151
0152
.... 0153
015,.
0155
-·_· .. 0156
0157
0158
.0159
0160
0161
. 0162
0163
0164
-.- .. 0.165
.0166
"
0169
0170
.0171
.01'72
0173
••• Co
017 .....
0175
0176
..... 0177 ....
0178
0179
4180-
0181
0182
0183
0184
0185
-·.-0186
0187
0188
60220800
5
o
n C) o
F
(J
DATEt 01/04/75
ERROR COOES(HEXIDECIHAL)
01-1NTE~NAL'REJECT OF INPUT TO A.
A=8ADO
Q=CONTfNTS OF Q UPON INPUT TO A
A= CONTENTS OF A UPON LAST OUTPUT F~OH A.
Q=CONTENTS OF Q UPON LAST OUTPUT FROH,A.
D2-INJERNAL ~EJECT ON OUTPUT FROM A.
A=OIRECTOR STATUS
Q='OORESS REGISTER STATUS
A=GONTENTS OF A. UPON OUTPUT FROM A
Q=CONTENTS OF Q UPON OUTPUT FROM A.
03-INTERRUPT STATUS BIT NOT SET WHEN INTERRUPT OCCURRED.
A=SELECTEO INTERRUPTS
1-READV, NOT BUSY
2-ENO OF OPERATION
It-ALARM
C=STATUS. UPON INTERRUPT
A=GONTENTS OF A UPON LAST OUTPUT FROH A
Q=CONTENTS OF Q UPON LAST OUTPUT FROH A
04-tJON-SELECTED INTERRUPT OCCURREO (OR INTERP.UPT OCCURRED
TOO SOON)
DISPLAV SAME AS FOR ERROR CODE 03
OS-INTERRUPT STATUS BITS NOT CLEARED BY CLEAR INTERRUPT
FUNCTION
A=STATUS UPON INTERRUPT
Q=STATUS AFTER ATTEMPTING TO CLEAR INTERRUPTS.
A:CONTENTS OF A UPON LAST OUTPUT FROH A (OTHER THAN
CLEAR INTERRUPT FUNCTION)
Q=GONTENTSOF Q UPON LAST OUTPUT FROH A COTHER THAN
CLEAR INTERRUPT FUNCTION)
OG-~EAOY STATUS NOT PRESENT
A=OIRECTOR STATUS
Q=ADDRESS REG!STER STATUS
A=CONTENTS OF A UPON LAST OUTPUT FROM A (OTHER THAN
9. CLEAR INTeRRUPT FUNCTION)
• Q=CONTENTS O~ Q UPON LAST OUTnUT FPOH A (OTHER THAN
• CL~AR INTERRUPT FUNCTION)
.·nl~ON CYLINDER STATUS NOT PRESENT
• A=OIRECTOR STATUS
• Q=ADDRESS REGISTER STATUS
• 08-BUSY NOT PRESENT AFTER AN OUTPUT FROM A. DISPLAY
• SAME AS FOR ~RROR CODE 06 •
.• 09-STORAGE PA~ITY ERROR
• DISPLAY SAHE AS FOR ERROR CODE OG.
• OA-OEFECTIVE TRACK
• DISPLAY SAME AS FOR ERROR COO~ 06.
• DB-ADDRESS ERROR
• DISPL~Y SAME AS FOR ERROR COD~ 06.
• aC-SEEK ERROR
0145
0146
0167
-0168
o C)
00139
001,.1
00142
001,.3
0011t,.
00145
00146
001,.7
0011t8
001 .. 9
00150
00151
00152
001S3
00154
00155
00156
00151
00158' .
00159
00160
00161
00162
00163
00164
00165
00166
00167
0(1168
00169
00170
00171
00172
00173
00174
00175
00176
1111111
UtJ178
00179
00180
00181
00182
00183
00184
.00185
0018.6
00187
00188
PAGE
5
o
DP10Da
PAGE
•
•
..
•
..
..
..
..
..
•
•
..
•
..
..
..
..
..
•
..
•
.,.
•
•
..
..
•
..
•
01S9
0190
0191
0192
0193
0194
0195
019&
0197
0198
01<)9
0200
0201
0202
0203
0204
0205
0206
0207
0208
0209
0210
-0211
0212
0213
0214
0215
021&
0217
0218
0219
~
..
..
..
..
•
•
•
..
•
..
..
•
..
.,.
•
0220
0221
0222
0223
0224
0225
022&
0227
0228
0229
0230·
0231
0232
0233
0234
0235
If.
•
..
•
..
..
•
023&
0237
0236
0239
0240
0241
'I-
I
r---"
'.
OATEI
01/Q4/75
DISPLAY SAME AS FOR ERROR CODE 06.
OO-L OST OAT A
DISPLAY SAME A~ FOP. ERROR CODE 06.
QE-CHECKWORO ERROR
DISPLAY SAME AS FOR ERRO~ CODE 06.
OF-PROTECT FAULT
OISPLAY SAME AS FOR ERROR CODE 06.
10-ALARM CONDITION PRESENT BUT ALARM STATUS BIT NOT SET
DISPLAY SAHE AS FOR ERROR CODE 06.
1i-AODRESS REGISTER STATUS DOES NOT EQUAL LOADEn ADDRESS
AFTER LOADING AODRESS AND HAlTING FOR NOT BUSY
A-=8AOO
O=OIRECTOR STATUS
A=AnnRESS REGISTER STATUS
O=LOAOEO AOORESS
12-NOT USED
13-NOT USED
14-WOPO WRITTEN DOES NOT FQUAL WORD READ. (THl~ HAY OCCUR
IN seCTIONS 3,4, 5 AND 8 OF THE TEST) SET BIT 11 IN
THE STOP/JUMP PARAHETER TO IGNORE CHECKING FOR HO~E
ERRORS IN THIS SECTOR.
A=AODRESS REGISTER STATUS
Q=NUHBER OF WORD IN fRROR
A=HORO W~TTTEN
Q:WQRD REAO
is-NO COMPARE STATUS PRESENT
A:OIRECTOR STATUS
O=AOORESS REGISTER STATUS AFTER LOAD ADDRESS
l6-ALARH INTERRUPT DID NOT OCCUR HHEN ATTEMTING TO FORCE
ADURESS ERROR BY LOADING ILLEGAL ADDRESS
A=LOADED ADDRESS
Q=OIRECTOP. STATUS
A=INTERRUPT LINE
Q=SELECTEO INTERRUPTS (SEE ERROR CODE OJ)
17-AN ADDRESS ERROR HAS FORCED gUT THE ADDRESS ERROR STATUS
Blf HAS Nor SET
A=LOAOEO ADDRESS
Q=OIRECTOR STATUS
lS-NO ALARM I~TERRUPT OCCURRED HHEN ATTEHPTING TO FORCE
ADDRESS ERROR BY INITIATING CHECKWOP,D CHECK WITH ILLEGAL
AOORESS.
DISPLAY SAME AS FOR ERROR CODE 16.
19-AODRESS ERROR STATUS NOT PRESENT WHEN H~ITING OFF THE END
OF OISK PACK
OISPLAY SAHE AS FOR ERROR CODE 17
lA-NOT USED
1S-UNEXPECTED DATA WAS READ DURING SURFACE TEST. SET BIT
11 IN THE STOP/JUMP PARAMETER TO IGNORE REST OF ERRORS
IN THTS SECTOR OR TRACK
A:SECTOR IN ERROR
Q=NUHBER OF WORK IN ERRO~
A=OATA EXPECTED
Q=OATA READ
00189
00190
00191
00192
00193
0019 ..
00195
00196
00197
00198
00199
D0200
00201
00202
00203
00204
00205
00206
00207
00208
00209
00210
0021i
00212
00213
00214
00215
00216
00217
00218
00219
00220
00221
00222
00223
00224
00225
00226
00227
00228
00229
00230
00231
00232
00233
00234
00235
00236
00237
00238
00239
00240
00241
PAGE
F
~0220S0(l
.- r,----....-.
6
.
)
"'\
;'-'\
/
-----.....
)
f)
()
(~
,
/
..
6
.'\
\.
)
(-j
()
r\
(
,
I
/
,--\
/
n
'--/
o o
C)
OP1008
()
PAGE
7
(
"\
)
-~
o o o
DATEI {)1/04175
• 1C-MAXIMUM POSITIONING TIME OF 1&5 MILLISECONDS WAS
0242
0243
0244
0245
0246
0247
0248
.. EXCEEDED.
..
..
..
..
A=TIME REQUIRED (MILLISECONDS, HEXAOECIMAL)
Q=LOADLO ADDRESS
lD-AUTOLono FAILED TO LOAD CORRECl DATA
SET eIT SET BIT 11 IN THE STOP/JUMP PARAMETER TO IGNO~E THE
~ REST OF TH~ WORDS IN ERROR.
... A=i3ADO
.. O=NUHBER OF WORD IN E~ROR
• A=WORD WRITTEN
.. Q=WORU IN CORE AFTER AUTOLOAD
.. 1E-END OF OPERATION STATUS NOT PRESENT
.. DISPLAY S~ME AS FOR ERROR CODE16.
• iF-STATUS OTHER THAN PEAOY, ON CYLINDER IS PRESENT
• (IGNORING PROTECT STATUS) DURING STATIC STATUS CH~CK.
• DISPLAY SAME AS FOR ERRO? GOD~ 07.
.. 20-ALARH INTERRUPT DID NOT OCCUR WHEN HRITING OFF THE END
... OF DISK PACK
• DISPLAY SAME AS FOR EPROR CODE 1&.
... 21~NO INTERRUPT OCCURRED WHEN END OF OPERATION OR READY,
... NOT BUSY INTERRUPT WAS SELECTED •
... A=SELECTEO INTERRUPTS (SEE fRROR CODE 03)
.. Q=OIRECTOR STATUS
.. A=CONTENTS OF A UFDN LAST OUTPUT FROM A
• Q=GONTENTS OF Q UPON LAST OUTPUT FROM A
... 22-NOT USED
.. 23-NOT USED
.. 24-ALARH STATUS BIT SfT, NO ALARH CONDITIONS.
... DISPLAY SAHE AS FOR ERRO~ CODE 06.
.. 25-NO COMPARE STATUS NOT SET AFTER ATTEHPT!NG TO FORCE
... NO COMPARE STATUS
... A=OIREGTOR STATUS
".Q=ADORF.SS REGISTER STATUS
• 26-FIRST UNIT WENT TO INCORReCT ADDRESS OU~ING OVERLAP SEEK.
• A-fJADD
• Q=DIRECTOR STATUS
• A=LOAOED ADDRESS
... Q=ADDRESS REGISTER STATUS
.·Z7-SECONO UNIT WENT TO INCORRECT ADDRESS DURING OVERLAP
... SEEK.
.. DISPLAY SAME AS FOR ERROR CODE 26
02,.9
0250
0251
0252
0253
0254
0255
·0256··
0257
02;6
0259
0260
0261
.0262
0263
0264
0265
0266
0267
0268
0269
0270
0271
0272
0273
0274
0275
0276
0277
0276
0279
.. 0280.
0281
0282
.. 28
0263
0284
.y.
...
...
...
•
..
•
TH~OUGH
2F-NOT USED
3C-ADDRESS UPON COMPLETION OF A READ, .WRIT~, COMPARE OR
CHECKHORO CHECK OPERATION IS NOT EQUAL TO THE EXPECTED
ADDRESS
A;CONTENTS OF Q UPON LAST OUTPUT FROM A (OTHER THAN
CLEAR INTERRUPT FUNCTION)
.y. Q=DIRECTOR STATUS
.. A=AOORESS REGISTER STATUS
.. Q=EXPECTEn ADDRESS
... Jl-RECOVERABLE ERROR OCCUP,REO DURING CHECKHORn CHECK (SECTION
0285
0286
0287
0288
0289
0290
0291
0292
0293
0294
f)02208ilO
F
o o
Go
00242
00243
00244
00245
00246
002lt7
00248
0021t9
00250
00251
00252
00253
00254
00255
00256
00257
00258
00259
00260
00261
00262
00263
00264' .
00265
00266
00267
00268
00269
00270
00271
. 00272
00273
0027,.
00275
00276
00277
00278
00279
00280
00281
00282
00283
'0284
00265
00286
00287
00288
Ot)289
00290
00291
00292
00293
00294
PAGE
7
PAGE
DPI008
0295
0296
0297
•
0299
0300
0301
lS
0302
•
..
•
•
•
•
0303
0304
0305
0306
0307
0308
0309
0310
0311
0312
~
"
•
•
"
0313
"
0314
•
•
0315
031&
•
"
0317
60220800
,
I
DATEI U1/0417;
00295
00296
00297
13)
• A=ADORESS OF TRACK CAUSING ERROR.
• Q=OIRECTO~ STATUS WHEN LAST ERROR OCCURRED
" 32-NON~RECOVERA8LE ERROR OCCURRED DURING CHECKWORO CHECK
• (SECTION 13)
• DISPLAV, SAME AS FOR ERROR CODF. 31.
0298
(\,
8
00298
00299
00300
00301
33
00302
GHROUGH
3F-NOT USED
40-0PERATOR ERROR. INTE~RUPT LINE O~ EQUIPMENT ADDRESS
IN ERROR. TEST HUST BE RELOADED.
A= SELECTED F.QU1PHENT ADDRESS.
O=SELECTEO INTERRUPT LINE (IF ANY)
41 - EXT REJECT ON INPUT TO A
A=BADO
Q=EQUIP AOOR
A=CONTENTS OF A (LAST OUTPUT'
Q=CONTENTS OF Q CLAST OUTPUT)
42 - EXT REJECT ON OUTPUT FROH A
A=STATUS
n= EQUIP ADDR
A=LAST FUNCT CONTENTS OF A
O=LAST FUNCT CONTENTS OF Q
00303
0030,.
00305
00306
00307
00308
00389
00310
00311
00312
00313
00314
0031S
00316
00317
PAGE
F
!\
'\
)
( \)
'.
(j
8
I
(\
\
J
''--.../
00
()
o
()
DP1008
PAGE
0320 PODOO 180e
0321 POOO1 4450
POOO2
POOO;)
0322POOO4
0323 POOOS
0324 POOO6
0325
0326 POD07
0327 poooa
0328 POO09
0329 PODOA
PODoa
OP1008
,",Hp·
o
(
9
co
DATEI 01/04175
START
ALF
~hnp1008
AOC
PIO
BEGIN
$401
00320
00321
l130
3038
0080 P PARAOR
DOOA P RETURN
fQADOR
0401
Aoe
NUH
f.
0000
0008
0006
5800
D97A
60220800
F
ALAR:1
ENOOPER
BEGIN
NUH
NUH
NU:i
RTJ
o o o
()
\,J
0
8
8
INIALIZE
CONTROL RETURNED HERE
xxxx :
CONT~OLLER,EQUIPHENT
NUHB
ALA PM INTERRUPT LINE
END OF OPfRATION INTERRUPT LINE
180? IS STORED HERE FROH INIT.
00322
00323
00324
00325
00326
00327
00328
00329
PAGE
9
OP1008
PAGE
0331 POOOC S87A
0332 POOOO COOO
POOOE 0985
0333 POOOF £l80D
POO10 0914
0334 PODll coon
POOt2 0924
0335 P0013 &800
POOt4 D8AF
0336 POOlS CoOO
POO16 01.:)2"
0337 POO17 6800
POO18 01FA
0338 P0011.:) C8DD
POO1A 0076
0331.:) POO10 E8EA
03'+0 POD1C 5404
0341 P0010 ODES
03'+2 POOlE C870
03'+3 POO1F ADOO
.P0020 lFFF
03'+" POO2t 6800
POO22 QOA4
OJ45 P0023 C078
03'+6 POl)24 A86A
0347 P002S DF4 ..
03'+8 POO2G 8073
03'+9 P0027 6800
P0028 0088
0350 P0029 E806
0351 POO2A 0006
. 0352 POO2A .. 1\00
POO2C 0408
0353 POO20 4800
P002E 0661.:)
0354 POO2F OCOO
0355 POO30 C80a
P003t 001.:)5
0356 P(J032 A26B
0357 POO33 0117
0358 P0034 0001
03;9 POOJS 4832
0360 POOl6 OOF2
0361 POOJ7 0151
0362 P0038 1810
0363 P003Q f82E
0364 POO3A 18F5
0365 POOlB C6DO
P003C 008A
0366 POO30 B26B
0361 P003E 6800
PD03F OOR7
0368 POO .. O CAiA
602201'00
()
START
OATEa
10
(j
1/04175
00331
RTJ'"
LOA
PARAH
=XI8UFFE.RfoQ&
CHECK PARAHET'.:RS
STA
IBllFFER-l
00333
LOA
=XOBlJFFFR+9&
00334
STA
OBUFFER-1
00335
LOA
-=XIBUFFF R-l
00336
STA
T3+1
00337
LOA
ALH
00338
LOQ·
RTJAoe
LOA'"
AND
EQAOOR
(REQ!NTl
INTPP.OC
UNl TSECT
=Nt1FFF
00331.:)
00340
00341
0031t2
0031t3
STA
SEC TOTS
SECTIONS TO TEST
LOAAND·
CONSTH3
UHITSECT
CHECK FOR UNIT NUMeER
00332
P
P
P
REPEAT
PREP
0031t5
0031t6
00347
003 .. 8
00349
ARS
It
AOD-
CONST+8
"STA
UNIT
LOQ·
INQ
STQ
6
SEC4Z
00350
00351
00352
STQ
SEC6Z
00353
0
SEC TOTS
00354
00355
00156
00357
00358
00351.:)
LOA
CONST,Q
TAG2-·-1
1
Q
-13
1
TAG3
Q
LOOK
SECTOTS
EOR.STA
CONST,Q
SfCTOTC)
LOr."
T~STH,Q
NEXTSECT ENQ
LOOK
LOA
ANI)SAN
INO
STO·
INQ
SQN
JHP"
LOQ"
Jl'1p.
TAG2
00344
NEXTSECT
00360
ALL SECTIONS HAVE EEEN CHECKED
CLEAR SECTION BIT
0036t
00362
00363
0036'+
00365
00366
00367
00368
PAGE
F
r-----'
'\
I --~,
}
(
"
.--,
;
\
() (j
10
(\
.
)
C)
-C) 0
0 0 0 0 0 (J 0
DP1008
0369
0370
0371
0372
0373
0371t
037S
0316
0377
0378
0379
.0380
0381
0382
0383
0384
0385
0386
0387
0388
0389
0390
0391
0392
0393
0391t
039S
~,"
0396
0397
.0.3.98
POOlt!
POOltZ
POOltJ
POOlt4
POOltS
POOlt6
P0041
POOlt8
POIlIt,)
PAGE
6818
0001
OFA8
It821t
OAOO
£JOFF
1C12
It820
D80F
E80E
DADe
S800
OlSC
OAltO
S406
180lt
ceoo
0206
5lt03
e075
5406
TAG3
P004A
POO4B
P004C
POO4D
POOltE
PDOltF
P0050
PODS!
POOSZ
POOS3
POOS4
F005S
POOS6 1885
P0058
PDDS9
POOSA
POOS8
POOSC
POOSO
POOSE
POOSF
P0060
POO61
POO62
POO63
POO64
POO6S
P0066
POO67
pono8
Olt62
Olt<10
04A3
04FA
OS43
0677
0726
D77F
078S
0780
0781
080e
0871
0000
.0000
60.220800
0
0 0 0 0
DATEI 01/04175
11
STA'"
INQ
QLS
STQ·
ENA
STAJHp·
STQ·
RAO·
lOa'"
ENA
RTJ
TEST
1
(TESTa
SECTION
PASSCT
PAsscr
tiC
STOP
ENA
RTJJMP·
LOA
tltO
(JUMP)
TAG4
BIAS
8
SECTION
0
t
RTJLOARTJ-
1=0
GO 00 TEST SECTION
CHECK FOR END OF TEST STOP
CHECK FOR R~PEAl TEST
REPEAT TEST
(EXIT)
00369
00370
D0371
00372
00373
00371t
00375
00316
00317
OD378
00379
00380
00381
00382
00383
00384
AOC
SEC11,SEC12
00395
Anc
,NUH
SEC13
Q
SECIION.
~NUH
00396
00397
00398
PAsser
TEST
0000
0
SEC1tSEC2tSEC3,SEC~,SECS,SEC6,SEC7,SEC8,SEC9,SEC10
•
•
Doon
() 0
00389
00386
00387
00388
00389
00390
00391
08392
00393.
00391t
TAG4 -
POOS7 18C1
(~-~)
P
JMp·
CONST+10 .
(JUHP)
START
JMP·.
REPEAT
NUH
NUH
Aoe
0
CHECK FOR REPEAT PARAMETERS
REPEAT TEST GOING THROUGH
PARAMETER STOP.
REPEAT TEST NOT THROUGH
PARAMETER STOP.
0
.
P
P
P
P
p
P
P
P
P
P
P
P
F
a
a
SECTION PRESENTLY . eEING RUN
PAGE
11
c
C'
I
DP1008
.
-
0400 P0069 0000
0401 P006A OA10
0402 POO6B-5"06
0403 POD6C lCFC
0404 P0060 C075
Olt05 POOGE 5lt06
0406 P006F 5817
0407 P0070 0855
Olt08 'P0011 C854·
0409 P0072 0102
0410 P0073 08FS
·0411 POQ·74 1CF4
0412 P0075 DADA
0413 PQQ76 oeoo
0414 P0077 5800
P007S 0291
0415 P0079 OA20
·0416 P007A ·5406
0417 P007B 1809
0418 P007C C658
·0419 P0070 01050420 P007E C800
P007F 0053
0421·P0080 Slt05
0422 P0081 OADO
0.. 23 P0082 6852
·OltZ"P0083 t8AB
0425 POf)84 08E4
0426 POG8S 18EO
POO86
P0067
P0088
P0089
POO8A
·--·-0432 POQ8 B
0433 POO8C
043 ..
·_··0435 P008D
0436 POOSE
0"37
. ~Olt38
0439
0440
0428
0429
._- ···0430
0431
FINSECT
FIN3
FIN2
FIN 1
.....
-
DATEI 01/04175
12
NUH
EHA
RTJJf1PLOARTJRTJ- .
RAOLOASAZ
RAOJMPENA
$10
(JUMP)
(FINSECn
CONST+l0
(JUMP}
PARAf1
SECTPASS
SECTPASS
2
FINSE'eT
(FINSECn
CHECK PARAMETERS
$A
ENQ
BIT 8 IS SET TO CLEAR ERROR BIT
00406
00lt01.
00it08
00"0'9
0041'0
00411
00412
0
RT.J
STOP
STOP .AT END OF SECTION
00414
ENA
RTJJMPLOASAZ
LOA
$20
(JUMP)
FIN1
REQF
CHECK
FIN2- Wl -l
REQ5A
RTJENA
STA·
JHP·
RAOJMp·
PARMi
0000
C043
683F'·
.
C800
029E
5,.02
1806
0080 P
0821 -. PIo
109F
UNITSECT
60220800
n
PAGE
0
(CLRNO)
a
REQF
NEXTSECT
, F'INSECT
FINJ
NUM
LOASTAw. -"
LOA
STJP
REQUEST
BIAS
RTJJHp·
(STOPX)
PARSET
ORG
NUM
NUI1
0
FINISH SECTION SUB-ROUTINE
REPEAT CONDITION MASK
EXIT,REPEAT LAST CONDITION
. ooltas
A'a GO
no NEXT PASS OF SECTION
00 ..13
00lt15
00416
001t17
00lti8
00lt19
00420
REQUEST FLAG
NEXT SECTION IF CLEAR
INTER~UPT
CLEAR INTERRUPT
00421
00'"22
CLEAR INTERRUPT REQUEST fLAG
GO TO NEXT SECTION
GO REPEAT SECTION
00423
0042 ..
00 .. 25
00426
CHECK PARAMETERS
00428
00429
00430
00431
. 00432
00433
..
$821
$109F
00lt34
=
STANDARD RUN
SECTIONS 1, .2, 38, 13, ANO 9 IF HORE THAN' 4K Of
AVAILARLE •
UNITS AVAILABLE ANO SECTIONS
SELECTED.
10435
00436
.00431
00438
00439
00 .... 0
PAGE
F'
n n n
00 .. 00
01401
00 .. 02
00403
001t04
n
()
n n
12
If\.,
\
)
("1
/
o o o o .c) o o o o
PAGE
OP100S
•
•
. •..
•
.•
O~'8
'. O-4lt9···
~458 .~008~
BIT 15=0 853
00"1
BIT 15~1 85 ..
00442
00 .... 3 .
BIT ·13=1 UNIT 1·
BIT 13= 0 UNIT·O
00 ......
Blf 12= SECT. 13
DO .... '
.0
.... 6.
BIT 11= SECT. 12
00
.... 7
BIT 10= SECT. 11·
oa.... 8
BIT 9= SEcr. 10
BIT 8= SECT. 9
Q'~"9
BIT 7= SECT. 8
00450
eIT 6= SECT. 7
OOitSl
OD ..52 .
BIT 5= SECT. 6
BIT 4= SECT. 5
OO~53
aIT 3= SECT. .. ·00lt5,.
eIT 2= SECT. 3· aOlt55
00456
'BIT 1= SECT. 2
00457
BIT 0: SECT. 1
I
•
•
..
..
•
..
..
•
RANGE
2863
•
0460
•
NUH
$2863
....... -.............: ..
0462
•
0463
..
.-. _ .0464.POJl900008 .. AUt.
NUH
NUH
O~65 P0091 0008
AL"1
0466 P0092 C8l5
PARSET
LOA·
.. · ..44-67· PJlO~l·A06S.···
.
ANOSAN
0468 P0094 011B
0469 P0095 C8C2
LOA·
.... 0470· P0090 0109
SAZ
0471 .P0091 C8F6
LOA·
AND0472 P0098 A07l
SAN
G473 P0099- 0116·
LOA·
0474 P009A C8F3
LDQ
0475 POD90 E800
POO.9C. D825
QLS
0476P009D OFA8
EAQ
0477'P009E 0874
STA· .
·0478·POG9F,6SEE
0479 POOAO C8EE
PARSIT
LOA"
ANO0480 POOAl A081
' ...... 0481 POQ.A2 6800 ..
STA '.
POOl3 0186
LOA0482POOA4 C8EA
..-.:-:., OftS3-POO-A5 ,AG82
.' ANDALS
0484 POOA& DFC8
STA
0485 POOA7 6800
.. _..... ...
DATE' 01/04175
.•.
·0459
··OIt6~--··
o o o o o o o c
.•
0445
-0446...
0447
...•
13
()
..
•
O~~1
O~~2
.~43 -., . .
0~~4
0450
0451
0452· 0453
0454
·····0 ..65
0.. 56
0457
(
LOCATION =XXyy
XX= LOW ORDER CLYD.
yy ~ HIGH ORDER CYLINDER
HAX. NUH. OF CYLINERS
853 =6,. HEX.
854
8
8
8
RLOH
00~60
,.00,.62
""'S,
It,,.
00463
84
Oalt66
· 01,.67
00468
· 00469
OQ"'1.0
1'''11
10'*72
· 00 ..7.3
00474
00475
· 00,.76
8
RANGE
HFFOO
HEX
00459
00 ..65
REQUEST
CONST
\ PARSlT-·-l
PAsscr
PARSIT-· ..1
UNITSECT
CONST+8
'PARSIT-·-l
UNITSECT
BUFFLAG
A
UNITSECT··
RANGE
HOOFF
RHIGH
lice
00458
00477
00 ..78.
OOFF
011 .. 79
00lt80
.00 Ita 1
00 .. 82
FFOO
·00....,-·
DOlta ..
00"85
pnOAa.U42-.-
AlH
. 0486 POOA9 C8E6
0.87 POOAA 6800 -
LOA·
STA
ENDOPER
0488 POOAC 7800
SPA
ALARM
'.' ... ..:~:':".-~ ·..p004B-.Ff.50 ...
OOltS6
.00 .. S7
;
00488
POOAO Ff'SA
6022D800
F
PAGE
13
DP1008
PAGE
0489 POOAE 0101
0.. 90 POOAF 1807
Olt91 paDRO ceoo
POOSl FF54
0492 POOB2 0103
0493 POOS3 A06B
049 .. POOB4 0101
0 ..95 PODS!) lCOO
·0496 POGB6 C800
PODB7 FF4E
0497 pooe8 E800
POOB9 FF4.E
0498 POOBA 6800
PODBB 0261
0.. 99 POGee 4800
pooeD 0260
0500 P008E OA10
0501 POOBF De40
0502 POOCO 5800
POOCl 0248
0503 POOC2 1801
0504 PODeJ 0000
0505 pooe4 18FE
SAZ
60220800
n n
()
00,.89
00490
00491
PARS
LOA
PARS-·-l
PARSLY
EQAOOR
PARSLY
SAZ
ANOSAZ
JHP·
LOA
PARSLY-·-!
CONST·
PARSLY-·-1
(PARAH)
EQAODR
LOI)
ALARM
OOIt9?
STA
DATA!
00498
STQ
DATA2
00499
ENA
ENQ
RTJ
S10
JHp·
SLS
JHP"
PARSLEY
JHp·
PARSLEY
INTE~RUPT
LINE tN ERROR
EQU IPHENT ADDRESS IN
E~ROR
EQUIPMENT ADDRESS INERROR
00492
00lt93
OOltg ..
00,.95
00,.96
INTERRUPT LINE OR EQUIPMENT
ADDRESS IN ERROR
00500
00501
00502
PARSLEY
TEST MUST BE RELOADED
00503
00504
00505
o
o
NUMBER OF PASS tEFTCNEGATIVE)
$40
STOP
SECTPASS NUH
SEC10TTS NUH
0507 pooes 0000
0508 pooe6 0000
OATEI 01/04175
14
00507
00508
PAGE
F
n
()
(~
)
/
/')
J
(j
(j
(j
14
n n n n
/\
f)
-'...J
c)
0 0 0 C) 0 0 0 0
OP1008
0511
0512
0513
0514
0515
0516
0517
0518
0519
0520
0521
0522
0523
0524
0525
PAGE
.....
REQU::ST
PDOe7 0000
pooca
PODC9
POOCA
POOCB
PODce
PODCO
PODCE
POOCF
POODO
PODD1
POOO2
POD03
POOD4
48U
C808
0101
1CFB
C800
FF3A
£800
FFJ6.
0604
5404
ODES P REQ5A
1CF3
REQF
0000
0527 POOOS 0000
D528 POD06 E800
PODD7 0249
D52CJ POOOS OAOO
0530 POOO9 6808
0531 POOOA C808
0532 poooa OFC2
0533 poooe 8807
0534 poaoo 6800
PODDE 023F
·0535 POOOF 5800
PODEll OOOF
0536 POOE1 1CF3
0537 POOE2 0000
0538 POOEl 0000
053CJ POOE4 0000
60220800
NUH
REQ4
REQF
1
(REQUEST)
ALARM
INTERRUPT LINE
LOQ
EQADOR
EQUIPHENT ADDRESS
00520
RAO·
RTJAOC
JHP·
NUH
REQF
SET INTERRUPT REQUEST FLAG
(RF.QNQ)
INTPROC'
BIAS
(REQUEST)
0
INTERRUPT REQUEST FLAG
00521
00522
00523
O(}524
00525
0
EQUIPOIR
00527
00528
0
tNTSTAT
REO,.
00529
00530
EOR·
F
REQUEST INTERRUPT
QO = READY AND NOT BUSY
Q1 .: FNO OF OPERATION
Q2 :: ALARM
STQ"
LOA'"
SAl
JMP'"
LOA
ENA
STA·
LOA"
ALS
UNIT
INTSTAT
0 0 0 0 0 0 0
00511
00512
00513
0051 ..
00515
00516
00517
00518
00519
SELECT NUM
LOQ
RE Q4
)
OAT Ea () 1/04/75
15
.
(
0
.............
2
STA
UNIT
DATA?
RTJ
OUTPUT
JMp·
NUH
NUM
NUH
0
0
0
(SEL~en
••••••••••••••
00531
SET DIRECTOR FUNCTION BITS
SET UNIT SELECT CODE
00532
00533
00534
OUTPUT FUNC nON
00535
00536
00537
. 00538
OO!?39
PAGE
15
c)
r-'
~
C
DP1008
PAGE
0541 POGES 0000
0542 POOEo 4800
POOE7 0240
05 .. 3 POOE8 DADO
05 .. 4 POOE9 6844
0545 POOEA 6844
05 .. 6 POOEB 6844
0547 POOEC 6844
05 .. 8 PODED 684 ..
05 .. 9 PQOEE 6844
0550 POOEF 6844
0551 POOFO f800
POOF1 022F
0552 POOF2 0202
0553 POOF3 1805
0554 POOF4 1802
0555 POOF5 18FC
0556 POOF6 0837
0557 POOF7 OAFF
0558 POOF8 68EB
0559 PDOF9 6800
POOFA 0222
0560 POOFB OA02
0561 POOFC 0302
0562 POOFD 1804
0563 POOFE 1802'
0564 POOFF 18FC
0565 P0100 082E
0566 P0101 C82C
0567 PD102 0101
0568 P010J 1820
0569 P0104 C80D
0570 P0105 OF41
0571 P010n OFC4
0572 P0107 A8DC
0573 1'0108 011B
0574 P010e) C8D8
0575 P010A A06B
0576 P010B 0112
0577 P010e 0823
0578 P010D 1807
0579 P010E CSDS
0580 P010F BOOO
POll0 0009
0581·P0111 AOOO
P0112 OOOB
0582 POl13 681C
0583 POl14·C06D
0584 POllS A8CE
0585 P0116 0111
O.s86 POt17 0819
0587 POllS 0202
0588 P01l9 1805
60220800
n
()
n
,
)
INTPROC
~EQZZ
REaz
REQZA
REQZ9
REazx
REQZe
REaZI)
REQZI::
Rf:QZF
NUM
STQ
EXTVALUE
ENA
STA'"
STA.y.
STA·
STA.y.
STA¥
STA"
STA¥
LUQ
ERRZA
ERRlB .
ERRZr.
ERRZO
ERRZE
ERRZF
ERRZG
EQIJIPOIR
INP
JHP.y.
JHP.y.
J"'P"
RAO"
ENA
STA"
STA
REQZ-.y.-1
REaZB
REQZA
REQZZ
ERP.ZA
-0
INTSTAT
DATAi
ENA
OUT
JHP"
JHP.y.
JHP.y.
RAO·
LOA"
SAZ
JHP.y.
LOA·
2
REQZC-"-1
REQZE
REQZO
REQZX
·ERRZB
F.RRZA
REQZF·¥-l
REQ7
A~S
ALS
Mm"
REQ61
REQ6
~EalG
OATEI 01/04/75
16
SAN
LOA·
ANDSAN
RAO"
JMp·
LOA"
EOR
0
INTERRUPT PROCESSING ROUTINE
SAVE Q
0
R~a4
1
4
INTSTAT
REQ6· 1f ·1
REQ4
·CONST
REQ61-"-1
ERRZC
REQ6
INTSTAT
=H$OOOl:}
CLE'A~
005.. 3
0051t4
00Slt5
005 .. 6
005 .. 7
005 .. 8
005 .. 9
005$0
00551
ERROR FLAGS
E QU.IPHENT -DIRECTOR
INPUT STATUS
NO REJECT
LOOP IF EXTERNAL REJECT
SET FLAG IF INTERNAL ~EJECT
STATUS AFTER INTERRUPT
NO REJECT
LOOP IF EXTERNAL REJECT
SET FLAG IF INTERNAL REJECT
EXIT IF STATUS INPUT REJECT
DROP READY-NOT BUSY BrT
SHIFT REQUEST TO STATUS POSITION
JUMP IF SELECTED INTERRUPT OCCUR
CHECK FOR READY-HOT BUSY REQUEST
NON-SELECTED INTERRUPT OCCURRED
005&0
00561
00562
00563
0056 ..
00565
00566
00567
00568
00569
00570
00571
00972
00573
0057 ..
. 00575
00576
00577
00578
00579
EXPECT ON CYLINOER AND READY
00580
00S81·
=N$OOOB
BUSY SHOULD BECLfAR
STA"
LOAAND·
SAN
PAO'"
INP
JMP"
ERRZC
CONST+2
INTSTAT
REQZG-¥-!
NONZERO IF NOT READY OR BUSV
ERRZO
00952
00553
00554
00555
00556
00557
00558
00559
AND
REQZH-4-1
REQZJ
0051t1
005.. 2
CHECK FOR INTERPUPT BIT
FLAG ERROR IF Nor· SET
INPUT STATUS
NO REJECT
00582
. 00583
0058 ..
00585
00586
00587
OD588
PAGE
F
(\
/
()
()
16
(~
\
/
(~
,
/
(~
/
()
"~--.,/
() 0
0 () n 0 C) 0
,
OPI008
0589
0590
0591
0592
05Q3
0594
0595
0596
0597
0598
0599
0600
0601
0602
0603
0604
0605
0606
0607
0608
0609
0610
0611
0612
{'\
~-j
....
_
PAGE
P011A 1802
P011a 18FC
REOZH
P011C 0815
REQZ!
POUO DADO
POttE 6815
REOZJ
POI1F AOOO
P0120 0014
P0121 0101
PQ122 0810
P0123 COOO
RE07
P0124 012A P
P0125 6800
P0120 FEOE
P0127 E800
P0128 01FF
P0129 1CBS
P012A £8B9
REQ8
P012S D8A9
P012C lCA8
P0120 0000
ERRZI\
P012E 0000
ERRZB
P012F 0000
EPPze
POll0 0000
ERR.ZO
POll1 0000
!::Rf"ZE
P0132 0000
ER~ZF
P0133 000'0
ERRZG
If.
...
061~ P0134 0000
0615 P013S 5858
0616 P0130 6800
P0137 01E6
0617 P0138 S85C
0618 P0139 C853
0619 ·P013A .6800
P0130 01El
0620 PiJ13C AOGF
0621 P013D 0112
0622 P013E oelE
0623 P013F 5842
0624 P01~O C84C
0625 Pot4! B06B
0626 P014? ADOO
P0143 7FOl
60220800
~)
C) 0 C) 0 0 0 0
OATEI 01/04175
17
JHP'"
JHp·
RAO·
ENA
STA·
ANO
REOZI
REQZG
ERRZE
0
ERRZG
=N$34
SAl
LOA
REQ7-·-1
ERRZF
=XR.EQ8
STA
RETURN
00598
LOQ
EXTVALUf
00599
RAO·
SAVE STATUS
MAS~ INTERRUPT BITS
00589
00590
00591
00592
00593
00594-
••••••••••••••• alAS •••••••••••
00595
00596
00597
LOOP IF EXTERNAL REJECT
SET FLAG IF INT. REJECT
JHp·
CINTPROC)
GO TO MONIT OR TO EXIT INTP. STAT
INTSTAT
LOO·
INTERRUPT STATUS
SELECT
RAO·
JHp·
(SELECT)
NUH
0
NUM
0
NUM
0
NUH
0
NUH
0
NUH
0
NUM
0
THE' ROUTINE IS EXITED TO RP.TURN ADDRESS IF NO INTERRUPT IS
RECEIVED.
CONAlARM NUH
Ri.J·
STA
RTJ"
LOA·
STf4
ANOSAN
F
(
0
CHECK ALARM CONDITIONS
AORINP
DATA2
AOORESS REGIS TER STATUS
ST034
STATUS
DAlAl
LAST FUNCTION
CONST+~
END OF OPERATION STATUS
DIRECTOR STATUS
2
ENQ
$IE
R.TJ·
LOA·
EORANn
STP
STATUS
CaNST
=N$7FOl
END OF OPERATION NOT seT
00600
00601
00602
00603
00604
00605
00606
00607
00608
00609
00610
00611
00&12
00614
00&15
00616
00617
00618
00619
00620
00621
00622
. 00623
0062400625
00626
PAGE
17
c) c\
('
OP1008
0621
0628
0629
0630
0631
0632
0633
0634
. 06·35
P0144
P0145
P0146
P0147
P0148
P0149
P014A
P014B
P014C
P0140
P01ltE
P014F
P01S0
POlS1
P0152
PAGE
0111
OA20
A846
0111
1CEB
oe24
5831
lCE8
ADOO
1COD
682B
OA20
A83C
0112
OC10
CONGl
CON02
0636
0631
0638
0639
0640
0641
0642
0643 P015J, 582E
CONO
0644 P01S4 C838
0645 P015S 6831
O£46'P01565624 .
0647 P0151 1803
0648 P01S8 oeOF
0649 P0159 5828
CONi
0650 P015A 5820
0651 P015B 180j
06S2 POiSC ae09
0653 P01S0 5824
CON2
0654 POiSE; 581C
065~ POi5F 1803
.0656 P0160 DeOA
'0651 P0161 5820
CON3
0658 P0162 5818
0659 P016J 1803
0660 P0164 DCOB
06&1 POi65 581C
0662 P0166 5814· CON4
0663 P0167 1803
,066,. P016e oeoe
0665 P0169 5818
0666 P016A 5810
CONS
G661·P016B 1603
0668 P016C oeOD
0669 P0160 581"
0670 P016e:-- 580e
CON6
0671 P016F 1803
0672 P0170 oeOE
.. ·0613· PO!71 5810
067 ... P0172 C814
CON7
0675 P011J UFCS
···067&P0174·012l
0671 P011S 1eBE
CON8
0618 P011G OC06
60220800
i~/
() ()
....
OATEI 01.104/'15
16
SAN
ENA
AND·
SAN
JHP"
ENQ
RTJW.
JHP"
AND
CON02.-·-1
S20
NO ALARM CONDITIONS
STATUS
CON01-·-1
(CONALARM)
ALARM BIT NOT SET, EXIT
ALARM BIT SET, NO ALARM CONDITIONS
$24
STP
CCONALARH)
=N!lCQO
00627
00628
00629
00630
00631
00632
006:S3
00634
00635
STA·
ENA
ANO"
SAN
ENQ
ALFLAG
$20
STATUS
CONO-"-1
$10
RTJ·
LOA"
STA"
RTJ"
JHP'"
ENQ
RTJ'"
RTJ"
STP
STATUS
TEMP
eONCHECl(
CON1
$F
STP
CONCHECK
CON2
'3
, STP
CONCHECI(
CON3 I
00636
00637
00638
00639
00640
00641
00642
00643
006.. 4
00645
00646
006 ..7
006,.8
096.. 9
00650
00651
JMP'" .
ENQ
RTJ'"
RTJ"
JHP"
ENQ
R1J·
RTJ·
JHp·
ENQ
RTJ"
RTJ"
Jt1p.
ENQ
RTJ·
RTJ"
JHP'"
ENQ
RTJ'"
RTJ·
JHP·
FNQ
RTJ"
LOA·
ALS
SAP
JMP'"
ENQ
$A
STP
CONCHECI(
CON4
$B
STP
CONCHECK
CONS
SC
STP
ERROR NUMBER, AN ALA~H CONDITION
WAS PRESENT BUT THE ALARH BIT
WAS NOT SET •
PRO'TECT FAULT
STORAGE PARITY fRROR
DEFECTI VE TRACI(
ADDRESS ERROR
00662
00663
0066 ..
00665
00666
' 00667 ,
00668
00669
00670
00671
00672
00673
00614
·00675
00676
00671
00618
SEEK ERROR
CONCHECI(
. CON6
$0
STP
eONCHECK
CON7
$E
S1P
TEMP
LOST 01. TA
CHECKWORD ERROR
8
CON8-·-1
CCONI\LARM)
6
00652
00653
00654
00655
00656
00657
00658
00659
00660
00661
NOT READY
PAGE
F
(\
'..
/
()
\
/
18
(~
/
r) C) 0 0 C) 0 0 0 0 0
OP10D8
PAGE
0619 P0117 S80A
0680 P0178 lCBB
'., - .. 0682. ·P011·9 ,0000
0683
. 0684
0685
0686
.0687
0688
0689
P017A
P017B
P017C
P0170
P017E
P017F
P0180
0691 P018l
0692 POlfS2
0693.P0163
POt84
0694 P0185
.. 0695. P0180.
0000
caoa
OfCl
6809
0121
08FA
lCF9
CONCHECK NUH
LOA"
ALS
STA"
STP
TEMP
0697 P0187 DODO
..INPUT
....
...069.8
0699
0700
.. - .070.1. P-0188 E800
P0189 0191
0702 P018A 5812
F
1t,}
)
0
()
C) c) 0 0 0
C) C)
OATEI 01/04/75
STP
CCONALARH.
00679
00680
0
00681
0
00683
TEMP
0068 ..
1
00685
· 00686
· 00687
00688
RAO·
Jf1p.
TEMP
1
CONCHECK
(CONCHECK)
NU!-!
ENA
RTJ
0
$20
STOP
00691
JHP'"
NUH
(STP)
0
00694
00695
NUH
0
lOQ
EQUIPDIP.
RTJ"
INP
SAP
0000
OA20
5800
0185
lCFB
0000
60220800
.ALFLAG
RTJ"
JHP"
NUM
c
00689
00692
00693
INPUT STATUS
ERROR TYPF. OUT HILL HAVE THE
EQUIPMENT ADDRESS IN DATAl
AND THE STATUS IN DATA2
,'.
00697
00698
' 00699
· 00100
·00701
00702
PAGE
19
c:'
OPtOCS
PAGt
0703 P0188 lCFB
0704 P018C 0000
0706 P018D
0707 P018E
P018F
0708 POlt;)O
0709 P0191
071C P0192
0711 P0193
STATUS
0000
AORI~~P
Eeoo
0192
S80C
1CFB
0000
0000
LPl
Ee1
5T034
0713 POl94 0000
0714 P01QS C828
0715 P0196 6800
P01Q7 0187
0716 P0198 E826
0717 P0199 4600
POlt;)A 01815
0718 P019B lCF8
07tQ P019C 0000
0720 P0190 4800
P019E 017F
0721 POlt;)F 0644
0722 P01AO 68F1
0723
0724 POlA1 0208
0725 P01A2 OFAF
0726 P01A3 0162
0727 P01A4 66E7
0728 P01A5 lCF&
0729 P01A& 6800
P01A7 0182
0730 P01A8 1CF3
0131 P01AQ 1804
0732 P01AA OC41
£,0220800
n
(\
,
/
INP
...
20
DATn 01/04175
(INPUT)
o
HUH
lOQ
EQU1PAnR
Oll707
RTJ.f.
JHP·
NUH
NUH
INP
(AORINP)
0
00708
00709
00710
00711
DIRECTOR OR ADDRESS STATUS
00706
0
0
a
FUNCA
OATA3
CONff:NTS OF A AT LAST OUTPUT
00713
0071 ..
00715
LOQ·
STQ
FUNCQ
CONTENTS OF Q AT LAST OUTPUT
DATA4
00716
00111
JHP·
NUH
STQ
(ST034)
0
DATA2
00718
Da7tt;)
90720
CLR
STA·
A
LPl
INP
QLS
SQP
STA·
JMP·
STA
11-·-1
15
JMP"
JHP'"
(INP)
13
E~Q
Z41
NUM
LOA·
STA
00721
00722
00723
00724
. 00725
00726
00727
00728
. OQ729
ROUTINE IS ENTERED.
12
It
00703
00704
JHP·
NUM
2
STATUS
CINP)
INAOR
SAVE STATUS
00130
00731
00732
INTERNAL REJECT (P+OELTA)
EXT R€JFCr (P+1+DElTA) INPUT
PAGE
F
n
.
/
(j
(~
..
I
20
() () n
\
(-"
/
/
f)
\.
'--
./
C) 0 e) 0 0 0 0
DP1008
0733
0734
0735
0736
0737
P01AB
P01AC
P01AD
P01AE
P01AF
P01BO
0738 P01Bl
P01BZ
0739 PD1Bl
0740 POlBIt
0741 P01BS
0742 P01Bo
POlB7
0743 P01B8
,P01B9
0744 P01BA
0745 POlBB
0746 POlse
P01BD
POiSE
POlBF
P01CO
P01Cl
P01C2
P01C3
0754 P01C4
P01C5
0755 P01C6
. Q756P01C7
0757 P01C6
0158 P01Cc]
0759 P01CA
0760 P01CB
0761 P01CC
·0762 P01CO
0763 P01CE
0764 P01CF
0765 P0100
.0766 POlol
0767 P0102
.0768 P01Dl
0769 P0104
0770 P010S
P010G
0748
074c]
0750
0751
0752
0753
C)
PAGE
Lt8F.7
1803
OCOl .
0000
0000
0000
68FC
46FC
4800
01SC
6800
01Sc]
08ltLt
68FJ
C6F4
0302
1CF4
1808
DCLt2
.. 8EE
08EC
C6EB
B081
0103
1810
DeD2
Lt8E7
5800
)
-'
c)
0
(~)
r-,
\_j
I'
"')
•
e)
SAVE
CODE FOR EXT REJ
00733
00734
00735
00736
00737
DATAl
00738
RTJ·
ENA
LDQ.·.
RTJ
STD3Lt
$20
ECl
STOP·
00739
. 007.. 0
007 .. 1
00742
IS
LOQ
DATA::.'
007lt3
lP?
EC2
JHp·
NUH
NUM
12
0
0
00744
00745
00746
NUH
NUH
NUH
STA·
STa·
STQ
0
0
D
FUNCA
FUNCQ
OATA4
00748
007 .. 9
00750
00751
00752
00153
STA
DATA3
00754
CLR
STA·
LOA"
OUT
Jt1p·
JHP·
A
LP2
FUNCA
01-·-1
(oUTPUT)
OJ
$42
EC2
00755
00756
00157
00758
00759
00760
0.0761
00762
00763
0076 ..
00765
00766
.00767
0076.8
00769
00770
FUNCA
FUNCQ
OUTPUT
O~
01
ENO.
5TO·
RAO"
LOA·
03
04
EORSAZ
JMp·
ENO
STQ·
RTJ
n
"'-/
DATEI Ot/OLt/75
21
STl\
13
0164
18E6
0000
0000
"
EC1
14
1
EC1
=N$BAOO
tit
BADO
6800
016A
58EO
OAZO
E8DD
5800
0152
E800
---/
(
STO·
JHP·
ENQ
STQ·
LOA
48ELt
CODA
(';
STORE
~RR
ER~
CODE FOR INT. REJ
GET APPROPRIATE ERR CODE
OUTPUT FUNCTIONS ENTER WITH
FUNCTION, CONTENTS OF A
FUNCTION, CONTENTS OF Q
LP2
EXIT
INTERNAL REJECT (P+OELTA)
EXT REJ (P+1+0ElTA) OUTPUT
STORE ERR CODE FOR EXT REJ
INCREMENT RETRY COUNTER
LPi?
HOOFF
04-·-1
OS
TIME OUT (25& ATTEMPTS)
TIMED OUT GO REPORT ERROR
RETRY AGAIN
2 .
EC2
INPUT
STORE ERR CODE FOR INT. REJ
FFBO
60220800
F
PAGE
21
e)
()
(-,
\,.-
PAGE
DP10na
0771 P01D7 5885
- 0772 P01D6 6800
P01D9 0144
0773 P010A ceOD
P010e FFBO
0774 POiDC 6800
P010D D13F
0715 P01DE OA20
0716 P010F E80C
0777 POlED 56DO
PD1El 0128
0778 P01E2 E800
P01El 013C .
0779 P01E4 C800
P01E5 0139
0780 P01E6 18E2
0782-P01E1
0183 P01Ea
0784 P01E9
P01EA
0785 POlES
0786 P01EC
0787 palEO
P01EE
0788 P01EF
PD1FO
0789 PD1Fl
0790 P01F2
0791 P01F3
0792
0793 P01F4
P01F5
079,. P01F6
0795 P01F7
f\.
\
J
RTJ·
STA
ADRtNP
DATA2
00771
00n2
LOA
STATUS
00173
STA
DATAl
- 00774
ENA
LDQ·
RTJ
Ee2
STOP
LOQ
DATA4
00778
LOA
OATA3
00779
JHp·
02
00180
BUSYPR!::S NUH
RTJ·
STA
0000
589E
6800
0132
AOoC
0119
ceoo
0138
6800
0120
58A2
DA20
OC08
..
5800
0114
5869
lCEF
60220ROO
as
BUSY1
DATEI 01/04175
22
80775
00776
$20
0
. INPUT
DATAl
00777
GO TO FRROR STOP ROUTINE
00782·
CHECI( FOR THE P~ESENTS OF BUSY.
STATUS
00783
00184
00785
00786
00787
CHECK FOR PRESENTS OF BUSY
ANOSAN
LOA
CONST+1
eUSY1-"-1
INADR
STA
OATA2
00788
RTJ"
ENA
ST034
$20
ENQ
8
RTJ
STOP
00789
00790
00791
00792
00793
RTJ·
JHP"
RETCONT
(BUSYPRESl
NUMBER, BUSY NOT
AFTER AN 1/0 OPERATION
ERRO~
RETURN CONTROL TO
P~ESENT
- 00794
00795
"ONITO~
EXIT
F
PAGE
()
22
I
••
')
()
'\/
r,)
.
'-
~
c)
c;
0 0 0 0
0 0 0
PAGE
DP1008
_._ ........
_--
.... .. -"
- ..
0197 P01F8 00.00
019& P01F9 68ED
,.,
,
--~'-
..
-
.'
o o c'
NUH
RTJ
00797
00798
tl .
-401~9
INTSTAT
00800
.00801
00502
. 00803
BUSYPRES
OUTPUT
RETCONT
INTSTAT
0080 ..
.. 00885
2
. CIOBU-FFER).
INPUT
AND-
JHP·
00806
INTERRUPT OCCURRED TOO SOON
REQ8
JHp·.:
WAIT
o
.. 00801
00808
00809
GET STATUS
00810
CONST+1
00811
_: 0081.2
00813
1
....WAIT+1
(WAITl
t
.
~ - Oal5- .P.020E~ oooo:.: ....:.uaBUF...
0816 P02QF £80.0
P0210 0113,
.... 0817...P0211COOO .. T 3 .
..HUH
LOQ
LOA
P0212 092.. p"
=XIBUFFER-1 ..
0821.P021·S 0000
HUH
o
RTJ·
LIMIT
LOADADR
F
. SELECT.. R£AD. AHOINPUTBUFFER.
.1.a15.
00816
••••••••• -8IAS •••••••••• ~.......
00817 ..
00818
I08UFFER
.4HP.
. ···:-;"2~ . -. - .: ...-.' _.'. ,.. - -. -.... ~ ..... -......
0823
•
0824 P0216 5808
RT J'W'
o
EQ.READ
. . '0818 P0213 .·58E"·
·~:.• :·.O.a19. P021,.· ,1CF9 .... _. .
60220800.
o
eUSYPRES
JHP
0813 Po.20D lCF9
','
o
'0
.. SQZ
~0811 P020S'OlDl
SAl
~..:.- ~..a-i-2.·F420C--1aF.8 ~.--- .--.-. - ... ; ~MP. .
";.'
J
----
- - - .... -
_... -..08.05. P-~.2D.3 .. 014Z -.-."
, . " 0.806 palO',. '1800
. . ' P02o.S FF24
.~,. .;oaa7-~420o·:1CF1- ....... -_.. ..:
','"
')
DATEa 01/04/75
23
IOBUFFER NUH
STA·
... -' O~99 ·-potFA· ·OAOo. ....-.. ........... ENA .
STA
0800 P01FR 6"00.
P01FC FEE7
_... -..Qa01.P01F-P .C8E9..-.: ..
.LOA'
RTJ· .
0802'P01FE S8CO
RTJ
tea! POtFF 5800
... ,. . .... .. -PO 20. 0 OOSF . -.lDQ
0.80 .. PD2D1 E80D
P02D2 FEEl
0808 PQ207 00.00
0809 P0208 56un
_. _ ........ :._,llQ2,O 9. .FF..l.D.
O~10 P020~ A06C
(
........ .ne'1·1) .....
.. ··UNBUF) ......
LOAD ADDRESSiCHK. FOR PRESENTS
...... OF· BUSY,AND lURN CONTROL OVER
TO THE HONITOR
LIMIT CYLINDER NO. TO RANGE
·0'821
. D082~·
00823
0082 ..
PAGE
23
PAGF
OP1DOS
0825 P0217
P021S
0626 P0219
P021A
0827 P0218
G828· P021C
0829 P0210
0830 P021E
.. . 0831 P921f'
0832 P0220
P022!
0833 P0222
0834 P0223
0835 P0224
. 0836 PO'225
0837 PD226
0838 P0227
. 0839
0840 P0228
0841 P0221)
··0842··P022A
0843 P0228
0844 PD22C
0845 P0220
0846 P022E
081t7 P022F
··08Ita P02l0
0849
0850 P02l1
P0232
0851 P0233
·08S3·P0234
0854 P02lS
P0236
,c·o-a.S5-·.p02;J7
P02l6
0856 P0239
... pa2lA
0857 P02lB
P02l0
08S8·.pf}230
P023E
0859 P023F
P0240
caoo
06AC
E800
0107
58Al
5843
leF7
0000
DADO
E8DO
06A3
OFE8
6808
980&
0126
C8DJ
OFE8
)
(\
()
RHIGH
RLOW
AHIGH
LOl
00825
LOA
OBUFFE~
LOQ
EQUIPADR
EQUIPMENT ADDRESS
'HJ·
RTJ·
JHp·
NUH
ENA
LOQ
OUTPUT
RETCONT
(LOAOAOQ)
POSITION
LLS
STA·
SUB·
SAP
LOA·
LLS
8
AHIGH
PLOW
LO!·"·!
RHIGH
CHK. LON DR.DER
8
PUT HIGH RANGE AND LOWER
BITS INTO PACK ADDRESS
.JHP·
NUH
NUM
NUM
LOA·
LDZ
00827
00828
00829
00830
80831
00832
0
0
OBUFFER
PACK ADDRESS
0
0
SAP
LOA·
LLS
O~OER
HIGH ORDER RANGE OF CYL.
LOW ORDER RANGE OF CYL.
ADDRESS HIG ORDER
0
RHIGH
AHIGH
L03·"·1
RLOW
8
sua'"
. 0082&
00833
00834
00835
00836
00837
00838
00839
ooalto
00841
008'42
00843
008 .. 4
aos .. s
6800
0692
1CEA
LO?
STA
OBUFFER
008,.6
008-'7
ooa.. 8
008 .. 9
008SiJ
LOl
JHp·
(LIMIT)
00851
0000
5800
FF50
6800·
DOES
NOINfP
NUM
RT.J
o
INPUT
·00853
00854
STA
OATA2
00855
LOA
ALAPH
STA
OA1AJ
00857
LOA
REQ4
00858
STA
OATA4
00859
•
caoo
FOCO
6800
OOE2
C800
FEA3
6800
ODOF
(~~
('
,
'.
)
..
1809
0000
0000
0000
C8FC
98FD
0124
C8FA
OFE8
. 60220800
f~
LIMIT
DATES 01/04175
24
)
PUT LOH RANGE AND LOHER ORDER
BITS INTO PACK ADDRESS
00856
INTERRUPT LINE
PAGE
F
(\
\
)
"\
~\
\
()
()
24
o
o
(
OP1008
PAGF.
0860 P02lti OA20
0861 P0242 E800
P0243 FEAO
0862 P0244 lCEF
ENA
LOQ
0864 P02lt5 0000
0865
0866
0867. P02lt6 CaFE
0868 P024? 6800
P0248 ODED
0869 P0249 5800
P024A FE8A
0870
0871 P024B 1802
0872 P024C l8UC
0873 P0240 58C7·
0874 P024E 58E5
0875 P024F 0158
0876 P0250 5800
P0251 0094
0817 P0252 OC21
0878 P025J 5800
P0254 00B5
..ADRINTP
0860
0881
0882
0863
0884
0102
1806
4800
FF32
581E
5800
FED7
1800
602.20800
F
00862
LOA·
STA
LOAD ADDRESS WITH END OF OPERATION
AND ALARH INTPS. ·SELECTED. THEN
RE~ELECT THE INTPS FOP. THE 110
ADRnHP
ADDRESS
SET UP RfTURN ADDRESS
00864
00865
00866
00867
00868
RTJ
SELECT
SELECT ENO OF OPERATION AND
00869
ADR1
AOR2
LOAOADR
HOINTP
ADR2-·-1
STD21
ALA RH I NTPS.
JHP"
JHP'"
RTJ·
RTJ·
00870
00871
00872
00873
00874
00875
00876
RTJ
ENQ
RTJ
AOR.:i
oooa
CNOINTP)
SQN
ADR2
"------J
00860
00861
NUl.,
•
DATEt 01/'04/75
0
11-
AOR1
~
$20
INTSTAT
11-
0879 P0255 5800
P0256
P02S7
P0258
P025c)
PD25A
PD2513
P025C
P0250
P025E
25
C)
o o (\ c)
INTERRUPT OCCURRED
POSITION AND HAlT NOT BUSV
$21
·STOP
00877
00878
RTJ
RETSTAT
JMP·
STQ
ADR.3
STATUS
STATUS WHEN INTERRUPT OCCURRED
00881
RTJ·
RTJ
IECHK
CHECK FOR INTERRUPT ERRORS
CONALA~M
ooe82
00883
JHP
CHKA3
GO CHECK ADDRESS REGISTER STATUS
00884
00879
00880
PAGE
25
r-----,,--)
OP100S
PAGE
0886 P025F 0000
RETCONT
0887 PIl26D COOO
P0261 026S P
·0888 P0262 6800
P0263 FOAl
0869 P0264 5401
0890 P026S 5800
DEcrDE
P0266 FF20
0891 P0267 AO&C
0892 P0266 0101
0893 P0269 5401
CKCONT
0894 P026A 1CF.4
089& P026e
0897 P026C
PQ260
0898 P026E
P026F
089Q P0270
P0271
0900 P0272
P027J
0901 P0214
P02·75
0902
0903
0904
0905
0906
0907
0908
0909
0910
-0911
0912
0913
0914
0915
P0276
P0277
P0278
P0279
P027A
P0270
P027C
P0270
P027E
P027F
P0280
P0281
F£76
6800'
OOAE
caon
FE70
6800
OOA9
5800
FFIE
OA20
1CF3
0000
/
~!
f\
(~
5800
a08A
CBOO
FE62
P028~ 6800
P0283 0099
P02S4 E800
P0285 0098
P0286 4800
P02Bl 0098
P0268 C800
PD289 FF.A4
/
(1
/\
(
..IECHI(
C800
FEB2
0104
01\00
aGO!
60220800
/-~\
HESS
0000
caoo
i
If'
lEA
DIlTEI 01/04175
2"
NUM
LOA
=XOECIOE
a
Olt886
00887
STA
RETURN
00888
RTJ-
(CONT~OL)
RTJ
INPUT
ANURTJJfoiP·
CONST+1
CKCONT-"-1
(CONTROl)
CRETCONTJ
NUM
LOA
0
INTSTAT
00896
00897
STA
OATA2
00898
LOA
,REQ4
00899
STA
DATA!
00900
RTJ
S,T034
00901
ENA
JMp·
NUM
$20
(MESS)
CHECI< FOR ERRORS DURING
INTERRUPT PROCESSING
LOA
ERRZA
00902
00903
00904
00905
0090&
SAZ
ENI\
ENQ
RTJ
IEA--¥-t
1
STOP
INTERNAL REJECT OF STATUS INPUT
00907
00908
00909
G09!O
LOll
INTSTAT
STATUS AFTER INTERRUPT
00911'
STA
DATA!
00912
LOO
Eo.UIPDIR
OD913
STQ
DATA4
00914
LOA
ER~ZB
00915
S~Z
00889
GET STATUS
00890
. 00891
00892
00893
00894
EXIT
0
g
PAGE
F
,---.... ,
r
I
/
I)
1-"
\
,-
\
.-
"-.
fr",)
(~
\
)
(j C-j () .,
26
()
'/)
'
)
•
f'1
(-'1
.,.._ '"
.....
('-'.
,--_
...
c) n c)
'-'
C)
c~
0
OP100a
P,~GE
0916 P028A OlD A
0917 P028D OC02
0918 P028e 4800
P0280 0091
0919 PU28E C80D
P028F 009A
0920 P0290 6800
P0291 008C
0921 P0292 OA20
0922 P0293 5800
P0294 0075
0923 P0295 C80D
lEB
P0296 FE98
0924 P0297 E600
P029a FE49
0925 P0299 4800
P029A 0082
0926 P029B 0104
0927 P029C 58CE
0928 P0290 OC04
0929 P029E 5800
P029F 006A
0930 P02AO C800
lEC
P02Al FE8E
0931 P02A2 0104
0932 P02AJ 58Ct
0933 ,P02A4 oeOl
0934 P02A5 5800
P02A6 0063
0935 P02A7 caoo
lEO
P02A8 FE88
0936 P02A9 E800
P02AA 0076
0937 P02AB 4800
P02AC 0071
0938 P02AO 010A
0939 P02AE CODa
P02AF BADD
0940 P02BO &800
P02S1 006B
0941 P02B2 5800
P02B3 FE EO
0942 POlB4 OA20
0943 P02BS OCOl
,-0944 P02B6 5800 P02B7 0052
0945 POlB8 caOD
lEE
P02B9 FE18
0946 P02BA 010E
0947 PO,2BB C80D
POZBCFE27,
0948 POlBO 6800
POlBE 005E
60220800
C) 0
F
C)
27
(
'-
"
\
I
-'
C) CJ 0
()
n
"---../
~J
OATE! U1/04175
SAZ
ENQ
STQ
2
OATA3
00916
00917
00918
LOA
INAOI?
00919
STA
OATA2
Olf920
ENA
RTJ
$20
STOP
00921
00922
LOA
ERRZC
00923
LOQ
REQ4
00924
STQ
DATAl
00925
SAZ
R.TJ'"
ENQ
RTJ
IEC-·-1
MESS
'+
STOP
00926
00927
00928
00929
LOA
ERRZO
00930
SAZ
RTJ"
ENLI.
lEO-·-l
HESS
00931
00932
00933
00934
RTJ
n
(
'
~/'
IEB-~-1
3
,STOP
NON-SELECTEO INTERRUPT OCCURRED
INTERRUPT BIT NOT SET
LOA
ERRZE
00935
LOQ
E,QUIPOIR
00936
STQ
DATAl
00937
SAZ
LOA
IEE-·-1
=N$BAOO '
STA
DATAl
009"0
RTJ
5TD34
009"1
ENA
END
RT ..'
$20
1
STOP
LO~
ERRZF
00945
SAl
LOA
IEF-.f.-l
INTSTAT
009"6
D0947
STf\
DATAi
' 00938
00939
INT. REJECT OF STATUS INPUT
00942
00943
009 .. 4
' 00948
PAGE
27
c)
!~,
.'-----./'
(
\
r-
DP1008
PAGF.
0949 P02BF E800
POlCO FE72
.. '0950 P02Cl 4800
P02C2 0059
0951 P02C3 5800
P02C4 FECF0952 P02C5 OA20
0953 P02C6 oe05
. 0954 P02C7 5800
POlca 0041
IEF
0955 P02C9 lCAE
WRITE
0956 P02CA 0000
0957 P02ca 5800
P02CC FF78
0958 P02CO 5800
P02CE 0524
0959 P02CF 5800
P0200 FE04
0960 P0201·1802
0961 P02D2 180C
-0962 P0203 5800 . WRT1·
P0204 009E
0963 P0205 5800
P0206 FF50
0964 P0207 580E
0965 P02D8 OC21'
:-- 0966 P0209· 5800 .
P02DA 002F
0967 POZOB 5800
POlOC 007e
096"& P02DD lCEC
WRT2
0969 P02DE 4800
P020F FEAC·
0970 P02EO 5800
P02E1 FF96
0971 P02E2 5800
P02E3 FE50
0972 P02E4 lCE5
0974·P02E50000
0975 P02EG E800
P02E7 FOFA
0976 P02ES 4800
STOZ1
OATEI 01/04/75
28
LOQ
ERRZG
009"9
STa·
DATA2
00950
RTJ
ST034
00951
EN,\
ENQ
RTJ
$20
STOP
00952
00953
009Slt
JMP·
NUM
a
R.T.J
AORINT?
RTJ
SC11E
RTJ
SELECT
JMp·
JHp·
RTJ
WRTl
WRT2
OUTBUF
RTJ
NOINTP
00963
RT,'·
ENQ
RTJ
5T021
$21
STOP
·0096,.
00965
00966
RTJ
RETSTAT
JHp·
STQ
(WRITE)
5!ATUS
STATUS WHEN INTERRUPT OCCURRED
RTJ
IECHI(
CHECK FOR INTERRUPT ERRORS
RTJ
CONALARH
00971
JMp·
(WRITE)
00972
NUH
lOQ
REQ4
00975
STa
DATAL
00976
5
INTERRUPT eITS NOT CLEARED
WRITE UNDER INTP. CONTROL
00955
00956
00957
WAIT 165HS MAX FOR NOT 8USY
00958
ex ECHK)
00959
00968
00961
00962
INTP. OCCURRED
00967
00968
·00969
00970
o
00974
P02E9 0033
60220800
()
PAGE
F
'\
(j
(\
,
)
(~;
\
28
n
'-_/
o
o
DP1008
PAGE
0977 P02EA 5800
P02EB FEA8
... 0978 P02EC .QA20
0979 P02ED lCF7
0980 P02EE 0000
READ
0.981 P02EF·5800
P02FO FF51t
0982 P02F1 5800
. P02F2 0500·
0983 P02F3 5600
P02F4 FOEO
. .0984 P02F5 1802
0985 P02F6 160e
0986 P02F7 5800
ROt
P02F8 FF15
0987 P02F9 5800
P02FA FF39
... -0988 P02FB 58E9 ..
0989 P02FC oe21
0990 P02FD 5800
. P02FE . 00 DB
0991 P02FF 5800
P030a 0058
.'- .0992 POJ01. lCEC
0993 P0302 4800
R02
P030l FEB8'
... 0.994· PO.304· 580.0
P0305
0995 POl06
P0307
0996 POlOS
FF72
5800
FE2C
1CE5
29
STOP
DATEI 01/04/75
RTJ
ST034
00977
ENA
JHp·
NUM
RTJ
$20
(ST021)
00978
o
READ UNDER INTP. CONTROL
RTJ
SC11E
WAIT 165H$ "AX FOR NOT BUSY
RTJ
SELECT
00983
ROi
ROZ
lN8UF
00984
00985
00986
ADRINTP
REAO ONE SECTOR
00979
00980
00981
· 08982
NOlNTP
00987
RTJ"
END
RTJ
ST021
$Z1
STOP
00988
00989
00990
RTJ
RETSTAT
00991
JHp·
STQ
(READ)
STATUS
·STATUS WHEN INTERRUPTOCCURREO
RTJ
IECHK
. CHECK FOR INTERRUPT ERRORS
RTJ
CONALARH
NUH
EOR
STA"
0
:N$80B
ADO
10
SECTION
STQ·
LDQlOA·
SECERR.
STJP
STOP
CLS
£1
1
SQM
SUB"
F
o
o
(
00992
BIAS
· 00993
8099 ..
00995
CREAD)
0998.P030-9.0000
0999 P030A BODO
P030a 0808
'- .1000 P030C 6600
1001 P0300 Faoo
P030E F059
,.10n2 P030F. 4609
1003 POl10 £043
1004 P0311 C8F7
·.1005 P0312 OFA6
1006 P0313 0171
1007 P03l4 9814
60220800
o
()
· 00996
STOP SUB-ROUTINE
HAKE lDENT WORD
00998
00999
01000
01001
SECTION AND ERROR
01002
01003
01004
01005
01006
01007
PAGE
29
c c
DP1008
PAGE
1008 P031S 6806
1009 P0316 DADO
-1-&1-8 --pfilt 1 5402
1011 POllS lCFO
1012 POl19 0000
- 1013 POllA 0000
101,. POllB 0000
1015 P031C 0000
1016 POllD 0009
1017 POllE 0000
1018 P031F 0000
-1019 P0320 0000
1020 P0321 0000
1021 P0322 0000
1022 P8323 0000
1023 P0324 0000
1024 POl25 0000
1025 P0326 0000
1026 P0327 DODO
1027 P0328 0000
, - ---tG-28 POl 2 9 -DODO-
1030
1031
1032
1033
1034
1035
1036
-1-037
P032A
P032B
P032C
P032D
PG32E
P032F
P0330
P03l1
PD3l2
P0333
P03l,.
D
tDENT WORD
0
SECT!ON/~RROR
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
RETURN ADDRESS
DATA
DATA
DATA'
DATA
STA TUS FUNC TI ON
DI~ECTOR AND DIRECTOR
LOAD ADORESS AND ADDRESS REGISTER STATUS
WRITE
READ
COMPARE
CHECKWORO CHECK
WRITE ADDRESS
ADDRESS REGISTER STATUS
Q
CLEA:{ CONTROLLER AND CONNECT
CLEAR CONTROLLER
LOA
UNIT
E8EE
LOQ·
EQUIPDI~
5800
FE8B
lCF5
RTJ
OUTPUT
JMP'"
(CLRCON)
NUH
o
CLRCON
ADDRESS
01008
01009
01010
01011
01012
'01013
0101'
01015
01G16
01017
01018
01019
01820
01021
01022
01Ga3
01024
01025
01026
01027
01028
RETAOR
0
(STOP)()
(STOP)
2
EQUIPOIR
OUTPUT
60220800
/
DATE' 01/04175
NUM
ENA
LOQ·
RTJ
0000
OA02
E8F3
5800
FE90
C8Da
FDB2
1039 P033S 0000
-')
STA·
ENA
RTJJHp·
10
HUM
NUH
SF.CER~
RETAnR
HUM
NUM
DATAt
DATA2
NUH
OATA3
NUH
DATA,.
NUH
EQUIPOIR NUH
EQUI~ADR NUH
EaWRITE HUM
EOREAO
HlIH
NUM
EnCOMP
EOCHKWD NUM
EQWRTADD NUH
EXTVALUE NUti
alAS
HUM
- INAOR.
NU ..
30
01030
01031
01032
01033
0103 ..
01035
01036
CONNECT UNIT
01037
PAGE
F
\,
"
'\
")
\
)
f
')
(
')
/
\
30
C--j
(
)
I
\
/-\
n 0 0
'-~--
C~>
0
(-)
0
'---'"
DP1008
PAGE
1040 P03l6 5800
P0337 FEDD
1041 ·POll8· 5820
1042 P03l9 5800
POl3A FE52
1043 P03JS 68E2
1044 P033C (800
POllD 05f\7
1045 P033E 48EO
1046 P033F B800
POl40 0584
1047 POl41 0111
1048 P0342 1CF2
1049 P034J 0800
POl44 FEl4
1050 P0345 COOO
POJ4o BADO
1051 P034.7 6804
1052 P0346 C800
P0349 FE4Z
1053 PD34A 6802
1054 POl4B OA20
1055 POl4C OC11
1056P034D 58BB
1057 POJItE lCE6
1059 fJ034F 0000
1060 POl50 E800
POl51 F07l
1061 P03S2 0060
1062 POlS3 CADD
P0354 0570
1063 PQ355 6800
POJ56 056E
1064 POl57 1CF7
60220801)
c) r-')
F
CHKA3
MOVF.ADR
C_)
31
--..
(
'--
)
---------'
OATEI
(J
(}
\.,-
-~
() C-) ()
,
_ _ _S
()
\
'-~
,/
n n 0 C C
',,--,/
'-..--
1/04/75
RTJ
LOADADR
RT,J·
RTJ
RETSTAT
AORINP
STA·
Loa
DATA3
OBUFFER
STQ·
EOR
OATA4
OBUFFER
SAN
JMp·
RAO
1
(ADDRESS)
ALFLAG
010"7
010lt8
010"9
LOA
=N$BAOD
01050
STAfo
LOA
DATA1
STATUS
01051
. 01052
STAw.
ENA
ENO
RTJ"
JHP"
OATA2
$20
$11
STOP
(ADDRESS'
Loa
NUM
0
SECTPASS
INQ
LOA
96
OBUFFER,Q
01061
01062
STA
OBUFFER
01063
JHP"
(HOVEAORJ
01064
01040 .
ADDRESS REGISTER
ST~TUS
010lt1
01042
. 01043
010 ....
COMPARE AOORESS
ER.R. OR NUMBER,
EXIT
HOVF. THE NEXT ADDRESS UP
010 .. 5
010"6
01053
0105"
01055
01056
01057
01059
01060
PAGE
31
DP1008
PAGE
1066 PO'358 0900
10tH P0359 5800
P035A FE2C
1068 P035B 5800
P035C FDD1
··1069 P0350 1CFA
RfTSTAT
..
SECGEN
1011 P035E 0000
1072
1073 PDl5F OC9F
1074 P036D 4800
P0361 FOft3
1075 P0362 0852
1016 P0363 CODO
T1
P0364 OBC4 ~
1077 P0365 5407
1078 POl66 lCF7·
..
GENS€C
1080 P0367 0000
1081
T2
1082 P0368 COOO
P0369 oocr. P
1083 P036A 5407
1084 POl6a cooo
P036C 08C4 P
1085 P0360 EOOO
P036E 08C5 P
1086 P036F S800
P037D OOCE
1087 P0371 1CF5
60220800
,-")
!
32
DATEI () 1/Q4175
a
NUH
RTJ
INPUT
RTJ
CONALARM
01068
JHp·
CRETSTATJ
. 01069
NUH
0
STa
ENQ
-96
SECTPASS
CHK. ALARM CONDtTIONS WITHOUT INTPS.
01066
01067 .
SET SECTION COUNT TO 96 AND
GENERATE 96 RANDOM NUMBERS
Tca
Q
LOA
=XOBlJFFEP
•••• - ...... BIAS
JHp·
RTJ-
(GENRANl
CSECGEN)
GENERATE RANOOH NUMBERS
NUH
a
01071
01072
. 01073
0107"
•••••••••••••••••
01075
01076
01077
01078
LOA
GEN. RANDOM DATA AND CONVERT FIRST WORD TO
LEGAL ADDRESS. ENTER WITH Q= NUMBER OF WORDS
............. BIAS
=XOBUFFER
01080
01081
01082
RTJLOA
(GENRAN)
=XOBUFFER
01083
lOQ
=XOBUFFF.R+l
01085
RTJ
CON V
Jl1p.
(GENSEC)
..................
01084
MAKE LEGAL ADDRESS
01086
91087
F
PAGE
\
/
"\,
'j
/
/--,
)
32
() ()
,~--)
/~~
/
/
'\
I
- '\
I~
()
o o o o o o o
DP1008
PAGE
1089 P0372 0000
OUTBUF
···U·iQP.o37 3. E8~
·1091 P0374 COOO .' Tl0
'P0375 08C3 P
... -·U~g2P0376··S800 .....
.'
P0377 FE80
1093 P037a lCF9
-~
..
,
60220800
F
33
o
··RTJ··
.0
~
o o o o o o o o
SELECT WRITE AND OUTPUT BUFFER
·EQWRrTE
:::XOBUFFER-l
LOA
()
DATel 01/01t175
NUH
lOQ•..
_._--. ........_..... _........ - ..... ..... - .- ... _..._- -". .. COHBUF
NU~
1095 P0379 0000
1096 POl7A E8A9
LOQ·
. . LOA
._--.-109;7P037.BCQOO......Til .
P0:17C08C3 P
109S P0370 5800'
RTJ
. P037£· FE79···
RTJ
1099 P037F 5800
POl80 FE06
.STA
- 1100·· P0381 6800
. POl~2 FF99
LOQ·
1101 P0383 E8A5
. STQ1182 P03t4 . 4300
P0385 FF97
1103 P0386 A071
ANO.- 110,. P0381 010ft
SAl
1105 P038e·OA10
£NA
ENQ
1196 POlS9 OC15
RTJ
··~·-·11-D7· P031A 5800 -...
P038B FF7:D
COHB
1108 P038C 5800
RTJ
P03SD FDAS.
..
JH~
1109 P038E lCEA
- ....
(
•••••••••••••••••• eIAS ••••••••
IOBUFFER-
. 01092
(OUTBUFl
01093
. . ., .
...
_
. . . ._ " _ ' _ " _ '
0
EQCOHP
.-~XOBUF'FER-1
COHPARE BUFFER
••••••••••••••••••
alAS .........
IOBUFFER
01095
. 01096
.01097
01098
,.l'NPUT
GET STATUS
01099
DATAl
STATUS
01100
INAOR
OATA2
..
01089
01090
81091
CON5T+6
.COHB-"-l
S10
S15
.STOP
CONALARH
ICOHBUFl
01101
01102
CHECK NO COHPARE BIT
ERR CODE
CHECK ALARH CONDITIONS
01103
0110 ..
01105
01106
01107
01108
01109
PAGE
33
c~
PAGE
OP1008
1111 POJ8F 0000
1112 POl90 ('800
P0391 Ff'93
1113 PO 392 C800
P0393 0531
1114 P0394 5800
P0395 Ff.62
1115 P0396 5800
. P0397 FFeo
1116 P0396 lCF6
CHKWI')RO
P0399
P03C)A
POJ9B
P039C
P039D
P039E
P039F
P03AO
POlAl
P03A2
P03AJ
P03A,.
r03A5
P03A6
POJA7
P03A8
P03A9
F03AA
P03AB
PO lAC
POlAO
P03AE
POJAF
P03BD
POlB1
COHPAR=:
1118
1119
1120
1121
1122
1123
1124
1125
.
1126
1121
112S
1129
1130
1111
1132
1133
113,.
1135
1136
1137
1138
1139
1140
11,.1
11,.2
1143
P03B2
P03BJ
P03B4
P03e5
P03A6
P03B7
P03B8
0000
C88E
6880
oeoo
4829
CAOO·
0525
6800
FF7C
RAoO
0582
0111
lS0F
CADO
057E
6800
FF75
4800
FF71
OA20
OC14
5800
FF59
C043
A076
0101
1810
0812
OA9F
8810
011C
()
COH3
..,.
COM!
oeoo
60220600
n n n
COM4
34
OATEt 01/04115
NUH
Loa
0
EQCHI800
P050F FE57
1385-P0510 5800
SEC4A P0511 FE18
1386.POS12 5800'
P0513·FDB6
1387 P0514 5800
P0515 FF16
1388 PD516 OA10
1389 P0517 5406
1390 P0518 18F7
1391 P0519 5800
SF.C4R
POS1A FEOF
1392 POS1S 5800
P051C FDD1
1393 POS1D 5800
P051E FFOD
1394· P051F DA10
1395 POS20 540&
1396 POS21 18F7
.1397 P0522 5800
SEC4-C
P0523 FE06 .
1398 P0524 5800
. P0525 FEAt
1399 P052& 5800
P0527 FE09
1400 P0528 OAtO
·1401 P0529 5406
1402 P052A 18F7
1403 P052B C800
SEC4E
P052C FC4C
1404 POS20 OUO
60220800
C) l)
()
F
ENQ
STQ
(
ft3
,
)
---'
OATEI
-9~
. SECTPASS
0 () 0 n
'--.-'
(----,
'---..j
Cr 0
o1/0lt17S
HRITE,REAO,AND COMPARE
UNDER INTERRUPT CONTROL
01370
'01371
01372
LOA"
STA
Tlt+1
OBUFFER-l
01373
01374
INA
STA
97
IBUFFER-1
01375
01376
LOA
T8+1
01377
STA
T3+1
01378
ENQ
RTJ
6
REQUEST
01379
01380
ENQ
ENA
STA
96
01381
01382
01353
RTJ
GENSF.:C
RTJ
CLRCON
CLEAR CONTROLLER AND CONNECT
01385
RTJ
WRITE
WRITE UNDER INTP. CONTROL
01386
RTJ
CHKSfC
01387
ENA
RTJJMP'"
RTJ
$10
(JUHP)
SEC4A
CLRCON
REPEAT CONDITIONS
CLEAR CONTROLLER AND CONNECT
01388
01389
01390
01391
RTJ
READ
READ UNDER INTP CONTROL
01392
RTJ
CHKSEC
01393
ENA
RTJJHP"
RTJ
$10
(JUMP)
SEC48
CLRCON
' 01394
01395
01396
01397
RTJ
CH!NTP
01398
RTJ
CHKT~K
01399
ENA
RTJJHP'"
LOA
$10
(JUMP)
SEC4C
ALFLAG
REPEAT CONDITIONS
CHECK FOR ALARM
01400
01401"
.01402
0140.3
SAN
SEC4F-"+1
YES ALARM-NO DATA TO
0
ALFLAG
CLEAR ALARM FLAG
01384
REPEAT CONDITIONS
CLEA1 CONTROLLER AND CONNECT
DISPLAY
01404
PAGE
43
(')
0
C~
.
OP1008
PAr;F.
4'+
DATE' n1/04175
1405 P052E S800
RTJ
CLRCON
P052F
140& P0530
POSJ1
1407 P0532
RTJ
AORINTP
RTJ
C9INTP
01407
~TJ
GHKSEC
01 .. 08
ENA
RTJ-
1110
01409
01"'0
01411
01412
FOFA
5800
01405
ADDRESS
01406
F01l
5800
P0533 FEA9
1408 P0534
POS35
1409 P0536
1410 P053?
1411 POS38
5800
FEF&
OA10
5406
18F2
1 .12 P0539 C800
'
POSJA FC3E
1413 "0538 0112
1414 P053G 5601]
POS30 FE5B
1415 P053E 5800
P053F FB2q
141& P0540 18F8
141? 1'0541 16C8
141~·· P0542 1887
60220801]
r~~
I
::).
(\
JMp·
SEC4O=
LOA
(JUMP)
SEC4E
ALFLAG
RTJ
2
COHPARE
RTJ
FINSECT
JHp·
SEC4F
SEC40
SEC4
SAN
JHP·
JHP":
CHECK ALARHFLAG
COMPARE INPUT BUFFER WITH OUTPUT BUFFER
01413
·01414
01415
REPEAT CONDITIONS
NEXT ITERATION
REPEAT. SECTION
01416
01"17
01-\18
PAGE
F
/ \/
,
\
(j
()
.f\.;'
,
,f\./'
\
44
f)
-J
.r~)
\,_i
C)
n 0 0 0 C)
C) 0
,_/
DP1008
._
,-.
1420 POS43
1421 PO S44
... _. _.- ·p·OS'"
1422 P0546
POS47
1423 .PO 54.8
POS .. 9
1 .. 24 POS,.A
PAGE
OCClF
4800
SEes
F81F-·
COOO
OOFO
680 O.
0378
Oco ..
'42·~··P05"·.S600
POS4C
1426 POS4D
.... POS4E
1 .. 27 POSltF
POSSO
SEC5A
lOA
=NSFO
.....
ENQ
RTJ
F87A
5800
RTJ
FODe
5800
SEC5F
RTJ
FD84
JHP •.
~-·····11tU·-Po.s.51· ··1"2
1"29.POSS21812'
JHP·
1 .. 30 POSS3 C8DO
SECSB
LOA
... " .. --._.... P.OSS4.D.370 .
1,.31 POSS5 E800 '
.LDQ
POSS6 FDCA.
-,.··.1432-~~5S7 ....sao.o.
...RTJ
POSS8 FC66
1433 P0559 5800
RTJ
.....•... _. • . p.QSSA....FCD9 .... .... . - --.. ..
SQN
·.1".3,. POSS8 0158
lOQ
1435 POSSC E800 .
.... ....... ,> 90550.. 0367 .. , .' ..
STQ
1436 POSSE 4800
P055F Foac
., ..... "l7. POS60 . .QC16
ENQ.
1438..
1.. 39
•
"o·_· .. 141tO,P056t ,5400·
RTJ
P0562 FDA6
1441 POS63 1811
JMP"
....... 144ZP4.564.SBOQ .... SECSO
RTJ
·POS6S FD12
:14,., P0566 . C800
lDA
,".. .... . .P0567.. ·~87C ..
14.... POS68 6800
STA
POS69 FOB3
' lOQ
'..... 1"45.. P.OS6A EaQO
POS6B 0359
STQ
. 1446 P056C "800
P0560.FDAE
1447 POS6E A076
ANDSAN
1.. 48 PQ5&F 011 ..
..1449 ..POS7.Q OA10
ENA
ENQ
1450 POS71 oe17
1451
•
··1452
1453 P0512 5800.
RTJ
POS73 FOgS
,
•
..
60220800
F
0 0 0 0 0 C:
f"
0
()
~'
-,
..
_ .••
Cl
(=~'.
01'420
01.1.21
ILLEGAL ADDRESS
oaUFFER
4
REQUEST·
01'422
·01423
0142,.
01 ..25 .
REQUEST ALARM INTP.
CLRCON
01426
SELECT
SELECT INTERRUPT
01427
·SECSS
SEe50
oaUFFER
INTERRUPT OCCURRED
IllEGAL ADDRESS
01428
01429
01"30
EQUIPADR
... OUTPUT
...
01431
FORCE ALARM ·INTERRUPT
NOINTP
01432
. 01433
~
•.
j~~:
-96
SECTPASS
. .STA
-)
OATEI 01/04/75
45
ENQ
STQ
.-
(
SEC5D-·-l
OBUFFER
01 .. 34
01435
D~TA1
01436
P'-
$16
STOP '.
NO. ALARM INTERRUPT OCCURRED
HHEN ATTEMP1ING TO FO~CE ADDRESS
ERROR
.
01 .. 37
01~a8
01439
.01."~0
SEC5e
.IECHK
011t.. l
.01 .... 2
INTSTAT
01 .... 3
DATA2
014.. 4
OBUFFER
01445
DATAl
014.. 6
CONST+11
SECSC··-1
$10
$17
STOP
CHECK ADDRESS ERROR BIT
ERROR NUHBER9 AN ADDRESS ERROR
HAS FORCED BUT THE STATUS .BIT
HAS NOT SET •
.1.
01 .... 7
014.. 8
01 ..49
01450.
0.1451
01452.
01ltS3
PAGE
45
PAGE
OPiOO8
1454
1ft5S
1456
1457
1458
1459
1460
lft61
1462
.1463
1464
1465
1466
P057ft
POS7S
PDSt6
POS77
P057S
P0579
POS7A
P057S
P057C
POS7D
P057E
P057F
P058D
PDS81
POS82
P0583
P0584
P0585
P0586
P0587
P058S
1467
1468
1469
1470 P0589
P056A
1471 P058S
1472 P058e
P0580
1473 POS8E
P058F
1474 P0590
P0591
1475 POS92
POS93
1476 P0594
P0595
1477 P0596
1478 P0597
1479 POS96
1480 P0599
1481 P059A
.. POSCJ8
1482 POS9C
1483 P0590
.. ··llt&1t P059E
1485 P059F
1486 P05AO
·1"87 :POSA1
1488 P05AZ
1489 POSA3
···.1 ..'8Pt5A4
1491 P05A5
1492 POSA6
DA10
5.. 06
1808
5800
n
lr\,
,I
ENA
RTJ-
Sf~CST
1802
1812
C800
0348
E800
FDA6
5800
FC3E
5600
FCBl
0158
E800
033F
4800
FD94
OC18
SEC5U
.
5800
F07E
1811
5800
FCEA
C800
F854
6800
FD88
E800
0331
.. 800
F086
A076
0114
OA10
OCt7
5800
FO&D
DA10
540&
1808
C6A7
E062
0874
0102
48Al
t8Al
C07E
68AO
•
SfC5V
Se:C5W
DATEI 01/0ft175
RTJ
$10
(JUMP)
SEC5F
SELECT
REPEAT CONDITIONS
INTERRUPT ON ALARM
01'56
JMp·
JHp·
LOA
SECSU
SEC5V
OBUFFEP.
INTERRUPT OCCURRED
ILLEGAL ADOPESS
01455
01459
011t'0
LDO
EQCHKHO
RTJ
OUTPUT
RTJ
HOINTP
SO.N
LOQ
SEC5V-·-!
OBUFFER
01464
01lt65
STQ
DATAt
01466
ENQ
S1A
RTJ
STOP
JHP"
RT.J
SEC5W
IECHK
LOA
INTSTAT
01473
STA
DATA2
01ft7'
LOQ
OBUFfER
01475
STa
DATAi
01'+76
ANOSAN
ENA
.ENQ
RTJ
CONST+11
SEC5W-"-1
$10
$17
STOP
ENA
RTJ·JHP" .
LDQ-
$10
(JUHP)
SEe5T
SECS/H1
HFFOO
EAQ
A
SAl
2
SECSA+l
SEC5A
HOOFf!
SECSA+1
J11p.
Fasc
60220600
SECSC
ft6
LOA·
STQ'"
JHP"
LOASTA·
·01"5'
'014Sg
01457
01461
CHECKHORD Ct-!ECK
..
01'62
01 ..63
INTERRUPT STATUS ZERO, NO INTERRUPT OCCU
ERRCODE.
NO ALARM INTERRUPT
WHEN INITIATING CHECKHORD CHECK
WITH tLLEGAL ADDRESS
CHECK WHETHER CORRECT
OCCUR
INTER~UPT
CHECK ADDRESS ERROR BIT
ADDRESS ERROR STATUS NOT SET
01"'·
01468
01469
01470
01471
·01472
01477
. 01lt78
01479
01480
01481
01 ..82
014S3
01 .. 84
01lt85
01486
01487
01lta8
01 .. 8CJ
REPEAT CONDITIONS
FORee: ALARM WITH ILLEGAL CYLINDER
OOFO
"01 .. 90
01491
01492
PAGE
F
(\
f-~
'(l
(\
\
)
()
46
i\
~.
,;
f\
J
. --.-/
,f)
~i
C) C) 0 ·0
()
OP1006
l) l
(~)
,-'
PAGE. 47
1493 P05A7 C800
P05A8 'FAE5
1494 P05A9 0123···
1495 POSAA COOO
P05AD CA9F
.1"96 P~5AC 18031497 P05AD COOO
P05AE 639F
" ,14·98 P05AF·6800
P05BD 0314
1499 POSB1 AG82
1500 POSB2 0822
lS01 P05B3 COOO
P05B4 0925 P
,1502 P05BS 6800
P05B6 0300
1503 P05B7 0961
... 1504 POSB8 6800
P05B9 036B
1505 POSBA C800
. '" P.O·SBD FAD3· .
1506 P05BC OrC8
lS07 POSBD A082
1S0.8 P.05BE 6820
lS09 P05BF 0874
1510 P05CO 0101·
·1511 POSC1, 1829
1512 P05C2 5800
P05C3 F07l
, -" 151~ P05C4 OC04
1514, P05CS 5800
P05eE) FBOD
151S P05C7 S800
posca FBDe
1516 POSC9 1802
1517 POSCA 1800
1518 P05CB S800
P05CC FDA5
1519 poscn ,5800
POSCE FC65
1520 P05CF E800
P0500 02F4
1521 P0501 4800
P05D2 F049
1522 P050J OC2D
1523
1524 P0504 5800
POSDS F033
1525 P050fJ 1811
1526 P0507 5800
. POSOS FC9F
1527 P050CJ ceoa
POSOA FB09
60220800
()
F
\
~
0
(j
0 Cl
~---"\
!~
C)
OA TEl 01/ 04/7C;
LOA
UNITSECT
SAP
LOA
SEC5G-·-l
=NSCA9F
854 LAST ADDRESS
SECC;G
JHP·
LOA
SEC5H,
=N$639F
853 LAST ADDRESS
SE'CSH
STA
OBUFFE~
HFFOO
FFOO
Q
T5
ANDTRA
LOA
...........
STA
OBUFFE~-1
INA
STA
97
IBUFFER-l
LOA
RANGE
0150S
ALS
ANDSTA·
EAQ
SAl
JMP·
RTJ
6
HFFDO
SEC5tHl
A
1
SEC5H
01S06
01507
01508
01509
01510
01511
01512
SEC5L
SF.CSX
..
SEC51
(~
,,-J
=XOBUFFER+97
01493
01 .. 9 ..
01 ..9S
01 ..96
011t~7
,01 ..9.
BIAS
•••••••••••••••
01499
01500
01501
01S02
ADJUST LWA OF OUTPUT BUfFER
~OORESS
01503
01504
ENQ
RTJ
REQU~ST
01513
01514
RTJ·
SELECT
01515
.J"P"
.JHP·
RTJ
SEC5X
SECS!
OUTBUF
01516
01517 .
01518
RTJ
NOINTP
01519
LOQ
OBUFFER
01520
STQ
DATAt
01521
ENQ
$20
RTJ
STOP
JI1P·
RTJ
SEC5J
IECHK
LOA
INTSTA T
4
REQUEST ALARM INTP.
WRITE
ALARM tNTP 010 NOT OCCUR WHEN
WRITING OF THE END OF PACK.
CHECK FOR CORRECT INTERRUPT
D1522
. 01523
. 01524
01525
,01526
01527
PAGE
47
0 0 C-'
DP1008
...
~"
~
..
PAGE
48
DATE' 01/04/75
-...
1528 PO'50B 6800
POSOC FOItO
. 1-529·· Pa500 MJ'761530
1531 PD5DE 0118
1-5!2 -·Po-snF·· G80G
P05EO 02E ..
1533 P05E1 6800
· ..--- ·_--·...;.POSE2 FD39 - .
1534'PD5E3 OAI0
1535 P05E4 OC19
.-·-1536· P05£5--580G'POSE£) F022
SEC5J
1537 POSE70AI0
· '---1538-Po-'5E8'- ·51tn6 .. 1539 POSE9 1808
SEeSH
1540 P05EA COOO
,........... -PGS£8·008F P
- 15..-1 P05EC 6800
PQSED 0201·
.. -·1-51t2-·P0-5E€--58DO·.. ···- .... '.
P05EF F045
1543 P05FO 5800
..
STA
OATA2
01528
ANO-
CONST+11
CHECK
ADDRESS ERROR STATUS
~HETHF.R
WAS SET.
SAN
LOA
SECSJ-*-l
OeUFFER.
STA
DATAi
ENA
ENQ
RTJ
S10
S19
STOP
01529
01530
01531
· 01532
01533
ERROR NUHBER
01534
01535
·01536
01537
01538
01539
015 .. 0
ENA
-RTJJHP*
LOA
S10
(JUHP)
SEC5L
=XR.ANGE
STA
oeUFFER
015 .. 1
··RTJ
ADDRESS
0151t2
RTJ
OUTBUF
RTJ
ADDRESS
RAO'
OBUFFER+1
LOQ
EQCOHP
01546
LOA
=XO BUFF ER-l
015.. 7
RTJ
IOBUFF€R
00 COMPARE FUNCTION
015.. 8
RTJ
INPUT
GET STATUS
015 .. 9
STA
DATAl
LOQ
I~AOR
STQ
OATA2
REPEAT CONDITIONS
WRITe: A SECTOR
015.. 3
- .. ··· __ ·...,··--·P05F1·... .f08-Q.-·· --"
:~
;
15.... P05F2 5800
P05F3 FD41 .
· ·_··iSltS·P05F4t·GSeo·
POSF5 0200
15;6 P05F6 £800
"--- ...... -- PG5F7 FD20
15lt7'POSF8 COOO
T7
P05F9 08C3 P
- ~~48 ¥05FA '5800'
P05FB FBFC
1549 P05FC 5800
.':'. ··P{)5FD· F08'}
1550 P05FE 6800
P05FF F01C
·····--1551 'P0600 £800
POG01 F027
1552 P0602 4800
.... ·P0603 FD19
iS53 POSOIt A011
. 1554 P060S 011 ..
.... :1555P060 o,tJAI0
1556 P0607 OC25
1557 P0608 5800
P0609 ·FCFF
1558 P060A OA10
SEC5N
1559 POr-OB 5406
"'--"~iS6o-'·pOfJ~C
1&00'
1561 POGOO C800
P060E 02B6
60220800
,-~
.
)
,()
r'j
\
/
(\
\
015""
815.. 5·
CHANGE BUFFER AREA
.
BISSO
-01551
.
ANOSAN
ENA
ENQ
RTJ
CONST+6
SEC5N-·-l
. $iO
$25
STOP
ENA
RTJJHP·
LOA
$10
(JUMP)
SECSH
OBUFFER
01552
01553
01551.
0155501556
01551
CHECK NO COHPARE STATUS
OKAY IF SET
NO
COMPA~E
STATUS NOT SET
01558
01559
REPEAT CONDITIONS
·
01~60
· 01561
"AGE
F
()
() () (j
48
(~
, /
_.,
c) o
o o c)
OP1008
PAGE
1562 P060F 099E
1563 p06io 6800
:·.:·----··-·;;-P-"it~02B3 .. --... -~· ... --. -
INA
STA
1561t P0612 DADO
ENA
1565 PD613 6800
STA
_.:---...: .... ·-.-P0614.. FB" ...... .
1566p86155800
SEC5NARTJ
P0616 F01E
·~---·:1-§.67-;·P-06-t7· 5300
. ·RTJ .
P0618 F059
1568 P0619 5800
RTJ
.. -...,--" -.P061A FOSO
1569 POG1B OA10
ENA
.'
lS70.f061C.51t06.
RT J.·:"'-~;157j~.P.0610·13F·7 ... '
. "- .JHP.
1572 POG1E 5800
SEC5NB
RTJ
P061F FD15
.. ·-...~S13-P..062D . 58ao..., ..... .
P0621 FDSt
1574 PQ622 OAiO'
SECSNC
.--,..-.,.- .. ---J?o~, .. F.nOE. .._.... __ ......
o :-iS78 p0627caoo . .
~.
P0628 FEes'
.••.. "·15.79-pa629.. .6800-.· ..
P062A FBE7
. 1580 P062B C888
.._. -1S81· .P062C·.0961..
. 1582' P062D 6800
P062E 02F6
· .. ·.. :1583..P062F. 580a
.
P06l0 FBDD
1584 P06Jl 5800
....P0.6l2 F025
'1585 P0633tiA10
IS8.6P06J4 5406,
. --·158-7. Ptl63S- .18E.f'.
1588 P06l6 COOO
SECSNN
P0637 OA9E
.. _~ ... 1.589'p'.(J.6.3a.. 6.8.00 _...
. .... . P06J9FD7a'
1590 P06lAC800
.... P0638 FOlD
1591 P06lC 0112
1592 P0630 5800
P06lE FOSA .
1593PQ63F 0800
.
P06ltO FD74
....1594P0641 5800·.
P0642 FA26
1595 P0643 18El
60220800
F
o
-S61
OBUFFER
XX9F, LAST SECTOR OF CYLINDER
01562
015'3 .
ALFLAG
o
0196,.
01565
ADDRESS
01566
OUT8UF·· .
·WRITE INTO NEXT CYLINDER·
RETSTAT
SID
(JUMP)
. . SE-C5NA·
. ADDRESS
CHECK ALARHCONOITIONS
........... -" ·REPEAT -CONDITIONS
01561
01568
01569
01570
. 01671
01572
COHBUF.
ENA
JMP'"
RTJ
$10
CJUMP) ......... "--""- "'"
SEC5NB
ADDRESS
LOA
18+1
01578
...... ·STA
JT3+1·
0157;9
. C.QHPARE BUFfER
01573
0157 ..
REPEAT CONDITIONS
..
01515 .
01576
01577
\
LOA"
INA
STA
T5+1
01580
.0..1581
01582
97
IBUFFER-1
INBUF
.REAOINTONEXT CYLINDER
.. 01583
RTJ
RETSTAT
ENA
LOA
$10
(JUMP)
. SEC5NC·.
=N$A9E
_STA
.COH1+1
01589
LOA
ALFLAG
01590
RTJ-
.... JMP'"
SAN
n
\-./
49
RTJ
. -·.·.~5 .P8623···54.G6·:.:.:...· .. · .______ .... L IUJ ... ·;
1576 PD624 18F9
1577 PD62S 5800
o o
c
()
CHECK ALARH CONDITIONS
. REPEAT CONDITIONS
01S84
01585
01586
Ot587
01588
. 01591
01S92
2
RTJ
COHPARE
RAO
COH1+1
01593
RTJ·
FINSECT
0159,.
SEe5Ne
REPEAT CONDITIONS
0159S
PAGE
49
,
.~
.
......
...
OP1008
PAGE
P064,. 1803
P0645 1800
P064& .. FEFC
1598 P0647 1800
P0648 FEFO
1596
1597
50
DATE'
1j
1/04/75
01596-
SEC5R
SEes
REPEAT SECTION
01597
SEC5A
NEXT ITERAT ION
01598
• • ' q ... - . - ---
60220600
:~
,
r"\,
/
SEC5R
PAGE
F
\
\
()
SO
f'\
-----
j
()
,--'
0
()
0 0
(J
~
OP1008
PAGE
1600
1601
1602
1603
1604
. 1605
1606
1607
P0649 0000
P064A oeoo
PQ64B C82B
P064C DFE8
P0640 4828
P064E 'OFC8
P064F 6825
P065D C800
. P06S1· 0270
1608 P0652 0101
1609 P0653 1818
1610 POG5 .. C82D
1611 P0655 9000
P0656 009F
1612 POG57 0102
1613 P0658 OR1C
1614 P0659 180B
1615 P065A 681A
1616 P065B C800
P065C FAl2
- H·1617 P06S0 A08l-··
1618 P065E 0862
1619 P065F C616
- 1620 PUG-60 0834
1621 P0661 0111
1622 P0662 lCE6'
16~3 P0663 0812
1624 P0664 C811
1625 P0665 OFC8
1626 P0666 880E
1627 P0667 .6800
P0668 02SC
·1628 P066Q 6800
1629 PD66A lCDE
1630 P066e C809
1631 P066C 9000
P0660 0090
1632 P066E 0104
1633 P066F OA10
1634 P0670 8804
1635 P0671 6803
1636 .P0672 18Fl
1637 P0673 18E6 .
1638 P0674 0000
-1639 P0675 0000
1640 P0676 0000
60220800
F
C) c--=) 0
C) C)
51
CURAO
8
SAVE2
8
SAVEl
BUFFLAG
SAZ
JHP"
LOA·
SUB
Wc)6-"-1
H1Sl6
SAVEl
=NS9F
SAZ
RAO·
JHP"
CHI(HIGH . STA"
LOA
HtGH
COMB!NE
W1536
HIGHt
SAVE1
SAVE2
CUR AD
0 '\ C) 0 C) .C)
\
.....
!
.
DATEI 01/04175
INCREHEN NUH
ENQ
LOA"
LLS
STO"
ALS
STA"
LOA
W96
() 0
0
0
CHKHIGH-·-1
SAVE1
COHBINf;
SAVEl
RANGE
CYLINDER COUNT
TRACK AND SECTOR COUNT
HOW HANY WORDS ARE IN THE BUFFER
HAVE TRACK AND SECTOR REACHED HAX
UPDATE SECTOR
01600
01601
01602
01603
0160'+
01605
01606
01607
01608
01609
01610
. 01611
01612
01613
01614
01615
01616
ANOTCA
LOA"
AAQ
SAN
JHP·
RAO·
LOA·
AlS
ADD"
STA
SAVE2
A
HIGH-"-l
CINCREHENI
SAVE2
·.SAVE?
SAVE1
OBUFFER
01617
01618
01619
01620
01621
01622
01623
0162"
01625
01626
01627
STA·
JHp·
LOA·
SUB
CURAO
CINCREHEN)
SAVE1
=N:r;9D
01628
01629
01630
01631
SAZ
ENA
ADO·
STA·
JHP"
JHP·
NUH
NUM
NUM
HIGH1-"-1
$10
SAVEl
SAVEl
COMBINE
CHKHIGH
HOOFF
DOFF
0
UPDATE CYLINDER
8
0
0
0
HAS TRACK ADDRESS REACHED MAX.
UPDATE TRACK ADDRESS
01632
01633
01634
01635
01636
01637
01638
01639
01640
PAGE
51
(,
~-
PAGE
OP1008
. 1642 P967·7 OCFO
SEe6
1643 P0678 4800
P0679 FA4B
.. -16,.,. P067A E80G
POG1S FE2B
1645 P067C C80a
'P0670' 02,... ···..
1646 P067E 0102
1641 P061F E800
. ·····PQ680··0242 .
1648 P0681 ..800
. P0682 0241
. '-- -1-64t9- P0683·-C800~ .
P068tt FCFO
1650 P068~ 6800
.- ..... ,. -PQ686-·FB8S .
SEC6H
'1651 P0687 C800
P0688 FA06
·---165-!·· ·P068~-·Ae8~··-·.······
1653 P06SA 6800
P06SS 0239
·1654 P068G··68E9 ..
1695 P0680 C800
P06SE FA36
. "-16C;6'P068F- A06C·
1651 P0690 EOOO
t.'
P0691 CECE
"·-:·1658·· P0692- 0112··
1659 P0693 EOOO
P0694 6161
..• "'1660 POG95 ..aDo··
P0696 008F
1661 P06CJ7 OC06
.. ·1662 P0698 5800
P0699 FA20
1663 P069AEOOO
.... "P069B O'5FF·
166" P069C C80D
P06(m 0224
··1665·P069E 9111
1666 P069F DC5F
1667 P06AD C80D
P06Al 0084
1668 P06A2 6AOO
P06A3 0221
1~69 P06A4 0864
1670 P06A5 OOFE
1611 P06A6 0146
1672 P06A7 6AOO
r06A8 021C
1673 P06A9 0864
&0220800
(~)'
-2
SECTPASS
016"2
016 .. 3'
LOQ
T4+1
016,.,.
LOA
BUFFLAG
016"5
SAZ
LOQ
2
SURFACE
016 .. 6
016"7
STQ
OBUFFER-1
016.. 8
LOA
T10+1
STA
13+1
01650
LOA \
RANGE
01651
ANO-
.'
........ - -...
. -''''' .. -
-'"
~.
....',
STA··
LOA
SEC6C
CURAO
SECTPASS
016.. 9
-016,"2
01653
·'FFOO
. CURRENT ADORESS·
'-'
-
. 01654·_· .
01659
81656
016S7
LOO
·2
=N$6161
.. ~'6S8 .
81659
STQ
. PATTERN
.. 01660--
ENQ
- RTJ
6
REQUEST
- SAN-
SEC6A
·HFFOO
OBUFFER
USE SAt4E BUFFER AREA FOR READ + WRITE
CONST+!
=NSCECE
.- ANU-'
LOQ
SEC6Z
OATE' 01/04/75
ENO
STO
STA
....
52
ALARM
~NO
END ·OF OPERATION INTERRUPTS
ONE TRA'CI(
01661
·01662
01663
LOQ
=N1535
LOA
BUFFLAG
SAN
ENQ
LOA
1
95
PATTERN
STA
ORUFFER,Q
01668
TCA
A
INa
-1
5EC68-·-1
OeUFF€~,Q
01669
01678
01671
01672·
A
01673
SQZ
STA
TCA
01664
ONE SECTOR
0166S
01666
01667
PAGE
F
/ \}
52
f'~
,
)
:
. )
/
- -
r'-""
)
'--------~
0 0 C)'
n
~~.
0 0 C) C) C) r--) 0 0 0 0
'-
OP1008
PAGE
1614 P06AA ODFE
1.675 P06AB 01lt1
. - .1-676 .P06AC· ·18F5
1611 P06AO 5800
P06AE FC7B
1618 PD6AF. 5800.
P06BO FC19
1679 P06Bl C800
- - ._-- POGB2 020F .
1680 P06B3 0113
1681 P06S4 5800
P06B5 F076
1682 P06S6 1803
1683 P0687 5800
- .---; .. - . P06BS FOlt8
1684 POGSCJ DA10
1685 POl)8A 5406
'-- .. -1686 PODBB 18F1
"1687 POGec 5800
POGBD FF8B
-----.-1688 P06SE 0101
1689 PoGBF 18EF
1690 P06CO C800
-- ._-.. -~--P06C1- F9CO
1692,. POGe2 A082
1692 P06C3 6800 .
... _.- .. --.-. POGC4 0200
1693 P06C5 G8BO
..
1694 PoGCG 5800
P06el FCG2 .
16CJS'P06C8 DADO
1696 PD6C9 6800
. - PGGCA· FAAE
1697 po&ca 5800
P06CC FC21
1698 POGCD C8A8
.lG99 POGCE 6800
POGCF 01FS
1700 POGOO C800
POGOl D1FO
1701 P0602 0113
1702 P.DG03 5800
P0604 F057
1703 POG05 1803
--.·1704 P.OGDG 5800
P0607 F029
1705 POGOS C600
P06D9 FA9F
1706 P060A 0101
170.7 P060B 181F
170a POGoe QAOl
1709 POGOD GOFF
1710 POGOE Eoaa
POGDF 05FF
00220300
F
INQ
SQZ
53
_.-/
(1
,--I
C C) 0 C) C-:-
DATEI 01.104/75
-1
1
~MP·
SEe6e
SEC6B
RTJ
CLPCON
CLEAR CONTROLLER AND CONNECT
01674
01675
-01676'
01677
SECGX
RTJ
WRITF.:·
WRITE ONE TRACK OR SECTOR
. 01678
LOA
SUFFLAG
01679
SAN
RT.J
3
CHKSEC
01680
01681
JHP·
RTJ
·+3
CHKTRK
01682
01683
tl0
(JUMP)
SEC6S
INCREHEN
01684
01685
01686
01G81
ENA
RTJ.JMP·
RTJ
REPEAt_CONOIT~ONS (WRITE)
UPDATE ONE TRACK OR SECTOR
SAZ
JHP·
1.
LOA
SECGX
RANGE
ANnSTA
HFFOO
OBUFFER
FFOO
01691
01692
SEe60
STA·
RTJ
CURAD
CLRCON
CLEAR CONTROLLER AND CONNECT
016113
01G9,.
SEC6'l
ENA
STA
0
ALFLAG
CLEA~
RTJ
READ
READ ONE TRACK OR
LOA·
STA
CURAO
OBUFFER
alGqa
01699
LOA
·BUFFLAG
01700
.016a8
01689
01690
01695
01696
ALARM FLAG
SECTOR
01691
SAN
RTJ
3
CHKSEC
01101
D1702
JHP"
RTJ
·+3
CHKTRK
01103
01704
LOA
ALFLAG
0171)5
SAZ
1
JHp·
ENA
STALOQ
SEC6E
01706
-01707
0170-8
01709
01710
1 _
I
=N1535
INITIALIZE BUFFER INDEX
-
PAGE
53
PAGE
DP1008
1;711·P06EO· CIGO
. PliE1 OlEa
SAN·····
ENQ
................ '
1113 P06E3 OC5F
171~ P06E4 C841
SEC6F
--·-,!J-l·S-P06£S6&.QQ·,,:· . .
P06£6 Fe37'·
Dl111
.1- ..... ..
8900 .
EOR
. ....-
P06E~
SAZ
RTJ·
0101
1718 P06EA 5810
,,,.-.-.iliC)·-P.oiEB·.CJOFE·- .. -· .... - ... -INQ-"
: ':1720 P06EC 01 .. 0
SQZ
'::"1121P06ED .DOFF
RAO·'·· . .,;..t-72!-~P&6eE·C&31 .. -·..·· .... · . -· ..·--·I,;OA-4
1723 P06EF 086..
TCA
STA .
1724 P06FO 6800
.,." ",,~;:-····-~.pQ&f1··FC2C·-'''·· ..... -" "........ ----.
:':">1725 P06F2 a900' .
EOR
oaUFFER, I
....... -.....
1
ERROR
.. . -1....
I
. ···· .. ·PAT·TERN.. ··
..- • . • _ .•.••• _ .•. -
RTJ.
ERROR
IHQ-l
.. -· . ··t:tAo-",,···· '.' ··I·- .... -., ,,-,,'
SQZ
SEC6E
. .::.'11UPIJ6F9 '18EA ' .
J"p.
SEC6f'
~·~'':'''11C12···P06FA-·8''1·a ·_·:.... 5£C6~·· .. - "ENA· .- ".
S10'
1733 P06FB 5406
RTJ'JUMP)
1134 PQ6FC 18C9
JHp.
SEC60
:".,~:;~i:13!i,,:-pQ6FIl-5100· ,.' ... : '''' .. "., ... RTJ
- .......-...lt~CREltEN·
:·~·-u.ag.:,PQftR·-DGFF:·-··_:_---
:~~~;.ea1· 'Pf18'Ir-leC7-' ......... "
.
SA Z
,. - -.- ..-. .JfW4 .
1738 P0701 5800
RTJ
~ .•. .,~_1·l'a4.. ·Pa_103·"'"G2--·--:.
· ::S7ItO
>'.., . . .-.'
01121
. 8t·7·2·2.. " ...."-"-" ........................ _. "....01723
01724
BIT FOR BIT CONPARE
.' 01'72'5
.. , ........ -.............. ·"'I'12ft-·'·· . -._ ........"--,, ...........--.-.-:--.,.--"-----.-"'..
01727
ERRO~
01728
.... -·I-CC-REMENT· BUFF£RINDE·X
. _.. " ........, """--'" olnt· ..,- ~ "'- .- ... _ .......... -. ---,-----.......... -.---~
.. 11718
. 01111
- ... SE·C61l--
:;' ~:. ;.t7Itl.P.70"; 1882..
SEC6H
· .. ··see6·
::':"-'"'-!..'l~2~P 0 7 &5-1:600-·
.
P0706 FF70
1743
~:.....,··t..7
P07~7
ERROR
0000
..,.... P0108,~·~la·
· ", :17,., :P0709 EOFF .
····:::17,.& P07DA'S1A·
·:,;'~~~~~4-1...t~·PO?&··CA4l·0·
-...... "
HUH
STQ··
LOQ-
·STQ·.
..... ·LOA·
~··8IRr···
o
". QSAVE
I
ISAVE
REPEAT CONDITIONS CREAD)
0113,.
..:. 017~S· ...."--... . ..... .'._' -.- ._ ....-,,,. __ .~-.... _._ ..._-,.
STA
OATA4
i:;·'i"O ·potiO oeOD
TRfl
A
EN'l
-- ... _...
01743
-01144 .. · ... -....
'. SAVE INDEX
... ....
~
. ,'r
. ....... .
017.. 9
SAVE BUFFER INDEX
017'6
.-. tlf'"
011ft8
DVI
P0712 0060
1752 P0113 8800
.... " .. Po-71 It: ·FF.1
ADO
'017"9
·01750
o
·=N96·· ..
.. . -.- -0179-1·· ..
: . DETER"INE· SECTOR·
01752
CURAO
~.--
,';-,
t:~
()
/\
;~.~.~-, .:--~ ·6~9&OO
(\'
)
r\
j
. PAGE· 54
F··
/--'\
()
(~
,
)
f
r---...\
)
()
..
_- ..........
';
-~
..
:··;-~t·"9t-~·-P.0'114~ ·3008 .
·
.. -
.. ·REPEAT CONDITIO-NS-· REAO··RECORo- ... :-011·19-OVER A G A I N i l T _ O
NEXT ITERATION
. 017.. 1 .
REPEAT SECTION
..... : .. ·Ot7~2· :........,.
P010C 0188
_'W'';''",.''
.:. " ..-....
01736
.. .... - 817-31·· .., '''-'
01738
OBUFFE~,Q'
17.. 8 P0700 6800
_p.o.7-0£ ·F-Cl0· " ... "
·/;·;i.·S"ilt9PQ10F· 081,., '.'
. . - .
'01733
1
. -.
- _ .........._ ... _ - .. -.---.:;-.... ~.~.- • .:. ..... - ... ~~.~ . ...:.-......
01120
INCREMENT BUFFeR INO£X
··se06V -:..
FINSECT
P0102 F966
&._ .• _."
···0-IJI9- "'''' .
.,' 1730 P06F8' 01,.1
"",:"" . '·P06'EFFit.
.
,.': "it36' f'06FfOl01·'..
.-
01118
eRRO~
p06f3 0101
"'..:.,;..;t-726·-POfrF.... ,.181·-·..'------·- .... ·-·· . SAZ·,,· .......- t ......-.-.- '-
1727 P06F5 5312
1728 P06F6 OoFE
"',
01717
A
OATA3
......... .
OBUFFER,I
.
,
01716
BIT FOR BIT COMPARE
- ......... ,
SEC6E···1
.
,,· .. .:...tl?t2- .. ................. ".............. _.c.~;_ •• ...; ,~" ••• -:... ::'.:'•.
01713
0171'
... -..... .
81·71S
95
LOA· .
PATTERN
.. -$lA-···i)A·TA3- ,,- .. , -.........
-----:- ....;.:.. ..P&6E-&-:-8100- ........ · .. ·, .... -_._......... -". --'-- .. -.
1717
OATEI 0 1~04/75
BUf'f'LAG
LOA
···~-t-m..pMtE2'&S:H;
171~P06E7
54
()
..
-.~
(;
\,-.,
C) 0 C) 0 0 c) 0 C) C)
DP10D8
P~.GE
1753 P071S 6800
P0716 FC05
17~" P0717 4800
P0718 FC04
1755 P0719 OA20
.1756 P071A OC1S
1757 POT1S 5800'
POTle FeEC
1758·POT1D.C043
1759·P071E AD76
1760 P071F E804
1761 P0120 .0101
1762 P0721 1808
1763 P0722 lCE4
·1764
1765 P0723 0000
1766 POT24 0000
1767 P072S 0000
o·
1769
1770
1771'
1712
1773
1774 P07l6
P0727
~1715 P07l8
P0729
1176 P012A
P012S
1777 P072C
P012D
1778 P072E
P072F
1779 P07l0
P0731
1780 P0732
P0733
1781 P0734
P073S
1182 P0730
P0737
1783 P073S
P0739
...
QSAVE
ISAVf..
PATTERN
/'
(
"-
"',
)
~~'~
C) C), c) 0 n 0 C) 0
'-----"
DATEI 01/04/75
55
STA
DATA1
STQ
OATA2
01794
ENA
ENQ
RTJ·
$20
$1B
STOP
01195
01756
01157
LDAANOLOQ·
. SAZ
JHP·
JMp·
NUM
NUH
NUM
STJP
CONST+l1
QSAVE
1
SECGE
(ERROR)
ADDRESS OF SECTOR IN ERROR
WRITE AND READ RECOVERABLE CAN
BE CHECKED HERE •
0
0
0
.
.'..
SECTION 7
01753
01758
01759
01760
01761
. 01762
01763
01764
01765
01766
01767
01769
01770
01711
01772
01773
01774
5800
SEC7
FC36
COOO
08C4 P
EOOO
0924 P
5800
FDtD
5800
SEC7A
FC1F
5800
SfC7AA
FBF8
RTJ
CHECK OVE~LAP SEEK
TWO DISLPACKS ARE NEEDED
SECGEN
GfNE~ATE RANDOM NUMBERS
LOA
=XOBUFFER
01775
LDQ
=XOBUFFER+9G
01776
RT·J
CONY
CONVERT TO. LEGAL ADDRESSES
01777
RTJ
HOVEADR
HOVE ADDRESS UP
01778
RTJ
CLRCON
SELECT FIRST UNOIT
01179
E800
LOO
EQUIPADP.
01780
LDA
OBUFFER
01781
RTJ
OUTPUT
LOAD ADDRESS
. 01782
RT.J
INPUT
GERT STATIJS
01783
"
-Yo
FBED
C800
U18F
5800
FA87
5600
FA40
60220800
SEC7B
F
PAGE
55
lj (-
PAGE
DP1008
56
DATE. 01/04175
"R_
CONST+4
1
S£G79· ..
UNIT
AND-
1781t. POl3A A06F
SAN
171' PIT'S 8111
... :17*:P"!G··ltF8
. 17a7 POl30 caoo
.. JHp·;..
lOA
817...
&t1.,
*AIT· f'GR'EHO{)f' OPERATION STATUS
P073E F9A4
-: ··-1-7.'·· POl3F-·~1t -". EOR- .' .... CONST+·9··· ..
. 1189 P01,,0 684A .
STA· .
TEHPLOC
.-..1790 P81ltlEIOG
LOQ
EQUIPOIR
.;..-: - -:.:....- .:..;p.e.1,.·2 .. F.809-.. -.. -~- .......... _... -. . ... ~ .... ... . ....... .
1791 POlltJ 5800
RTJ
OUTPUT
POl .... FA1A
LOQ
EQUIPAOR
·,·1-J.9.2",P011t-!i-·;.€IOO·..····· .'
.
017 ••..
01789
01190
SELECT OTHER UNIT
01791
.. 017,92
.:~
POllt6 FeOA .
.1793 POlltl . CIOO
OBUFFER
LOA
:_" ........ ·~····.pf}1lt8·0170 . _. '.
OUTPUT
RTJ
1794 POllt9 5800
P01,.A FA7,.
INPUT ...,
.... ··1795 . P01!ItB' 5&0&·· - S€C1C- - .. , RT J. POlite FA3A .
CONST ...
ANO1796 P01ltO A06'
~ ···-!·79-1 ~81Itt;· 81-1l~ ~...
......
'" SAN .. . ...... ·1
JHp·
SECle
1198 POlltF lIFe
ENQ
$26
1·799 P0150 OC26
_...Sl.Q··~-:- ...-l&40..'...p01-S!.~A.~ ' _ 0 0 ' - • .
·TEKPlOC"1-· ...-'. " 1301P07S258(}O' ' .
RTJ
CLRCON
.
P0793. F8D6 .
- .L·1;&82 ·.p.1; .. ··~&8t,~·- .. ·SEC7E·· . RTJ ..
:·RE·TCO...T
P0155 F009
'1803 P07565100
\
,.. ~ - .. ······P.l~FA·.J5·· ..... ,.:.~--, ....
.
·.1-14'
01117
.>1ICttt·P0158saoo
. . . P01~9 0168'
'
,
~,··~··te0-5:;··f1O-15-A:'.ltt-···· ...... ,
1806 P0158 1815
1807 POlse 5800
·-·... ·,:·.·~-:-:··-Pll50·....fA2g.;
", '.1'.08"15,£··. &100 '
AORINP
RTJ
'EOR
'--SAN
JHP· .,
.
WAIT FOR END OF OPERATION STATUS
SELECT FIRST UNIT
,.. MAlT NOT BUSY
GET ADDRESS REGISTER STATUS
INPUT
STA
OATA2
PO"'" C8DO
"':i·;':tat,!-:PG-766 6&90-···
P0767 FBB7
1813 P0168 CODa
-· . H"'
01S01
ot.-aI2,·
01S03
-01885
. OIRECTORSTATUS
OATA3
· 01S06
· 01807
· Otl08
,&1&89....
OBUFFER
EXPECTED ADDRESS
.
. , P0765 FBe3
.- ... ~.... ', .............. .
01798
0179.9
0118_
JUMP IF OKAY
SEC70
C&Ot-:··, ........... ' .... LOA·
P0161 0163
STA
1110 P0762 6800
. '~':1811
011'96
. ·tll9?" ....... '"''
,. 1· ..,......
RTJ
0179 ..
01195
OBUFFER
.. ,'i:... ·tllJ-C}-P076&
FaBA
LOAO ADDRESS
c'.
. :': ,,··~P07SFF8S0:.' .
···.·-·.,~.··PN:63-
01793
81810
lOA
INAOR
01811
'STA~··
, OATA4 .
, 018t2'
LOA
=N$BAOO
01813
STA
DATAl
0181'.
, ............. ,P0769.. 8AOO
.. '*41,"" P876A·
....
6800, .
P076B Feeo.
'-" '1ai-S' P&16C·OA2lJ-··...
ENA
1816 P0760 E81E
1817 P076E 5600
LOQ·
0181~
$20.
TEHPLOC+1
STOP
RTJ
PACK
WENT TO WRONG AODRESS
01816
01811
,.... "c' .' ,P016FF899·,
'. 6-0·220&00
(\
\.
)
1\'
/
PAGE
F ..
(\
\,
56
(j
r ')
J
c) C)
J
~
''----"'
f'.
,--i
0 0 0 0 0 0
DP1008
1818
1819
1820
1821
1822
1823
P0770
P0771
P0772
P0773
P0774
POl7S
P0776
1824 P07T7
-",-P077a
1825 POT79
1826 P077A
P077a
1827 P077C
1828 P0770
. t829 -P07-7E
PAGE
E8le
SEC70
0009
0157
0818
C816
E800 .
FeA9 .
5800
FA46
18DA
5800
SEC7F
FeED
1883
18ao
18A7-
1831 P077F C80S'
.. ,1832 P078D. 6800
P07S1 F08S
1833
.1834P07.821800
P07el F076
1835 P0784 DC05 .
...- 1836 P07~5 C8FE
1837 P078& 6800
P0787 FFOF
_. 1838 PU788. 1800
P0789 FEED
1840 P078A
1841. P078C
1842 P0780
P078E
1843 P0781='
1844 P0790
P0791
nOD2
OCFE
4800
F936
DCOD
caDO
F8FD
&0220800
SEta
•
SECCH
5EC9
TEMPLOC
SEC10
F
LOQ·
(
57
\
)
~
C) 0 0 0
()
'~
0 0-· 0
DATEI 01/04175
RAO·
LOA·
.LOQ
TEHPLOC+l
-$26
SEC7F-"-1
TEHPLOC+1
TEHPLOC
EQUIPOIR
RTJ
OUTPUT
JHp·
RTJ
SEcn:
FINSECT
JHp·
JMP·
JMp·
SEC7AA
SEC7A
SEC7
LOA·
STA
SECCH
SEC,,"Z
JHP
SEC4
ENfl
LOA·
STA
5.
SECCH
SEC6Z
01835
018a6
01837
.JHP
SEC6
01838
ass
ENQ
STQ
TEMPLOC (2)
-1
SECTPASS
01840
018ltl
01842
ENQ
LOA
0
RANGE
01843
0184,.
INQ
SQN·
01818
01819
01820
01821
01822
01823
SELECT OTHER UNIT
0182 ..
01825
01826
REPEAT CONDITION
NEXT PASS
REPEAT SECTION
RUN SECTION ,. WITH READY AND NOT BUSY
INTERRUPT INSTEAD OF END OF OPERATION
01827
01828
01829
01831
01832
01833
01834
..
PAGE
57
0
c~'·
PAGF.:
OP1008
...
184'5 P0192 OFE8
1846 P079J 8000
P0194 0090
1841 P0795 68F4
1848 P0796 DFA8
'1849 P0197 48F3
1850 P0198 5800 .
P0799 FB90
·S10A
1·851 P079A C8FO
1852 P079a E800
P079C FB89
. 1853 P079D 5800
PD79E FA2D
1854 P019F 5800
P07AIJ FABE
1855 P07Al DA10
1856 P07A2 5406
·1857 P07A3· l8F6,
1858 PD7A4 C8E6
1859 P07A5 BSE4
18ft-a P07Ao 010 ... ·
1861 P01A7 C8E3
1862 P01AS 0910
18r.J·P07A968El
1864 P01AA 18EF
1865 P07AS 5800' S1DB
P07AC· FSSC
1866 P07AD 18EC
1861 P07AE OBOO
··18&8P07AF 180C
60220800
/''\
\
)
() ()
DATEI 01/04115
SA
LLS
ADO
=N!90
STA·
QLS
STq·
RTJ .
TEMPLOC
8
tEHPLOC+l
CLRCON
LOAlOQ
TEHPLOC+l
EQHRTAOD
RTJ
OUTPUT
RTJ
RETCONT
ENA
RTJJHPLOA·
EOR·
SAZ
LOA·
INA
. STA·
JMP·
RTJ
JHp·
NOP
JHP'"
018 .. 9
018"6
8
LAST CYLINDER
018"7
01S"8
01849
01850
FIRST CYLINDER
01851
01852
WRITE ADDRESSES ON TRACK
RETURN CONTROL TO HONITOR
01854
01855
01856
01857
01558
01859
01860
01861
·01862
01863
0186 ..
01865
$10
(JUMP)
S10A
TEHPLOC+l
TEMPLOC
S10B---l
TEMPLOC+1
$10
TEHPlOC+l
S10A
FINSECT
INC~E"ENT
TRACK NO.
S10A
0
REPEAT CONDITIONS
SEC10
R€PEAT
01853
01866
01867
01868
SF.CT~ON
58
PAGE:
F
(')
/
/'
"'\
\
(j
(~
\
)
/~
/
- - -
0
('t
',,-/
C) C) 0
(-
0
,--)
DP1008
PAGE
18.70 P01BO 0000
1871 P07B1 5800
P07B2 FBAS
1872 P07B3 COOO
P07S4 08C4 f"
18.1~ P07BS EOOO
P07BG 0924 f'
1874 P07B7 5800
P070S FC85
1875 P0789 OAOO
187ti P07BA G800
P07eo 0113
1877 P07BC 6800
P07S0 0113
1878 P07RE 6800
P07BF 011E
1879 P07CO 6800
P07Cl 011E
1880 POlC? 6800
P07C3 0133
1881 P07C4 6800
P07CS 0133
1882 P07Cb cooo
P07C7 CA9F
1883 P07ca E800
PQ7C9 FeC4
1884 P07GA 0172·
1885 P07cn COOO
P07ce &39F
168& P07CO 6800
P07CE 0101
1887 P07CF 6800
P0700 0101
1888 P0701 &800
r0102 010C
1889 P070J 6800
P0704 Dl0e
1890 P070S 6800
P0706 0121
1891 P0707 &800
P070/} 0121
1892 P0709 5800
P07DA FR4F
1893 P070S 5600
P070C FB72
189-" P0700 5800
P07Ot.: FA80
1695 P070F E600
P07EO F04D
189G P07E! C800
iJ07F.2 OOE2
1897 P07£3 5800
P07E4 FQOA
60220800
C-)
0
F
MSE.C
SECH
SCl1A
Se1L!
r---')
(--/
(
)
_/
c;
C~)
f)
"-~
0 0 0 0 n 0 C
~
DATn n1/04175
59
NUM
RTJ
SECGEN
LOA
=XOBUFFER
01812·
lOQ
=XOBUFFERt96
01873
RTJ
CONY
0
POSITIONING TIMF. CHECK
CONVERT TO LEGAL ADOqESS
01870
01871
01874
EN!\
0
STA
oeUFFER+l0
01875
01876
STA
OOlJFFER+12
01877
STA
OBIJFFER+25
01878
STA
OBlJFFER+21
01879
STA
OOlJFfER+50
01880
STA
OBUFFER+52
01881
LOA
=N$CA9F
lOQ
UNITSECT
8KJ LAST ADDRESS
01882
01883
0188,.
01885
SQM
2
LOA
=NZ&l9F
STA
oaUFFER+l1
01886
STA
09t!FFER+13
01881
STA
oe'UFFER+2G
01888
STA
OAUFFER+2B
01889
STA
08UFFER+51
Ot890
STA
OBUFFE:?+53
01891
RTJ
CLRCON
01892
kTJ
MOVEI\O:~
RT.J
PETCONT
01894
LDQ
EQUIPA09
01895
LOA
OOUFFER
PACK AOORFSS
01896
RfJ
au rpUT
OUTPIJTAOORF.SS
01897
85.3 LAST ADDRESS
MOVE THE NEXT ADDRESS UP
01893
. PAGE
59
DP1008
PAGE
1898 P07ES 5800
1899 P07E6 5800
1'&1E7 F&81
1900 P01ES 18F6
1901 P07E9 18F1
1902 P07EA 18C6
1903 P01EB 0000
TIME
...
190~
·1905
1906
1901
190.8
1909
1910
1911 PG1ECCOOO
1912 P07EO FED6
1913 P01EE 0901
1914·P01EF 0101·
1915 P07FO 18FO
1916 P07Fl lCF9
1918
1919
1920
1921
·1922
1923
"
60220600
/-~
J
/-",
/-~
r-\
I
,I
'J
r
RTJ·
RTJ
SC11E
FINSECT
WAIT 165HS MAX FOR NOT BUSY
JHp·
JHp·
JHP'"
NUM
SC110
SC11A
SEC1l
R.EPEAT CONDITION
NEXT ITERATION
REPEAT SECTION
MSEC TIMER
..
...
0
01898
01899
THE FOLLOWING TWO WORDS SET UP THE NUMBER OF CYCLES NEEDED'
TO F.STABLISH A 1 MILLISECOND LOOP
...
..
...
THE CONSTANT TtMCON WILL BE OVERLAYED ACCORDING TO THE
TYPE OF CPU
LOA- D
TIMCON NUM -297
TIME1
INA
SAZ
JHP'"
JHP'"
sellE
P07F2 0000
P07F3 0844 .
P07FCt 68BB
P07F5 58F5
SC11A
P07F6· D8S9 .
P07F'7 5800
P07F8 F98E
1924 P07F9 OFCE
1925 P07FA. 0121
1926'P07FB 18F9
1927 P01FC CODa
P07FD OOAS
1928 P07FE 98Bl
1929 P07FF-·012B
1930 P0800 C8AF
1931 PU801 6800
P0802·FB19
1932 P0803 C800
P0804 OOCO
1933 P0805 6800
P080E) FBtE)
1934 P0807 DAtO
1935 P0808 OC1C
1936 P0809 5600
poeOA FAFE
1931 P080B tCE£»
SCltc
OATEI 01/04/75
60
SET UP MItlISECOND COUNT
FOR 1704
1
1
TIMEt
ClIME)
EXIT
...
NUM
·CLR
STA·
RTJ"
RAO'"
RTJ
AlS
SAP
JHP"
lOA
01918
01919
01920
. 01'921
01922
01923
INI TIALIZE THE
COUNTER
WAIT 1 MILLISECOND
A
MSEC
TIME
"SEC
INPUT
01900
01901
01902
01903
8198ft
01905
01906
01901
01908
01909
01910
01911
01912
01913
G1914
'01915
01916
GET DIRECTOR STATUS
01924
01925
Ot926
01927
14
1
GO AGAIN
MAX WAIT TIME
SC11B
=N,165
HSEC
SC11C·"'·1
I1SEC
. DATAt
SU8'"
SAP
LOA·
STA
01928
01929
. 01930
01931
HSEC WAIT TIHE
LOA
OBUFFER
01932
STA
DATA?
ENA
ENQ
RTJ
$10
STOP
REPOQT HAX
EXCEEDED
JHP'"
(SCltE)
EXIT
LAST CYL ADOR OUTPUT
$iC
01933
01934
01935
01936
TIME
~OSITION
01937
PAGE
F
)
'\
.,--\
\
/
\.
,
"-
\
\
)
I
)
(-j
(
60
')
/
(
-- \
)
-
.'
'"
f
')
/-\
(~\
J
f)
~
0 0 0 -0 0 0 0 0DP10tl8
PAGE
193<) P080C OAFE
1940 P0800 6600
P080E F8B6
1941 P080F COOO
P08tO t234
1942 POB1! 6402
1943 P0612 EOOO P061l 0600
1944 POB14 C6DD
1945 P06l5 0000
1946 P061G GAOO
P0817 OOAD
1947 POS18 OOFE
194B P08tQ-0171
1949 P08tA 18F9
1950 POB11l COOO
P06tC OEC4 P
1951 P0810 68DO
P061E OO-A5
1952 P081F 5800
P0820 FB09
1953 P0821 OAOO
1954 P0622 E800
P0823 FAFD
1955 P0824 5800
P0825 F99c)
1956 P08265800P0827 F95F
1957 P0828 A06C
1958 P08?c) 0101
1959 POB2A 18FB
1960- P0828 5800
P082C F845
1961 P0820 COOO
P082E 5678
1962 P062F 6402
1963 P0630 C07l
1964 POa31 5406
1965 P0832 1806
1966 P08J3 COOO
P0834 OCJ96 P
1967 P083S EOOO
PD836 OOOE
lCJ68 P0837 5408
1969 P08JS 0806
1970 P063Q 0001
1971 P06JA 0000
1972
1973 P083!) EOOO
P08lC 0600
1974 P08l0 C600
1975 P083E 0000
1c)7G P083F BADO
P0840 0084
60220800
F
SEC12
S12A
TG
S128
•
S120
-
() 0
0 C·.' n 0 0 0 0
,.-I
DATEt 01/04175
61
ENA
STA
SECTPASS
01939
01940
LOA
=N$1234
01941
STALOll
(STOPX)
=N$6OO
LOANUM
STA
0
OBUFFER,Q
INQ
SQH
JMp·
LOA
-1
1
St2A
=XOBUFFEP.+1536
STA
OBUFFER-l
01951
RTJ
CLR.CON
01952
ENA
LOQ
0
EQUIPAfJR
01<)53
01954
RT.J
OUTPUT
RTJ
INPUT
ANf)JMP"
RTJ
CONST+l
1
S129
OUTBUF
LOA
=N$5678
STALOARTJJt1P"
LOA
(STOPX)
BIT8
(JUMP)
S1281
=XAUTOMSG
NO
01962
01963
0196 ..
01965
01966
LOQ
=XAUTOENO-AUTOMSG+l
01967
RTJSET
SLS
SLS
(MESSAGE)
A,Q
01968
01969
01970
01971
01972
01973
SAZ
S1261
)
C
-1
(0) ,Q
PTC2
01942
01943
PTC2
PTC2
HOVE COpy OF HONITOR TO BUFFER
01944
01945
01946
AREA.
01947
01948
01949
01950
•••••••••••••••••
OUTPUT ADDRESS
CHECK FOR BUSY
=N$600
LOANUH
EOR
0
(0) ,a
ORUFFE~,Q
01957
01958
01959
01960
WRITE ONE TRACK
01961
IS OMIT TTY SET
YF.S
TELL OPERATOR TO AUTOLOAD
STA~T
AFTE~
LOQ
01955
01956
1
0
BIAS •••••••••
AT THIS AOORES~ PLUS ONE
AUTOLOADING FROM DISK PACK
PTC2
PTC2
PTC2-
·01914
01<)75
01976
PAGE
61
l-~
DP1008
PAGE
1917 P0841 0111
1978 P0842 1821
1979- POS't3 ·'t&00·
P0844 FAD8
1980 P084S C600
1981 POalt60000
1982 P08lt7 6800
POS48 FA06
·--··-1-963··P&alt9EOO&
P084A 0600
1984 P084S CAOO
.. -·poaltc 0078·
1985 P08ltD 6600
1986 P084E 0000
1987 P08ltF'01lt2
1988 P08sa ODFE
1989 P08S1 18F9
.- .. -1-99Q P0852 COOO
P08S3 .SA'OO
1991 P08S4 6800
POSS5 FAC6
1992 P0856 CAOD
P08S7 0060
.. -··.1993P0858·6800 .
POS59 FACIt .
. 1994 P085A OA20
. - --1995 -POSSB·aCl0·,
1996 P085C 5800
P0850 FAAB
·1997 POSSE 1808
1998'P085F A076
lCJil9' P0860' 0115
... 2·000 P0861f800
P0862 FABA
2001 P0863 DOFE
·.····2002 ·PQ8&4-:-0171
2003 P086S 1807
2nOlt P0866 5800
-. . ·P08~7·F8o-1·
2005 P0868 DBDl
2006 P0869 OBOl .
2007· P086A lRA1·
2008 P086a 0006
2009 P0871 OOFE
201:0 P0872 1t.800
P0873 FRS1
2011 POB74 COOO
P0815 CA90
2012 PO.876 E800
P0877F816
·2013 PG878 0·172
2011t P0879 COOO
P087A 6390
60220800
SAN
JH?4
STa
st2A1
01978
·WORD NO. IN ERROR
'·*979
CO) ,Q
PTC~
01980
·01981
· 01982
loQ
=NS600'
PTC2
81983
LOA
OBUFFER,Q
PTC2
01984
STAHUH
.(O),Q
PTC2
PTC2
PTC2 .
PTC2
PTC2
=N~BAOO
01985
01986
01987
019aa
01989
01990
STA
OATAl
01991
LOA
OSUFFE~,Q
01992
. DATAl
ENA
ENQ
RTJ
'20
$10
STOP
JHP"
ANDSAN
LOQ
SlZE
CONST+11
Si2E- .... l
OA1A2
INa
-1
1
5120
FINSECT
JHP·
RTJ
PTC2
DATA REAO
0
2
"1
S12A1
STA
SQM
PUTZ
SEC13
S12C
OATA2
O.
DATA,.
INQ
JHp·
LOA
S12E
01977
1
LOAHUH·
STA
SQZ
Si2e
OAT!!I 01/0ltnS
62
·0199a
0199,.
01995
01996
. ERRCODE
PTC2
IGNORE REST OF ERR.ORS IF BIT 11 SET
COHPARE ANOTHER LOCATION
NOP
NOP
JMP·
ass
ENQ
STQ
1
1
SEr,12
PUTZ(6)
-1
S€CTPASS
REPEAT CONDITION
NEXT ITERATION
REPEAT SECTION
LOA
=N$CA90
854 LAST TRACK
LOQ
UNITSECT
soFt
2
=Nt6390
LOA
01997
0199'
01999
02000
02001
92112
· 02103
02GO ..
02011
02012
853
LAST
- 82013
020'1,.
TRACK
PAGE
/
.1
02005
02006
02007
· 02008
02009
02810
F
n
"
n
(
() ()
62
n
r--'l
•
J
(~
)
8
C) 0 '0 0 0 0 0 0 0
DPi00S
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
202&
2027
2028
20,29
2030
2031
2032
2033
203,.
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
20S4
'2055
20156
2057
2056
P067B
P087C
P0870
P087;::
P087F
P088D
P0881
P088Z
P0683
P0884
P088S
P0886
POS87
P0868
P0889
P088A
P088S
P08BG
P086D
POS8E
P068F
PI\GE'
68EF
DCOO
48EE
5800
FAA A
OAF5
68£C
DCJl
S13F
48F.B
CaE7
E800
FA9E
5800
F936
5800
F9D4
5800
F8fA
68E2
AOOO
3700
S13A
PUTZ
60220800
F
C') 0
0
LAST ADDRESS
ENA
STA·
ENQ
STQ"
LOA·
LOll
-10
PUTZ+3
$31
PUTZ+4
PUTZ"'1
EQCHKHD
RTJ
OUTPUT
INITIATE CHECKHORO CHF.CK
02025
RTJ
RETCONT
HAlT NOT BUSY
02026
PTJ
INPUT
G,ET STA TUS
02027
STA·
PUTZ+5
=N$3700
CURRENT STA TlJS
CHECKHOP,O, LOST DATA, SEEK,
02026
02029
STORJ\GE PARITY, DEFECTIVE TRACK
ARE ~ECOVERABLE ERROP.S
02030
02031
02032
02033
02034
02035
02036
02037
02038
02039
02040
02041
02042
RAO·
LOA·
SAZ
1
S13G
PUTZ+5
PUTZ+2
PUTZ+3
PUTZ"3
FIRST ADDRESS
AT'Tf.HPT COUNTER
ERRCODE FOR RECOVERABLE CHECKWORO ERROR
AODRESS
JUMP IF NO CHECKHORO ERROR
STATUS AT LAST ERROR
ATTG1PT COUNTER
1
LOA·
STA
MAKF. 10 ATTEMPTS
$32 = ERRCODE FOR NON-RECOVERABl"
CURRENT TRACK
LOA·
STA
PUTZ+2
OATA2
ERROR STATUS
ENA
LOQ·
RTJ
$10
JMP·
LOA'"
S13H
PUTZ+3
10
S13H-·-1
S13J
RAO~
INA
SA7
JMP·
ENA
RTJJMP·
LOA·
ANOSUB
0
02015
02016
02017
02018
S13A
PUTZ+4
PUTZ .. 1
DA'TA1
JHP"
S13H
0
0
PUTZ+l
CLRCON
SAN
JMp·
LUA"
STA"
S13G
0
0
.y.
S13J
)
~
STA·
ENQ
5TO·
RTJ
AND
0111
1613
C8DD
6809 '
0809
C8013
0101
18£C
0806
COD2
6600
FA80
C8DO
6800
FA7E
OA10
ERCE
13800
FA66
1805
C8C9
090A
0101
18F1
OA10
540&
1805
CBCO
A07E
9000
0090
,
DATEI 01/04175
63
.y.
P0690
P0891
P0892
P0893
P0894
P0895
P0896
P0897
P0898
PD899
PD89A
P089B
P089C
P0890
POa9E
P089F
P08AO
P08A1
P08A2
POIJA3
POSA,.
POBA?
P06A6
POBA7
P08A8
P08A9
P08AA
P08A8
P06AC
P08AO
POBAt:
(
PUTZ"'4
STOP
ERR-CODE
= $31
02043
02044
OR $32
NO CHECKWORD ERROR
R~COVERABLE ERROR
$10
(JUMP)
S13F
PUTZ+!
HOOFn
-=N$90
02019
02020
02021
02'022
02023
02024
REPEAT CONDITIONS
02045
020 .. &
02047
02048
02049
02050
02051
02052
02053
0205 ..
02055
02056
02057
02058
PAGE
63
0
r>
"'--/
C
..
PAGE
DP1008
2059 P08AF 0104
2060 POSeD esSR
~2ft61 ·poa91"1910· '-'
2062 P08B2 6889
2063 P08B3 18CC
·2064 P0884 ·C8B7S13Y
2065 poses B8BS
2066 P08B6 0105
.......!&&1. P0887"C8BIt,··· .
2068 P08S8 ADS2
2069 P08B9 8073
······207·0 .. PO&9A··-68e1 ~.
2071 P08BB 18C4
2072 P08BC 5800
S13X
.. _... ,....:....-. P08BO F7A9 .
2073 P08SE 18C1
2074 P08BF 0800
, .. ··207; ·P08Co· 1850-
2077 P08e1
2078· . ...
2079P08C2
20ao'P08C3
.- ··2881 P08C'"
2082 P0924
2083 P092S
~
'
~"
("\/
,
(j
if)
\
!
S13Y--·1
. PUTZ+!
INA· .
.. Iiil·
4~P·
·LO"-
EOR-
SAZ .
LOA- .
ANDADO-
... STA-.·
JHP· .
RTJ
n
!-NC~tfT
PUTZ+!
S13F
PUTZ+l·
PUlZ'
S13X·_·1
PUTZ'"i
HFFon
CONST+6
PUTZ+l
SlJF
FINSECT
.
NUH
- ...
TRACK
82066
.' 82067 .
. 02068
02069
02'7'
·02071
02072
FFOO
INCREMENT CYLINDER
S1'3F
REPEAT LAST
SEC13
REPEAT SECTION
o·
028'9
.2.'0
.Hfl
82062
02063 .
. 02&6,.
02065
o
CON~ITION
02073
02074
02075
S17.E-OF-BUFFER FLAG A:O.853
02877
A=lt854
0000 . SURFACE NUH
0924 P
ADe
0060 .... OBUFFE~ .. BSS
ADC
0985 P
IaUFFER BSS
0060
60220800
n
"
DATE. 01/04flS
SAl
LOA·
STA·
BUFFLAG
0000
.... _." ..
64
oa018
or•• o
' 120741
0
OBUFFER+96
oa,UFFER(96)
IBUFFER+CJ6
IBUFFER(96)
... 821.t
02082
02013
PAGE
F
,I")
\
)
n
.
!
/
::)
64
() () n
\
/
(j
(j
(j
I)
'J
c-)
0
C)
c) n
'-
,0
I~
DP1008
n
PAGE"
2085 POQ8S 0000
2086 P0986 COOO
"P0987 0000 p
2087 POQ88 6800
P098Q F9QE
2088 P098A 540A
2089 P098B 48'36
2090 POgaC 6836
2091 pa980 E091
2092 P098E C291
2093 P098F 540A
2094 P0990 6837 ~,
2095 P0991 CO 00
P0992 09A4 P
2096 P0993 DC25
20Q7 P09Q4 5'+08
2098 P099S 1834
2099 P0996 BDDA
2100 P0997 5052
, P0998 4553
P0999 5320
P099A 4155
P099B 544F
P099C 4C4F
PD990 4144
P099E:2046
P099F 4F52
POQAO 2044
P09Al 4953
P09A2 4820
2101 P09A3 BODA
2102P09A4'800A
2103 PD9A5 4450
P09A6 3130
INIALIZE NUM
LOA
(
65
{)
"-
~
0 0 C) 0 0 0 0 C)
DATEI 01/04/75
0
=XDP1008
THIS ROUTINE WILL BE DESTROYED
02085
0208&
BIAS
RTJ'"
STA'"
LOA
(CONV"'
TYPE1
TYPE1+!
TSACTV
TSFREQ-1,Q
(HEXASC)
TYPEF:-1.
=XTYPE
ENQ
RTJ ...
JHP"
NUH
ALF
TYPEE-TYPE+1
HtESSAG)
IN1
$800A
X,PRESS AUTOLOAD FOR DIS'"' X
02096
02097
0209S
02099
02100
NUH
NUH
ALF
$800'A
$800A
CARRIAGE RETURN
X,OP10DR, 1738 DISK PACK TEST. X
02101
02102
02103
NtJM
ALF
$800A
X,CP2F, Vt:R. 3.1-1 X
0210'+
02105
STA'" ,
Loa ...
LOA'"
RTJ~
AUTOCNO
TYPE'
C)
STA
STQ'"
AUTOHSG
0
02087
CONVERT
02088
FHA
02090
02091
02092
02093
02094
02095
02089
P09A7 3038
P09A8
P09A9
P09AA
P09AB
P09AC
P09AO
P09AE
P09AF
P09BO
POc}B1
P09B2
2104 P09B3
2105 P09B4
P0ges
P09B6
PO,9A7
P0988
P0989
P09BA
2C20
3137
3338
2044
4953
4820
5041
4348
2054
4553
542E
8QuA
4350
3246
2C20
5645
522E
2033
2£31
60220800
F
PAGE
65
(
PAGE
OP1008
P09S8
P098C
··Zl&6 .. ·pggeD
. 2107 P09BE
66
2031
2820
AlF
-f&OOA
3, IA
HUH
0,0
HUM
ALF
.. -'2020
4, Fe
NUH
. LOA-
$800A
·· .. EQAOOR
,·HUM .-.
·&D&A
2049
P09BF 4120
. P09~O,· 03020 .'
2108 POgel 0000
TYPE1
P09C2 0000
'-·... 2J:-G-9- P&9&3·-2S2G .. ·_ . ··· .
2110 P09C4 2046
P09CS 4320
. -_ .. ~. '-- . P09C6 3020
. . P09C7 2020
2111P09C8 800A
TYPEE
. ·····2t-12·· P09C9~-C80a·
INt
P09CA F6lB
2113 P09CB 6800
02107
02108
·02199
02110
::
02111
02112
. HA·KE FUNCTION CODES
. 02113
EQUIPADR
02114
OZ11S
1.
EQKRITE
02116
. 02117
1
... ~.. P &-9GF· -1=951· ..- ..
2116 P0900 0901 .
2117 P0901 6800.:
-&2t06
=
EQUIPOIR
STA
.. P09CC-F9S3' ...... -. -.... .,
2114 pogeo ·0901
INA
2115'P09CE6800
STA
~;~.....
CATEI O.U04/7t;
INA
STA
;~iItH!Hiitr"""~'
i~r
'-'i~A~-"
..
..:.. .. - _...
:.:!." " . .
,:~~:,:"'
.P.405-'f'9Itfi-;~..
.-~
'.~
2124 P090C 0901:'
2125 P09UO 6800
...~.,•.•-"
02120
02121
.' .
1 ..
STA
EQWRTADO
. LOA'i'
=jt~TART.1
F62t'
2128 P09E3 COOO ;..
. POgE6
~~
pees
:,,~::~~~;~;:{'
A080:/
..
:~/
2136
2137 P09EC 0111'
60220800
()
()
\
/
~.
Oz.1l,
.
......'.
'ft2?
'-1"
02121
..
"
St,fRFACE. '
02129
0'"
NiH· .. _.
82111
FED8~~
·-.--213-0-· P-o·9E7 ·:8AOO .
2131 P1J9~8 6800;,.
.
P09El} FE07';
'.~ .·:2:132 P·.~,A· 0849- ;"..
':'213.3
0212 ..
02129
=XOBUFFER+1536
LOA,:
'-.~'.~'::"': -"'-.l!:Milt ·0 EC,.zr.P.
' . '.
O:~/:fi29' Pa4!S 68tO;h
.•
~"·~r
;:;.:
' .. ";'~
.~ RetU~N
'",
STlh'
~09~2
82122
Ot123
.'
EQCftKWO ...
.
coio;':;q .
.~'/':::.; . ~,09£a OOOQ.o11)·'
..···:~-e1·27· 'P1i9t1' 6&Of"~·.. .• ..
. ~
1 .;,..;;
>;
INA
P84DE· FCJ:It7,·,'
·:.<,·126 f)~tP.F
STA
02119
:~':::k:.
, 2120 .P0906 0901."
INA
2121 P09D7 6800,\,.
STA .
,.:.:-....... ···P89D&·F948 ,,:,~, ...... ", .
. '2122 P8CJ09. 0901:.·,
.
INA,
:";1123'P,·9,D...,4 680·'<1i
,'.. ',;
..•..- ........ . p&90e .. F949 .:,,'~ ... _. ,....,
, 82118
ENA
STA
:- ...~ .....
.. ... ,,"
..
LOA- .
ANO-.'
BUfFlAG
~
DETERMINE
•
LONG OR
SAN
.'•..........•.............. IN'FORK
".~OIJ
I.F
SH~T
1
02i'12
0213~
FOOD
rHE~E' IS ENOUGHREMAING CORE FOR A
.
OIS34
·.213~
82136
02117
BUFFER
PAGE
F
()
(j
66
(\
...
/
(j
(
)
f~
~-
/
()
'--- -
0
C) 0
0 () C)
C) 0
'---
OPt 008
2138 P09EO
2139 P09EE
P09EF
2140 P09FO
P09F1
2141 P09F2
2142 POQF3
2143 P09F4
2144 P09F5
214S P09F&
.2146 POQF7
P09F8
2147 P09F9
PQ9FA
2146 P09FB
2149 P09FC
2150 P09FO
21131 P09FE
2152 P09FF
2153 POAOO
2154 POA01
2155 POA02
215& POAOJ
2157 POAO"
2158 POA05
2159 POA06
2160 POA07
2161
21&2 POA08
2163 POA09
216 .. POAOA
POADS
2165 POAoe
2166 POAOO
2167 POAOE
2168 PDADF
2l6q POAI0
2170 POAll
POA12
2171 POAIJ
2172 POA14
POAIS
2173 POA1;;
2174 POA17
POA18
2175 POA19
2176
2177
2118
2179 POA1A
2180 POA1B
2181 POAle
2182 POAI0
PAGE
181C
caoo
BUFCK
F938
E800
FEOO
0179
0121
1815
C049
Aoeo
8000
OFFF
9600
FEC7
0131
1816
l6DC
0124
COO4
A080
88F&
18F6
C049
AD8D
8aF2
0901
0131 ,
l80C
DaDo
5800
F67A
C056
OF42
OCOJ
0882
CADA
6800
FOOA
5401
C8{JO
FEAC
0901
BlJFCKl
BUFCK2
BUFCK3
...
AAA
....
.
FED6
FF25
TIMV,'\L
rEg,.
FOOF
F
c:·
02138
02139
LOQ
SURFACE
021.. 0
SQM
SAP
JMP·,
LOAANDADO
BUFCI(2-"'-1
1
TTT
INFORM
HFOOO
=N$FFF
02141
02142
021 .. 3
02144
021 .. 5
02146
SUR
SURFACE
D21 .. 7
SAH
JMp·
JMP'"
SAP
LOAANDAOO·
JMp·
LOAANnADO·
INA
SAM
1
AAA
TTT
8UFCK3- 4 -1
INF08K
HFOOO
BUFCK1-1
8UFCK1
02148
021 .. 9
02150
02151
02152
02153
02154
02155
02156
02157
02158
02159
02160
02161
02162
02163
0216 ..
FOOD
INFO~H
FOOD
1
..
JHP·
Nap
RTJ
.
.. 1 .. .. .. ... .. ... .. . .. .. . .. .. .. .. .. .. .. . . ..
AAA
0
PARMi
SHf'1PAR
2
3
a.
TIMVAL,Q
TIHCON
GET SHH PARAMETER WORD
STRIP
OUT
CPU INOEX
GET CPU MILLISECOND COUNT
STORE IT IN TIHE LCOP
..
.. .
02165
02166
02167
02168
02169
02170
RTJLOA
(CONTROL)
SURFACE
02171
02172
INA
RAO
1
aUFFlAG
02173
02174
JHP·
TTTl
TIME COUNT TADLE
NUM
NUM
NUH
NUM
-297
-218
-363
-544
~'
o1/0~/75
BIA~
HFOOO
BUFCK1-!
n /,
0 0
TTT
LDAARS
ENQ
LAQ
LOA·
STA
0800
60220800
... ..
OATEI
67
0 0 0
~
JHp·
LOA
.. ... ..
TTT
TTT!
FEA6
18FO
(
170~
1714
1764 - qO 0 NSEC
17A4 - 60n NSEC
02175
02176
02177
02178
02179
" 02180
02181
02182
PAGE
67
(J C-,
OPt008
PAGE
2183 POA1E OltC4
218' POEE20000
- ... 2185 POEE3'OOO&'
2186
. PGH=
•
'OEEIt
SZS
TAGBUF
3812)
HUH
NUH··
END
COM
= 0000
68
DATEI 01/0ltnS
SUR8UFC1344-124)
02183
0218 .. .
02·185
02186
o
o
OAT = 0000
0)
0)
",
~ .. ;............ :.: -~ .....
........ ... ~- ....
~.·li
.....
'.,
.,'.
:;·'·:····n~>;···
::J
: 'Ij
'.
:.~ ~t:'~
...... .'_.. :.'';;'~~,,: .. -
,
1.:.:
,
I
~. ~
&0220800
(~
\
/
.
(~
,
)
(')
PAGE
F
()
f
n
68
(l (j
(\
I
j
(\
c) o
o
()
()
OP1006
PAG E
69
()
(J C:· o
o
DATEI 01/04175
j
E QUI V ALE NeE S
----~----~------------OEF.LINE
NA"E
VAlU'::
0000 .
0071
0072
0073.
0074
0075
.00·76
I
CONTRa
STOPX
EXIT
REQINT
FClRIN
.JUMP
DOFF
0001
0002
0003
0004
0005
0006
0011
0078
0079
0080
.0061 ..
0082
0083
0084
0085
GENRAN
TVPEOU
TTYBZY·
HEXASC
OVRLAY
RELPOS
HAINL
·SETHAS.
ST.JP
0007.
0006
0009
OOOA
OOOB
Dooe
0000
0042
0043
. ,· .... 0086
LASTVA
0044
0087
lASTAD
00 .. 5
'0088
LDLCOR. 0047
0089
LoL1CO . 0048 INFORt1 0049
0090
SMHCNT
0056
0091
. BITOO
0092
006S
0093
BITO
006B
0094 .
DOGe
BIT1
SI12· . . 0060
0095
0096
aIT3·
'006E
0091
006F
BIT4
.0098, .
.0010
BITS
0099
BIT6
0071
0072
0100
BIT7
·.--'-,0101,h ... ; BIT8· .~.: 0073
0102
BIT9
' 0074
REFERFNCEO AT LINE NUHRER
(000255) • 0374. 1709, 1721, 1729, 1745
(000001)
0072, 0889, 0893, 2171
(000002)
0073. 0432, 1010, 1942, 1962
(000003)
0074, 0385
(000004)
0075, 0076, 0134, OJ40
(000005)
0135
(000006)
0077,. 0382 • 0387. 0,,"02, 040S,
, 1329, 1333, 1339, 1348, 1389,
, 1401, 1410, 1455, 1483,. 1538,
1510. 1575. 1586, 1685. 1133,
, 1964, 2054
( ooooon
0018, 0131, 1077, 1063
(000008)
0079, 0080, 0.133
(000009)
COOO010) , 0061, 0132, 0136, 2093
(000011 )
0062
(000012)
0083
(000013) , 0084
(000066)
0085
(OOoo&n
0086, 0087, 0130, 0~29t .1003,
1758
(000066)
(000069l
0086
(000071)
0089
(00007Z)
0090
(000073)
0091, 2132, 2144, 2156
(000086)
0092, 0129
(000107) , 0.093, 0128
COO0107)
009~
(000108) , 0095
(000109) • 0096
(000110)
0097
Ooge
(000111)
(000112) , 0099
(000113) , 0100
(000114) , 0101
(0001113) . , 0102, 1963
(000116) , 8103
,
,
,
0416
1395
1559
18;6
,
,
,
,
,
,
1134
,
,
,
....,
60220800
F
PAGE
69
OPI008
PAGE
0103
0104
0105
0106
0107
0108
0109
0110
-·0111·
0112
0113
0114
0115
HFFFF
HOOOF
HOOFO
HOFOO
HFOOO
HOOFF
0075
0076
0077
0078
0079
007A
007B
007C
·0070
007E:
007F
0080
0081
0116
HFFOO
0082
BI110
BIll1
BIl12
81T13
BIT14
8IT15
HOOOO
0117
0118
0119
0120
0121
0122
0123
012 ..
0125
0126
0127
0128 ..
0083
HFFFO
HOFFF
0084
HFFOF
0085
HFOFF
0086
H7FFF· 0087
0088
H7FOO
H0780
0089
HOO7F
··lJ08-A
H2020
0088
TSACTV 0091
. TSFREQ 0092
CONST
0068·
(000117)
(000118)
(000119)
(000120)
(000121)
(000122)
(000123)
(000124)
. «000125)
(£100126)
(000127)
. (000128)
(0 00129)
,
,
,
,
,
,
,
,
.,
,
,
,
St1HPAR
SJPAR
RANDOH
CONVER
HESSAG
REQNO ..
CLRND
CONVH
INFOBt(
"!.
1',1'
,
•
,
,
,
,
,
,
f'
I
,
aOOA
0004
0483. 1201. 1246, 1486, 149q
16S2, 1691, 2068
1252
2091
0348,
0472,
1l78S,
1202,
1553,
1957,
0356,
0493,
0810,
1243,
1656,
1998,
0366,
0575,
·0891,
1276,
1759,
2069
0386. 0404
OS6"J, 0620
1103, 1135
1447·, 1477
1784, 1786
2097
,',.':
,',
60220800
0056
0043
0007
aODA
0006
000 ..
0005
0104
0105
0106
0107
0108
0109
0110
0111
0112
0113, 1197, 1491, 2057
0114
0115, 2133, 2145, 21t;3, 2157
0116, 0480, 0765, 1228, 1239, 1617
(000130) , 0117,
, 1507,
(000131) , 0118
COO0132) , 011CJ
(000133) , 0120
(000134)
0121
(000135)
0122.
(000136) , 0123
(000137)
!l124
(000138)
0125
(000139)
0126
(00014S)
0127,
(000146)
2092
(000107)
0345,
04.67,
0625,
118&,
1529,
, 1796,
(000086)
2165
(0000671
. (000007)
(000010)
(000008) , 1968,
(000004) , 0522
(000005) , 0421
(000010) , 2088
(000212) • 2152
,
0129
0130
0131
0132
0133
0134···
0135
0136
0137
DATEI 01/04175
70
PAGE
F
!~
(
)
!
70
./
\
)
(;
o
o
o
c)
OP100S
PAGE
(--~)
71
o
C) (J
,-~
( }
'---
DATE' IJ1/04/75
-..... ..-..--- ..
S·Y·MS·.o L S
--~
OEF.LINE
NAHE
ADDRESS
REFERENCED AT LINE NUMBER
,
,
,
,
,
,0320·
OP1008 0000
PARAOR 0004
RETURN 0005
EQAOOR 0006
0008
ALAR"
ENOOPE 0009
-.. 0~2c}·
BEGIN. . aOOA
0331
oooe
START
0338
REPEAT 0019
.. REP._.
.. Jl341
..0010
0354
NEXTSE 002F
·0355
0030.
LOOK
TAG2 ..... OU36
- ·.·0365
0376
0048
rAG3
0386
TAG4
.0054
.11392 _ . PASSCT, ,0058.
0393
0059
TEST
Q
0067
0397
SECTIO. ,00680398··
0400
FINSEC 0069
0322
0323
Jl324
0327
0328
Oltl0
".424
"-- --·0425"
0428
0435
.04.16
0458
0073
FIN3
0083
FIN2
. FINl . .-0084---0086
PARA"
0080
PIO
.__ . UNltSE_.JU18E. __.'
OO'SF
RANGE
0464
0465
AtH
0090
AL"! \ 0091
0466 .~. , '. P.6R.SET.--- 0092 .
0479
PARSIT QOAO
0060
0491
PARS
.-'-.. --0_96.PARSLY 0.08&
0504
PARSLE Doe3
SECTPA OOC5
0507
60220800
F
,
,
,
,
,
2086
0596,
0339,
0486,
0481
0323
0320,
0390
0888, 2121
0491. 0496, 0520, 2112
0497, 0519, 08156
0368, 2126
03~O, 0421t
, 0364
'
0357 .
, 0362
, 0383
, 0371, 0378,
, 0368, 0369 .•
,.0359, 0363
, 0372, 0376,
, 0403, 0410,
..
0469
0375
1401
0411, 0425, 1294,
1353, 1415, 1594, 1738, 18Z6;
18.99, .200", 2012
0426
, 0419
'. 0417
0331, 0406, 0495, 2164
0322
0342, 0346, Jl471. 0474, d~78,
1493, 1883, 2012
0479, 0482, 1505, ' 1540, 1616,
.1690, ,184,.
~3"38 , 0486
....,
..,
,
,
,
,0433
0468, 0470,
0489
t · 0490, 0492,
, 0503, 0505
0401, 0408,
• 1372 •. 1421,
2010
,
,
,
1306
1865
1248
1651
0473
.0494
1060, 1074, 1269, 1312
1&43, 1655, 1842, 1940
PAGE
71
/
0
~.
r
\. --
j
\
PAGE
DPI008
0508
0511
SECTor
REQUES
OOC6
ODC7
0523
0525
0527
REQ5A
REQF
SElECT
0002
0004
0005
0537
REQ4
DOE2
0538
0539
UNIT
INTSTA
00E3
ODE',.
INTPRO 00£5
REQZZ
OOF2
REQZ
OOF5
REQZA
OOF6
OOFa
REQZe
ODFC
REQZX
REQZC
DOfF
0100' .
··056.5
REQZD
0101
0566
REQZE
0569
REQZF
0104
0579 ··REQG1· . 010E
REQ6
0583
0114
REQZG
0118
0587
· REQZK
0590
0118
011C.
0591
REQZI
0593
REQZJ
011E:
··:0597
REQ1··
0123
REQ8
012A
0601
0120
0604
ERRZA
0605·ERRZ8
012E
012F
ERRZC
0606
0130
0607
ERRZO
·0608--· .. · ··-£RRZE· ·0131
'0609
0132
ERR:ZF
0133
ERRZG
0610
. 9614:·-· .... 'CONAlA-'- ·013 .... ··
05 .. 1
. 0-552
0555
0556
0558
0561
0564
CONOl
CON02 .
CONO
CON1
CON2·
CON3
CON4
CONS·
CON6
CON7
· CON8
· AlFlAG .
0632
0635·:··:··
0644
0650
··9654
0658
0662
.
- 8-666
0670
0674
..... 8678
0681
0149
014e·
0154
015A
015E
0162
0166
016A
016E
0172
0176
0179
,
0344,
0430,
1514,
0420
0418,
0536,
1157,
0515,
0924,
Oa4Q,
0530,
0800,
1443,
0341,
, 0555
0552
0554
0553
0564
0561
, 0563
0562
0561
·,·.0576
t 0573,
0585,
0587
0589
05(S8
0568,
0591,
054,.,
0545,
0546,
0547,
t
0.-548,
051t9,
0550,
063t,
0995,
0630
0627
t
0639
0641
, 0651
0655
0659
0663
0667
0671
0676
063.6,
1358,
,
,
,
,
,
,
,
,
,
--
/ !
(\
0355, 0365, 0367
0466, 0518, 0524, 1380, 1425
1662
0423,
0602,
1171,
0531,
0975
0533,
0558,
0804,
1473,
0523,
0516, 0521
0603, 0869, 0959, 0983
1427, 1457, 1515
0569, 0574, 0658, 0899
1034, 1787
0572,' 0579, 0584, 0601
1)861, 0897, 0911, 0947
1527
0600
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
.,
,
,
0518
0590
0595
0606
0556,
0565,
0577,
058.6,
0591,
0596,
0593,
063,.,
1068,
0566, 0906
0915
0582, 0923
0930
tl935
09'S
0949
0677,0'·0680,· 0"83, 0971
1108, 1168, 11g!
,
,
,
,
,
,
,
,
•
60220800
DATEI 01/04175
72
1049, 1213, 1321, 1341, 1350
1383, 1403, 1412, 1565, 1':)90
PAGE
F
(\
/
/ '1
J
.-\
/
72
\
J
f\
)
"
'-.-
/
C)
C)
(j"
(~)
0 0
0 0
DP1008
PIlGE
1705
06S;0,
0688,
0633,
0665,
0554, 0658, 066?, 0666
0689
06lt3, 0649, 06t;3, 0657
OG6 c}, 0673, 067 ch 0694
0645,
0703,
1067,
1807,
0618,
0773,
1180,
0615,
1271,
0722
0733,
0617,
0951,
0702,
0744
0724
0731
0734.
0674,
0770,
1099,
lQ23,
0624,
0881,
1182,
0709,
·1803
0684,
0783,
1272,
1CJ56,
062CJ,
OCJ6'l,
1216,
0771,
0691
STP
11181
0695
0697
TEttP
INPUT
0186
0187
0704
STATUS
!J18C
0706
ADRINP
0180
0710
0711
0713
LPl
Eel
ST034
0192
,
,
,
,
,
01CJ3
0194
,
13
14
15
LP2
EC2
FUNCA
FUNCQ
OUTPUT
01B8
01B9
D1SC
0180
01BE
01BF
,
,
,
•,
•
,
,
,
,
,
,
,
,
,
,
0758
0761
0768
0770
0778
0782
0794
0797
0806
0815
0817
0821
0830
0841
084('
0843
'0844
0850
0851
0853
02
01
03
04
05
01C9
D1CC
0103
BUSY1
I08UFF
HAlT
INBUF
T3
LOAOAO
LIMIT
RHIGH
RLOW
AHIGH
LOt
L02
L03
NOINTP
60220800
,
,
,
010S
BUSYP~
F
,
01E2
01E7
01F6
,
,
Q1F8
,
0207
020F.
0211
0215
021E
022<;1
022A
0220
022C
0231
0233
0234
() C) 0
, 16(1),
0646,
0670,
• 0623,
06&1,
017A
019C
01Al
01AA
01AD
OlAF
')
/
0812,
, 0619,
, 0337,
D62 c),
, 0824,
,
0
C)
()
'.-
068&
0809,
1549,
2027
0638,
0993,
1282.
101+-2,
0736, 071+-1
0718, 0739, 0789,
Oc)77
0706, 0728, 0730
0854, 0690
1783, 1795
0644, 0727
1052, 1166
1287
11 Q4, 1225
oqO 1,
0941
0756, 0763, 0764
0762, 0769, 0?7&
0714, 071:)1, 0757
on.o, 0752, 1214
0535, 075<;1, 0802, 0827, 1033, 1036
1432, 1462, 1782, 1791, 1794, 1.824
1653, 18Q7, 1955, 2025
0780
0758
0760
0.166
0767
0795, 0798, 0801
0786
0807, 0818, 1092, lnga, 1114, 1548
,
,
,
,
,
,
,
,
c.)
OATE. 01/0417«;
,
CONCHE
INP
12
11
(
73
0683
0719
0724
0732
0735
0737
0743
0745
0746
0748
0749
0750
CJ
0813
0986, 1365, 1583
1318, 1378, 1579, 16-50
0873, 10'+0
0851
04B1, 0837, 0844
0465, 0835, 0847
0834, ,0845
0836
0840·
084&
08&2, OR74, oQ63, OQ87, 1161, 1175
PAGE
73
./
(~)
r-\
'---./
C
OP1008
PAGE
0864
. Gal3 .'
0881
0884
·0886
AORINT
·AOR1·
AOR2
AOR3
REf CON
0890
"'089ft .
0896
0904
DECIDE 0265
CKGONT· ·026A·
HESS
026R
0218
lECHK
-
'~"-
, 1433,
, 0867,
, 0811
, 0812,
, 0880
,. 0794,
,
, 1894,
0887
, 0892
, 0903,
, 0882,
0245
924D
0258
0250
·025F·
·0280
0295
-02AO
02A7
0208
D-2C9·
,•
,
,
,
.,
,
,
0319
031A
.. ·RETAOR - ll31a·~·""-··
OATAt',
-.
-.
-~~'''''''~'''-.
-...
'-
,.
--
"._,
...........
. 1017··
.-.. -1018·
1019
r~\
.1
(-')
.
-- - ....
..
~ ~"-
0310
OATA2
-,
DAlAl·
. DATA4
031£
031F
EQUIPO
60220800
.
D31e
','
~
,'1016
.............
.. ·,··0992,· 0996,
0984
0985
0380, 9414,
0793, 0878,
, 0944, 0954,
1056, . 1101,
1220, 1280,
1470, Ilt81,
1811, '1936,
1000
1002
,-1008 .
0498, 0559,
.0900, 0912',
..
'1051, 1100,
1436, 1446,
1550, 1753,
,
,
SECERR
0320
,
..
"
,
_,,
,
,.
,
07 .. 2,
0929,
100".,.
1178,
1440,
1557,
0717
0934
1011
1190
1453
1157 '
0619.' 0738, . 0774,
0925, 0940, . 0948,
1120, 11'63, 1215,
1466, 1416, 1521,
1814, 1931, 1991,
0784
0916 .
1273
1533
0120,
0<)20,
1185,
1552,
.2044
0857,
1226,
0112
0950
1275
1808
8502,
0910,
0966,
1133,
1286,
1524,
1996,
0693,
0922,
0990.
1164,
1293,
1536,
2041
- "''''
0534,
0855,
1102,
1474,
1979,
0754,
11<)5,
1993
0753,
1209,
0528, 0551,
061&,
0898,
1130,
1528,
2000,
0719,
1210,
0143,
0931,
1217,.
1754,
/
.
..
....-.....
-_
.-
20~2
.
0499,
" 0788,
1053,·
1444,
1933,
0715,
1124,
1810,
0117,
1129,
,
,
,
,
,
,
,
,
,
~
-
0<)16, 1043
1715, 1124 .
0178, 0859, . 0914, 10"5
1748, 1812, 1982
0701, 0913, 0936, 1032
PAGE
/
~.~
...... .....-. -- ..- ......
1392,. 1691
F
(~
.
'.
....
.~
02CA
0203
02DE' _.....
02E5
."
10
-. . ...
,
,
.,
.,•
. -0.
., ......
0803, 0828, 0894, 1802, 1854 •
2026
,
"~.
- - •. --
0815
,
,
··-..• ~~·-D930.-····-REAG.··- ... Il2EE .....
. 0986
02Fl
R01
0302
099.3
R02
._.... , ·0998····....STOP·- ···0309
l--'--~-,
1463, 151q
0951, 0981, 1406
0927, 0932
0955, 0970, .0994, 1161, 1181
,·1442, 1472, 1526
0907
0916
, 0926
0931
0938
094.6
0966, 0972, 1386, 1678
0960
.•
·0961·~ ...
0876. 0964, 0979, 0988, 1162, 1176 .
t
. .. _..
0911.
lEA
0923
.. lE8·
. ·0930
··IES':'·
0935
lEO
0945
lEE
---~ .. 0·95;.... - -IEF·· . · .. ·
0956
. WRITE
0962
WRTl
:·······.;..·09&9-··· ··-WRT2-·
0914
ST021
. DATEI 01/04/75
14
( 1j
.
n
()
74
/~
l
/
~
..
-
~--
- .• -.. -..,
(~,
./
c)
:.
C') CJ ·0 C') 0
DP1008
C)
( -)
~~_f
PAGE
EQUIPA
1021
1022
1023
1024
1025
1026
1027
1028
EQWRIT 0322
EQREAO 0323
EQCOMP 032 ..
EQCHKW 0325
EQWRTA 0326
EXTVAL -0327
BIAS
0328
INAOR
0329
1030
CLRCON'
'1039
1042
,1059 1066
107.11076
1080
1082
1089
ADORES
0321
03JQ
CHKA3
HOVEAD ,Ol4F
RETSTA - 0358
SECGEN- ,035£ '
Tl
0363
GENSEC 0367
Ol68
T2
OUT8UF Ol72,
, . ."... ,1091
,0374
- Tl0
1095
COHBUF 0379
0378
1097
Tl1
. -1108.
Ol8C
·COMB
1111
CHKWOR Ol6F
COHPAR 0399
1118
1123 .. .. CO"4 ..
tl39E .
COM3
0380
1134.
1139
0384
CO"l
... ~-11lt5 " COH1A1 ' OlBA
1151
COH1A
OlCl
115lt
WORDeN OlC6
-11.56 _" . ~WINT? OlC7
1160
CWl
D3ce
Ol06
1166
CW2
.. ,,"_., ,~117n .:-~... C8Itnp. ·0300
,OJE2
'1174 ' . C81
.1180
'CB2
03EC
•., '7-- ••• ::119'1 -.-.... ; CB3:-~: DlFE '
. ',:1193
: CHKTRK': Olt01
" '1200
1204
1209
04DC
0411
0417
TRKl
TRK
TRK2
6022080{)
F
}
J
1305,
0967,
1367,
1299,
171B,
0991,
1568,
1174,
, 1087,
1322~
1384
,
,
,
,
,
,
,
9
,
,
,
,
,
,
,
,
~)
(--
-(')
c)
()
(---\
( --~
.... /
1 .. 31, 1780, 1792, 1895
2121
2024, 2123
1007,
,0919,
-1811
1303,
1391,
1779,
2087, 2139
1101, 1119, 1184
1323, 1335, 1343
1397, 1405, 1426
1801, 1850, 1892
1057, 1304, 1324, 13 .. 4
15.. 2, 1544, 1566, 1572
1893
1041, 1069, 1'115
1564
1871
0962, 1093, 1325, 1518, 1543, 1567
19~O
1649
1109, 117lt, 1345, 1573
1104
1116, 1160, 1336
1151. 1352. 1414, 1592
1,153
1127,
1150
1138,
1122,
,1165,
1158
1159
1179,
1172
1173
1187
1212,
170ft.
123'1
1199
1203,
,
"'-)
1823, 2113
1790,
0826,
2115
2111
2119
1546,
1461,
2125
0599
0431,
0787,
1551,
1270,
1385.
.1694,
2018
1048,
1512,
,
,
,
,
,
,
,
,
(~
DATEI 01/04/75
1035,
0707,
195 .. ,
1090,
0816,
1096,
1112,
1852,
05 .. 2,
0384,
0729,
1274,
1037,
1363,
1677,
1952,
0868,
1364,
1577
0884
1064,
0879,
1327,
1078,
,
,
,
,
,
,
,
,
,
,
,
032A
0335
CJ l
75
,
1020
,
1569, 1593
1142, 1148
1139, 1141, 1152
1169, 1398
1192, 1407
1221, 1224, 1337. 1399, 1683 .
,
,
1234
PAGE
75
(--:'
() r-'
~
OP10D8
1222'
PAGE
CHKSEC
042C
l2'32--
. SEC'
043A
CONV
943£
1238
CONV6
0441
124S,
CONVl·
0449·
1254
CONV4
0454
1257
CONV5
0458
..., "1·259"·_···OONV7 . ···OIt5A :-1265
CONV1
0460
123~
......... - 12&6·
1268
1270
CONV2·· 0461
SECl
0462
SEC1C
0466
'"'1281-' .. -SEC1A ·0478
1287
SECtB
0480
1294.
SEC1E
0488
... :- -···129C} .. ·· ·,SEC2··
9490
1303
SEC2A
.0498
1311
SEC3
04A3
.~.;.. "'---t31-3..·T·4-··- ...... O.. A6
1317
T8
' 04AO
1319
SEC3A
04Bl
.. ,·-··.. 1323, · .... ··SEC38 .... 0...'n·
1331'
SEC3C
SEC30
0404
"1-3"1~"
SEC3E
.,,0401,
1350
1357
SEC3F
SEC3G
04DF,
1335
- -,'"
"~'1'362'-
"
04C8
04E9
:.: SEC3RO· .. 04££
,·'1310
SEC4 '.
04FA
'.. '1379.. Se:C4Z
0501
... ,.: -:· .. ··1381·---·5£C40:- "OSDA
1385
SEC4A
0510
1391
SEC4B
0519
-_···--.. ,1397;,-.. --: SECltC .... ··0522 -.
1403
'SEC4E,::
052B
.... 1412
. SECItF;' 8539
·~-·""·142·e-:"'-'~""·SECS -'..• -054l'
1422
SECSA
0546
1427
SEC5F
054F
·-1430·· ···SEe5B· .0553
1442
.SEC5D
0564
1454 ,SECSC
0574
··1 ..57· .. ·· ·SECST··~ .. ' 0577 '
1460
SECSU
057B
1472
SEC5V
058C
..... · ... ·-1482..
SEC5H
059C
1497
SECSG
05AO
1498
SEC5H
05AF
.'- ... '150·1 - . T5
05B3
1512
SEC5L
05C2
1518
&0220800
/\
osce
SEC5X
76
DATEI (11/04/75
, 1223, 1326, 1346,
t
1408, 1681, 1102
, 1230'
, 1086, 1264, 1302,
, 1263
, 1241
1249
1253
1251, 1255
, 1236, 1238, 1242,
1258, 1259,'1261
. , 1237, 1260
• 0394, 1297
, 1295, 1296
, 1217
, 1283
, 1290
, 0394, 1309
., 1307, 1308
, 0394,. 1356
., . 1373,. 16ft4
1377, 1578
1355
, ·1330
, 1334
, 1340
. , 13~9
, 1342, 1360
t 135,4
t 1331, 1359, 1368
, 0394, 1418, 1834
, 0352, 1832
, 1417
, 1390
, 1396
1402
, 1411
, llt04, 1416
t
039 .. ,-lS97
, 1485, 1489, 1490,
, 1456
, 1428
, 1429, 143"
, 1441, 1448
, 1484
, 1458
, 145Q, 1464
, 1471, 1478
1494
1496
1580
, 1539
1516
1366, 1387, 1393
1777, 1874
1244, 1245, 1257
1492, 1598
PAGE
F
\
)
()
76
!\
J
!
')
c>
o o
-;
() '0 0
OP100S
PAGE
1540
SEC51
SEC5J
SECSH
1-:;47
T7
1558
SEC5N
SEC5NA
SEC5NB
1526
1537
1566
1572
1577
1588
1596
1600
1610
1615
1623
1624
1630
SEC5NC
SEC5NN
SEC5R
INCREH
W96
CHKHIG
HIGH
COHBIN
OS07
05E7
Or;EA
05FB
060A
0615
061E
0625
0636
0647
06,.9
065,.
065A
0663
0664
0668
1638
H1536
HIGHl
,SAVEL
1639
1640
SAVE2
CURAO
{I675
16,.2
1651
1661
1663
1668
1677
1678
1694
1695
SEC6
SEC6H
SEC6Z
0671
0687
0697
069A
06A2
06AO ,
06AF
06C6
06C8
06£4
06FA
0707
1637
0676
SEC6A
SEC6C
SEC6B
SEC6X
SEC6D
SEC6Y
1714
SEC6F
1732
1743
1765
1766
SEC6E
1767
0673
0674
ERROR
QSAVE
ISAVE
PATTER
0723
0724
0125
0726
072E
0730
1783
0738
,1795 - .',SEC7C' ; 0748
,1802 ." SEC7E ,',0754
'1818
SEe70",0770
~826
~EC7F ','077A
1831
SEC a
,077F
1835
'SECCH ',',078,.
1836
,;SEC9 ,,:0785
1840TEHPLO 078A
1774
·1778
1779
1841
1851
SEC7
SEC7A
SEC7AA
SEC7B
SECI0
S10A
6022U800
F
()
o c) o
c)
77
DATEI 01/04115
1517
1525, 1531
, 1508, 1511, 1560
, 1554
, 1571
1576
1587, 1595
t
1596
, 1622, 1629, 1687, 1735
, 1608
1612,
1621
, 1614,
, 1609
, 1632
, 1606,
, 1634,
, 1604,
1637
1636
1610, 1613, 1615, 1626, 1630
16351619, 1623, 1624
, 1602, 1628, 1654, 1693, 1698, 1752
, 0394, 1742, 1838
, 1741
, 0353, 1837
, IG76
, 1671, 1686
, 1689
, 173 .. , 1739
1737
, 1731
, 1707, 1720, 1730, 1762
, 1718, 17?7, 1763
, 17ft4, 1760
t 1746
, 1G60, 16G7, 1714, 1722
, 0394, 1829
1826
1827
, 1786
, 1798
, 1825
1806.·
t
1820.
, 0394
, 1831, 1836
. , 0394
1789,
1847,
, 1863
, 0394,
, 1857,
1800. 181&, 1816, 1621, 1822'
1849, 1851, 1658, 1859, lR61
16G8
1864, 18G6
PAGE
77
PAGE
OP1008
1865
1870
1&7t
1893
1895
1903
1912'
1913
. ·1918
1921
1937
1939
1944
1950
1956
1969
1974
.. '·1984 .
2001
2004
·······2008
•• "
...
. . . . . .-
. . . . . . ~P"
... _
SlOB
a7AB
07BO
HSEe
0781
SECli
sellA
070B
070F
sel10
'07EB
TtHE
TIHCON 07EO
07EE
TIttEl'
. SC11E· 07F2 .
07F5
sellB
0808
SCtlC
080e
SEe12
0814
S12A
0818
T6
0826
S12B
0838
S12B1
0810
S120
0848
S12Al
0863
SlZC
S12E
0866 ..
,PUYe
086B-
....
'200 C) ,
SEC13
2019
S13F
·2023
S13A
S13J
2041
2049
SlJG
·2-853·,
S13H
2064
513'
513)( ..
2072
2071 .. ·-9UFFLA··
0871
0880
0884·
0899·
D8AIt
08A8
08B4
08Be
08G1;··
SURFAC 08C2
2079
·2081····· OBUFFE .. 98C4
... ....
..... _.. -
.1860
1920,
0395,
1901
1900
, ,1916,
2170
1915
0958,
1926
1929
, 0395,
1949
,
,
,
1922, 1928, 1930
1902
,
1921
,
,
,
0982, 1·&98,· 1937·
t
1959
1965
2003
1989
t
1978
1997,
.
2015,
2034,
, 2043,
,. 2064,
0396,
t
2055,
t
....
2039
, 2052
20:$3
2048,
, ,2059
,. 2066
0475,
1711,
1647,
,
,
,
,
,
,
,
IBUFFE
60220800
~)
(
,
. ..-.....
)
.~\.)
0925
1999
,2017, ·2020,
2035, 2036,
2046, 2049,
2065,·20.67,
2015.
2063, 2071,
. 2923, 2028.
2037, 2040, 2041
2056, 2060, 2062
2010·
2~l22,
2073
,
,
2051
,
,
,
,
,
0334,
1046,
1085,
1200,
1313,
1445,
9 1502,
1561,
1672,
1775,
1812,
1880,
,1890,
1951,
,
,
,
·2083
2007
,
,
,
,
,
,
.
DATEI !l1/04/75
78
,
1607, 16ft5, 1664, 1679,· 1700
2131, 2174
.2129, 21 .. 0, 2141, 2172
033.5, 0825, 0832. 0850, 10ft,.
1062, 1063, .1076, 1082, 1084
1091, 1097,' 111~1t 1123, 1196·
120ft, 1227, 1232, 130-0 •. 1·301
1314, 1374, 1423, 1430, 1435
1460, 1465, 1475, 1498, 1501
1520, . 1532, 1541, 1545, 1547
1563, 1627; 1648, 1653~ 1668
1692, 1699, .1716, 1725, 1747
1776, 1781, 1793,·.180", .1889
1873, 1876, 1877, 1878, 1879
1881, 1886, 1887, 1888, 1889
1891, ·1896, 1932, 1946, 1950
1976, 1984, 1992, 2080, 2128'
0332, 0333, 0336, 0817, 1125, 1128
1145, 1316, 1311, 1376, 150ft, 1582
2082
PAGE
F
(-"
(j
I
78
-----\
J
\
)
( ')
f~
\
~)
--
C)
C) C) C- -- -) L-
C) 0 ·0 0 0 0
ODtouS
2085
2099
2101
2102
21G6
2111
2112
2139
2141
2151
2156
2163
2164
2172
2179
2183
2184
PAGE
INIALI
AUTOHS
AUTOEN
TYPE
TYPE1
TYPEE
·INt
eUFCK
BUFCK1
DUFCK2
BUFCK.3
TTl
TTT1
AAA
TIHVAL
SURI3UF
TAGBUF
60220800
~)
F
0985
0996
09A3
OQA4
O~C1
0ges
09C9
~/
C)
()
0 C)
OA TEl 01/04/75
79
, 0329
1966,
1967
2095,
, 2089,
, 2094,
, 2098
(') (>
19&1
2096
2090
209&
09EE
09F9
09FE
OA03
DA09
OADA
DA14
DA1A
DAlE
OEE2
2154, 2155, 2158
2141
, 2151
2136, 2143, 2150
, 2175
2149, 2162
, 2169
t
,
,
PAGE
79
() \)
"'~--'~
/'(
~-
PAGE
OP1008
a
••• ALP H A
E 1 I CAL
80
S 0 R T
0 F
S V H 8 Ol S •••
2112 ADO~ES 1039 AO~l
0813 AOR2
0881 AOR3
0106 AORINT D864 AHIGH
0843 ALARH
0321 ALFLAG
ALtt
0464 Al"!
0465 AUTOEN ,2101 AUTOHS 2099 BEGIN
BIAS
1021 9ITO
0093 BITOO
0092 BITl
0094 ,91110
8IT11
0104 BI112
0105 8tT13
0106 aIT14
0101 'BIT15
BIT!" ·0095 BIT3
OOQ6 BIT4
0097 8115
009881T6
aIT7
0100 9IT8
0101 BIT9
0102 BUFCK
2139 BUFCKl
BUFCK2 2151 9UFCK3 2156 BUFFLA 2077 BUSY1
0794 BUSYPR
,"GBl
: 1174 ·C92
,1180 "C93
1191 CBINTP ~170 CHKA3
CHKHIG 1615 CHKSEC 1222 CHKTRK 1193 CHI(WOR 1111 eKCONT
ClRCON 1030 CLRNO
0135 COHl
1139 COH1A
1151 COH1A1
.. COtt3 '.. " 113 .... · COM4'
1123 COMB
1108 COH8IH 1624 COHBUF
COHPAR 1116 CONO
)644 GONOl
0632' CONOZ
0635 GON1
CON2
0654 CON3,
0658 CON4
0662 CONS
0666 CON6
· '.' ~OM7·"··O&74- .. CON8
0&78 CONALA 0614. CONCHE 0683 CONST·
'GONTRO 0071 CONY
1235 CONVl
1265 CONV2
1266 CONV3
1254 CONV5 ',1257 CONV6
1238 CONV7
1259 CO~VE~
CONV4
.. ,' . CONY""' " ~136' . aURAO ... 1&,.0· 'CH-l
1·160 CW2 ."". 1166 ,CWINTP
DATAl
1015 OArA2
1016 DATA3
1017 DATA4
1018 DECIDE
0711 EC2
0746 ENDOPE 0328 EQAOOR
OP1008 0320 ECl
,~- ... E·QCJ4KW,····iAI2·.. ·•· ·EQCOKP· ·-1023 . EQREAD· - lG22·
EQUIPA ·:·1020, £QUIPD
:£QWRIT" .. 10'21 EQWRTA' 1025· ERROR
1743 ERRlA' 0604 ERRZ9
ERRZC
0606 ERRZO
0607 ERRZE
0608 ERRZF' 0609 ERRZG
-EX-IT' ··0013· EXtVAl ·1026 FCLRIN 0075 FINl
0 .. 25 FIN?
FIN3
0410 FINSEC O~OO FUNCA
0748 FUNCQ
0749 GENRAN
GENSEC 1080· Honoo
0109 HOOOF
0111 H007F
0124 HOOFO
,:--:·,tf&OFF·,·_·&115··.H0780·· -0123 HOFOQ·'· 01-13 ,HOFFFG118· H2020
0122 H1FFF
~121 HEXASC 0080 HFOOD
0114 HFOFF
" H1~DD
"FF80"
0116 HFFOF
0119 HFFFO
0117, HFFFF
0110 HIGH.
'·'-HIGHt·- .. 1637' "1· . -..... DODO .I1
0132 . 12·
9124 . 13
14
0731 15
0743 IBUFFE 2083 10
1012 lEA
lEB
0923 tEe
0930 IECHK
0904 lEO
0935 lEE
:··-""HF,,· .. ··,,,,G9S5·,,It·a .. · · 2'·1-12·· ,INADR
·1028, IN8UF ,,·0815 INCREH
.' INFOSt< 0131· INFORH009D INIALI .2085 INP
0719 INPUT
.JNTPRO 05~1 INTSTA· 0539 IO~UFF 0791 ISAVE
1766 JUMP
• ··~'"lASY.AO .. ~o-81' 'lA-STYA'0086' LOt ,.,
0844 LD2
085~ -L03'
LOllCO 0089 LDLCOR 0086 LIMIT
0830 LOAOAD 0821 LOOK
LPl
0710 LP2
0745 HAINL
0083 "ESS
0896 HESSAG
· . · .. "QUEAO .. ·1~S9 KS£C
1810· NEXTSE· ·0354 . NOINTP OM3 ,,01
. 'ot .' 0758 03
0768 04
0710 05
0778 OBUFFE
OUT9UF. 1089 OUTPUT 0750 OVRLAY 0~81 PARADR 0322 PARAH
.. PARS .. ' ." 04r:Jl··"'-PARSET - 0466 PARSlT-· 0,419 PARSLE·" 050 It PARSL 'f.
PASSCT 0392 PATTER 1767 PIO
0'+35 purz
2008 Q
QSAVE
1765 RANDOM 0131 RANGE
'0458 ROl
0986 R02
··" .. REAO"O·910 RElPOS 0082 REP
0341 REPEAT 0338- REQ4
. ',; REQ5A
0523 REQ6
0583 REQ61
0519 REQ7
0591 REQ8
REQF
0525 REQINT 0074 REQNO
0134 REQUES 0511 REQZ
'~EQlA . '.0556 . REGZa
0558 REQZe
0564 REQZa . 0565 REQZE
REQZF
0569 REQZG
O~81
REQZH
0590 REQZI
0591 REQZJ
AAA
AORINP
68220800
f\
)
0864
0681
032Q
0103
0108
0099
211t7
0782
1042
0894
11ltS
109S
0650
0610
0128
1245
0132
1156
0890
0324
1·019 ..
06Q5
0610
0424
0077 '
'0112
,0125
0120
1623
0735
0911
09'+5
1600
0697
0076
0851
0355
01330761 '
2081
0428
0496
0397
0993
0537
0601
0555
0566
0593
PAGE
F
()
(\
\.
,,--~
(j
80
l~
)
-
/--~\
'.
-
~
c)
c)
0 ·n 0 0 0 C) 0
"-~-
OP1008
REQZX
RETURN
S12A
S120
S13H
SAVE2
SC11E
SEC12
SEC1E
SEC3R
SEC3G
SEC4C
SEC5
SEC5F
SECSL
SEC5NC
SEC5V
SEC6B
SEC6H
SEC7A
SEC7E
SECERR
SELECT
START
STOP
Tl
. T4.
TAG2
TEHPLO
. TIHVAl
TSFREQ
TYPE1'
H1536
WRTl
0561
0323
1944
1974
2053
1639
1918
1939
1294
1323
1357
1397
1420
1427
1512
1571
1472
1677
1651
1778
1802
1013
0521
0331
0998
1076
1313
0.165
1840'
-2179
0127
2108
1630
0962
60220800
PAGE
REQZZ
RHtGH
S12A1
S12E
S13J
SC11A
SEC
SEC13
SEC2
SEC3C
SEC3RD
SEC40
SEC5A
SEC5G
SEC5H
SEC5NN
SECSW
SEC6C
SEC6X
SEC7AA
Se:C7F
SECGEN
SETHAS
STATUS
STOPX
Tl0
T5,
TAG3
TEST'
TR~
TTT
TYPEE
H9b
HRT2
F
0552
0841
1'384
2004
?041
1893
1232
?o009
1299
1331
1362
13Al
1422
1497
15'+0
1588
1482
1668
1&78
177<]
1826
1071
00S4
0704
0072
1091
1501
0376
0393
1204
2163
2.111
1&10
096Q
RETAOR
RLOH
S128
S1311
~13X
SCllS
SECl
SEC1A
SEC2A
SEC30
C3EC4
SEC4E
SECSB
SEC5H
SEC5N
S~C5R
SEC5X
SECoO
SEC6Y
SEC7B
SECS
SECTIO
SJPAR
ST021
STP
T11
T6
TAG4
TIHCON
TRKl
TTTl
TYPEOU
WAIT
61
~-
(,-
--
\
C)
() ()
C)
()
'--'
C)
"
,,--j
OATEa 01/04/75
1014
064?
1956
2023
207?
1921
1268
1261
1303
1335
1370
1403
1430
1498
1558
1598
1518
1694
1695
1783
1831
03<]8
0130
0974
0691
1091
1950
0386
1912
1200
2164
0018
0808
RETCON 0686
S10A
1651
1<]6<]
S12B!
S13F
201Q
S13Y
2064
lq37
SCilC
SECtO
1841.
SEC1S
1287
SEC3
·1311
SEC3E
1341
SEC4A
1385
SEC4F
1412
SEC5e
1454
SEC5I
1526
SEC5NA 1566
SECST
1457
SEC6
1642
SEC6E
1732
SEC6Z
1661
SF.C1C
1795
SEC9
1836
SECTOT 0508
SHHCNT 0091
ST034. D713
SURBUF 2183
T2
1082
T7
1547
TAGBUF 2184
TIME
1903
TRK2
1209
TTYBlY 0079
UNIT
0538
WOROCN 1154
RETSTA
SlOB
S12C
S13G
SAVEl
SC110
'SEC11
SEC1e
SEC3A
SEC3F
SEC4B
SEC4Z
SECSO
SEC5J
SEC5NB
SEC5U
SEC6A
SEC6F
SEC7
SEC70
SECCH
SECTPA
SHHPAR
STJP
SURFAC
T3
1066
1665
2001
2049
1638
1895
1871
1270
1319
1350
1391
1379
1442
1537
1572
1'+60
1663
1714
177-4
1818
1835
0501
0129
0085
207t}
0817
18
1317
0695
TEHP
'1913
TIHE1
TSACTV 0126
TYPE
2102
UNITSE 0436
WRITE
0956
PAGE
81
r--..
(-)
C)
~
-
,"'---
L
COMMENT SHEET
C)
MANUAL TITLE
CONTROL DATA SMM17 PROGRAM LISTINGS DPI
(J
Customer Engineering Manual
o
PUBLICATION NO.
_6_0_2_2_0_8_0_0_ _ _ __
o
FROM:
NAME: ________________________________________________________
REVISION _ _ _ _F
_ __
BUSINESS
ADDRESS: _____________________________________________________
COMMENTS:
This form is not intended to be used as an order blank. Your evaluation of this manual will be welcomed
by Control Data Corporation.
Any errors, suggested additions or deletions, or general comments may
be made below. Please include page number referen~es and fill in publication revision level as shown by
the last entry on the Record of Revision page at the front of the manual.
Customer engineers are urged
to use the TAR.
o
o
".-,
U
c
o
o
o
NO POSTAGE STAMP NECESSARY IF MAILED IN U. S. A.
FOLD ON DOTTED LINES AND STAPLE
STAPLE
STAPLE
.... ..
\
'
,,'-.,
\
.. '
~"'"
FOLD
FOLD
-------------------------------------------~
FIRST CLASS
PERMIT NO. 8241
MINNEAPOLIS, MINN.
,-
BUSINESS REPLY MAIL
,"
w
Z
:::;
NO POSTAGE STAMP NECESSARY IF MAILED IN U.S.A.
C>
Z
0
I,
-'
'"
«
t-
POSTAGE WILL BE PAID BY
=>
Technical Publications Department
4201 North Lexington Avenue
Arden Hills, Minnesota 55112
r
U
CONTROL DATA CORPORATION
I,
,,"'---.
(
m
........
,,--'
,
\ ..
.
f
Ii
Wi
FOLD
~
--"
(-\
FOLD
"
r-'
\',-,
,,-"
(, ,
("
' ...
(~:
/-"
(
'I
I
I
\."
"
(---'
"
'
.
"
,/
j!I!!!!!!!i!!!lil!li!1111 III 1'lillll!I!!II!))))::):;:::l:f:I1Ml:ltf:%)@!itlWmmr@il
~
~ftI t@?~tImft~r~ ~ ~ ~ ~ ~ ~r~ ~r ~ ~ ~ ~ tf~ ~ ~f~m~ ~ ~ l ~l l~ lf~m t
CONTROL DATA
~ ~CUT
,
,/
I
~'"
'.
"
i
"-
":
OUT FOR USE AS LOOSE -LE~F BINDER TITLE TAB
(
i-',
"-
,-r
\,
".-.
I
I
"
r
iI
'"
.."
r-'
(
\"
CONTROL DATA
CORPORATION
(\
"
8100 34th AVE. SO., MINNEAPOLIS, MINN. 55440
r -,
(
PRINTED IN U.S.A.
',--
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.3 Linearized : No XMP Toolkit : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37 Producer : Adobe Acrobat 9.13 Paper Capture Plug-in Modify Date : 2009:08:25 21:35:42-07:00 Create Date : 2009:08:25 21:35:42-07:00 Metadata Date : 2009:08:25 21:35:42-07:00 Format : application/pdf Document ID : uuid:e5bb82e1-59f3-44e0-bba5-4170e2a857e3 Instance ID : uuid:0f50b3d1-bb10-40ba-8310-b176f66190e2 Page Layout : SinglePage Page Mode : UseNone Page Count : 86EXIF Metadata provided by EXIF.tools