Tel
tel tel
User Manual: tel
Open the PDF directly: View PDF 
.
Page Count: 212
| Download | |
| Open PDF In Browser | View PDF |
1
ABNR£T
'621w,/GF-N
i627/GiN
~]I!,.e:QU
ce6~q/DATA
31:;\'/Lr
31",/Lt
331/LCI
A~PTN
3553-SLS
AF'
It?AIDe
313/MSP
333/G[~
322/08
l2J/GEN
336.26/GEN
326/ij[N
336.26/ijEN
1068.1/LW
1Q70·1/ijTw
1152.1/ANO
1152.2/!iSTW
1236.3/AI
83!1i/BAL.
a97/BAL
]36.14/S&:T
~36.20/TEXT
q3~.1/LW
93S.1/STW
325/06
93~'~'/E~ReR
AM,eRG
~1~.tO/R~F
'O~3.1/L.W
8~5'1/LW
tOle.1/STW
83?'1/STW
AMISToep
j)1A.11/R~F'
AMSUF
59/0,F
6t)S'i/eR
2J+1-EQU
1031.1/91S
11~R.1/STS
!~14t/L.r
ARS
24~.EQU
ASSe:MBL~
~815.L.r
454i,/L.W
66S/STS
l55?/LW
2848'2~/CMND
ASStGN
1601Re:F
6J+~/eAL
102~/8AL,
lOsn/BAL
~31'ICLM
i32,.OATA
645/6.L.
1068/BAL.
799/BAL.
1083/BAL.
933/1;'jAL.
ATBZ
A1
784.EQU
8
:'13{,.2~/GFN
2~48.1'/CMND
284t~.2"'/CM~D
~8"~.31/CC:MND
28J+a.~1/CMNO
2~ .. g.5~/CMND
6A
284f,8.61/CMNO
284f.8'69/CMND
2848t'~'CMNO
8*~/8G
336'27/ERR8R
2a4 8 .1R/CMND
~8"8'11/CM~O
28"8.1"CM~D
,841.12/CMND
284~'!~/CMNO
28*8.26/CMNO
2S4S.34/CMNO
"S4S.2'1/eM No
284lS.:g,.,CMND
284f.8t4~/CMND
2S48,S4/CMND
284 a '(,1/CMNO
~8*8.~l/CMNO
i8*8.55/CMND
~8"8.20/CM~D
~8.1.37/CMNO
~8i+8.44/CM~O
~848.S'ICMt\O
284B.l]/CMND
284S.2i/CMND
IS4t8.29/CMND
IS*S.31/CMND
284R.lf.8/CMNO
2848.5R/CMNO
~84t8.64/0CMND
~8~8.65/CMNO
2a4 8 ',n/CMND
~8 .. 8.'1/CHNO
~848.,2/CMNO
2848.66/CMND
2848.13/CMND
284 t1 ""OCM"O
2848,'S/CMNO
~848t'9/DCMNO
1848.80/CMNO
2848'1410CMND 28~8'16/C;MND
2S a8t23/(;MND
281+8.22/CMNO
N
2848.30/DCM O
2148.39/CMNO
c8"'8 •• 0/~MND
2848.46/CMNO
i!8*8'47/~MNO
2848.!9/0CMND 2848.60/t;.;MNO
2841ta.68/c,;MND
2848.6?ICMND
284+8. 14+ICMNO
a8.8'?5/~MND
~8CO/e:QU
BACKUP
~330.EQU
BASIC
~8on/e:QU
2
2809/£QU
2A09/EQU
3410/EQU
3410/EQU
39'1/BAL
]g8'+/BAl.
:;989/BAL
4tOOo/BAL
4093/t:$AL.
2' 63/BAt.,.
2t6'/BAL
21'9/BAL
2208/=AI..
1~1~/BNE
~OgJ.(QU
28~8"1/CMNO
Psc;,.TEXTC
aATC~
~~90/L..n
8ATe"",.
~~89.EQU
ce59~.TiXTC
284~.5'ICMND
BtNA
BTNOCB
36?1-1.r
:;62"/SGEZ
~61,·R£S
410~/8AI.
I+I1A/BAL.
BTNDE:C8CD
396A/BAL
~9'1/0~F
114./BAL.
~4'~/eAt.
1841/BAL
345~/eAL.
361S-[QU
BrTS
4,j.SFT
BKMSG
i!'6Q~.Tt:XT
81<""T
~O!./LI
309~.L,t
6K6PTn
5:;F;/8~Z
56C1/B[Z
1368/LT
f:KUF'JCAL
i'3B4AICALt
Cl7]~.GEN
t?71~/DATA
cf72~/OATA
BKUPKr:V
BLANKBUF
eLOHTF'L
14'~/eAL
;i1 .... EQU
204A/RrF'
3S'l/BAL
2728-Tr:XTC
8Rt'AI(E'~
3911BANZ
c84Fi.RES
SQKBfT
11~/O~F'
3~~.[QU
396/CI
~59/LI
3
Sur:C6M
8UrINT
BUILD
SUILOA
:1874"SLD
389,",,8
~04.RFS
i:84~/8
1111-EQU
28~~'3.ICMND
1113/L.D
2R4··e~.CMNO
BUMP
31C.CNAME
CANCEL
iI\4R.!5I.l/CM NO
CANe!.
~8on.&:QU
li11/CAI.1
;J8S •• EQU
~11P./LW
c18~/Lw
3830/B
CARR£TRN
CCBUFBIT
12?/DF.:F
CCeUF'TEL
cope
3S~.EQU
"O~/8AL.
3sg,..LI
201/RF.:F
'+08A/LW
219 .. /LW
2218/LW
"05/L..r
'12/lI
2i1S8/LI
25!6"OATA
C~ARGfS
40g~·8AL.
~22n/e
336f\/e~
33Y1.CI
337ft/Bt.
l3'./BNE
C~ARel<,
c~.~eK!5
C~GV
C~KeU'1.
4iOl'wTe: XT
378.1/BAL.
C~KULM
?"/SF"
104J/8G
J142F;/B
C~NG[RR
3311·CT
3'06.1/BAL
191/9
11on.EQU
;i42~/B
3913.14t-EQU
B19/BNEZ
3315/l.t
3*2116
AS2/Bi
]389/LI
3.29/9
I'ft/BE
:;"2!/B
3430/8
9!O/BNEZ
3422/6
34f.31/B
1005/ b E
34t23/~
19]0/6CS
19l1.eUMP
C~NGTVP~
19t7/8NE
192q·CALl
eTC
19.Ml/R£F
CL[ANSTACK
60/DE'F
CMNO
~3~~/Lt
3J+86-RrS
112~/e
112 ... ·EQU
]~5!5/Bl
356./8
3,,9/Lt
::13", t c.C~!A,M£
CMNOSrT
1115/B
CMN£RR1
61/0~F
2:11?11C/ B
jl111/B
8'~/B
1116 1 10/ 8
C!3!5'/B
24+02/6
3889/6
3221/B
1~39/B
~~~'.5~/B
CNC:LMSG
~81+~.Lt
:i85~/B
~a1~/B
i81,.Cf
383;? .. EQU
~861/0ATA
~a3'/BNE
;j8~'.EQU
:4814.EQU
lSta/SL..
20B/Rr;ff
193$l/LW
1Qa.1/Rr;F
4+b1."'/Lt
eNCL1n
CNCL2tJ
CNCL3n
CNCL9
CRCLN
1954+ICe
CacM~SS
C"CMLeeP
cscaFF
t984'.SLS
199./BNEZ
199~/Lr
a041.TEXT
1990/Lt
C04n.TEXT
t919/BAL..
19sC3/BAL.
eeCBN
ceCPRT
2000-£QLJ
2130/CB
t~15'25/B
2S37·EQU
13'S'35/8
iC82 /S
15,..,b
lO91/rJ
CBeSTAT
18~3/a£
CeCSTATC
~1.PICAI.1
18!9a/B£
l19S/SF
19Sn/CAL..1
2011·Gf~
195"/B[
1965-L, T
1935-Lw
231~.6ICAL.1
ceCSTATC'l
19~2.?/BAl
ceCSTAT1
196'/8
CRCSTAT~
1950.~/BLE
CaMf:LG
12 .. /D£F'
ceMMA
19~'.L.W
t900.a/BANZ
3S,.EQU
1195/BE:
l80n/BE
116~-Lt
28~~'Sq/DCMND
2B1~.L.T
234 i '6n/CMNO
CBMMiN!T
1"3.1-L,B
1019/L.r
10631Ll
180S-EQU
CBMPILE
C:e~JCA T
:'-1141.EQU
ceNCkTA
3150 • .4T
a15~/eIR
:11!53/SF.
31!A.srB
316~/eF'
316",.STB
·~16C·L9
Ce~TtNU
31'~/BrR
C6NCATB
Ce!NCATE
CBNCATN
3"~/eC:R
CBNTINUf
1.33~-L.t
a67,/BcR
21!~~.~'/CMNO
36S0-SLS
~8.8.54+ICM~D
CBNT!NX
741/B
CBt\IV
429~.Tr:XT
CSNVBtN
133"BEZ
1341-RF"S
~8~8.61/CMNO
116l/LI
6
c20,.R£S
~09~"EQU
284tl:S."/DCMND
CeUPI.F'1
CeUPL..r:"
CeUPL.i3
CBUPLF5
?099/6E"
~10~.Cr
~10'/eG
il1 •• Ll
P12P/BGE
a12AeiQU
213~/BCS
a14n.LI
CPLCMN
~1(j3.~/8
CPLMSG
1969/LW
21U9.,.AI
iO!H:..OATA
4+01~/Lw
CPU
4077/L,.w
CPUv
4291.TEXT
CPX8Rr;AI<
190t3/RrF
CPXFND
~1t1/DrF
CPXREAD
190.?/Rr,F
",Sl.2q.£QU
451'2J1l/BANZ
CPXUSF<
A~'1/0EF
CRATE
451..26/L.W
4020/CAl.1
4251-RF'S
CTF"PT
2~5A.2"ICAL.1
CUPS
"08:'o1/L..W
36?~/CLM
1
081TS1
D.T.
2a.8'101/CW
2848.B7.DATA
2848'10~/CW
28~R.a~ ..
DBrTS"
D9rT1
08rT~
3~'.~·SF'T
:;3~·31.SET
336.31/SrT
,848.86/0AT.4
3~,.q·S~T
336'ltliwSET
336135/8rT
,e~8.87/0ATA
OBL.1.0
S61,/SANZ
DBUG
OCACCFSS
5t'.SET
S1n-Et.lU
391/06
20~/RF.'F
"05"'/ANO
100/0FF
26~.~QU
DC:9TA82
68S/De
1:;*4+/061
3~15/De1
tR03/BAL.
tStS/SAL
i66.1/e:~LJ
OCM~D
33~.11.CNAM[
OCMPRS
!'i81.t./E)(U
DF'SUG
114Ch.EQU
28~8'101wCW
28~1S""/DCMND
OE'BUG1
114~/BNEZ
DF'eUG~
114a.i/B
DFCStN
6:>/DF.F
11!1w[QU
1152.~.BAL
1711/BAL
1784t/BAL.
DF'CB!N1.
~'4~.L.B
O'CB1N10
416A1>/BAL.
;j68n/BQR
"114/BAL..
DFCBtN11
42'i'-R~S
~27Q/eDF(
Dr:CBtN21
4a,~/ec:s
Dr:ceUPL£
4+28"wR£S
~269·R~S
1924/BAL
363S. P USH
'08C,.EQU
Dr:LTA
&6Q,CD
681/LD
110/CW
13?2/LO
1~13/LD
121/DFF
3.Q.EQU
~99'LT
618/LI
1279/LI
1366/BAl
13'1-EGU
DFLTABIT
DFLTAeK
8
2a~6,,-.,eMNO
DFLTAS£T
135~.RF:$
Dr:L.TA1
284+8"0/CMND
1.27lt1CO
c58ca.TEXT
'161/CA1.1
2211t.RES
DtSPF"PT
DrSPLAY
~15q.R~S
2848'~:1/CMNO
28-.8.63ICMt\O
DTSF'SW
2~81.1Al/eLE
2~87"1.£QU
DNTS£ND
2?5g.19/BANZ
DealT
DAL.l
DeLe
1021/BNEZ
225i·2,·£QU
10 .. ".EQU
"~/C'w
8!~/CW
8!5I.,/BANZ
98f1.£QU
DBLat
991/SNE
1004+ICW
100."C~
D~MF.
DeMF1
"9/8~
82",·Lt
829·L.CI
8l'l/B
827/BFZ
8]~.LW
DBM!:!
DANE
DeNE
1810/ BNE
182~.e:QU
3917/CLeSE
391,a/6PEN
4+1*n/B
.1~6-Rrs
1292/CW
254P-TEXT
2S90"TEXTC
9
Oe~!T
11'1.1-EQU
OSNTBrr
l~I-IDF'F
2R4+8.21/CMNO
35a.e:GU
~Og("l/L.t
iOCJ'/LI
~1\7.1R/8ANZ
887'1,.PUL.L
587,4/L.T
2~!8.17/Lr
"SilL!
1,14:1/Ll
DBNT61<
OeeN
181/8£
841-Lf
1219/B~
1~~/B£
8~1"Cr
1221/BF"
i~;/B
8.~.EQU
oaeve:~
DaeVERt
D8UBL"1
519.9/BG
OP.CCFSS
210/ R F.'F
OSWLeeP
24S7,'#oI·SLS
ECH6
51 9 .ta;/BaZ
~051l/ANO
2~81'8,/BIR
190.4f,/R~F
284+!5'31/0CMND
111~/L.D
112~/LO
11P1/LD
iS8,.T[XT
E'DlT
[otTA
EOfTO
1119.EQU
561+-EQLJ
2S91-TrXTC
~84~·10ICMND
2848.],ICMNO
Ej..IMSG
~4!i?/Lr
ENTPRG
'!5~.e:QU
~55'.DAT"
81A/BLE
ER.SE
~o/'9.9.EQU
ERASFPT
2n~q.leIC"L.1
ER8IN
~b1~/8
284~""ICMNO
~'4t6.4.GEN
a6S.,.LI
34511LM
864/BA~Z
1!06/B
2~~8.5'/C:MNO
11'5/1.1
1221/~I
10
ERe
ERRABN1
14~/F(FF
a50Ci/STS
3S15/L..w
3q~/8Fl
J50n/BAZ
3512-£QU
3;;11'.3/91'5
~52~.B/STS
ETHF'QT
~183/1.M
i23n.RES
EXLVBtT
8~/DFF
136_ICW
2550-£QU
£X~NDSZ
9~/DE'F
EXTOGe
849/6r
26, .. EQU
263/EQU
961-R£S
EXTFNO
~O'3.EQU
E:XTNDBfT
F'np
l~"'/DF'F
667/CD
FDPsrT
12?/O£F'
28~8.''''/CMNO
36,.EQU
1350/LO
35n.EQU
2084/LW
1351/1..D
671/Lr
2R8S-TEXTC
1285/Ll
F"nPS£'T
134Q.RFS
2B4as'1?ICMND
FDP!
2587-TFXT
"~/L.D
128:1/CO
R5'1/0~F"
26 O'1-e:QU
260'2/EQU
A99.2/ANO
a9gl:a/STW
'O~2.i'/AND
tOt)2.:1/STW
~~/DEF
5l,/BAL..
1247/8.L
2~32/eAL..
282l;/6AI.
Fr:XTfMG
FTD
FTD£~
~82~.8AL.
;:I424/B
372n.CI
373n/8
3724.PUI.L
~'3$l/B
~'l'/BF
a71Jl/Br::
FTDe
FtD~
FTD~
3?27.L..r.I
1028.2/jNO
3709·LI
102B.31b.TW
'104
11
~'21_/B~
F'TI.. FNT
r:r~RBC
FLAGS
"rLRP
;J1l1.PUSM
16~/RrF
801/8AI.
899/BAL.
1n2i1BAL..
105,/8.4L
12~/D£"
3B7.EQU
877/1.1
10Q6/L!
?R29/LI
"93/A~JO
i!551a.OATA
1016/SAL.
a334/BAL.
3251·PUS~
3~60/STM
3262/~TW
3263/ijTW
1'2~'"/BAl.
2333/8AI...
2383/bA'-,
'+160/ne
4210/ bEN
644/DF.'
891/BAL
FL~PBtTS
~!56~.DATA
FLePBUF
FMTF"L,CL
;J2!4/LW
8/,/O£F
Z6P\-e:QU
266/EQu
:;J2t,QISTM
;j2'~/STM
32"/STM
23"/LM
]P18/CAL,1
20~/R~F
l464/BAL..
1517/6Al.
1Pi61/BAL
a9_4/061
3947/061
]t;55/0e
:;810/6.1.,
F'eRS[C
2?4.EQU
3962/06
F6RTRA.N
~59~.T,::XTC
c8tQ/LD
1890/8£
189".R£S
FaUNOP
F"PF"PT
8'/O£F
27P5 •• G£N
3.76/CAL1
~SA~.51/CALl
FPMC
19t'/Re:F
3fJ13'1~/Lf
F'RBF'XT
:1911/8£
F'R[[BUF'1
6!5/DFF
FnF9
8~/D£F
GASP
168a/L.!
GcaMNPG
3913.,.6
69~/BAL
aSSn.OATA
168a.TE:XT
?'2i/BAL
3614+ICLM
i902-£QU
]!=i, •• Sl/CAL.1
3913/~ALl
1521/CAL.l
1~
c'O~.G[N
Gr;T
2C3/ Rr;F
Gr:TAC:PAS
Gr:T' r F'1.D
78~/BA~
6t./DFF
1?~3/6AL.
28~~'11/CMNO
~8~8,53/CM~D
lS'Q.RfS
50.,/8AL.
186,;.LO
767/8AL.
2331/9AI-
8!O/BAL.
?A+87.16/BA!.
12~t/BAL
2487.33/BA~
1394 / SAL
t'45,·e:QU
3849/B~·JE
1~32/B
44+92/8
14+21/ b AL.
Gr:TIO
1~7!5,32/CAL.l
GFTFG
~34P/CAI.1
G,'SB1
:i7a.2/8
G,TSW
2487,3:;1-8AI.
GrTSWX
2_87,3118
2?08.Q.GiN
C!10~.G&:N
318.,.[GU
2487'!5~/BDR
2487'S1/BNE
248',61-£QU
GIV~erRD
!58"1~/e
GYVrMF'H
GSTUSRB
GP':PT
6!5~/BNE
117'.'·LT
165~/aAl
156n/ BLE
2103/BG
~18~/B£
320-..EQU
B9/0rF
3'1a.~/CAL..1
2092/BNE
2131/Bi
2151·GF:~
GRBUP~
614-L.\41
~820/e
13!i~/B
~83q/B
1315/B
GFH~UP~A
5Bt,/B
61~.Lw
54~/B
61Q·EQU
6~~.EQU
'11/BE:
'31,BF'Z
6~,.LD
GR6UP26
GReUp~C
GRP[XT
125'/BLE
755/B
1315.51/9
2817/1:.1
1a
GRPf: XT 1
61+1/6
64+4I.-LO
64'/6NE
6~1.8AL
~l~n/BAI..
i44n/BAL.
3668-e:QU
3808/8AL..
6'/D~F
42"BAL
1939/BAL.
1957/BAL
3B8P-[QU
336.29-Sr:T
336.29/8[T
336.30/5£T
336.31 / SET
4tAO.1/I,..W
A+89.1/LW
GRP£XT~
~r:X'BTN
8Q8/BN£Z
~F')(2E8C
~FX~E8C1
35~'.L.r
~F:X~£BC~
~!9?/er;
HF'X~£Sf(P
35!~/L.1
~6on/8IR
36on-efR
~!59n.e:QU
~XX
HXXB
~1~1/B
4tl:i4l..LB
413~/BF.
4+1111.RES
~13P.;.STB
"l~./eNE
4.t3t'-Cr
4+1]A/BOR
~1~'·AT
·1~~/B
J.roIXXC
HX)(L
~XXU
I
:9~6.~/ePEN
~3~.3~/CLeS£
3:i6" .. S£T
INBF
114/0£1'
'2~/l..t
391j'1~/Lt
3.. ,-£QU
1201l/L.1
659/L..I
24f.8,.10/1.1
3!53~/L.t
JWATTio"eT
2~5~/BE:
ct48nwrGU
JWATT~F(N
~~!I51/B~
JX:CMAP
K
19~/RFF'
33,.~/ep£N
c411.t:QU
3'1~·t'/CeMPARE
33 6 '3n-SF.T
336.3~/CLeSE
KTLLMT£L
20~/RF.'F
::t90"/BAL.
3l6'35'~ET
17
L.Aq
10~2.1.l.t
LD6
336'21J/GFN
~~~a.3~/CMND
L.F
:i1~.l.t
lO9P;/B
33 6 '2,/E:RR6R
28At~'3~/CMND
3!~.GEN
284i.9/CM~D
~848'10/CMND
28_S.S6/CMt\O
P8.8.62/CMNO
326.GF:t\
~29.LCI
LINK
~!93.TF.:XTC
LIST
119C.L..t
c83A/LD
284ta'14/DCMND
L.TSTC8M
L.tST1
LtST,
1.15"/8
11'~/B
119~/B'
122:11-L,1
1221.L..1
123A/8
1229/BNEZ
123~.Lw
li'7.Cr
L.tST]
L.tST~
1226/BNEZ
LISTS
123111/8
l.LtNES
12~6'1_eAL.
1235.,.BAL.
185'/I.M
i61n-TiXT
513/BG
51"/BNE
53P/BANZ
53/,.f!QU
L.M~!CMO
L.MNCM010
L.MSG
I.SBL.T
1. 9~3/L,.M
2561.1£)(T
100lt/6ANZ
lO1~.Lr
S30·ErJU
L.8F'TNS
L.eF'LG
9010/8
967/9
1037·e:QU
1059/8
12~/O[F'
35~.e:QU
1039/1.1
1215/LI
2848'11/CMND
l3t.LCI
284+8'28ICMNO
336.~O·TEXT
c8Q8.33/!;.,HND
336.26·~EN
1~
L.eaBFF
69!/CO
1..8GSrZ~
2'3-EQU
'64~/GEN
l:1'5·!in/LD
11+3A/STM
i6~~/GEN
2!S9,-TrXTC
~8~i'15/C:MNO
~8"8.28/CMND
35]3/1.0
1529/BUMP
3209/STM
15~2/t;UMP
3210/~AL.l
3:170/8
3381/8
3383/b
1440/CA1.1
1~68/BUMP
2646/GF~
1523/1..1
2b46/G&:J\
~142/BUMP
1001/Sr
1003/BE
1062-LI
3355/B
3363/B£
~220/BUMP
L.8Mr;
99{,/6£
L.eME'3
999/8£
106~/BNEZ
1081-LW
1015/6Fl
101,.1..1
333, .. BQR
;J3!!l/BrZ
338!5/BGEZ
~38Jl/Bi
3331/BOR
3341w£QU
333~.PUI.L
:13'''/6
102~-EQU
loan/S
L.BMGe
L.eeP
l..eep1
L.saP!
I.t9SETUP
L.F'
a'~/cw
lOon/Cw
3390/8
2545-r,)(T
L..STAT
'89~/CW
MITE:1.
2R4'l1'6A.CMNO
101/0r!:F
2E»6.1_e:QU
26'/EQv
l.b45/G[N
16S:l/GEN
i3ft9/LW
2642/~EN
P'!s2/G~N
~6!5'/GEN
2'86/Gf~
2'13/GEN
2721/GEN
2145/G£N
S8S9/bEN
26A.EGU
~6'/EGU
a5t/STW
4S1'13/STS
M:T£~L9IZ
10i'IDr F
MIUC
ll9/R[F
2.~/e:QU
4!51.~1/S'W
4f;o?"/STW
1954/CB
4tS"6/STS
2130/ce
~S,·8/ST'"
2bl'/Gi:~
1+22~/G[N
4241/GF.'~
"252/GiN
Mexx
MAPFAtL
19:;g/L.W
1~O/Re:F'
4frAtt!/L.M
4+50/L&
681/LS
?62./GEN
688/STW
26'8/GEN
4S1.20/h,S
172?/L.I
4+257/(JEN
JPlib4.,7/ac:s
MAPIT
2'!38.1Q"CiFN
MAPFER
*51.~/eAI.
1~
3!6~t~n/eCS
:i!56'+·1~/CAL..l
l564.19/CAL.l
3664+,ta-£QU
MAXHSG
38!"/BUHP
MCPLD
1961/L.M
MCTCPL
~2n.11/CAI.1
MDCPL.
"-0931CA1..1
C051-1-TiXT
21tJ9.::a/CAL.1
a1e,.G£N
,?g/CW
~191/~M
998/CW
c23 •• RES
MrSSAG[
P27,.EQU
MF.:SSAG[O
?26C.EQU
284 1 ."/CMND
284~.lA/CMNO
MFSSAG£1
22'~/B
MFSSAGE'2
?i84/BLE
M[SSAGE3
c30~.B
P261/BA~
~2'A/BAL
MF"SSAGE5
Mas I
~28'.LCI
2300/6NE
MF'SSAG[4
MrTASVM
c28~.Ct
2316.l..e
c32~/BOR
~5g4"T~XTC
c81~/LD
MMO
~C:40/G£N
10a9/CW
2V
MM1
2031/GrN
CO~~.Tr:XT
t'O~~/G~N
t!04~.T£XT
f)03~.IGEN
CO~F;.TEXT
2.03~/G£N
~O~~.TEXT
~03~.IGFN
C04t".T£XT
~Cl'/GtN
i04+Jl.T£XT
20:;'/Ge: N
cO~q.T£XT
P03Et/GrN
cO!5n.T[XT
MM,.
MM~
MM4
MH~
MM6
MM,
MM8
MBDE
16e/R~F
80~/STW
Me,,~cW
MSA,CP
19!O/LW
1981/LI
t>O!5e'/OATA
a05Fi.TEXT
1l0/0rr
3S_.e:QU
~SGE8IT
2029·0ATA
817/1.J
1.034/LI
MSGMESS
~28~/L.M
c3tn.OATA
;:»O!5t'IDATA
C05:>/OATA
M!;F'(CP
MST~MeO£
a9'1/0£'
2051+ .. TFXT
3 78.4/CALl
~'58'24·Gr.~
4~q/LI
4+51.19/1.1
15154.]7/CAL.t
MUC:RSFT
236.,,-EQU
MUI.IDS
MUL..Jee
M1RATrR
:1821. PUL.L
:i844/Lt
~~:;g/B£
c4+-6Q/LI
24'8/L..r
686/Ll
2483.~QU
421~.CAL.1
42~'/OATA
'+244/0ATA
16B/R£F
32~/GEN
:a26/GF.~
9!;1/6AI.
369'.RES
21
M16
9;'>2.1/AND
M~
24+B7t4!1\/ANO
NAME:
333/GEN
~3~t3!/SET
!?1/BAL.
1~50/BAL
3~'!/BAL.
418/L.w
3(,)911STW
336_]5/S[T
NAME'
NAMEVLP
?575.DATA
NBtT30
~551'1·[QU
Nr:.XTTTM[
NF"NO
50~·RfS
~9/0r.F
c8 .. ~/ANO
3496/ANO
t1'6 •• ,BG
54n/BAL.
NF"NOt
:;2g?-I.B
;:i2g'/B
~2g~/Br
~29_.ST8
N~ND2
NLSAVF
Ne
260-EQU
tOO2/CW
cH54A.T£XT
1983/8[\1
199",.SLS
66~/B~
61n/B£
NeCeCM
NaDe:L
2 6 O'1/£QU
68Q/Br:Z
Ne08NT
S81.~/eAZ
~81·1~·PULL.
4t!=i1.4/BAl
451'2,.rQU
N6£GG
NeF"DP
6'~/B[Z
67 •• LI
NSLINF.:
~13b11.I
i!14n/Lt
2141+-TFXT
f,82-RES
328S tlt PUSr.!
32'4/L.W
2~
NeMSG
~!I;1.~/BFZ
Na"J~
NBPTAB
451'1,.£QU
1630/L.I
1731/LI
118~ .. DATA
12:t,/Lw
2611-rr:'XT
NTJBST'
'it/OrF
l2in/BEZ
2082/8r:Z
18n/CW
1218/CW
~4U~1.12/BAl
3081-L.I
NUM
:i2i=»/DB
eN
90/0£F
eNBtT
119/Df r
6NrRR
epees
'n/D~F'
~:16."/ePEN
3*,.EQU
809/L.T
891/8£
976-e:QU
l36·1~·SF.T
336.26/Gr:f\
t'.~47.TE.XT
841/LI
B8S/LI
1013/Lf
1018/8E
3J6.38ICL.eS~
fJPENBtT
91/0~F
C551.EQU
6P!;:N8I200/BGEZ
C20a.RES
?21?IL.M
i23a.RES
421~.R£S
4+22./04TA
4229/DAT"
151"/BAL
3139-e:CLJ
i68A/DATA
2115/0ATA
3202/B
P848'26/CM~n
2A48.2,ICMND
2848'39/CMND
]tJ20.eUMP
RAOPL.LIS
RAOSQ,'
RAT£ERr<
RO:USF:RS
1391'/8AI.
ROERT
;:>40~-L..r
READ
46~/CA1.1
Rr;'ADAM
1Sg/RF. F
i62a.G£N
6]~/BAL..
164/BAL.
RFADBKUP
t'36~/CAL..1
RF."Sf'T
1'1I/~""F
1t4Ptl/BAL
121'/BAL
1985/LI
286,·OAT"
c111.GiN
2848'''~/CMND
;J8 .. 8t5S/C:M~O
RF.'TN
Ql.1/0EF'
~f51.q/LI
.51.JO/LY
R,::-r
RaM.eLT
325!5/Lt
RAMaSLT1
8'~.CW
3251./Ll
91~/eNE
3282-8
9211BNE
1236.1/BAL
3950/bAL
2Q
8?9/BANZ
88~.LW
861/BNE
914-£QU
92t/e~
92~/8E
928-LT
88'/8~l
89n/BNEZ
89.-e:QU
RAMOE'V
95'/6
ReMDF,:V1
R6MGe
R"MG61
gQ9.1-L.T
~RAT~
401~/CA1.1
RUN
f')133.EQU
RWUSR.
RWUSRSZ
S
s:c:eup
94~/e
4t2~n.R[S
2841'1~/CMNO
2848.16/CM"D
"4/)-GE:f\!
~64t~/£QU
3208/L.M
t46,Q/BU MP
152Q/Bl,JMP
15~2/8UMP
3~6.~/e"'EN
211.1/RF.F'
33 6 '141.-S£T
15!S~/LW
336.15/06
264a-firQU
336.21/De
31,41/BUMP
336.21/06
3220 / BUMF'
336.38/CL6SE
195a.1/MT~
S:NUMC
33~.14/S~T
SAVE:
20t:f/ R[F
SBUF'1VPA
284+i:I'2n/CMND
141/RFF
2!iA/EQU
14?IRFF
2*~/EQU
270/EQU
378.8/Ll
S8UF'2VPA
SC4N
'~/DE:F
121a/BAI...
1260/8AL.
1~73/BAt.
1S7P/BAL..
1.?9P./eAL.
181:a/eAL.
1868/B
1881/BAl..
192,,/8AI..
332g-L,T
3?1~/BAL
313*/8AI.
3804/9AL
SCAN.
7!;/Dr.:F
SC4NCVT
S11/BNE
~33n.Lt
519.1-t:QU
lS81 / SAL
2116/SAL
1105/~AL
2~34t/=A~
27
SCAN2
seN
332~/B
~3]1.Lr
~6'1.l.8
~68~/BL
SCNPTRSV
264.EQU
26F;/EQU
'66/STW
,a9/LW
SC:NVBStZ
S19.10/L.W
2,,~~.9'.OATA
SCNVERS
!51Q,11/E:XU
seeR
~36.21,/GF.:'N
28~~.9~.Cw
336'2,I£RR13R
SCRAM
i1P/SREF
l~g~/Lr
1~97/8AL..
ll+l,/BAL..
14+8s·e:au
149~/B
1l+9"/BiZ
1l+9g·PUL.L
f.'669.Tr XT
31'1/LM
SC~AMBL~
1407/8AL.
SCRAMBLX
SFCAC
SF.ND
2i?5R '1. ",.EQU
28l+~tln/DCMND
sr;NDCMN
22!A.21/6
SJ:'NDCNCL
2258'2~.f.QU
~824/CA1.1
:j8'~.£QU
?29'/L..M
c?3Q.GE:N
S~NOM~S
SF"T
1 7' IRe:~~
SJ:'TSUF
28l+1'2::t/CMND
94/DFF
251-.EQU
258/EQU
9~/DrF
25Jl.e:QU
2S9/EQu
9~/DF.F
2S,.EQU
258/EQLJ
SF'TBUF[
SF'TSUF'6Z
SJ!TF'LF-'
1~gn.l/STW
1390.,/STW
1393.1/LW
1393.2/LrW
i!C)
1,q/R~"
~i+3./B
1RO/RF'F'
~1+4~/B
Sr:TNUM6
Sr;-TSTP
7'/D~F
~1+3~.N8P
S~TUP
40P.L..t
S~JLNM
17P/Re- r
92n/C~
995/CH
1.11?IBAl.
112n/13AL
3757-EQU
3"'/BLE
31a,.e:QU
~7B!5.EQU
::I191/BDR
~188/aOR
J19n.80R
3790/BOR
a'91.eOR
SI-IFTBUF'
S~F'TO"
S~F'Tl(j
SHFT2n
SHF'Tln
s~eW
SHew xx
t50Q·EQU
28*8'lQ/CMND
152?/BCS
15~~.8UMP
StNBRF"L
StS£T
11'/O~F
3~~.e:QU
635/L.t
"38/LI
3~8t/LI
11~/Or;F
34A-e:QU
786/LT
R25/LI
~479/Lr
STZE.R
P374/BG
StZE:TA81
1, 8g~/L r
STZETAe2
~41".£QU
i?9n-[QU
i.?80n.EQU
STZE'TAf33
280Q.EQU
S t Z£TJ;'RM
33tH~/L. T
~33t"1/Lt
3410·EGlJ
STZVERB1
!g~R
STZVE~ei?
.41".£QU
284to iS '9'/OATA
28 .. A.8j .. E:QU
284~.9~'DATA
SPCASP
5't'.E~U
S~C~TA81
ss
1SBq.CW
18~'/BGEZ
~nl.1/RF'F
2,-8 .67,9T5
'
~4i?'2/Lw
269.EQU
2'n/EGU
iSS/LoT
STACI/SNE
l26~·e:QU
1267/BF'
12'R.E:QU
STA~T70
STARr15
STARTA
STARTQ
3090-Lt
1288/B
START]
START4
2848.65/CM~D
130,.RiS
tP91/B
1:10'/8
30
129~/BAL.
STATUS
~244-RFS
131n/BAL
2~4ts'44/CMND
131,-Rr:S
;,'!B48.66/CMt\D
SrATUSL.
;")24~/BAL.
393i'.~£S
381,1'-1,.1
C54t1.G~N
STI".T£XT
~Cl~/GE"N
C024.T£XT
'Ol?/Gr N
i02,;.T£XT
'01~/GFN
a02~.T[XT
'C19/G£N
C02, .. T£XT
TTVP~
C021l.TF:XT
TXALL
ixn
~4~,.3~/CW
;S"8.,.TFXT
2487.7tl/L.t
~5"8'1
2487,80/1.r
2S"S.,.T£XT
T)(1.
.. T~XT
TVP~
]91?/CL6SE
::'91~/ePEN
11~~·EQU
UDF!LTFLG
13?IOFF
21~8'31'ICMNO
361.rGU
126Q/CD
UNKLMN
UNMAPPlrR
l~~/O~F'
.911CW
t1l6/LW
268S-T,XT
5l+3/1..W
1103/CW
4+51.t~/8AI.
USrRSQT
io11'~/L.M
3~6~.~q.EQU
~22A.R£S
UTSI>RSC
V~CT
51Q.t2/SF
VrCTA81
~19.1C .. l..w
VFCTA62
5·1Q,11.e:XU
!5lS1.1-PULI.
51~'lq/B
!51j'11/BOR
Vl!:CTB10
112q/B
Vr:CT8RS
587'lq/E~U
28_~'9~.EXU
VFCTer:~S'1.eAl..
16'~/BE:
W~FRJ;
1"3'1/BL
16~?/DATA
1647/0ATA
1610-L8
165~/DATA
16S~/DATA
168"-L.T
1675/l..t
168n-T£XT
1S91/CAL.t
16!5~.Gi.N
1599/CAL.1
16.~.GEN
158?-Ct
43'1/C1
1a3A/~M
C60Q"T£XT
Wj..lE;RR1
Wj,.4M
W~eP£N
WHRE:AD
1~19/B
1686'1/B
WHSC
WIDTH
wRIUSfiRS
1~3"'.STW
wRYTE
10"DFF
16~~/CAI.1
199~/CA1.1
WRITE:AM
451'11/CAL.1
1?3~/CAL1
cOo,'CAL1
?22?/CAL.1
3560lCAI..1
i!2S'ICALl
3S6:aICAL.l
15C)/Rr:.r;
6!1/BAL.
WRYT[RC
~381/CAL.l
c?2~.GF~
i'3Bj.CAI.1
il+21/B
1.~3'/L.M
c65~_G£N
WR!T6UT
WUSR
XA
218.!II!/RFF
362~/Dw
XAS6RT
121. RFS
X~)(tT
J53~/8NEZ
4!S1.16/CAL.1
1768/CAI..1
2138/CAL..1
2459/C.L.1
10l+l+/BAL.
4+S1.32/CAL1
1R54/CAI.l
2142/CAI.1
~4A'.81/CALl
1l5P,3/BAL
1621/CAL..1
19l+9/CAL..1
21St/CAL.l
2611·GEN
12:15.1/8AI.
1632/CAL1
1910/CALl
21s9/CALl
l100/CAL1
16"?/~AI.1
19S7/(.;A1..1
2197/t.;AL1
3464/~Al.l
6'~/e
Xr:Fr:D
t.t18.~/RF.F'
X~~1eW
1531/L.D
3'1
684-R;:S
13~6/B
2551'1/EGlU
~59A.TEXTC
X'C
2P58.2~/eR
Y8l,.K
334!1li/BF
335,.Cl
3359/8
YF"SFDP
6?4.EQU
YFletT
fJgi'/e~
YOOO1
69~.£QU
~!5~1.~/EQU
VnOQ4
3~9.1/EQU
VOO08
Ynct
361/EQU
:i25"BR
i6,/EQU
Yt"lO~
363/EQU
225 lS '2:;/LW
31.~.1/EGU
2109.1/LW
Yneg
2551/EQu
Yn~
;>S5C/EQU
Yn~
i.'36.~/EQU
Y1
y,
~,,~.~/£QU
~312.'ICW
Y~
~B'.11/I...w
Zr:~aBI<
~g'~/e.L.
'+Q94/BAL
4109/8AL
4119/9.1...
4\9,.1.1
3'J
lJ:'ReSK1
~1g?l.B
'+20a/BJR
4064-EQU
"Ol!l,/Lt
40?O/LT
~9!5~-EQU
39S •• ;:QU
3960/AT
III,
1DAV
.ReM
6!50/8
8!§CJ/Bi.
949-EQU
123/DFF
351-EQU
648/L.T
lB~/RrF
211/[GU
$ReMFLG
ILeGSZ
R06/Lf
A88/L..I
T'L.TfRMtNAL
TEL
*s*
"
ooooooou
00000001
*
UTSPRec
S69PReC
00000001
9ITS
~
~
1
5
SYSTF.~
EX~CUTTVF- ~ANGUAGr
TfRMINA~ ~XECUTrV[ LANGUAGE
S TG1FDF
a
SET
SET
1
SET
SYSTIrM
1
UTS
ENABLt DEFAULT LITERALs
,"
************************** ••• ********************.*****************-****
*P.
NAME:
T[~
•
q
*P*
~
1(')
11
12
13
1~
1 Fj,
1~
17
18
1q
2n
21
2i?
23
2~
2~
2/,
21
2B
2~
3n
3t
l~
3~
3~
35
36
*P*
*P*
*P.
.P.
*P*
.P.
*P*
*P*
*P*
.P.
*P*
*P*
*P*
*p*
*P*
.P*
.,.
*P*
*P*
*P*
*P*
.P*
*P*
*P*
*P*
*P*
*P*
*P*
PURPes~:
TEL TS THE
PReCEsse~ FeR TIMES~ARING AND THUS SERVES AS T~E TERMtNA~ USER'S
t~TER~ACF T6 cP.vtS SERVICES, IT IS FUNCTIONAL~V
[QUIVA~ENT Te
IN BATCH MeOE. SSME SF THE
MAJeR FUNCTIBNS PE~FeRM~D BY TEL AR~I
DE~AULT
CeMMANC
'cel.
1.
2.
l.
~.
5.
6.
"
8.
OESCRtPTr6NI
CALL USER PReG~AMS AND SYSTEM PR8C[SS6 RS
ASseCIAT£ DELTA, BR eTMER OEBUijGERS
MAN I PULATE: T~E
ASS I GN/MERGE RlceRO. (V 1A THE
SfT CSMMANO) T8 ESTABLISH OEvltr & FILE
ASSIGNMENTS
PERF6RM PARTIAL CHECKPeINT/RESTBRE (SAVE/GET)
C~A~GF T£RMINAL DEFAULTS, SUCH AS TIMING
ALGBRITHMS AND PAGINAT18N
'SUP[RCLeSE' SVMBIBNT FILES (PRrNT ceMMANO)
DISPLAY SYSTiM PAR.MITERS & BATCH JBB STATUS
S~NC MESSAGES 1e T~£ CP-v 6PERATeR'S C6Nse~E
TE~ LIV~S IN THE SP~CIAL SHARED PR6CESS6R
AREA (ABeV£ Xt 1COOO') ANO MAV REMAIN
ASSeCtAT!D WfTH THE USER A~eNG WITH HIS pR~BLEM
PR8GRAM. TEL IS l~veK[D INITIALLY BV AN
INTERPRETIVE fXIT FR6M T~i ~DGON P~eCESSBR.
THEREAFTERI TEL ~EGArNS eeNTRe~ WHtN A PRee~EM
PR6GRAM eR SYSTEM PReCEsSe~ ABORTS eR EXtTSj ANO
WHEN THE TERMINAL USER TVPES 'CeNT~e~.Yt eR
'ESC.ESC', AL~ [XITS AR~ INTERPRETIVE EXCEPT ABeRT
CASES, ~~TCH CAUSE THE USER ARiA T~ BE CLEANED
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
•
*
*
*
*
*
*
*
~o1
11\: 3'
~£P 081
'75
31
3R
T£L.T£RMtNAL EXECUTIVE ~ANGUAG~
~O
UP BV STEP, rSLLeW£O BY RE-ASS5CrAT,eN 6r T£~.
'INA~ EXIT FR8M TEL IS MACE T8 L8G8N, W~[R£ THE
ACCeUNTING R~CBRO IS WRITTEN A~O TM~ USER IS L6GGEU
.P.
.. P.
*P*
*P*
*P*
3CJ
4n
e~F.
TEL IS L6AD£D
.P.
1*
4~
.. p.. P.
44
4~
.p*
.P.
*P.
46
1+7
48
M8NSTK AND C8Pl£S OF THE
PASSZ.GENERATED OEVICE AND e'LABEL TABLES (USED BV
SET CeMMANO).
IT MUST A~Se HAVE SPECIAL JtT
ACCESS ANO T~F- MAXIMUM MrMeRY FLAGS SET •
.p*
4~
wlT~
FOg
~E""
OCACCrSS
208
REF'
REF
4Q
S£TFI.[
BlDMTrL
CeCL.N
USER AcceUNTING CF.LLS
PR8c[sseR Ac~eUNTING CEL~S
TERM. INTERACT. ACCTtNG ~ELL
ceUNT SF CALi
*TEMP. RUNNING P~GM NAME
EXECUTE eNLV FLAij weRD (~:ASSIGNl
SIZE
e~
:USER
RE~eRD
.TEMP. RUNNING PHGM START AODR
PRINTS TEl'S ERReR MSGS
ceMMANO 'ILE HANDLER
READS ceMMANOs FReM A 'I~E
CPX CL£ANUP FeR CSNTR6L.Y
TeGG~£S iC~e BIT TN J:ePT
PAGE NUMBER SF S~U~l
FREE PAGE MAP C8NSTANT
P~VSICAL PAGl MAP
LIMIT ~XC.EEOED BITS
PERM RAD SPA'E RfMAINING
PERM 01SK SFACE ~~MAINrNG
FILE EXTENSION BITS
ceUNT eF CAROS READ
AOMINISTRATIVE MiG IN M6NtT6R
caUNT SF CARCS PUNCHED
ceUNT 6F USER PAG~S eUT
ceUNT eF OlA~NeSTTC PAGES SUT
JIT Drsp~, Te PSEuoe SENSE SWITCHES
SAVE C!MMAND ~eUTTN£
GET CeMMANC AeuTINE
CREAT£S MITE~ IN ~eurl
RELEASES MITEL IN SBU~1
~eRCES MIT[L CL6SEO
USER'S PRIVILEGE
LINE NUMBER IN M;UC DCB
* 6F DC lIe 8PERATI8NS
"f01
1P;1~~
1 ..
21~
2*
~*
4·
~*
,.
9*
1 C)*
11*
PASSWe~C SCRAMe~~~
SREF
TTf:)
IF DE'INEO, TP IS GF.N'tO
****************.****-**
*
REF
~.
$2,.
T.WRT~RR
SCRAM
..
*
*.
..
LANGUAG~
SREF'
siceup
TsERRrXT
~EV
2t'
218
i*
TEL.TERMINAL ExrCUTtV~
DPACC[SS
TPACCESS
• 8F DP tlB 6P[RATI5NS
* SF TAPE ep[RATleNS
CeUPLING FEATURE CBNTRSL CEL~'
~EADS rRRMSG INT~ T£~STA'K
WRITES £RRMSij ~ CLEARS TELSTACK
REr
R£r
REF
REF
t'1n
211
•
R~~~
FR8M
~ITERALS
*
**.*********************
XA
REF
Xr:F'FO
********************
* RE'S 'RBM AMROEF *
********************
REF
AMI!RG
~EF
AMISTOBP
LITERAL C!NSTANT
LITERAL C8NSTANT
petNTFQ 18 AVArLA8L~ AIM SPACE
lNTER.JS6.STEP tMAG~ e, ~;ePT
~6
~n1
1~1~6
!=;[P
T[L.TFRMINAL EXFCUTtVE: LANGUAGr;
08 .. "5
219
~2()
?21
222
223
~24
22~
226
~2'
?2A
229
2:10
2J1
23~
23:1
PAGe:
OOOOOOOU
00000001
oooooco~
0000000 3
OOOOOOO4t
0000000 5
RO
F.:GU
R1
R2
R3
rGU
R4
SRi
OOOOOOO~
01
ooooocot;
OOOOOCO U
~3~
0000000"
0;> 00000
rFFO'EC~
0000001~
i'-4t~
EXT
~44
OOOOOC2ts
oooOOOO4t
P.41\
~49
OOOOOo8\..
fQU
SR3
FGU
SR.
r;QU
r::-QU
£GU
02
O~
F'QU
D~
r;Qu
SF'ACr:r
TEL.
CSECT
~3'"
247
8
9
0000000 8
0000000 9
caacooo A
SRi
MUCRSET
1
It
5
FQU
R6
oeaooco'?
t
2
,,
00000006
Fe,
a
r;QU
~QU
I!QU
ooooooot.
24!=i
,.,46
f.QU
F'QU
R!5
t>l~
1.
t.'*
~*
~Qu
r;u
in
1,
12
~ ~
14
1!5
:4
1.
.X'281l1'
YOs
CF~USR
F'QU
ARS
MAXMSG
rQU
SeU F2VPA
X'2B'
MIUC.4
£QU
140
AMBUF
rQU
VERSCEL.L £QU
* NeTt
.
*
AeeV~ ~YMeeL. MUST MATC~
eR T~~RI~tC MAV~EM wILL
Te BE
47
C~ANGED
ANYWAY),
!X'F~FD7EC", MASK TO RSiT M;UC
CeMMANO FIL.E USER
wlNOeW PAOt T8 READ AIM RECeRD
MSNITeR TVPE
CE~~
MAXIMUM iRRMSG R~CeRD LENGT~
O[rlNfTI8N IN eTH[R TEL MeOU~!S
RrSULT ( BUT IT S~eVLO NEVER NEEC
~nl
TEL.T~RMrNAL
18':;'
** •• *******************************.********************** •• ************
...
*
T~E FeLL.SwyNG Oe:FINe:S THE L.AVBUT SF TEL.'S DATA PAGE
~5~
25~
* AND SHsULD
?54
~55
~56
EXT
2!S'
ooooooF'"
~59
ooooooF"
*SF.TBuF'
~
~
r:QU
S£T6UFSZ rQU
S£TBUF'E F"QU
TELSTACK
f\LSAVE
FEXTIMG
SlCELL.
EXPNOSZ
TEL-SUF
SCNPTRSV
~QU
0000010U
0000010c
0000010;:t
S
0000010~
~
:'>6~
0000010b
263
ii'64
265,
0000010~
S
A
0000011~
~
~
!I:;
~:TEL
~QU
~6~
00000121)
00000133
00000021$
FLepsurr
DCBTAB2
~ITEL.SIZ
;':>69
Ooo0015rj
270!
21'
2'~
000000·1+
£QU
F"QU
FQU
j:;)6("1
1*
".
P6~
,*
_i
PAGE
2!SO
2!1
25R
EXr.CUTIVF. LANGUAGr
r.;
oaoOOll A s
~
STACKO
TSTAKSZ
EQU
r:QU
~QU
£QU
r:QU
rQU
FQU
FQU
B~
CHANGEO
wIT~
CAR£
SBUF'l VPA
i!!55
SF'T6UF+srTBUFSZ
S£TBU'£+1
TfLSTACK.:>
NL.SAV~.l
s:'[XTIMG+1
SPD MUST BE e~ OWD BeUNDARV
TEMP reR 1ST weRO IN TE~eUr
IMAGE eF FILE EXT BITS AT AIM READ
SZC£L.L"'1
EXPNOSZ+1.
TFL.BUF.20
SCNPTRSV+1
FL6PBUfi'+'R
DCBTABi+6
PLIST BUIl.O AREA
~o
MINIMUM DCB iIZE
MITE~+M:T~Lsrz
T£LSTACK STARTS H~RE
SBUF1VPA+~11.STACKo
SIZE 6F TE~STACK
**.****************************************.* •• ***********.********.****
SPACE
]
EXT
ooooooou
LBGSIZE
FeRSEC
~QU
F.QU
SET T8 0 FeR ELAP TIME IN MIN
~01
lAI~'
~e:F'
08,
** PRec T6
307
]10
OOOOOCOO
31~
*
Ct\AMF.:
LF'
L I I AF t,) AF ( 1 )
LIST
*
PUSH
LrST
PUL.L
LF'
X"',X'B'
X'8 t ,X'A'
NUM(AF).,
GEN,i,?,.,],l? C,NAM~(1),AF(1),O,TEL.STACK
~L.S£
De
LF'
327
32~
33'
TE~STACK
oe
:i2~
~31
C~AM£
C~AM[
PRBC
~21
32~
l30
LF'
LF"
AF(1).1
G£N'1'?14,~,11
£I.SE
06
LeI
F.'LSE
LeI
FIN
O,NAM[(1),A;(2)IO,TELSTACK
AF(1)~16
0
Ar:(l)
333
GEN'11"41~,17
~34
33~
FIN
FIN
PEND
~36
ARGUM~NT
•* PUSH 6R PULL N waRDS SPEcrFI£O By 1ST ARGUMENT INTO REGS STARTING
* AT 2ND ARGUM£NT.
31'
~29
THE 1ST
PEND
31~
~1~
32~,
~y
PRec
MSP,A~(2)
31]
314
3i3
124
LANGUAGi
STACK PBINTER THE AM6UNT SPECIFIEO
SP~CIFTtD BY TH~ aNC ARGUMENT,
BUM~
311
318
319
320
CHANa~
EXFCUTtV~
* USING THE R£GTSTER
~08
309
T[l-T£RM!NAL
PAGE
'15
]C!5
306
CINAM~(2),AF(2)la,TE~STACK
~ol
,.
1F.1I~e
~EP
08,
~*
*
..
..
*
,.
~.
g*
ClI ..
tn ..
11.
12*
13-
14t*
1!'.i*
11.,*
2021·
00000000
ooooooou
OOOOOOOU
00000000
00000001
r, J
SET
0
0
081T2
SET
oeHNO
C~AMF.
C:~AM£
a
SET
sET
X'680"X'1~6'
USECT
VE.'RB1
CMNO
epc:os
s
LF'(1)
LF(2)
26*
27*
28*
29·
:in31.
K
08IT1(1()
J~*
3~*
J
36.
37*
De
fl.SE
24*
l!i*
FRee
t
I(
TAeL~S
0
1
SI~UMC'A'(l»)
Sc'~
US[CT
PIN
TEXT
DB
USECT
E'LS£
USECT
FIN
AF(1)
S",4+
VfCTSR1
VF.:RB2
DB
s<,i+
VFCTetR2
GEN,t2120
e~CDS(SceR(AF(2),B,L06»)'AF'3)
~RReR",SCeR(A~(2),B,LO,)~O 'UNKNewN
SET
DBIT1(1<) tNAME:**( (r'X'1F't
SET
J+1
SET
DBITa(l() SET
FIN
PEND
epee
1+1
SET
SET
FrLse:
USED T8
t,J,K,S,SPCDS
SET
2~·
34*
ep[N
OBIT1
2:;*
25*
50
THESf. P~BCS AR~ USED TO GENeRATF T~E VARI6US
IDENTIFV AND EXECUT£ VALID T[L ceMMAN~S
1'·
1819*
EkFCUTTVF LANGUAGi
PAGE:
3·
41-*
!I;
TEL.T~RMrNAL
"5
1+(1**-5)
).1)
1.(J ••• S)
OBlictK)INAME**(fJ~X'1F').1)
IN AF 2'
J.j01
lR:~6
3R*
33'
~EF
CS"
'75
TEL.T~RMINAL ExrCUTt~E LANGUAGr
C~6SF.
TIT~£
'TEL-TERMfNAL iX~CUTIVE LANGUAGE'
I"J,K"S,epCDs
51
!-In 1
18116
338
]l9
34n
341
SEP
os,
'75
...
34,
00000001
343
OOOOOOoc
344
OOOOOOO't
~4~
ooooooOtt
346
OOOOQC1U
OOOOQ02U
oooOOC4U
0000008(.)
3~'
34A
349
LANGUAGr
**************************
.. eIT USAGE er: JIT£LFLGS *
**************************
T~L.T~RMINAl
..
*
*
JSTEP
BRKBIT
F'HSFL.G
SIN8REL.
srSET
BN8tT
~QU
~QU
r;QU
~C;LJ
X'10'
FOPBIT
~QU
FQU
X'100'
X'200'
~c;u
)(,*00'
F'QU
X'SOO'
X'1000'
35:9
00000800
3SJt
:8SS
0OOO100U
00002000
FGU
CCSUFiBIT FQU
~5~
OOOOJ+OOU
STRTBIT
357
00008000
359
1*
oooooc1;:J
361
000 0 0°14+
3#'3
00000016
004000QU
36~
364
t*
2*
.R8MFI..G
CeMFL,.G
L8FL..G
oeNT6tT
FIPR!C
0001000U
00020000
000000 6
OOOOQ01fS
oooOoo1LJ
F'QU
FQU
F.'QU
~
~
S
S
MSGEBIT F.'QlJ
~QU
IQUIT
UOiLTFL.G r.QU
F'QU
UNKLMN
EXTNOBIT £QU
e-GU
~
S
X'20'
X'4+QI'
eVERetT
rrQU
FQU
0000010U
35A
4
8
350
351
35t>
00OOO20U
OOOOOAtOV
1
~
fQU
OEL.TABIT F'QU
PrCG'L.G
TPFLG
FQU
~QU
EX~CUTtV£
x.ao'
Xt200n'
X'''OOO'
X'8000'
X'10000'
Xt20000'
'10004'
'(OOOa
'1001
'1002
AT JaB STEP
BREAI< RECIEVEO
O,SUILO G8 DeB, I-SUlL.O I.e DeB
oe NeT REL.[AiE Sl ENTRrES FR6M AIM
SI ~AS BEEN ASSI~NED
'eNt ~AS BEEN SPEC IF lEO
'eVER' ~AS BEEN SPECIFIEO
'UNDER DEL.TA' ~AS BEEN SPECIFIED
tUNDrR FOP, ~AS ~F-EN SPECl'IEO
DEFAULT FeR. ReM IN PR6GR[SS
UNIQU[ .eeMMiNT' CMO INDICATBR
UNIQUE ,L.!BT' eMU INDICAT8R
'DeNT' IN EFFECT
REPRecrss CURRENT Bu~FrR IMAGE
LMN WAS DETECTED IN START PRCCESl;;i
N.A.P ~AS BEEN p~ec DURING PARSE
UNUSED
[NO SF VALID MSG FLAG
IMPLIED QUIT F~Aij
UNDER O[L.TA lMPL.l[O FeR NEXT C6HMAND
UNR£CeGNIZlD ~eAU MeOU~E
USER RrQUESTEO EXT[NOEO MEMeRY M~DE
X'-OOOOO'
PReCESSING SNGL£ USR ASRT
Vi
REQUEST L,BGerq;
'1008
5,
DEFERR[D MsG PENDING
TO TP
(tNITR~VR
lA:~'
:;*
4*
5·
,.
~*
g*
9-
10.
11 ..
1f'·
1~"
1~*
1!,;*
1~*
17·
1~,*
19·
20·
21*
2~*
2].
~4"
2~*
2~·
27*
2g*
2q*
:;0*
31*
32*
33*
3 ... 3~*
3('.
:g7·
38·
3~"
~EF' 08,
T~L.TFRMINAL
',5
PAGE
EXrCUTYVE LANGUAGE
•••••••••••••••••••••••••••••••••••••
*
JITEL.FLGS I
I
I
1 11 1 1 1 11
...* (1ST HIAJ ) I c 12 31 4 5 ~ 71 A q 0 11 2 3 4 51
••••••••••••••••••••••••••••••••••••
*
1
1
1 I I >UNUSLD
I
t I
I I >MS'irB 1T _[NO 8F VAL I D MiG
,
I I
I >IQUIT.rMPLIrO QUIT '~AG
I
I I >UOELTFL.G.U DELTA eN NXT CM~
I
I )UNKLMN.uNREce~NIZEO LMN CALLEU
I
>EXTNDStr-EXTENOED MEMeRY MBOE
I
, > PR8C£SSING ilNG~r USER ABeRT
.....
..
...
..
....
t
I >P tOGFLG.OEFERREO
I , >UNUS£D
..
I >UNUSED
>UNUSiD
..
)TP;LG.USER R£QU[STED TP
•..
I >UNUSED
..,.
>UNUSEO
>UNUSFO
....*
..
.. JITEL.FLGS .I...........•.....•.•.•.•.•...•.•.
1 1 1 11 222 2, 2 I I 21
2 3 31
.. (2ND ........•.•.•.......•.•
91
1
31
7'
0 11
-•.•.....•.•..
I
MEsa T6 8E PR I NTEO
I
I
)U~US[D
swrTC~
I
~
~
~W)
I ~ ,
8
0
~
..
...
..*
••
..
*...
4 6 ,
8 9
I
I I >JSTEP.AT -..leB STEP
I >eRKerT.ceNTRe~ v REevo
I >PHSF~G.e~D GeCO)ISLO ~B(1)
>SINeRE~.oeN'T RLs 51 FRM AIM
If'
I
I I
I
"
I
I
I
I
>SIS[T.MISI ~AS SEEN ASSIGNED
I I >6NBIT. 'eN' HAS BEEN sPECtFIED
I >BVERBIT. ,eVER' HAS BEEN SPECIFIED
I
I
I
I ~O£LTABJT.AssecrATE DE~TA
>FOPB!T.AsSeC!ATE FOP DEBUGGER
>SReMFLG-BUILO
DEFAULT FeR M:Ge
I
*
1813'
. ,.
.. :;.
*0*
~~*
44*
~5*
.. ~*
~;*
4A*
49.
sC')*
~EP
as'
"5
T£L.T£~MINAL
......
.
EX~CUTrv~
LANGUAG[
I 1 f t >CBMFLG_I'Rec:[SS 1NG 'CeMM£NT' ceMMAND
I I I I >L&'LG-PRBCrSSING 'LIST' C6MMANO
I I 1 >06NT81T.US[R SAID oeNT seMETH!N~
I
I I )CCBU~BIT.REPReCiSS CURR[NT CMO IN CCBUF
I >STRTBIT.LMN WAS DET[CTEC eN START C6MMANO
>~IPReC.N.A.P ~AS BEEN PReCESSED OURINij PARSr
*
*..
..*'
..*
******.*.*************
* BIT USAGE SF J:ePT ..
********.************-
56·
..
••••••••••••••••••••••••••••••••••
.. JISPT 1
I
I
t 111 1 1 11
*(1ST HW)I 0 1
ll4 5
718 9 0 112 3 4 51
..
• •••••••••••••••••••••••••••••••••
I
>D[BUG
..*
CSMMAND rILE
Sq·
..*
51.
5~*
!i]*
54*
~~*
5'·
SA·
6n*
61·
6~*
6~.
64.
65*
~
>EC~A
••••••••••••••••••••••••••••••••••
I 1 1 1 11? 2 2 212 2 2 212 2 3 31
*C2ND ~W)I 6 , ~ q,O 1 ~ 31~ 5 , 118 9 0 11
*
*
*
..*
6869*
10·
'*
1!,7·
'1.
i?·
73*
"eRTRAN ceMPILE)
*
.
.....
61,*
~
•..
*
JlePT
.......•...•.•.•.•...•.•.
I
1
I
t
I
,
I
I
I
I
I
I
I
I
I
J
I
I
I :>
>
)I
I
I
I
I
I
I >
>
I
I
I
I
)
~-
.......
,
I
I I
,
)
I )LtST
>
• MIL.O ASSIGNMENT
>
MIst ASSIGNMENT
>6UTPUT • MIGS ASSIGNMENT
>C6MMrNT • Mloe ASSIGNMENT
~01
TEL.TiRMINAL ExrCUTIVE LANGUAG!
PAGE
lRIJ6
]65
36'
***** •• *****************.********************-.*.*-******-* •• *******.***
*S*
SCREEC~ ceo£:
~o.oo
*
1 ...
369
1 ...
*S*
*S*
*$*
*9*
31~
1.~*
3"~
*S*
*S*
*8*
~7'
378
0;2 00000
2*
3·
02 00001
6 A40nAl'
6t500n005
46·.
0;> 00002
0'+5007P"B
S*
O? 00003
o~oooooo
Of' 0000 ..
00600100 A
Ct' 00005
22900000 N
0 4t 8on1EC
~85
00006
010' 00001
386
Ot' 00008
B*
q.
O~
38'
ct.' 00009
]8B
3SQ
Ot' OOOOA
]90
391
O~
39~
0'
OOOOB
ooooe
39~
398
396
397
39g
:i9C;
4tOO
o~
C~
00000
0000E:
Or ooooF
***
G£TSSl
~QU
LI,SRP
CAL1,A
TEL'S C8NTEXT ~A~£
GET IT (& ASSUME WE GeT IT)
START 8r: STACK
INITIAL STACK 51',
INIT, STACK PTR DBLWO
L I, 01
15C00100 N
STO,Dt
6 Aoonooo X
BAL,Ro
BLOMT~L
!NITIALIZE
[')e
OBUGIO
.*.NeRMA~
L~,D~
JI~MR
3 cO OO'10
3cOoocon X
LW,O~
*
6830nq~.
eEL
£RRASN1
3iOonooo x
FIN
LW,02
JITEL.FLGS
21000002 A
CI,O~
OP 00010
1c1oooon x
eANZ
Ct' 00011
6!i30ng13
B~[Z
?C!7onooo X
LSIR,
00012
•SBUF1VPA
GET MSTRMeOE
2CCon1sB N
6~40na23
ot'
MSTRMeOE
X,60'6Q
GPFPT
STACl(o
STt 00016
O? 00016
02 00017
ot' 00018
02 00019
OP 0001A
00018
~10
O~
~
O? 0OO1e
11.
TEL.T£RMINAL
'15
2~70~()OO IA.
~A?oncoo X
6830t')(J 1 0
6 AOonA2C
?~1oocoO
x
2cFonooo A
6 8 000011
SETUP
8UFINT
EX~CUTtVF
LANGUAG;-
50
SVSERR
JSTEP
LI,R7
STS,R,
JITEL..r:'L.CiS
SET JaB STEP
RES
0
CHECI< FeR VA~lD
Lr,R7
LS,R,
BEZ
BAL-IRo
Le, R1
L I,D'"
B
ccBUFBIT
J.TEL.r:L..GS
PR8MPT
C:CBUFTEL.
JB:CCARS
0
ITSBK
IS CURRENT
;LA~
INFe
BU;FE~ VA~IO
N6
GET SAVF-:D ARS
CLEAR JMPL..IEO OE~TA
• sUIT FLAGS
t-I01
~e:p
1~1~'
081
.,5
41~
....
..
4tlg
414
41~
417
02 Oeo1L)
411\
O~ O~010
O~8on~1'
41q
420
1*
~*
~*
4*
5*
6*
O~
0001E
7U20nooA A
6a40no;A
Q; 00020
10Aonoc5 A
22l+on040 A
OI+80n,£J'
22C3ne:oo A
6 ABonnoo X
1290nC06 A
O~ 0001 F
,.
A*
9*
10*
11*
1~*
13.
14*
427
02 00021
0" 00022
Oi' 00023
01> 00024
O~
O~
00025
1·
00026
OJ? 0002'
2*
0;1' 00028
~*
O~
4·
444
O~
44~
O~
44~
o~
O~
449
4!S0
451
1*
2*
3*
4*
TrL-T~RMINAL EXfCUTTV~
6 AB on961
2a30()()O! A
~QU
8AL,SR~
TsWRT£RR
STw,D~
PReMPTO
00031
OP 00032
61J40nC41
tH<1,Rl
LC I
*,
LM,SR~
M:UC
FQU
LS,SR~
PtCGMSG
~E')(2EaC
BALIRo
STW,SR:»
3c7onn18 N
3110nnoo X
) BY GIVING esc A SINGLE
C~ARACTER
•
5
3590nnoo X
02 OOo3U
ot' on030
p~eMPT(
LI,R3
PSM,SR1
LI,SR2
4 A900000 X
57
WRITE.
C8CSTATC
~AVE wr REJEtTEO A ceUPLi ATTEMPT
LC
SR3
WE ~AV£6 IF THE 40 BIT eF M6DE~
BCR,4
PRSMPTO
IS SET AND TIE NE BUR LINE ••
************************************************************************
*£*
rRReR:
GRP 3, o£-oo
*
*E*
DESCRtPTI!NI
SBMETTM£ SINCE WE ~AST PReMPT[O, SeME8NE
*
*£*
UNSUCCESS~U~LV TRIED TS CeUPLE T6 T~IS USER (BIT 1
*
*£*
SF MeDi_ • 1), TME M80£~ SIT IS RESET AND WE ~ET THE*
*£*
USER KNeW wHrc~ LINE NUMBER IT WAS sa HE CAN DECIo~ *
*E*
Te ALLSW ceU~LtNG.
*
*****************************************************.****-*************
STB,SR~
R5
SAVE LINE NUMBER tN R5
RESET MSDE., erT 1
LI,R4
X'40'
CAL1,g
MCTCPL
oe MaCT T8 RESET MeDE~
[RRMSG KEY
LI,D1
X'030~OO'
BAL'S~~
TsERRTXT
~EAO M£SSAG£ TEXT
L6,SR~
R5
~£TRI£v£ ~lNi NUMBER
CAL11~
O~8on1.00 N
2~90'iCF A
OC02C
00020
Ot:' 0002£
0::" 0002F
O~
TEL MUST ISSUF A
6!)06nn01 A
6AOococo X
00029
02 OQ02 A
0002A
OC!2onC7o A
00026
2 A80nooo X
LANGUAGI
PAGE
~QU
Lw,R,
CW,R7
SAZ
T£~STACK
MUCRS£T
MaUC
M:UC
•
'PtOGFl.G
J:TE~FLGS
N8EGG
MAKE THAT C~A~ACTFRS
INSERT LINE NUMBER
IN MESSAGE TEXT
AND WRITE MSf,j.
SAVE MauC OATA
PUSH 1ST 1 wORDS eF MIUC
RS[T MeD,ORC & VFC BITS
BEFBRF- READING RESpeNS(
IS TH£~E A
OEFERR£D MSG
Ne, Ge eN ••••
f.1n1
1AI~6
~EP
08 ..
00033
!;.
(j~
~*
Ot? Oo03~
Oi' 00035
Oi' 00036
7·
g*
q.
10*
11*
1~*
1l*
1**
ot.' 00031
OP 00038
O? 00039
0' 0003A
Ot'
Q~
oooaS
aOO3e
,,5
T~L·T[RMINAL
2cAonnoo N
6 A 80094F
F30onOO9 A
MTB,o
2~1on'23
BEZ
L II R1
2220nOO1
O~10n'90
2cl0noiO A
4t71onooo X
3c1onOO9 fA.
Fi20nnOg A
a? 0003D
OP 0OO3E
O~lon'90
02 0003'
O? 0003F
6 AB OO9SC
O~ 00040
2il90,F'C' A
C~ 00041
4tA90ncoa X
3b90nooc X
at' OOO~2
OOO~3
02
2(j·*
21*
2~*
23*
24·
25*
26*
2'·
2A*
O~
3~·
453
0" 00044
C? 00045
OP COO~fJ
O? 0004'
O? 00048
2t!1c,-,12l
6~40nooo
1\1
4!S4
455
O~
00048
ooo.c
*56
ot?
467
Oi? 0004D
~*
ot'
~*
Of)
O~
02
0004£
OOO.F'
OoO~O
N6MSG
t\6iGG
.
..*
2~2on{')o~ A
QAloni0n N
x
lI,R2
CAL1.t
CAL1.!
LW, R1
ij,
IS NS MSG
DEFERREO MSG
• IT'S GI!N! •••
wRITE
T8 SET
MaUC
UBTO Te 1.
BUFFER ADDREiS
MSCi BVT£ CeUNT
wRITE THE OEF' ERRED MiG
SR2
*SR2
WRITE
•
UNMAPPe:R
MUCRSF.T
rrlx US;:R,S MAP
CLEAN MIUC
BEF8R£ WRITE
•
CP)(USR
JIJIT
CPXRe:AO
•RF'TN
2
WRITE
qrAD
ARS
SL.S,R1
-11
C I, R1
0
BE
PReMPTF
Oc20nn7n A
3t>8ooooa
PReMPTA
E"QU
l I' R1
eeUNT
X'10'
M:UC
BANZ
T~ERE
TYPE CARRIAGE
RETURN BEF8RE
MESSAGr..
STW,S~::»
Lw,SR4t
C!-fECI<
51$
1
MIUC
EQu
E)(F'CUTYVF t...ANGUAGr
VES .. MAP 8NTt)
M8NITeR
RETN
LS,SR~
Cw,SR~
CPXEND
ooc~t.
F'GU
CeCMESS
MAPPER
*SR2
NBMSG
I ' THE WSER TS IN CPX
x
041on,9n
0"100794
3i1onOO4 N
2 5 1ono6F A
21100000 A
68300049
CAL1 .. 1
Ll'R1
STS,R1
LW, Rl
L6,R2
CAL1.1
BAL,SR~
L!,SR~
X
02 OQO.e.
OJ:! 0004'
OP. 0004A
1...
3iBon01C
31 Booooo
29*
30·
31.
OOO~3
LIIR~
fA.
1B*
1t;*
BAL,SR1
6~30n03F"
1/,.
17.
18*
LI,SR~
Me~il
GB REAO F'R8M
Tj.1[ C;SMMANO
ARE WE IN
CeMMANO FIL..E MeOt:
YES, G£T N[XT CeMMANO ;l'RCM F'lL..E.
wRITE: F'ReMPT (BANG)
READ RISfJeNS£ tNT" TEl,.BUF
TEST T~RMINATING C~A~AeTER FeR AN
[SCAPe:.
REISSUE READ If! A~S,O
PRSMPTA
PULL.
•"SR'1
RESTeR! M.UC OATA
STW,SR1
M:UC
RESTeR;: weRO Z[Rtt
F"QU
,rILE
j.!01
~EP
1RI~6
08 ..
'75
T~L.TrRMINAL ExrCUTIV~
O~
o~
C~
O~
O~
00051
00052
00053
00054
3c8ono09 A
2c9F'r:F'OO A
Oc055
2t;$AonOO3
N
4~5
O~
00056
3iFonoOo
X
.
O~
00051
31Fon013 N
CW,04
4*
5*
,.
1,*
~*
~'4
,.
.,',.
469
410
.'1
4'*Ii
.'3
414
at' 00058
4+78(')0001
~
2llono01 A
STW,04
C I .. R1
6 9 30no('7
BNE
PRMPT~o
72C00106 N
LS .. 01
c r .. 01
T£L.BUr:
02 0005A
X
3!:>Fooooo
21ConooC
A
O~
4t8n
1*
O~
48"
483
484
48Fi
48t,
487
488
489
1*
i'*
~*
4.
49'.
49p
02 00066
362on10t,
O~
000(,9
0006A
02 0006B
Ci' 0OO6C
Oi' 0006D
0;> 0OO6E
O? OOO6F
O~ 000'0
O~
000'1
7cC4n106
PRMPT~o
B~E
PRMPT~O
F-QU
~Tw,R'
7c1onooo x
3cFco013 N
6at Oonn,g
LB,Rt
Lw .. D4
B
*
PRMPT50
F~U
Lw,R2
AI,R2
A
LS,01
C I, Ot
6!:130nobD
e~£
3cFOOO13 N
LW,D.
21Con01B
3cCcn01C
31Conooo
f\j
Lw,01
C:W,D1
t\
X
6~40no71
?b1oncoo
X
3cCoocoo x
tTSeK
)('0 0 ,
BE
CI,01
LW,Ri?
N
02 OOC67
Oi' 00067
3c2onOO1 A
202F'F'F"FF A
Oi' 00068
Ol?
~~MPT20
1
BANZ
STS,R1
L~,
D1
X'15'
•
NLSAV~
T£L..BU'
JBICCARS
lQUIT
ITSeK10
B IF' Nf!
RESET rMP~lEC QUIT ;~AG
ANO IN CURRENT FL.AGS
t CHAR R£Sp6NS[ Te QUtT
e
IF Net
GET 'JRST C~ARACT~R
WAS IT A CARRIAGE RETURN
e Ta De IMPLIED laIUIT
WAS IT LINE FEED
B T8 N8RMAL PReC~SSING
GET 1ST W6RO eF ~REV!eUS CeMMANo
R£STeR£ 1ST weRO
GET PRrvl8US ARS
SET
IMPLIEO QUIT
TE:L..6U"R2
GET
L..tN£
X'15'
1ST
•R1
.,
.+2
fQUIT
e
TERMtNAT8R
IT LINE FE£D
IF' NB
SET
IMPLIED QUIT FL,AG.
CP)(USR
JBICCA~S
J:JIT
SET IF' IN
CPX MeD!:'
SAVE 8RlCiINAL. ARS.1
RESET T£1. W8RKrNCi FL.AG9
•• 2
JBICCARS
JITEI.F'LGS
5~
eVTE 3
Ct-f[CK IF %MPL.I[O QUIT
eCCURRrO eN PRrVleUI CeMMANO
sW .. 04
00065
~eR
JITEL.F'I.GS
!QUIT
I='RMPT!;Q
IQUJT
JITEL.F'LGS
SAZ
0;" 00064
EXCEPT
LW,O.
*
3IJFon013 N
OoOl,3
REST8R£ weRO BNE,
REST err SAVED M;UC DATA
4'9
477
LANGUAGIIr
M1UC"3
6~4onC6'
OP oooee
ot' OOOse
C~ 00050
C? OC05E
M:UC·t
!5
00059
O~
SR2
.X'100t
STM,SR~
4'~
4'~
LeI
02200050 A
6~30no~2
Ot' 0005F'
21Con01S A
01' 00060
Of' 00061
6~30no~'
02 0006c
O? 00062
322on102 N
4t7Fli
LW .. $R1
L I.I $RJ
STS,SR1
A~READY
1-101
1F..:~6
4to9:;
491+
497
498
~EP
08~
CP 00012
O~ 00013
at>
0001~
QP 0007!
",99
ot'
600
02 00o"
SCi
TEL.TERMINAL EXFCUTTV£
"5
4~Ccn'lF
3bConcoo x
31~O(H')14 N
68~ono78
2c7oo080 A
417onooo x
02 00071:1
!5C~
503
50S
~06
OJ) 000'8
02 0001'
50'
O~
!50g
5e9
~10
511
51?
513
514
515
~1"
ot'
0007'
0007A
OP 0007S
O? ooo,C
ot' OOO'D
02
O~
ooO,&:
Ooo,F'
OP. C0080
ot' 00081
02 OOC@2
51?
!S114
519
1*
t'*
3*
4*
5*
2220ncOO A
ITS6K10
•• PICK.UP
*
02 000S6
STW,Dt
CW,04
J:TE~'LGS
UOELTF~G
LI,R?
STS,R,
EQU
OF~TABIT
JITE~F~GS
6 AAon48A
~IRST
LI~R2
t\F~TTIM£
RES
~eMMA~D
FIELD 6F INPUT STATEMENT AND DiCeDE
~6MMANO
o
R~2
FH.2
BE
a
PReMPT
e~E
SCANCVT
BG
LMNCMO
LB,SR~
01
Cr,SR~
e~E
LHNCMO
cr,R1
21BonoO] A
ooosa
. SCAN
SCANCVT
0220n020 A
0~C:onl00 N
2C!8F'r:FFF A
2i40nooo A
'L'
VEl, MUST BE A LMN.
tMPLI£S A LMN eR peL ceMMANO.
L .AceNT ENTERED AS CeMMAND.
IF NeT A ~ ceMMANO, MUST BE A LMN.
•.. 01
~
SAVE C8MMAND AS USER TyPED IT
LI,SR1
LI,R4
o
-1
~LAG
rQU
,*
8*
SloE
21'onoa8 A
Cl~R,
9*
1(")*
11*
O? 00088
Ot' ooose
02 00080
3i!8ng21
6708ng29
AI'R4
BG
V£CTASl
V£CTAB2
1
PUSH
612on08A
2U40nOOl A
6~2onoA8
.
INSURE DATA IS PR~S£NT
Be AGAIN l ' N! C~MMANO GIVEN
010 A ~[RleD TERMINATE TME FIE~O·.
Ne, NeT A LeAD MOOULE
010 "iLO C8NTAIN MeRE THAN 1 CHAR,
C6MMANO VERB TABL[CS)
C:I,R,
21'onoo4 A
INITIALIZE BUFFER peSIT16N
CiETFI£LD
,,
6 9 30no9!3
VERB.
BAL,Sr<~
C:I~R",
6j 2ono9S
?aSonooc A
I' PREVISUS C6MMAND WAS
UNDER DE~TA , e IF N8
YES, SET UNOER OELTA ~LA~
'SR THE CURRENT
2160nn48 A
6~30n083
C~ECK
•
el,R,
217onOOl A
60
r)
0;." 00087
o~ 000S8
ot' 00089
O? 0008A
~*
tTSeKtO
A
211onooa
6830n01D
**
02
O? cnOSl
02 Oo08~
OP 00085
FLAGS
SAZ
00076
!i04
ANO,01
LW~R!5
rxu
·-1·2
8
OBUBL,[1
SCNVBSIZ .. R..
SCNVERB'R4
UPPER CASE
INITIALIZE F~AB 18 weRO
VERIFY weRO $EARC~
S£AR'~
e.I<,
oe OSUBLEweRO
MeRE
SEARC~
8 C~ARs' M[ANS
NeT
C6MMAND
GET L.IST SIZE
[XECUT£ PR6P£R C~MPARE INST
T~AN
A Ti~
1-101
111\1~6
~EP 08,
1~.
O? ao08E
,,5
6830noB~
1~*
1~*
O~
O~
15*
C? OOOg1
6~2onOA~
16*
1'.
18*
1q*
OP. 00092
02 0009]
_9Cooooo 06
_'Donooo 06
6800008e
0008'
00090
O~ 0009~
6~50nOAD
20aon001 A
52?
!S28
529
~3n
,.
53~
533
534
535
!5lb
53?
53R
539
!~o
5~1
54?
5~3
544
54~
54A
5~'
564
1*
~.
02 00095
OOoge
31 Fon01] N
O? 00096
6 9 40009A
O~
O~
2c50nOCl A
4A 50nooo X
6830nR3]
02 aoog A
O~ OOOgA
6 ABongAC
O? 00096
Oa200020 A
OP 000ge
O~90n100 N
O~ 00090
oa200020 A
a~ Co09E
O~700tOO ~
02 Oo09F
6 AAonl91
O~
O~
a~
O~
O?
02
O?
O?
*
•*
TEL.TERMINAL EXFCUTfVf LANGUAGE
61
BE
VreT
A MATC~
BDR,Re
V[CTAS,
ICAN ENTIRE ~IST
AI,SRt
1
INCR FLAG FeR L8WFR CARE SEARCH
BGZ
DeUe~[1
LBWER CASE SRCH 08N£, UNKNeWN CM~
NeW S~E IF T~~ ceHMAND IS RECeGNfZAB~E W~EN ceNVERT~O Te UPPER CAS~
eR,D1
V[RBe
ceNVERT L8WE~ CASE
eR,02
V[R82
T8 UPP£R CASi.
B
vreTABl
G8 SCAN TH( ~IST AGAIN
PReCESS A
..l..MNCMO
rQU
CW,04
BANZ
Oi200020 A
OOOA2
02200020 A
OAOontoo N
3Z50n01~ N
4 7500000 X
OOOAl
000A3
000A4
000A5
O~ 000A6
O~ OoOA'
02
O? OOOAS
02 oeOA9
O~ OOOAA
OOOA~
Oi2ono20 A
OAC00100 N
31F~nC13 N
LS,R5
JSTEP
JITELF'L.GS
BEZ
BI COOA'
02
OJ:) OOOBO
6 AA00891
oooBO
2i Con120
!58~
§8~
!l)8?
1*
Ot' OOOBl
ott 000B2
ot' ooOSa
Oi20n020 A
OACon1oo N
01' 000e6
0'100tOO N
2cl01000 A
ocoss
O~
000B1
o~ 00088
02 onoB9
Ot' OOOeA
cu.
10*
11*
1~*
13*
14*
1S*
16·
1,·
1~*
1q*
606
60'
608
FQU
eAl. .. SR~
•
NFNO
SPCASP
r'QU
•
31l50no15 ~
4t750nooo X
6aoonoe9
onoe ..
02
O~
4*
!5*
D81.10
LI,01
PARSER
LWIR5
UNkL.MN
...*
S,~
S8~
TEL-T£RMINAL EXFCUTTV[ LANGUAG£
BANZ
CBL.l0
B IF VIS
LI,RB
JSTEP
LS,Rs
J:TE~~LGS
ARE Wt AT Jee STEP
BEZ
BKeprn
NS • ASi< IF QUIT
'15
o?
OOOBB
ot:' oooee:
OP. Oooeo
O~
ooOBe:
02 cooeF'
Ot.> ooOCO
Oi' 000C1
O? 000C:2
OP eoOC!
02 OcOc.
Ot'
o~
O~
eoocs
eooc,
VEer
JITEL.FLGS
B
GReUP~A
PULL
2,01
PUSH
3110nooo X
CW,Rt
L I .. Rl
R1
oeNTBIT
JITEI.FLGS
684tonoC5
BAZ
N806NT
PUSr-I
Rpo;
O~50n1.00 N
LI,R1
ANO,R1
2~10n01F
A
4tt:t10n006 A
22800000 It
l I, SR 1
32900020 N
2082n100 It
2050n078 A
LW,SR"
SLO,SR1
67080820
£XU
SL.S,R!§
BANZ
694onoC.
6 8 0onl62
O~50n100
N
0810n100 N
670snS28
02 OOOC'7
OoOC?
...
STS .. RfS
2iConnoo A
OeNTel(
~eDeNT
VECTB10
B
PULl..
FUL.L
'"xu
r;QU
L 1,01
X'l Ff
RPS
o
V8
o.. R1
-p;
OCMF'RS, FH.
08NTel(
GtVEBrRO
RfS
R1
Ve;CT6Rs,R4
•o
6i
N8 FIND.PReC[S! AS UNKNBWN LMN
SET T6 SCAN REMAINING INPUT WITH
UN~NeWN ~MN. IF Ne SCAN IS OEStRiD,
CHANGE Te l.tlOl o.
SET ~LAG Te JNol~AT[ UNKNeWN LMN
WAS ceMMANO PR[C~D[D
BY DeNT
Ne, DeN., BeT~ER CH£CKfNij L[GA~ITY
YES .. C~[CK PRePER oeNT BIT LIST
MASK FeR BIT P8S1TreN
INDEX FeR SHIFT INST.
aIT T6 SHlr;T
S~IFT FeR C8MPAR£
weRO INDEX FeR D~NT SIT
EXECUTE PR8PER C~MPAR£
DeNT IS LEGA~ cBIT SET)
DeNT IS ILLEGAL
~IST
EXECUTE PR!PER V!CT8R
LeAOEO IN R6,R7 ANO
NAM~
'URT~£R SCAN
LMN
N[CtSSARY
N~
~01
sE:P 08.,
lAll'
.,5
..* THE
~OC)
b1C
T£l.T£RMtNAL
EXrCUTIV~
ijReUP2 CBMMANO$ ARE
LANGUAGE
T~eS! ~EQUt~EING
THE
~eAO
e, AN ASSeCfATEO
SCAN IS
~1~
0;0>
oooca
3i!80nooo OS
* PRBGRAM. THF L.6AO IS EXECUTED tMMEDtAT~Y tF Ne FURTHER
* R~QUIRED BUT DEFERRED Te THE END IF SC4NNtNG IS 08NF.
*
GR8UP2
LW,SR1
V£rfB1
615
O~
02 OOOCA
ICOon'11
GF(8UP2A
~16
OOOC9
11
61;-
~
613
617
~18
~19
02 000C6
ot' oooee
02
3a[onooo 05
2t!Aonooo A
2iBonooo A
oooCU
620
621
62~
623
624
b25
6!6
621
oooeD
oooeE
O~ OOQer:
ot' oooco
o~
22!50nOC1 A
ot'
_A50nooo x
O~
62R
00001
02
629
630
61t
b3~
O~
C~
00002
00003
00004
OOOO!
000C6
0000,
633
ot>
634
635
01'
6](,
OP
6]'
0;:» 00008
Ol'
0220nooo A
4t A10nooo
6d30noOO
ot' 00009
~3CJ
Ot' OOOOA
.t:t100000
OP onODe
O? 00000
OP OOOOE
6 8 0onODF
li6on148
b4t
64.;'
6*3
6 .. 4
ot' ooooa
Or ooOOF
.
....
rQU
TEST FeR
WIT~TN
LS'R~
*•
*
~
x
PARSE
•
F'QU
TEST FeR SI
R~~FASE
x
!\ie.READ IT IN
New PICKUP ADDRESs
CAN St BE RE~E'$£O
IF SET oe NeT RE~EASE 91 FR8M AIM
RFADAM
JIABUF"
L I, R1
srN6REL
LI,Rt
GRPEXT
.fSIN8REL.+1)
At\O,R1.
JzTEL.F'L.GS
JITEL.F"LGS
RESET 91 RiLEASE FLAG
B
GRPEXTl
TMIS!
ASSIGN.2
TMIG8
REL.EASE
6ABon002 N
LO,Rb
BAL,SR4
LO,R6
GR~E>
'~l
'4~
TEL.T~~MrNAL
P.GE
2i50nn01 A
4A50nooo X
**
..
00121
31!5onoon
.
Ll,Rs
cw,R5
LB,R~
JIEXTF'NT
2150n020 A
C I, R!
X'20'
00124
02 00125
15!onooo
6 8 0on2£B
A
A
X
BANZ
LI,R1
eR,R~
sTB,R~
B
T1TL.£
e8ND!TJeN
X'1FFFF'
BAZ
6~40n11§
~~EAt<
JIEXT£NT
tNBREAI<1
12500000 X
O? 0012J
O~
JST£P
We: MUST SE IN A
JzTEL.FLGS
B~EZ
SVN1
INTERPRET AS A 'Get C8MMAND tF' RXtT C8NTReL. HAS
BEEN ESTABL.rs~ED AND NBT TN PReGRESS
LI,R~
6840nl1!§
2C!1on002
4'50nn07
00122
X
67
LS,R!15
6 9 30n90l
2251F"F"FF A
ExrCUTtv[ LANGUAGF.
QUIT CBMMAND C6M£S HERi,.
QUIT
*.
13i'
733
'3_
135
.,5
INBR£AK1
2
R1
IF IN PReGRESS~
FAKE 11,SET eIT
Nt! FAKr;:
6
JaEXT£NT
CeNTINX
'PARSr C6MPILE AND ASSEMBLE C8MMANDS'
~EP
181~'
08,
,.~
',5
'51
?S~
753
?54
755
7!!6
o~
On126
O~ 0012'
OP 00128
02 00129
Oi2onor:o •
0"'100100 N
21100000 A
E'30nooC A
02 0012 A
Ot' 0012A
Oi2onoFO A
OAlonl00 N
O~ 00128
O~
oalaC
6 1 0ono02
?!§?
'63
'64
765
,.,
766
'68
7(,9
"0
02 0012 U
6ABanoon X
OP 00120
02 0012E
Oi' 0012£
3520nttA N
6 AAon_8A
02 0012'
ot.? 00130
O~ 00131
ot' 00132
£NTPRG
C8MMANOS
SAVE LeAD
CI,Rt
IS THERE MeRi MESSAGE ,B SCAN
VES-iNTrR C5RRECT PReCrsS
Ne.PReVIOE C6MM6N EXIT
FQU
wr~L
PARAMET~RS
PuLL.
8
GReUp~c
* THIS SfCTI6N SF ceDE IS D,DICAT~O T8 T~£ BREA~oeWN e, THr
* AS IT p~RTAtNS T9 T~E C8MPtLE ANO ASSEMBLE ceMMANO VERBS.
.
PARSER
TSPPAR$£ E'QU
STW,R2
IN~UT ST~EAM
T~!RE IS A
00133
Ot' 00134
02 001!5
OfJ 0013'
31Con711
6 8 30n231
31 Con713
6830nlS9
*
GET ASStGN/MERGE
TAe~E
SCNPTRSV
SAVE tNP FTR FeR SYNTAX CMleKING
a
DIS WE GET SOME DATA
BAL,.o
8E
TESTEBM
CI,R,
•
•RFADAM
•
G£TFIEI.D
STeps,S
BAL,SR~
•
O~
rQU
BAL.'SR~
*•
,7,.
"8
"9
ASS~MBLE
PUSH
B~E
6830n1~A
"~
7'1
"if,
777
*
PARSE
6 AOAnsC'
2110nooo A
17\
?'!II)
AND
.. GREAT VARIETY e~ FBRM AsSeCIAT[O WIT~ T~IS INPUT STREAM AND,
• CeNSEQU~NT~V, • GeeD DEAL eF L8GrC IS PR6VIC!O, NeT AL~ 9F WMIC~ N~ED
* BE EXECUTED FaR A PARTICULAR BUFFER IMAG a • ENTRY T~ T~IS CODE MAY ~E
* MADE e~LY IF AT L[AST 8NE FI£LD F8LL6WS T~E C8MMAND VE~B.
?!R
'59
160
761
'6i!
•*
CBMPI~E
THE ,SLLSWING LeGIC ~R£S~RVES TH[ INTEGRfTY 8, T~E ;[GISTER& 'MAT
• BE USED WHEN WE FtNA~LY EXIT AND LeAD T~[ OEsrREO ~MN. IT A~se
* PR8VIDES A ceMMeN EXIT FR6M THE PARSING LeG1C.
146
747
148
'.9
'SO
PARSE
Net
AT T~IS P81NT, A O[T[RMINATI8N MUST BE MACE T8 DETECT CERTAIN,
REC8GNIZAB~E ~~EMENTS suc~ AS t, Mi, eVER, 8R eN. IF Ne~! OF TMESE'
T~E FIELD IS ASSUMED Te B[ A SIMPL[ FlO.
CW,D1
OBL.1.
8E
C:~I 0015.
ot' 001!5
818
Ot' 00156
81~
02 on1~2
O~
3'3Anooo F
6!130noE~
4A!onooo
OBeVER
BAL'~B
LI,R!;
LS,Re
BEZ
LW,R~
AI,R2
..*
Tr5TS12
X
6930n1!§~
22Son12£
,IOOnie]
2ie50n11o
211onooo A
6 8 2on12A
2232nooo A
4 A30nooo X
eVER
•GETACPAS
SIIET
JITE'-PL..Gs
IS
T~ts
THE FIRST SI ENTRY
YES
T&:ST912
MULl Sf NeT ALLBwrD, SyNTAX [RR6K
SCNPTRSV
-1
C:I-IKUL,M
T~E
ASSIGN/M[RGE TABL£$ R[PL.,ACING
AL~
R,
TMISl
JIASUF
ASSIGN
"'LACE FeR THIS ENTRVCR[TVRNEO IN R5)
FIL.ENT
1
[NTER SI "LIST
BUT MAKE IT .N IN MeOE '11..[
PUL.L. R?
BAL.,SR4
Ll,R3
STW,R:I
TESTESM
"
PUS~
8AL.,S~4A.
~GSr
CeMMANO$
LO,R6
Lw,R4
LI,R!;
LS,R5
B~EZ
A
ASS~MBLE
THIS FIC MUST New aE SET fN
PR[VleUS MIS! ASSrGNM£NTS.
2~300001 A
22!5onc6o
Sf
B
"2
eN
De8N
EQU
A1
CBMPll.[ ANO
BE
CW,01
02 0013A
6830n16A
02 0013t)
0013C
00130
02 Do13E
C., 0013F'
116
'81
188
PARS&:
cw,o,
LI,FC!5
LS,Rs
BNEZ
LI,R5
M80E-PLIST+3,R5
SReMF'LG
JITEI.'LGS
GRPEXT2
8NelT+eVERBIT
JITEL.P"LGS
YES
~ew
AeeuT AN
FeR
eVE~/eN
OEFAUL.T
CeNOITt6N
T8PPARS!
•• 2
CI, Ri
0
BL.E
AR&: W[ PReCEiStNti
•• 3
B
LI,Rs
CLEAR AS61GN/M[RijE AND FINO A
epRSE
ENTPRG
LI,R:;
MSCiEBtT
LS .. R~
JITEL.FLGS
ANV MeR[ MESSAGE
Nfl
TEST FeR TRAIL-INti
GARBAG~
ae
~n1
181~'
(t19
S20
SEr= 08~
02 Ot'llS?
O~ 001!8
·,5
[IOonoos A
821
82~
8e~
824
825
826
~2'
82A
829
A30
831
832
833
834
835
1*
83'
1*
839
840
2iSonn10 A
4f.A!5onooo x
04' 00159
001!A
O~ 001eB
Or' 001Se
ot' 00150
02 00lSE
ot? 001!5F
02 00160
lACon".
2~CAno03 A
6 aOon14A
02 00161
Ot> 00162
OP 00163
op 001644O~ 00165
1260,.,'48
6 AB onooa X
32ClnoOO x
2UConOO7 A
O~
0'
O~
oel"
00161
..
* PReCESS
..*
08Me:
6830n1~1
3240nooo x
CeME2
X
CHKU,"M
9
.RS
INV8KI='D
LI,Rs
BEZ
OSMEl
6 8 00n1!5D
BNEZ
LS, R!S
6 8 00n1l F
0220n040 A
35CSnooo
,g
PARSF. CBMP1L.E ANO ASSEMBLE C8MMANOS
"30n231.
B
LeI
LM,Ct
STM,01.
B
Lw,R4
LO,Rb
BAL,.,SR4
LW,Ot
A I, 01
STw,O,
B
TITL.E
w~EN
SYNTAX ERRSR
'ME' IS rNcaUNTiREO AS A FlO
SEEN AN SI yrT
SrSET
~AS
TfSTSll
NS.G8 CREATE 8NE
YES, MULTIPL.£ Sl NeT ALL-OWED
CREATE ME SP LAB~ PLIST
J:TEL.FL.GS
DaMEa
4
ep[NM£
l,R5
MGSI.g
JIABUF
TMISl
ASSIGN
AMI8RG,R4
,
AMIBRG,R4
08ME1
T~r.RE
eLO AVAIL.. ~EAD
SIZE T~!S ENTRV
UPDATE
~EAO
'PARS[ BV£RISN P6RTt6N 9F C6MMANO VERB,
"101
181~6
~EP
8~~
O~
O~
8~3
O~
@44
at.>
8~!5
O~
8*1
OS,
00168
·,5
22300020 A
850
0;
851
ot'
852
852
o?
O?
6~Oon16D
0016'
0016.
21?onoo~ A
00166
6~2onllB
0016C
2230n040 A
02 0016\)
00160
4 7 30nooo X
001bE
2160n068 A
0016F'
6830nlC5
001,0
6 AAon48A
2110nooo A
001'1
6830n2l1
001'2
6 AOAn80F
001'3
8!54
OP
855
O~
001'"
1,\4~
~48
O~
O~
849
O~
84'
856
8!!'
85A
859
Abo
OBeN
oeeVER
DeeVER1
PARS£ evrR,!N peRTTBN SF C6MM4NO V[RB
Lr,R~
eNS!T
SET ,eN, FLAG
B
CI,R,
BG
LI,R3
~QU
STS~R~
CI,Rb
BE
ePRS[
2250n004 A
3150nooo X
eVERBtT
•
JITELFLGS
Ct"
EXTDGe
rNSU~E
BALlO
Lt,A~
P~SFLG
P~~S!NG
BANZ
oeLe
SET , PReCESS FeR l8
JITELFLGS
eT~ERwrSE,
DeLL
TEST FeR. ReM
ME IS NeT
J,TELpLGS
02 001'9
ot' 001'"
6830n1BB
BE
31Con?1l
,ReM
CW,01
861
8'~
863
O? 001?C
3i1onooo X
31100015 ~
LW,R1
~64
02 001'£
M£
R8MD£v
JITELFLGS
UNKLMN
rNTPRG
001'0
B~E
6'40012A
865
866
861
868
*E*
rRReR I
*~*
O[SC~TpTreNI
FLAG FeR G6
F~lP
e~ ~e
T6 De
~e
NEXT
S~[CI'leATleN
AL~eWA8LE
FeR OUTPUT
IT
UN~ECeRNIlEO
....
GReUp 03, ceDE-Ot, suBC60£'04
..
*
2iC]010_ A
6 aOOn10[
USER SPECt~IED eN eR eVER ME WHIC~ IS lLLEuAL
*
*£*
AS ReM NAME.
*
*************.*.*.*****.************* •• *********** •• ****** •• **.****.****
LI,Ol
X,03010"
[RR8R ceOE tsuateo!
B
CMNERR1
T£LL US£R , PR8MPT
o? 00181
31C00714
*
ReM.eLT
02 00182
O? 00183
6830n231
*E*
81(")
811
ot'
81:;
874
ot'
8'5
8'~
817
rs
wE GeT OATA
£RRe~
LMN
BANZ
IGN8R[ ERRDR AND f,XECUTE LMN
.*****-** ••• _.**.* •• *.*** •• ***.***.****•• *****.-.*---*******************
CW,~l
*E*
8~9
8??
010 AOv£RB ENO ~ITM A ceMMA
ASSUME IMP~rEO $PF.CIFICATI8N IF YES
SYNTAX
31Con'11
Oi'
F~AG
CHKULM
STeps,R5
cw,R!
6!i30n19[
iET ,eVER,
tMP~IeATteN
G[TFlrLD
o~
001'S
rTS AN SI FlO
0
STS,RS
CW,01
O~
oeue~£C~ECK ~VER
BALISR~
6!j.on101
001'.
4
A1
CI,R?
BE
001'5
02 001'6
O? OOl?,
4Io750nooo x
oeeVERl
71
001"
00180
2~Foaooo
A
CW,01
LP
BE
C~I(Ul.M
LI,O ..
F'I"R~C
LP IS NeN.AL~eWED INTHtS
SYNTAX ERRSR
WAS FlO A~REAOVt"
peSITle~
~n1
~e:p
18:~'
1'18
",g
Bar)
881
C~
08, "5
on18~
ot' 001!!
O? 00186
ot> 0018?
RB?
C?
88:.
O~
001~B
8Sl!I
00189
02 0018.
C~ 00188
O? 0018e
88~
Ot' 00180
01' ootSE
884
885
887
889
890
891
89~
893
894
S9!=j
g9t-.
89'
A9g
899
1*
2*
~*
gO!)
9O~
O~
O~
ColaF
PARSe:
31Fonooo
X
O~2onC20
A
6S140n18A
CW,04
2 A90ncoo X
2~70nooo A
2Z8onooo A
321+00000 X
2i!50oo20 A
4A50noOo X
~eM.eLT1
683cn1'~
BEZ
LI, R!5
LS,R5
2~50n200 A
4A!5onoco X
00190
6~30n19"
6 AB 0086F
02 00191
Of' 00192
210onooo
6 8 30n1C9
O~ 00193
02 0019 4
C? 00194
O"ontoo
lc60n74it
ct:' 0019!
o~ 00196
6ABooooo
O~ 00191
Ob$7on100
C? 00198
6 AB onooo
2aSF"F'F'F&:
O?- 00199
4t;son10]
o~ 0019"
35!50n10l
O~ 001ge
2250n080
02 0019C
C? 00190
6800ntFD
e.NZ
LeI
LM,SR,
LI,R,
LI,SRt
LW,R4
Ll,RS
LS,R5
eVER/eN peRTTeN
JeTEL.FL.GS
Ref"1.SLTl
e~EZ
BAL,SR4
Cl,Rc
it
BE
~
J:ACCN
0
J:ABUF
!NBIT
~:TEI.FL.GS
eMGe
tReMFLG
JITEL.ftL.GS
ReMGe
F'L8P
0
ASSIGN
F»ULL.
~
A
BAL.,SR4
R8MGe1
LI,R5
R,
r:'Il..ENT
-2
A~D,R5
FE'XTIMG
STW,R!§
,t:XTIMG
L I,~5
B
'eN' SP[r:IFIE:D
N6
IS BUILD
*
OEFAU~T
SPECIFIED
VES
Cf.fECK
t' FIL.' AL.R,.AOV £XlSTS
eN
REL,£ASi ANY PREVleus Ge iNTRIES AS
T~IS IS A NEW IPtcr,ICATI8N,
B"L,SR~
X
A
N
WAS
TMIGe
X
N
YES
CR[AT£ CBMPLETE FlO 'RSM INPUT DATA
PUT Lea. eN AcceUNT I~ sR2,SR3
~e PASSweRO 15 ASSUMEC IN R"
SRl
'ILE [)(tSTS,
•R,
LO,RA
1i
eN£R~
PUS'"
~QU
CeMMANO vr~B
••• PReC:[SS£D
0
N
R8MG6
eF
)(,80'
LeF"INS
IL.LEGAL.
;ILl. FILE OAT A INTB ASSIGN ENTRy
RESET FrL..£
[)(TENSreN FeR
MIGe.
~C1
~EP
1~:~6
08, '75
PARS~
90?
908
9CQ
•
.. CHKS FeR
911
..*
gig
919
920
921
92~
1·
92~
92!1;
921,
927
928
929
930
911
93~
933
1*
935
1.
931
931
939
g4Q
9~1
94~
9"~
02 001'"
01' Oc19E
21?on002
0019F"
02
6 9 30n18t
O~ OOlAO
3aSonooc
OP, 001A1
2550n.'o
2C!70nooo
O~ 00142
O~ OC1A3
515Enooo
6~30n1A8
O~ 001"4
OOlAS
O~
6 4 'ontA3
4~!5on010
at' 001A6
2 1 S0r.:]07
O~ 001A1
6830n,AB
O~ 001A8
2150n806
O~ 001A9
OOlAA
6 S1 30n181
O~
001A8
2~!Son(')~o
O~
OP. 001AC
4 A50nooo
Oi' 001AO
"30n23t
3240nooo
Oi> 001A[
O~ 001A'
1~6oo'4A
6 ABanooo
0'-' OolBO
OP Oe181
3~?8nooo
20 10nOO7
o~ 00182
3t)18nooo
O~ 00183
0;> 001B,+
0220nn4n
2A10n19A
O~ 00lee
3 bC onOOA
O~ 00186
2 5 Aono7o
Oi> 0018'
022on040
OP 001Bs
O~
00189
02 001BA
*
Ff8MOEV
A
A
A
N
X
CI,R7
rQU
•
e~E
ReMtSLT
L~'R5
01
LI,R7
-t6
9VII.SrZ
SAS,F<5
C~'R~
Bi
80R,R7
A~D,RS
N
A
cr,R5
A
CI, R5
Bt\£
2
S~Il.NM,R'
R6MOEv1
'cpr
~eMDEvl
X
LI,R5
LS,R5
qeMSSLT
eVERBtT
J,TELF'LGS
X
Lw,R.
e~[Z
C~I(Ul.M
x
x
A
X
A
At
A.
A
2t$1.o0Ql A
6800n1.99
FHlMOEV1
LD,Rt,
BAl,SR~
'Ne'
JIABUF
TM,Ge
ASSIGN
AMIBRG,R4
Lw,R1
AI,f:.(,
STWIR'
,
LeI
~
LM,R?
BF'ENME
STW,01
SR3
SLS,SR'IIl
LeI
STM,R7
e
73
TS
C~K SIZE SF ~t[~D
O!ESNtT CilUAL..IF'V
lS IT STRM 10
.-2
M16
8£
A
SF C8MMANO ViR6
eR NB. IF' F'eUNQ BUILDS
Fe~ M:Ge. eT~E:RwfSE R&:TURNS
ReM.BlT ANO PRBCiSSES FeR FlO.
910
913
914
915
9il!!
917
~eRTfaN
LO~v,Cp
... OEVICE PLItT
91'
AY~R/eN
PAGE
AMI6RG,Rtt
PUNC~
CARD
Ge PReC[SS FeR FlO
C~ECK eVER ~~AG &
Oe~Jf
FeR OEVICES.
GET 'OR eF AIM REC
R£~
PREV ENTRIES
F'R~E
SIZE T~IS
eLO
HEAD
ENTRY
N£W FREE HEAD
OEV PLtST
IN PLIST
ST~RE
0['1
f"LACi:
PLIST IN AIM REe.
-t6
a
;J,R5
FUI}MGet
T AI..LeW
PARS£ evrR/BN P6R't6N e, C6MMANO VERB
!;[P 08, '75
1RI~'
944
PAGe:
9~5
* CR£ATE •
9~t,
9~7
*
9448
951
95;"
95~
O~
O~
C~
O~
T~E
2c50rH)C7 A
6 A80ngA8
LI,S
•CHit
00180
0018E
3550nooC A
STw,s
01
LeI
«
3~Oooooo
~QU
BAL.,SR4
05
LW,O~
L~uO]
954
9!S
Ot' ColeF"
3cEonooo
9!f,
oolC1
O? oolC2
ot> cotC]
otJ oclC4
2 A90nooo X
LM,SR~
2~1onooo
LI,7
6~Oon18A
e
9!'
968
9!5CJ
02 aolCo
QP
05
Ot!2onC20 A
A
2c8onooo A
00lce
..
96l
964
O~
O~
96~
o? oolC6
4 150nooo X
966
0:;> oolC?
0:> aolC8
A
96'
968
969
oo1es
2c!50nn04 A
2~50n(')80
£XTOGe
NAMEs
V~Ra1
V[RBi
JSACCN
o
o
ReM.SLT1
~EC£S~A~V
RES
PUNeTIBNS
P~SF'l..G
STS,RB
J:TEL..FLGS
X'80'
B
A
FI£~O ~AS
BiEN IMPLIED,
o
LI,R~
Lr,Rs
W~EN
LeF'INS
******************************.**** •• *************.**.******************
*£*
rRR6R I
*
*£*
GR6UP 03, ceO£,Ol, SUBCeO[~12
*
*£*
OESCRTPTt8NI
*£*
*E*
g?7!
g,~
914
97;
02 001C~
976
919
980
PERF6RM
6800ntFD
970
9'1
9"
9'8
Ll'S~1
•*
960
9(,1
96"-
T~E ASSrGN/M[RGE AND RELEASE ANY PPEVteUS
Ge DeB. ANV PREVteWS .ReM 'ILES WI~L A~se ~E RE~EASEO.
tReM FtLE ENTRY TN
FeR
cnlBS
001Be
02 OOtBt;
9~9
q!O
ENTRI~S
O~
aolCg
O? Co1CA
O~
O~
oo1CB
00lCe
Oc2onn~o A
2~Con005 A
2iC30112 A
6 AB onooo X
..
USER SAID ,eN'
A FILE w~lCH ALREADY EXISTS.
FJL..E NAM£ IS lNSr.RTEO BE~eRE TYP!NG T~E rRReR
*
•
*£*
MFSSAG£,
..
.*.**************************************************.******************
BN[RR
rQU
•
LeI
3
STM'01
R~
BALISR~
T*ERRTXT
LI,01
X'030112,
SAVE ;tLE
NAME IN RS-R1
iRR8R ceDE & sue~BOE
GET MIG
~Ol
19l~'
981
98~
983
98~
985
986
'87
988
989
990
9,1
99;;>
99]
994
995
99b
99'
998
999
1000
~£P
OS ..
C~
OOlCD
02 00lCE
a~ oaleF
O? 00100
PARSF. AVF.R/BN PORT TeN
l
2 .. Rl
SVNl
T.WRT[RR
'75
02200030 A
2~S2no02 A
2c000903
6~Oonooo X
e~
LeI
STM,R5
LI,Ro
B
CBMMANC VERB
ST6RE ~t~E NAME
IN MESSAGE
SIMU~AT£ SAL
~RIT[ MSG & RETUHN BUFrER
..*'
* PReCESS FeR LTST SPECtFIC.TI8N,
02 00101
OJ) 00101
21?onoo~ A
O~ 00102
6!:J30n1CF
Of' 0010]
3i50nooC A
OP. 0olD~
2~50n~'o A
2c?oncoo N
at' 00105
O~ 00106
515£0000 X
O~ 00101
6 8 300210
6 4 70010b
O~ 00108
31Con?13
O~ 00109
O~ 0010A
6830n~10
O~ 001,oa
31Con714
•DBL.6
r:QU
CI,R?
BP\E
Lw,R!5
S.S,R!5
L 11 R,
C~,R5
BE
eCR,R?
CW,Ol
BE.
•
i!
OeLe1
P8SSIBLr STRM !R O[V
N8
Of
-16
SV,L.StZ
S~ILNM,R7
LeME
.-2
M[
LeME
CW,Dt
I..P
L8ME
r:eUNO DF-V STREAM
TEST
~eR
VARIATleNS
6~30n210
BE
100'
100]
Col0e
OolDO
31COo?15
CW,01
ot' oo10E
6830n21Cl
8£
L8ME
1004
Oi'
oal0F
001Eo
001E1
31Con711
6'300231
BE
08L.1.
Ct-tICUL.M
A • IS II.LEGAL. IN
2
CREATE A CeMPL.ETE FlO
USING LeG-eN ACC~UNT
~e PASSWeRQ IS THE ASsuMPTI8N
1001
100!;
100b
100'
'008
O~
O~
O~
O~
O? 001£2
O~
001E3
1009
Of' oolE~
10tO
101 t
Of' oolES
O? 001E6
jOl~
OP COlE?
101:1
001E8
O? 001£9
ot' 001EA
2cFo_ooo
cw, D1
A
31Fonooo X
6~4-0n1E:8
A
ap
2c80nooo A
2C!!onC20 A
1016
01' 0olE:8
6 AB on86F
101'
OP OolEe
1014
101~
Cw,o*
BANZ
oc200020 A
2 A90nooo X
2c1onooo
LI,O*
4 A50nooo X
6~3001£~
21oonooo A
LeI
LM,SR2
L I, R,
L I, SR 1
LI,R-';
LS,R5
BEZ
BAL,SR~
CI,~o
N8
rrrPRec:
JITEI.FLGS
LeBLT
JIACCN
o
o
eNBtT
JITEL.FL.GS
L5MGe
F'Lep
o
T~IS
SYNTA)( ERReR
~AS A ceMPLEX FID ••
••• ALR£ADY PReCESSEO
YES
wAS
'eN' SPE'IFIlo
Net
CHECK FeR UNIQUE
FI~£
POSIT leN
70
!-io1
~e:P 08,
19l~'
1.01R
Oi.' anlED
1019
1020
02 oolEE
02 CalEF
"5
6fS30n1C9
2c50n4too A
4t A50nooo X
L6MG6
PARS£ 8V£R/eN P8RTf!N SF' eeMMAND V[RB
BE
6NERR
'It..E F:xtSTS,
ILLEGAL
LI,R~
CSMF'I.G
T£ST FeR C6MMENT C8MMANO
eN
LS,Rs
1021
02
C01rO
6~30n~05
BNEZ
102?
1021
o~
OolF1
02 001F2
324oncon X
0970n100 N
PUSl-4
102~
102~
Ot' 001 F4
Oi-' oolF'S
6 AS onooo X
081on100 N
PULl.
~02'
ct:' 001F6
6~eoooOo
BAL,SR~
1024
OP 001F3
1*
i.'*
:;*
1034
10ln
1036
1037
1*
103~
10~O
to~'
10~i?
10~~
O? 001F?
c;;:t 00200
O? 00201
ott 00202
02 00203
Q~
1046
1050
L.6SETUP
A
001r:.
~C~5
1051
10Sl.'
1*
~*
3*
105g
225""F'F'F'B
ot'
O?
ot'
O?
OP
02
O~
O~
at'
O?
LD,R~
BAL,SR~
x
4t tt 500103 N
35500103 N
ot' 001F'9
o? OOlr:A
2c520000 A
~7!500ooo X
C~ 001F8
O? oolFe
2c50nOQ1 A
02 001FU
O~ 001'0
47580000 X
F
O~ OOl E
2i50n800 A
O~ 001F'F'
4 A50nooo X
OJ)
1044
1.041
104g
1049
1!6oo'~C:
02 001F'1
1028
LW,R_
LI,R5
ANO,R!§
6 AB OOOOO x
~QLJ
eAL,SR&
8
x
DeaLT
F~QU
L",R~
PUSH
N
LO,R6
X
N
PULL.
X
8AL,SR~
A
N
BAL,S"~
LAS
R,
FtLENT
•
-!Ii
'EXTIMG
JtTEL.F'LGS
LI,R5
LS,RS
BEZ
el, Rt
8G
0020 ..
TMIL.9
ASSIGN
STS,~~
STS,R!I)
21100000 A
6 9 2on231
JI.eUF'
R,
F'£XTIMG
LI,R!5
LeF'INS
J:TEL.FLGS
DeBLT
~TW,R~
LI,R!5
6830nl~A
6800no1D
02 0020Q
00205
3~4f.on(joo
00206
0 9 100100
00201
1i60n'4~
00208
6 AB onooo
Oa100100
00209
0020A
6 AB onooo
2~5F'F'FEF
0020 8
4tt50n10:;
OO20C
3550010]
00200
22500100
0020E
F"QU
LI,R5
A~O'R5
N
STW,RS
A
LI, R!§
1~
ANV PRgVleUS ENTRYES ARE R£LEASEU
IS A NEW SPECIFICATI6N.
T~18
ENTER TI-tE
Fr~E
DATA
riESET ;tL.E
EXTENsre N FeR
MILe.
MSGEB!T
SET END SF MSG FLrAG
1
SET 1..6 SPEC IN e""TIBNS
l.Sr:-I.G
""AV£ WF. BEEN
•AM,STOf!F,R"
JITEI.F'LGS
TESTE8M
Ne
PRe~ESSING
Ne TRAILING JAZZ
0
INSU~£
WRIT[AM
wRITE AIM
VEs.Ge FeR NtXT
C:~KUL.M
~ReMPT
•JIABUF
M~SSAG[
R,
TM:Oe
ASSIGN
MAKE [NTRY FeR
O~
R7
'tL.ENT
X,FFF"£"
P"EXTIMG
r:'ExTIMG
X'100'
RESET FIL..E
[XTENSreN FeR
Mloe.
SET
oe
IN SPTI8N&
DCB
A l.!ST CMD
AS
~01
~EP
1~1~6
ot'
1059
1060
08 ..
0020F
·,5
PARSE eV£R/BN P6RTf6N eF C8MMANO V[RB
6~Oon1FD
1061
106;?
10b3
0;" 00210
2a5cn~oo
1064
O~
~A!5onooo X
1066
00211
Q? 00212
ot' 00213
10~7
C~
0021~
1068
10"
O? 00215
02' OC216
0;> 00211
O~ 00218
o? 00219
O~ 0021A
ot.' 00216
ot' O021e
Ot.? 0021D
O~ oo21E
107~
02 0021F
t01Q
Oi'
t08n
108t
O~
106~
1
*
1070
1.
10'~
10'~
1074
10'5
1076
ot'
00220
00221
00222
t08P
1083
t*
Oi' 00223
tOBS
o? 00226
1*
108'
1088
1089
109(,)
1091
1(')9i'
1093
1094t1095
oe> 00224
O? 00225
A
* CREAT~ ME etR
*
*L8ME
LI,Re;
324onooo X
li60n'~C
LC,R6
TMll.e
3i?8nooo X
LW,R7
AI,R7
7
STwIR,
AM,eRG,R46
BAL,SR~
20100007 A
35 180000 X
Oi!2onol+o
2 A'on79A
3 1C on713
LeI
A
LM,R1
CW,Ot
ASSIGN
AMleRG,R4
•
8E
ME:
.... 3
35ConOOA A
2=Aon070 A
Oa20n040 A
STW, [:>1
SR!
2~?Ano03 A
6 8 00n1F7
SL.S,SR~
.. ~6
LeI
STM,R,
~
8
3 C4 onooo X
1i:!60n?4[
6ABaooon x
32780000 X
LeME:3
L,."R4
LO,Rt,
BAL.,SR_
Lw,R,
3~18ncoo X
02 00228
O? 00229
02 002214
ot.' 00228
02 0022C
0220n040 A
2 A1on19A
31Con113
LeI
LM,R,
3bConnOA
25Aono'o
0 2 200040
21:'1Ano03
680on~oa
ADDRESS RETURNED TN R5
8LO FREE" HEAD
SIZE T~IS ENTRV
NEW ~rAO
Ge SET BITS FeR I.e
TM:ce
ASSIGN
AM,6RG,R4
CREATE NEW
,
CW,01.
BE
M£
A
A
STW,Ot
SR3
A
A
LeI
STM,F<7
e
CREATE NEW Le ASSIGN ENTRy
],R5
AMI6RG,R"
..eF[NM£
SLS,SR~
eR oe
LeSETUP
JIABUF
STWIF<'7
6tJ30n22£
DETERMINE IF Le
!P[NM£
6 8 30021F
Of' OO2i?7
C? 0022£
O? 0022"
OP 00230
CeMF'I.Ci
6'30n222
AI,~?
0022D
ANO M£RG[ INTe OCB.
JITEL.'L.GS
l.8MEi
JIABUF
2 U?onOO7 A
O~
LP 6PL.,6,BEL
LS,R!§
BNEl
LW,R.
6 AB onooo X
77
L8FINS
B
ce
ASSIGN ENTRV AS WAS
DeNE FeR Le
8LO FREE !-fEAt)
SIZE T~IS ENTRY
NEW FR£E HEAD
•• 3
-16
~
3 .. R5
LAS
CeMPL.~TE
T;.tE:
pF!leC~Ss
~EP
181:16
08, '15
1.(j9~
109'
~RRe~
1(')98
1099
1.100
1101
110~
110S
1104
t105
1106
..* DETERMINES IF UNRrC5GNIZED
*T[RMINATr SCAN.IGNeRE
..CHI
O?
OP
O?
Ot' 002AtS
6 15 000010
S~eRT
~eRM
F'QU
BAL'SR4
LD,01
LCIRIs
CMNDSET
REQUEST
•
SHIFT R£QUEsT
S~F'T8UF
BUIL..D,
&:OIT
CMN[)S~T
S~eRT
F6RM eeMMAND VF.RB
~QU
8
t,QU
BAL,F 0025A
O~
00258
ot? 002se
O~ 00250
1161
11614
1 t 69
11 '0
1111
1*
11'~
i176
1*
~*
2230n~04
A
4+730nooo X
2~-on002 A
6 lS 00np6C
O~
OC2!E
O~ Oo25F
2c301000 A
4+ 7 300000 X
4*
6·
8CJ*
10-
LI .. Rl
sTS,Rl
LI,R4
ceMr:I..Ci+P~SFL,.G
8
LISTCeM
*
~ANDLES
F'QU
LI,R~
STS,Rl
1iB!;
O~ 00264 2
O:? 0026!
0001
0100
A
A
O~
C~
0000
A
00265 2
00266
O~ 002~'
02 00268
FttF'F'FF'1F A
F"FF'F'F'F'£ A
F"FF'F£F'F A
JITELrLGS
O[SCRtPTt6N:
CI,R1
BG
'*
SF'TAB
A
OBNT BV S£TTING A SPECIAL ~LAG AND
FLAG IS C~[CKFO 6NL,.Y IN
T~i
SET DeNT
F~AG
USER SAIO .oeNT'
WITH~UT
SP€CIFtVINij
*
*£*
THE V~RB eR WITH AN ILLEGAL ceMMANO .. sB WE GIVE
*
*£*
'£M T~E BYQO (SIC),
*
***.********************************-******************* •• **************
GrVEBIRO LII01
8
QU80
ADV~RB
•oeNTBtT
UNIQU~
IN TELFLGS
***********************-*****************************.******************
*E*
f~ReR:
G~eUF i, ceor ~ 01-1'
*
2cC3ntl' A
6 8 00(,)'0£
Ot' 00264
T~~
Te L8 & SET CMO
SET C!MMANO INDEX FeR eeMMENT
2
THIS LBGle
O~
O~
00263
~LtP P~ASE
ceNTINUJ~G T~~ CBMHAND INTERFRETATrSN. T~E
THE C6MMANO p~eCESS W~ER£ IT HAS MEANING.
21100000 A
6920001'
002~2
J:TEL,.FL.GS
••
02 00260
C? 00261
11·
1184
118t,
1187
1188
1189
CBMMENT
*£*
~*
81
CeMM£NT C6MMANO VERB
*
ceNT
l*
7·
-.*
*
02 0025~
eUTPUT CeMMAND VERB
SET CBMMAND INOEX
LISTC6M
o
eUl'F'UT
~ePTAB
0
N£XTTtM£
Xt030t16'
CMNERRl
DATA
X'FF~F"FF'F'
DATA
x,r:F'~F"F"F'FF.:'
DATA
TITI.£
X'FF~F'FEF'F'
ANV UN.SCANNED CMARACTrRS
[RR6R ceDE & suBceOE
TELL US[R •••
'LIST ceMMANO V[Ra.
~01
1A:~6
1190
1191
119~
~EP
O~
08,
00269
O~ 0026A
O~ 00268
1193
1.194
'15
2c30ncn~
A
-'30nooo X
22-onCOI A
1196
119~
O~
O~
0026C
00260
2110ncoo A
6 8 30n27C
1199
1.;')0(')
1~01
120,
1202
1204
120Fi
120~
120'
1~O~
O~
O~
0026£
0026F
O? 00270
2a30nnnt A
4 A30nooo X
121~
121~
O~
O~
O~
3cConoOo 05
2~30nooC A
1214
00211
00212
002'3
121~
02
002'~
1217
121R
O~
O~
1209
1210
1211
121~
1~19
1220
1~21
1?2~
t~2l
.
*
*
119~
1197
LIST
O~
00215
002"
0021'
00278
O~ 00219
O~
02 002,A
O? 0027B
1224
O~
O~
122~
O~
!~2~
O~
oo2'C
0021D
002'£
0027'
6 8 30n82 F
FLIP
T~r. P~ASE T~ ~e
1
SET ceMMAND INOEX FeR LIST
THE FBLLBWING IS CBMMBN ceDE USED BY T~E LIST, BUTPUT ANOC6MMENT
ceMMANO VERBS. R4 MUST CBNTAfN AN IND[X UNIQUE Te T~E C6MMANO.
TEST FeR FeL~eWING MeOtr!ER
o
LIST1
N8 DATA-IMPLIES FUNCT18N CHANGE
************************************************************************
*E*
FRRE)R I
*
*E*
GR6UP 03, ceOE~01' SUBceDEaOO
*
*£*
D£SCRYPTI6NI
*
*E*
UsER rSSUFD LfSTA ceHMENT eR eUTPuT CeMMAND
*
*[*
WIT~ IMPLI£O ASSIGNMENT C~ANGE' £.ij. LIST eN
*
*~*
DCIABC, ~~[N NeT AT J8B STEP. T~IS IS ILLEGAL AND
*
*£*
w~ TYPE • MESSAG[ ANO ~ReMPT.
*
*****************************************************.****.********.****
Ll,R3
JSTEP
PRr-ASSIGN CAN eN~v eE DaNE
LS,R]
JITE~FLGS
AT J8B STEP
BEZ
NTJBST
ceMMANO ILLEijAL UNLrss J68 STEP TIME
*
_730nooo X
6 ABonooo X
LW,01
ViRBl
Ll'R~
eAL,SR~
01
SCAN
LI,R3
LeF'~G
STS,R~
8AL,SF(~
31Con'1~
CW,01
BE
6~30n168
6~30n28a
P~SfLG
J:TEL.FL.GS
STS,Rl
LI,R4
6 AA008AO
2c30n800 A
31Con?17
6 8 30n16A
6 d OonBF7
2c30nco\ A
2c50noOo ~
~A30ncoo X
LIST C6MMAND VF-RB
LI,R]
CW,01
LIST1
BE
e
LI,R3
LI,R~
LS,~~
8~£Z
JITEL.F"LGS
RF.'ADAM
eN
DBeN
eVER
oeeVER
SVNTAX
JSTEP
J:SPT
JITELF"I..GS
LTST4
eBTAIN M5DIFIER
SET
~tST
CMO FLAG
Ne.REAO IT IN
IS MeorFIER eN
YES-ENTER C6MM6N ceOE
~ew ABeUT eVER
NEIT~ER 6NE IS AN ERR6R
ARE WE AT J6B STLP eR BREAK
~O1
~EP
1~J~'
t~2'
as,
OJ) 00280
1~28
ot> 00281
1229
00282
02 00283
1~30
1~31
\*
\23:1
1234
1j)J~
1*
1?36
1*
;:>*
3*
1~3!\
li.?i9
O~
O~
o02l!~
O~
00285
'75
2i30100C A
4 A30nooo X
6~30n2.s!6
5a38n~~"
STS,R~
O? 00288
02 002814.
02 00288
LMIR3
8
3i38n~61!t
00289
8t\e:Z
6~OOn28g
Ct:S30noos A
6530n005 A
6 AB onooo X
O~
LIIR~
L6,R~
C730nCO!i A
02 00286
O~ 002~'
LIST2
6~gO(,)OlD
O~
O~
oo2Se
00280
6 A onooo )(
3250nooo X
2U50noOo N
C~
on2SE
680on~8o
LIST:i
LWIRl
A~D,Rl
LISTS
LIST"
STW,R3
BAL,SR4
8
BAL,SR~
Lw,R!5
AI,R5
8
TITl.£
LIST ceMMAND
oeNTBIT
VE'RB
JITEL.F'L..GS
LIST3
epTAB .. R4
*RS
LISTS
NePTAB,R"
*F(!
*R5
WRITEAM
PR6MPT
RFADAM
JIABUF'
AMISTDSP
LtST2
'START C6MMAND,
83
TEST
IT
FeR DeNT
~AS
AD\I~Ra
BEEN GIVEN
TURN SFF 6PTISN.
~ep
IF AL.REAOY IN
~nl
~Ep
1@1~6
081
124n
1241
0' oo28F'
O~ 00290
124"
02 00291
0' 00292
02 00293
02 00294
02 0029!
1.~43
1244
t?4!s
124+"
1241
1248
1249
02 00296
ot:' 0029'
ott 00298
ot' 00299
ot'
ot'
0029A
1251
00298
Oil! 0029C
1~5p
ot'
1250
ot.' 00290
125:;
0029E
O? 0029F
Ot' 002140
1254
0;.')
1255
002·1
O? 002142
'75
211nnOO1
6~2on~C4
6 t4 30n2DS
21600046
PUSH
GETF'IF.:LD
UNDE,R
ST.RTA
GET
N~)(T
C~I(
IF F'6RM 6F
START4
.
CH[CI<
FID
BRAEi( FlO
F'ULL..
2,SR3
t\
O~2on020 A
PULL.
2,02
L I, D1
0
START!
4f,1!onooo X
2110(')001 A
1263
12'~
C~
1265
1266
02 Oc2"D
02 002AE
LI,R~
STRTBtT
STS,Rs
JITEL.F'L.GS
CI,R1
BL.E
PltSH
A
N
06
1
Gl 00285
O~ 00286
12'~
1~'9
1280
1281
128'
1283
1284
U?85
128~
1?87
1288
128q
1290
1291
t29?
129:;
129_
1295
O? 0028,
02
02 00288
O~
00289
O~
002BA
O? 002B6
ct' 002Be
Qt;' 00280
O~
aeiSE
02 002BF'
02 o02CO
002Cl
O? 002C2
O~ 002C3
02 OO2C4t
02 OO2C4t
O? oo2CS
ot:' 002C6
ott 002C?
C~ O02Cg
O? co2C9
OP O02CA
O~
START?S
02 002CF
ot' 00200
1~O3
1lc4
1~O5
1~O~
2c63nooo A
4A6ooo0o x
2Q6onoOR /It..
206cnoDi A
ot' 00201
ott 00202
0;:- 0020]
oc2onc2o
00204
6S00n~A()
O~
2AOooooo
A
X
CD, D1
8~E
LI,R~
A
X
A
N
1301
1.30i'
e
START3
2c10F'FFF' A
02 002CO
START:s
PULL
N
ot' 002tE
1299
O£LTA1
O~20n090 A
OA600100
6800n2Ao
l1Con'30
6 9 lon8F1
2230ni00
l+730nooo
Oc20nc90
OA60nl00
6ijOon2Ao
STS,R~
STARTI+
F'OPBIT
JITEL.FLGS
START~
BAL,Ro
BE
LeI
LM,SR~
LI,R7
LI,S~t
B
Ll,~b
0
START9
START2
DeL.1.
STARTIt
X,30000'
JIJIT
AI,R~
8
,L,
Lei
2
B
START~
LM,D2
CHECI< F'8R • FILE
~
JJACCN
0
0
START1A
LI,R?
LS,R6
SL.s,R,
SET O£LTA FLAG
START,
rCP1
SYNTAX
B
RES
IS IT DF.:L.TA BR FDP.
JITEL.F'LGS
9"R6
9,R6
CW,01
START6
•Df.l.TABtT
PULL.
9
START5
1
ce, D1
STS,Q:1
8t>
SYNTAX
8t\[
[QU
LI,R3
1300
ct> 002ce
SCAN
2i!30nc8o A
4+7300000 X
ot.' Oo2CC
129~
BAL,S~~
BG
l1Con134
6 9 30n2BO
6 AOon2DO
6ttOon2Ao
31Con'11
6'3002CO
02200020 A
2 A90000o X
2210nooo A
2c800()OO A
6 8 00n29'
1291
1298
START C5MMANO
VF."RB2
C I, R1
6!:120n8"7
oa2B~
LD,01
X'frFF"F"
JIACCN
8YT£ c:eUNT ,reR IDL
MASt< Te GET SV9ID
GET sYstO
peSITtBN
R6
..
T~XTC
IDl
"'f01
181~e
1307
1301\
1309
1310
1311
1]1;>
1.31:;
131~
S£P 08.,
00205
a? 00205
o? 0020,
o~ 002D1
0;:- 002Da
'75
STARTS
2110(")001
A
6~2cn~3t
6 AOonp.OD
START~RR
BAL,Rn
2c504000 A
lI,R~
START9
STRTBfT
4 7 50nooo X
STS,RS
JITELr:LGS
O? 0020"
Of' 0020B
O~20nogo
PUSH
9,R6
B
START1
RES
0
:i
J:L..MN
0
131'
131'
Ot' 00200
131~
02 00200
131g
132C1
0" 002D£
1:i2~
C~
O~
0020'
002£0
O~ 002£1
Ot! 002£2
1l2~
1l2~
O~
002£3
o~
002£4
1]2fJ
O;.? 002£S
1321
el, R1
0
t
BL.E
A
Ot160nl00 N
6 8 Oont?82
ill!;
1321
132?
RES
O? 002D9
ot? On2DC
86
START CfH'1MAND
C~
MeRE INFB MU$T
~eLLew
.*
START9
QC!20nOlO A
2A6onooo x
2160nooo A
6~30nB31
Oc2onc20
2AOonooo
2CAonooo
2cBonooo
A
X
A
A
£800nooo A
LeI
lM,RI.
CI,R~
BE
leI
LM,Op
lI,SRl
0
LI,SR~
0
B
TITL.F.:
*RO
'CSNTTNW£
fNSU;E A LMN
~X1STS
START~RR
2
JZACCN
PASS. FeR LINK L.M ALWAVS'O
CBMMAN,..,
VERB'
f-f01
CBNTINUE C6HMAND VERB
87
**************************************************.********.************
1~1~'
1328
1329
13:30
1331
*E*
*E*
*E*
*E*
*£*
133~
1333
1334j.
133!i
t33f.
1331
1338
133q
OP ace!,
ot' OC2E?
O~ 002£8
ot' 002£9
02 002£.
2ce300()ot A
4 A30ncoo X
680on70E
1]~1
13 .. :>
1343
13~4
t3~~
13~~
t3~'
Oi? 002£6
Of) 002£8
O~ 002E:C
O~ 002£D
Qt)
002£0
2i6oocoo
..C6NTINX
ceNTINx
LI,Dl
X'o30114'
CHNERR1
e
R£S
LI,Rt,
2c! 1 0nooo A
lI,~'
680ont03
J:T£~FLGS
BEl
A
*s*
*
*
suBCeOE~1~
*
D£SC~tpTleNI
LS,R]
A
13~n
GRBUP 03, CBDF.-Ot,
USER SAID C8NTINUE (as) wHILE AT Jee STEP,
*
THERE IS N6 ~R6GRAM T~ GB SACK Te.
*
*****************************************************.******************
CBNTINUE LI,R3
JSTEP
ARE WE AT A ~eB STEP
6~30ni?£8
2~C3nt14+
FRR8RI
Dei
S
B
TITL~
NeT AT STEP, e.K •••••
ERRe~
TELL Us£R
0
0
0
SET UP
TEL.
'~DP
RETURN EXIT
DEBUG MBDE
TEMP
DBUG!1
XE:XIT
ceDE , sueCeOE
VERB
S~TUP'
*****
""01
~E~
1~;:;b
08,
,,5
FOP
1348
1]49
02 002EE
1!fSrl
13!1
O~
1352
t3!~
1354
*
F'DPS£T
002££
1~60t"l7~£
02 C02£F
1cOOt"l72r:
ot? oo2 Fa
OP. ao2Pi
2cConooo
6l:S0oncC8
A
~£S
VERB
S~TUP
0
LO,Rl,
LD,RO
PCP
L I, D1,
e
gReup~
TtTL.£
.O£I.TA
rOP
V[RB
S£TUPt
81$
DFLTA
1.l5~
138~
O~
*
DE~TASET
002"2
1:.15'
t35~
1359
136n
1361
1]6~
136~
1364
1:.16!=;
Ot' 002F2
02 002'3
3c6onoOo
1]'~
02 002'4
61Atoon2F'8
1~6'
1368
1369
137n,
1311
1]'"
13'~
1:i'4
131;
1*
ot?
002'5
O~ 002"
Oi' 002F1
2i!C3nbOO A
2iOon833
6 8 000000 X
02 002 F8
Qt) OO2FS
1c6on736
1200n?]t,
002F9
ct"
O? coa F ..
O? 002'8
X
3160n018 N
2~C:onooo A
6 aOooOC8
~ES
VrRB
SETUP
a
*************************************************************.**********
*E*
FRReRI
*
*E*
GRSUP 03, ceO~'Ob, SUBceOE~OO
*
*E*
DESCRfPTteNI
*
*[*
T~E USER ~AS TRtro Te AsseCIATE OE~TA WITH
*
*E*
AN EXECUT£ 6NLY PR8GRAM.
*
************************************************************************
Lw,RA
J:EXL.,V
Cw,Rb
EXLVBrT
tS IT ~XEC eNL,Y
~e, 8K Te ASSSCIAT[
SAl
D£L.TABK
£RReR ceDE & SUB~eDE
LI,D1
X'0306QO'
LI,Ro
BKePTn
RETURN FeR TtERR
a
T.ERR
*Dfl.TA8K
~GU
LD'R~
LO,Ro
LI,Dt
B
TITLF.
•Drl,.TA
OFLTA
0
GReUp~
fTP CeM~AND
"rRB,
~n1
SEF
1~1~6
os,
'15
;.t*
~*
41-*
FI*
~*
,.
*,.
R*
g.
la*
11*
12*
1~*
14*
15*
16·
TP
17*
1~*
19·
20.
21*
:;>i'*
23*
24*
25*
26·
TP ceMMANO VERB
90
**********************************************************-*************
*F*
NAME:
TP
..
*~*
puRPeS~1
THE TP CBMMAND IS A SPECIAL FORM 6F ,eFFt
*F*
W~ICH TELLS T~[ SYSTEM. Te ~eG THIS USER eFF'
•
*F*
TrMES~ARING AND MAKE T~E LINE AVAI~ABLt AS A TP
..
LINE.
..
*F.
DESCRtPTt8NI
T~i FBLLeWING TESTS ARE MAOf 8[FeRE ~ReCEsSIN"
*~*
T~E CBMMANOI
*
.F*
1. THE SyST~M MUST BE SYSGENED re~ TP
*
*F*
~. TFG (T~E TP GHeST) MUST BE ACTIV[
*
.F*
IF TH£S~ CBNOJTISNS ARE SATISFIED, WE WILL PERFBRM
*
*F*
THE SPECIAL LeGeFF, eT~ERWISE' AN ERRe~ MESSAGE
*
*~.
IS GEN[RATED AND T~£ UiER REMA1NS IN TEL
..
********-********************************************.******************
O~
O~
On2FC
2iConnoo N
002FO
6 9 300300
oio' 002'E
02 002F"F
6800010£
2cC3nC01 A
~QU
•
*************************************************************.**********
*E*
rRR8R:
GRP Oll OC-Oi
*
*E*
O£SCRtPTI6N:
T~E USER ISSUED T~E TP ,eMMANO ANO THE
*
*£*
SYSTEM IS NeT SYgG£NED FaR TP,
*
***************************************.******************.*************
LI,01
TTP
SRE', wt~L BE ZERe
8~EZ
•• 3
IF ePTr8N NeT GEN'EO.
LI,01
X,030CClt
£R~eR ceDE
8
CMNERR1
..
27·
2g*
29*
*****************************************************.******************
*E*
rRR6RI
GRP O~, OC.02
*
*E*
D£SCR!PTI6N:
M:GETJO RETURNED ee1 SiT, INDICATING TPG
*
31*
]p*
33*
*********.*.**********************************-***-**.******************
CA~l,'
G£Tto
TPG IS ACTIVE IF
BCR,a
•• 3
CC1 IS ~eT SiT.
lI,D!
X,030C02'
£RRSR ceDE
B
CMNERRl
In·
3~,*
35*
*E*
ot.' 00300
02 00301
02 00302
O~ 00303
0410n7,2
6 aS00304
2cC3nC02 A
61$Oon70F:
3~*
g1·
3R*
O~
OC30~
ott 00305
3ttFonn1D N
4+1'00000 X
*
*
IS NeT ACTIVE.
TPFL.G
J:TEL.FL..GS
SET TP FI.AG FeR
STEP.
jo.f()1.
1AI~6
sEP oa, ,,5
39.
~n*
~~*
*E*
*E*
*£*
*E*
440?*
4t3*
44*
4~·
4~*
~'*
4~*
49·
50·
51·
1~1~
TP CBP-1MAND VERB
************************************************************************
*E*
FRR6RI
GRP 03, OC.Ol
*
02 00306
02 00307
2iClnCCl A
6AOonooo X
O~ 00i08
02 00309
22Cooooo A
CP 0030A
OESCRYPTTeNI
T~IS rs AN INFe~MATleN.eNLY MESSAGE Ta
LfT T~[ USiR KNew WE HAS PASSED THE TESTS feR TP
IT WILL B~ FeL~ewED BY T~F. STANDARD AcceUNTING
LtNE NeRMALLV SEEN AT LBG6FF,
*
*
*
*
*********************************************.****.*********************
LI,01
X'030C03'
ERRMSG KEY
.
SAL-IRa
L I, 01
TeERR
o
1tl60n'4~
LD,Rb
L6GeF~
6 8 00nCC8
B
TITL.r
GRBUP2
'PAssweRD
PRINT MESSAGE
T5 STep SCAN,
6£T U~ FeR EXIT
Ta LBGeFF.
CBMMAND VERB'
~01
181~'
1317
1378
13'9
1380
1381
138~
138]
1384
1385
1]86
1381
.,*
1lSS
1389
1390
1*
,*
1,391
1]92
139~
1*
2·
1394
02
02 00308
C~ G030C
C~ OOlOD
OP 0030E
ot'
oo:gO~
30100000 X
3520noot N
2c20nOQ4A
6 AOonB30
0030F'
0 51 300100 N
02 OOi10
O~ 00311
3210nooo X
3220n001 N
6 AAOn48A
Ot? 00312
1395
13911
1391
1398
1399
1400
1405
1406
1407
140R
1409
LW, R1
S[TBUF'
Lw,R~
BAL,SR~
S[TBU~.1
~£STeR[
SCAN'S REGS
G[TFIELD
**********************************************.***~*********************
£RR6RI
GRBUP 03. C60~IOB, SUBceO£.07
*
OESCRtPTIBNI
TW~ FIRST FIELD SF THE PASSWBRO CeMMAND DIDN,T*
*£*
END WIT~ A CeMMA, T~ts PReeAB~Y MEANS T~AT THE US,R *
*£*
IS NeT AWARE SF TH[ NEW (WITH Coo) FeRMAT 6P THE
*
*£*
PAssweRD CBMMANO. HE MUST SUPPLY ~LD6NEW PASSWBRD
*
************************************************************************
Ct,R6
'6'
~tLL NEW PAssweRD FSLLew
*E*
*E*
1~01
140t'
1403
1404
PAssweRD CSMMANO V[RB
***********************.************************************************
*F*
NAMES
PASSW6RO
*
*F*
puRPes~:
T~E PASSW6RO ceMMANO IS USED er T~E TERMJNA~
*
*;*
USER T8 CHANGF ~IS LeG6N PASSW6RO. S[CU~lTV IS
*
*F*
AODITIeNAL~Y [NFBRC£O BY REQUIRING T~E 6LO PASSW6RO
*
*~*
Te BE SUPPLIEO BrF8RE T~[ NEW CN£ IS [NT(RED,
*
.,.
DESCRtPTteNI
T~E IUSERS REC8RO IS REAO IN AND TME FIRST
*
*F*
FIELD SUPPLlro BV T~E US~R IS CeMPA;EO WITH T~E
*
.F.
CURRENT PASSweRD. IF IT MATC~ES, THE SECeND FIELD
*
IS STeREO ANC TH£ aUSERS RECeRO IS WRITT~N BUT. If *
*~*
T~£ ~AssweRD SCRAM8LiR IS INCLUDED IN T~£ SYSTEM IT
*
*F.
IS INVBK[O.
*
**********************************************************-*************
PAssweRO [QU
•
sTwIRt
grTBUr:
SAVE R£GS ~eR SC~N
STW,R2
SETBUF.1
LI,R,
4
FeR ePtN IN6UT
8AL,Ro
RCIUS~RS
READ USER REceRO tNT6 TE~STACK
PUSH
R]
SAVE BUFFER ADOR~SS
00313
00314
2160n06B A
6d30nl18
0' 0031!5
01.' 00316
22C3n507 A
Oa30nl00 N
O? 00311
O? 00318
OP 00319
6 A8 0n342
OS30n100 N
o~
O~
6~Oon~3S
BE
LI,01
PWLL
8
,.4
Xt030601,
VES.,.
N8, ERR5R CeO€ & SUBCBDE
R3
R£STe~r BUFFER p~rNTER
PASSCLUP
GS TELL USER & C~EANUP
BAL6SR~
SCRAMBLE
N8, SCRAMB~E BLD FeR CBMPARE
PULL
R3
~£STeR~ SUFFER AODRESS
**********************************************-*************************
\0.101
.,5
141~
PAssweRO CSMMAND V£RB
GRBUP 03, cect.~O§, SUBCBD£'05
DESCRtPTrBNI
THE 'BLO' PASSwe~D SUPPLIEU BY T~E
USER OBESNtT MATC~ T~E CURRENT :uSERS RECeHD.
1413
**********************************-*.*********.*.***********************
~EP
181~6
08,
~RReRI
1410
1411
1*
O~
~*
02 00316
ot' 0031C
3*
1~1~
o~
0031A
00310
31C6n006 A
8~E
31060(')07 A
6li30nl20
CW,DP
B[
LI,D1
B
1.416
1. ~ 11
1418
1419
ot' 0031E:
14('0
O~
00320
02 00321
Oj300too
6A.AOn48A
02 00322
ot) 00323
21'00008 A
1421
02 0031F'
21:C]n505 A
6~Ooni3S
142'
142~
1429
1430
1431
1.4l~
1433
1434
1435
143('
1431
1438
1439
1'+40
1441
1442
1.4'+~
1444
ot' 00324
ot'
ot'
00325
00326
02 0032'
02 00328
O~ 00329
Of' 0032A
02 00326
O~
ot?
0032C
00320
02 0032£
O? Oo32r
SCA~
FeR
06ES rfRST weRD MATCH
Ne,ERReR
~eW ABeUT s£CeND WeRO
MATC~£S e'K.
[RR8R ceDE ~ sua'RDE
Ne MATCHEE, N6 CHANGEE
X'030~o5'
PASSCLUP
N~W
PASsw5RD
6~Oon~35
6A8oo~42
*
14i~
1426
** NeW
6,R3
.+3
',R3
•• 3
*
SAVE Bu~FER JPTR
SCAN FeR NEW PAS Sw6RO
BAL'SR~
G£TFI£LD
***********.*************************.**********************************
*E*
~RReR:
GReUp 03, C50£I08, SUSC80£I06
*
*E*
DESCRtPTreNI
THE PASSW5RO IS GREATER THAN 8 C~ARACTERS
*
*********.************************************************.*************
cI,R7
8
LEGA~ SIZE
aLE
•• *
YES
PUL~
R3
T8 EV£N UP STACK
LI,D1
X'o30506'
~e, iR~eR ceDE & sUBceOE
8
PASSCLUP
CLEAN UP & TELL USER
~
1423
1424
142!5
cw,D1
6~30n~t£
*
*
6 8 20n327
0830n100 N
2~C3n506 A
0"'300100 N
35C6noot, A
3=06000' A
o(t200020 A
2 Alon7A4Io
2~16nooo
2~Aonooo
O~16nooo
PUSH
BAL,SR4
PULL
wR:USER9 STW,D1
STW/O~
LeI
A
X
SC~AMBL[
SCRAMBL.E
R3
STeRE N£W
e,R3
"R3
N[W PAsSweRD
PAsswe~D
R[PLAC[ WeRO$ 0 & 1
~
eF Rr.AD FPT FeR WRITr
WtT~ DE~AU~T K£V.
LI,SR]
CLEA~
SR3 BEFORE wRITE
o
CAL1,1
WRITE IUSERS REceRO BACK
LBGSIZE"R3
**********************************************************.*************
LM, R1
X
R:J
STM,Rt
*£*
-E*
*£*
WUSR
LBGSIZE,R:i
~RReRI
GR6UP 03,
OESCRtPTreNI
ceO£~05"
SuBCeO[p03
*
*
*
I-fnl
18:~6
14t-4~
1447
1~4tg
1449
1450
146,
O? 00331
145,
o~
n? 00330
ot> 00332
00333
21Aonnoo A
6~3cn:;34
2~C3n503
6 8 0on86C
A
.
14+~::11
145~
1456
1457
1458
O~
00334
1461.
0
.+3
LI,D1
B
•*
146~
1463
C!,SR~
BE
02
X,03QSo3.
RIUERR
N8 ERR6RS eN WRITE
E~ReR
~srT
OOl3~
T~IS I~ ceM~AN
PASSC~UP FQU
P61NT T6 CLEAN uP wI ERReR MSG
•
FMTE~C~
CLeSE MITEL
Ii
BLANK eUT PAssweRD WHEREVER IT
Ve:RB2
APPEARS IN ceRE
1464
ott
1465
Oi> 00316
6 Aitonnoo X
Oc2onC20 A
1466
02 00331
O~ 00338
C~ 00339
2 AO onooo 0&
LM,D2
STM,Di'
2t!5FF'F'FA N
BuMP
.(LeGSIZr+RWUSRSZ)~R!
O~
1350n100 N
Le,R2
AI,R2
LI,R1
BAL,R4
LI,Ro
JBICCAF(S
146'
1468
00335
on33A
14f.6Q
1470
1471
02 00338
14'~
02 0033£
02 0033'
O~ 00340
O? 00341
14'~
14'4
1415
C~
ot'
oo33C
003:;0
ceOE & sUBteoE
STACK & Ge T6 CMN£RR1
***************.*******.*****************************.******************
*E*
rRReR:
GReUp 03, ceD~~05, SuBceDE~O*
*
*E*
D£SCRIPTrBN:
T~IS IS NeT AN £RReR CBNDITI6N.
IT IS AN
*
*£*
INFBRMATleN-eNLV MESSAGE Te tNOICATF SUCCESSFU~
*
*E*
ceMP~£TleN 6F PAsswe~D C~ANGE.
*
*****************************************************.******************
LI,01
X'03050~'
[RRMSG KEY
1454
14!59
1460
PAssweRO eeMMANO VERB
9~
wRITE ERR6R SF SaME seRT BCCURRgO W~!~[
*
*i*
TRYING T8 WRtTE :USERS RrceRO eACK, ABeRT,
*
*E*
PRESUMr~G CURRENT RrCBRD UNALTERED'
*
*********.*******************************************-******************
*~*
144to!;
2~06nOOlt
A
11!20nooo X
2U2F'F"F"FF A
2c10n106 N
6 AAf.on90:!
2ioon01D
6~Oonooo
E~oonoo8
X
A
8AL,R~
LeI
8
B
~1~3
CLEAN
STACK
LENGTI-1 SF' CMNO
-1
T£LBUF
BLANKBUF
PReM?T
T.£'RR
.S~l
BLANK C8MMANO BU~FER
RETURN FeR TIERR
ERReR RETURN VECTeR
j..fn1
~e:F'
1~1::I'
08 .. ,,5
PASSW6RO CBMMANO VERB
9b
PAGE
************************************************************************
*0*
NAME:
SC~AMBLE
*
*D*
CALLI
BAL .. SR3
SCRAMBLE
*
*D*
R£GIST~RS:
R3,R4IR6,R7ISR4 AR~ CLeedEREU
*
*0*
!~PUTI
T[XT PAssweRD IN D!-O!
*
*0*
DATAl
Y[RBa • owo eF BLANKS
*
*0*
eUTPUT: ENceOrD PASSweRO IN 01.0~
*
*0*
t~TERFACFI
SCRAM • S~[F'EO PAssW6RO SCRAMBLER
*
*D*
D£SC~tPTleNI
Ir INPUT IS NULL (BLANKS), RETURN
*
*0*
Z~ReES.
eT~[RWISE, CHEC~ FeR SCRAM INCLuoED. IF
*
.0*
PRESENT, SCRAMBLE PASSW6RO. eT~ERWIS~, [xlT.
*
**********************************************************.*************
i·
141"
1417
141R
141q
1~8(')
1481
148~
1~8~
1484
1485
148~
1481
1488
1489
1490
O~
1*
Co34~
OOJ~!S
O!:lBOn100 N
O~20n100 N
CD,01
V~~B2
A~E
•• 4
A
LI .. 01
A
LI .. 02
B
0
0
1494
C~
oo3~8
6800n~~D
149C:;
02 00349
149~
t*
2*
1~O1
ot'
ot?
0034A
003~B
Oo34C
00340
02
O~
O~
O~
0034E
0034F
SR4
11COOOOO Oe
Ot'
Ot!> 00346
Of' 0034+1
149b
•
R~
149i'
149:'-1
1497
1498
PUSH
PUS~
6 S1 30nl49
1491
SCRAMBL.E F'GU
02 00342
Oi? 0031+2
01.' 00343
2aConnoo
220onooo
2a6 onooo N
6~30n~40
6 AB onooo X
l cC onoot, A
"
Oa200100
0 86 001.00 N
E~Oon(jo8 A
LI,Rf,
BEZ
8AL,SJ;~
LO,D!
SCRAMBL.X PUL.L..
SCRAMBL.X
SC~AM
SCRAMBL.X
SCRAM
Rb
IS INPUT
Ne
SRA+
B
*SR4
'SI-Iew C;eMMAND'
NUL~
YES,
RETURN
Z~ReES
IS SCRAM INCL.UOED
NB, RETURN
[NeeDED
R~
P~LL.
TITL.,
SAV&: LINK
R£1URN
PAssweRO r6
D1. 0 2
"-101
a£P 08, '75
181~'
*
*
*
*
*
*
1~O~
1!SO:;
1504
1505
1506
1507
l!SOR
1509
1!51t;
1511
151~
1.
1514
lS1!;
1516
1.517
1518
02 OO:;5 U
OP OC3!'50
ot' 003S1
02 00352
Or 00353
o~ 003!ct? 00355
a? 00356
O~
00357
at' 00358
N
cw,O ..
6 9 30n83:;
LI,R2
BAL,Rn
ROIUSERS
8AL,~~
J:"MTELCL
3546n006 A
3546noo' A
STW,R~
Or' 00350
1524+
152!11§
Ot;' 003eE
2U3F'r:'-FF A
o? Oo35F'
2U9FF"FF'F A
BZ28nnO] A
H330
1*
~*
1!1i31
Oi' 00365
ot' 00366
Of' 003t,7
Op 00368
1.!53~
O~
00369
JsTE~
222onOOl A
6 AOonS3D
6AI+onooo X
2C4onooo A
6~80n!6A
2~4on001
1528
1529
B~E
tQUIT
BKePTo
6~30n355
31Fon01~
LS,R3
1520
1621
152!'
1523
0::> 00360
02 00361
o~ 00362
OP C0363
02 oo36~
8~E.Z
.,.11 TEL.F'LGS
$+3
4 A30nooo X
ot:' 0035.
1521,
1527
•
A
0'2 00359
C~ 003~C
LI,R~
F'QU
2~3cno01
1~19
O~ 00358
S~BW eSMMANO
THE SHeW ceM~.ND REAOS T~~ IUSERS [NTRY ,eR THIS USiR
AND M6VrS IT ,6 A ceMMe~ PAGr FeR THE SHew PR6tESS8R
ArTER HeVING T~F RECBRD T8 T~f ceMM6N PAGE IT CALLS
SHew VIA AN INT£RP EXTT. THE 'PASSwBRD' ceDE HAS BEEN
GREATLV UTILIZED FeR THE REAOING 6F THE luSERS FILE.
Olt Son7Ct
N
B0 28n009 A
6 4t 4onl6o
N
1~50n100 N
2cC:onooo A
2c4on1F'4 A
85C8noo9 A
2~!5F'F"FFA
LI,R4
STW,R~
CAL1,8
SCS,g
LI,R4
AI,R~
AI,SR~
LW,R2
STW,R,
BDR,R~
SUMP
LI,Ot
i.
a
6,R3
',~3
GCeMNPG
ARE
GBING 16 ~LeBBE~
USER.S PR~M WI sHBW
N6, BK Te CA~L SHew
YES, DyD WE ASK QUIT
N8, ASk: IT •••
SET READ M60i T6 'IN'
READ IN ,USERS R~ceRD
CLeSE MITEL
w~
T~E
ZERe PAssweRC
FeR SECURITV
LeGS I ZE.,.
GET A C6MM6N PAGE
CANT G[T PAGE
SET UP C6UNTER
*SR2,R*
GET weRO FReM STACK
, MeVE Te CBMM6N PAGE
s~ewxx
.,.R3,R4
.-2
e(LBGSIZ[+RWUSRSZ),Rs
o
CLEAN STACK
ceNT SCAN CMHAND
LI,R4
*SR2,R4t
***TlMP.*.
._.TEMP.-·
1260n74+6
STW,01
LD,R6
500
XS~ew
CHMAND T6 R6&R7
6 HOonOC8
B
GRBUP,
Ge LeAD ,AND '-INK
90
s~ew
1~1~6
1S3~
15l~
1!;lb
1~3'
1!;]8
1S]9
1S440n
1541
1';~?
1!543
1544
1~4!1;
CBMMAND
97
PAGE
1833
OP 0036A
C? 00366
ct> 0036C
O~
00'360
2~5F"FF"FA
N
1;J50n1oo N
2~C3n300
6 tf Oon70E
A
*****************************************************.******************
*E*
~RReR:
*
GRBUP
03,
CeOf~036
SUeCeO£,QO
*
*E*
DESCRtPTteNI
*E*
*
W[ CeU~DN'T G~T A CeMM6N PAGE T6 PASS THi ;USERS
*
*£*
R£C8RO 18 SHew. NeT[. TE~STACK IS CLEANED BEFBRE
*E*
*
ERRBR Me:SSAG~.
*E*
*
*****************************************************.*************.****
SHewxx
B~MP
.(L6GSIZ£+RWUSRSZ),R5 CLtAN STACK
X.030300'
£RReR ceDE
CMNERRl
'~~ER[ C6MMANO ViRS'
~
SUBCBOE
SiP 08, '75
1$\1:16
*
..*
1, !54t,
1~~~
1~.9
*
1.550
1.55'
1552
i55~
iSS?
1558
1559
1560
1561
1!i6f1
tS63
1564
~. !565
1!5il6
US,,
156~
1!569
1570
1571
1Fi7i'
O~
oo36F
at' 003,.
02 00375
02 00316
Ot.' 0037'
o~ 00378
ot' 003'9
O~
003,A
ot' 0037e
Of' 003"
02 003'0
•s:ceup
21Con002 A
6~4on681
C I, D1
SAZ
GTVEMF-'H
21100001 A
6 8 20n6B1.
CI, R1.
eL.£.
6A~onooo
35C,0000
35C60COl
35C60002
30C60003
35C'n004
QSi30nl00 N
15'~
1S7'
1.5'8
0;:» 003~3
Ot.? 003a ..
t5'~
O~
1581
C038!
OOl!6
OJ) 00381
A
A
A
A
A
22Conooo A
02 00380
02 00381
o? 003!2
O~
Ot" 00389
6~200RF7
1!§84
O~
21'00000 A
6 8 200BF?
1.585
ot'
Rl
SCAN
8NE
SYNTAX
BL£
LW,Rl
AI,Rl
WHSC
,, ,
8
SYNTAX
o
SYN'TAX
.TEl.STACK
2
8AL.,SR~
SCAN
8G
SYNTAX
CI,R,
CI,R7
BLl
lEE l' FEATURE ENABLED
T~£ 2 BIT I~ SIC~UP
MUST B~ SET.
W~ MUST HAVE AN ARGUMENT
6R WE ceMPLAIN.
MAKE SURE MITEL GL6SEO.
A WSRI< AREA
eVER ~[RE A WAYS •••
PRESET TMlS ijUPFER AREA
T8 BLANKS.
wE AOO£O 20 8ECAUSE eT~ER
ReUTI~iS' su,~ AS SCAN,
USE T~t STACK Te~.
4.1~3
8AL,SR~
21700000 A
(,1$2008'7
2110000C A
1~R3
PUSH
C I, R7
Ot> 00388
.,
o,R3
o
8G
6C!30n100 N
T~LSTACK
20
LI,Ol
6~2onAF'
2 0 300002 A
6 AAon8Ao
1
GIVEMEH
F"MTELCL..
2,R3
],R3
ell R7
21'ono08 A
2
STW,Ot
STW,01
STW,01
STw,Ol
STW,Ol
CI,Rb
2160n068 A
158;0>
158:1
0038A
0038B
8AL,Ra
LWIR:;
AIIR:;
LWIOt
3C!ConB2C
6 9 3008'7
U:5@O
x
2030001" A
02 Oa37E
Ot' 003?F
1575
X
3i:!30n 1. 00 N
6 AAon8AO
1573
1514
*
*W~&:R[
T~E W~'RF
FQU
Lw,01
02 OOl6t..
3iConaoo
nl' 0036£
C'- 00370
o~ 003'1
ot' 00372
O~ 00373
C6MMAND Y£RB
ceMMAND TS USiD T8 SEE fF A SPECIFTED USER
IS LeGGED eN T5 TME SYSTEM, T~IS rs 06Ni BY C~ECK!Nij
T~E FILE ILeGD.ISYS eUILT BV ~eGeN~ W~ICH C6NTAINS A
FeR EAr~ eNLIN£ USfR. THIS FILE IS READ NBNE, WRITE
N6NE, sa W£ MUST Ge T6 X'CO' PRIV. ~EVE~ T6 READ tT.
W~£RE
t~.e
REMEMBrR THA T·.
BETTER ENO eN A ~eMMA
6R ! weNT LIKE y~u.
Tee LeNG
Tee S1-48RT
Tep eF' STACK
New De 3 W8RD
NAM~
1;t
Q
SYNTAX
GUESS TT
~eeKS
G~eo.
~o1
1-:3'
t586
1587
1!;8~
O~
SEP os,
003ee
0' 00380
C~
oo38E
158q
ot'
Co3~F
1590
o~
00390
00391
1!591
1*
1!59~
1~g:;
1594
1~95
15gb
1S91
1598
ot'
ot'
ot) 0039:;
O~
O~
00394+
00395
ot' 00396
O~
O~
0039'
00398
02 00399
t599
O~
1600
1601
02
O?
OP
OP
160~
1603
1604+
16C~
160~
16C'
1'OR
1609
1610
1611
161~
1(,1~
~f,14
161!;
1l!,1l,
t"1'
00392
~MER£
7cFoncooX
2clonoCo A
?blonOOD X
O~OOn100 N
22EoooOO A
0410nlC4
15Fonooo X
Oc2ono50 A
AAoonooD
A
2100n001 A
63 40n:;98
2UOFF'FFF A
2iSono5C A
2260n003 A
0039A
0039B
0039C
00390
0039!
04lonlBE
Le,lS
L I.. 1
STB'1
PULL..
JBIPRIV
1~
BANI
LI,S
'*'
LeGGEO eN INDICATSR
BYTE INDEX FeR ceMPARE
READ M£ A REC8RD.
IS IT LeGGED eN
NePE.
MeVE Te oeue~EweRo.
CHECK FIRST 2 we~os.
wHY OIONT seMESeOY PUT IN
A C8MPARE MU~TIP~F wIT~
AL~ THF- eTHER MU~TIPLE w~RD
INSTRUCTI6NS, ••• •
DrONT ~tT eN wos 3.~
DEC PTR AND SPLIT.
LM,Q
C 1,13
AI,ll
LI16
CAL1,1.
-1
l
WHREAD
2000no01 A
9100noOO A
AI,13
CO,O
02 0039 F
6930n~97
Bf\E
ot' 003AO
2Uoon002 A
9120noOO A
6l:53003A5
co,a
*13
WHERE]_!
2
*13
8E
•• 3
ot' 003A5
O~
003A6
ot' 003A'
O~ 003A8
o~ 003A9
02 003AA
ott oolAS
O~ 003AC
Oi' 003AO
O? ao3AE
162"
003A'
ot' 003 8 0
o~
2fJOF'F"FFD A
6800n:;9.
2UDon002 A
B140noOO A
6ij3nnlAA
2UDF~FFB
A
680onl9A
Oc2ono30 A
O~10n100 N
2UOF'FF'FA A
3C:?3cn82D
6 5 30nOOD A
3a1onooD A
2C?2onoob A
••••• PBKE •••••
BUR ARG AREA
RESET USER pRIV L..~VE~.
;AR BUT, ITS ePEN, ••
GET T~£ 5 WD NAM~+ACCT
IS BUFFER eN DeU~LEweRO
1 CeNT wANT IT BN eNE,
B~E
02 003A2
USERS PRIV LEVEL
I NE[O
JBIPRtV
S
*13
1
.+2
WH6PEN
69300]9A
Oi' 003A:;
02 003A4+
T~E
W~AT
!S
~IT
1114
CAL1,1
STS,Oa
LeI
ca,s
ot' 003A1
THIS IS
T~IS
o
L
WHER£2
CBMMANO VERB
JBIPRrV
X,COt
F15CnooD A
161R
161~
·,5
A 1,13
AI,13
8
.1,13
Cw, ..
9E
*1316
WHERE]
1
.3
W~ERE~
2
*13
•• 3
CeUNTER
6PEN Mi
IT IS
T~IS FfL~
New ••••••••
LAST waRD ~eR A MATCH.
WE GeT eNE.
AI,13
-5
8
PUSH
W~ERE~
],R1
SAV£ Tj.,ftS STUF'F"
AI,13
.1,
LW,3
STW,3
Lw,1
LI,2
"
r KNew, I eN~Y AOOEO 5
BIT I'M G61Nij T6 peKE THJS
*11
1~
#)
eN ,
IN BEFBRE T~E LIN~ NUMBER,
BUFFER ADDRESS.
AND L.£NGT~
~nl
181:;6
at>
SEP 08,
00381
1'~H
1Et2~
162~
a? 00383
1624
00384
Or' 003!2
o~
Of' 00385
162!1S
~.
1628
1629
1630
1631
1'3l'
163~
O~
O~
O~
O~
O~
O~
O~
O~
003S6
003S,
00388
00389
0038A
00388
003ee
00380
'75
01+100790
2V000001 A
6~00n39A
6 A40nooo x
21£00000 A
6 i 30n010
04+100'90
6 8 000010
*
16~6
O~
F'UOon010 A
OOOons05
OUOOn3D!
8UOonooD A
OUOon02C A
Ot' 003C3
N
165(')
1.6!51
16!5~
tb53
16£54
t~55
ot:'
003C~
02 on3C5
Of' 003Ce
ot'
003C?
1.'S~
at'
1b5'
02 003C9
003eS
\(,!q
Oi' colCA.
Of' 003CB
1660
o~
1658
1 (,61
166i"
1('b~
003ce
ot' co3ce
O? 003CE
O? 003CF
14+0ont31
''''400009
OUOanl£4+
OUOOn3£4
8000nooO
QUOon02C
OUOonoOA
OOOOnoo1
QUOooc01
N
A
A
A
A
A
A
00000301 A
0000n002 4.
010on'o~
o
PReMPT
NBNE
LI/R~
4
CAL1,t
WRITE
PR8MPT
8
1000n1~3
1~4A
r:'MTEI.C:L.
LI/R1
2~10n'5D
0;> oo38E
16 .. Q
WHERE;]
BAL,~",
9~E
*
003BF
O? 003 Co
02 003Cl
at' 003C2
e
el/1.
2c200004 A
1~"5
164'
PULL
N
16"~
16""
A I, 14
OC!2ono3o A
1642
A
100
rBR v6U.
BNE
A1/13
2UEonOQ1 A
aAloni00
Wf.1ERE C6MMANO VERB
WRITE
~eUND
CALl"
*
wHREAD
.
*.
wf.1!PEN
f
t12~
1724
ot'
TABS CBMMAND VERB
08,
OO~O'
OO~O8
TABS
6~30n414
2160n040
6~30n8F"'
F'QU
CI,R(,
8E
CI,R6
14
B~e:
31!40n100 f\
20~OnOOl A
2~50noO' A
1350n100 N
Oa2onn70 A
2 A80n?B8
2t:tS8nCOO A
2fJ40nOO2 A
2200nooo A
2c30nooC A
3cConooo 05
6 AA onE(AO
2110nooo A
6ti30nBF?
21'onOO3 A
6!:l2on8F7
2(JOonOOl A
6 AB on982
3!:)OonOOl A
F076nOO4 A
2100n010 A
6 9 2onBF?
TABS1
,
t
SYNTAX
TE:L.STACK
LW,R4
AI,R4
BUMP
"RS
LeI
LM,SR,
TABPL.
STM,SR1
TAaSA
•X'E2'
O"R4
'2
LIIRo
LI,R:;
a
VALU£S
V~'P.B 1
CIIR7
0
GET T~E TAB
tNSUR£ DATA
3
4LLBw UP T8 3 CHARACTERS
1
BUMP T~[ CeUNT
C8NVERT THe:: VALUE. Te BINARV
BE
CI,R7
BG
AIIRO
SYNTAX
SYNTAX
BAL..,SR4
OEC8IN
STW,Ro
STa,R,
CI,Ro
BG
CI,R6
PE
R3
STeR[ T~E VAl.UE IN PL.IsT
TEST FeR L.IMIT
," '
ANV MBRf
yUp
1
T£ST FeR TRAILtNCJ GARBAGE
*R4
Nf.tF"E-ST5RE CeUNT
SYNTAX
OO~OC
2110n001 A
C I I Rt
9G
STB,RO
SYNTAX
204+FF'FFF A
84ft 1 oncH1* A
AI,R~
.~
CAL1"t
VALU~
16
*R4f.,R3
00400
TABSA
*R~
2~5FF'FFg
BI.JMP
."R5
6 a Oon01D
B
pr 00'+01"
OP 00'+10
Ot' 00 4 11
02 00412
O~ 00413
VES, BRANCH
CHECK FrBR SPACK
'7
OO~OA
OO~OB
6!:l20ti~r1
Fboooco~ A
TABS fNQUEIRY
1
A I, R4
Lw,01
103
ISSUE MICEVICE CAL
~c1
~EP
181:;a6
1125
112~
1127
172R
1'29
1730
1731
1'3~
1733
17341 73!5,
OO*1~
Oi' 00'+14
2~30n01~ N
2~1FFF'F'o A
O~ on~15
02 00 4 16
0041'
02 00418
02 o041g
Of' 004114
O? 00 4 18
Ot'
1'l~
O?
113q
O~
11.0
ot'
Of'
1141
o~
1'4~
o?
ct'
OC41C
00410
OO41E
OO41F
00420
00 4 21
00422
00"23
00424
00425
00426
"'4~
ot'
Or
ot'
"48
02 0042'
Of' 00428
1150
O~
1751
1'5;>
O? 00428
C? C042C
O~ 00420
1747
,'4CJ
175]
1'64
1755
1'56
1751
1758
O~
Ot:'
rQU
Lr'R~
LI,R7
LB,SF<3
e~EZ
LIIRl
2~2onOO4 A
O~1on'9n
LII!;2
CAL1,1
6tsOon01D
32600100
2U6onOOl
2250n010
13 50n100
2ctOon()68
22200000
FaC£nOO3
B
*TA6S2
N
A.
~QU
Lw,F(6
AI,RE,
BuMP
A
N
•MIUC.19
-16
*R3IR,
TABS2
NBNE
4
WRITE
FR6MPT
•TF:L.STACI<
1
A
LI,Ro
,, ,
LI,R~
0
A
TABS4
Le, D1
*R3,R7
6830n~3"5
BEl
BALIS~~
8tNDECBCO
2c4onooo A
LI,RAt.
0
6 ABong,g
7c58nooO A
oo"!&:
2U20nOO1 A
204+00(J01 A.
214+onOO4 A
Fb5~nOO6 A
6830n432
O? 00#31
6~Oon~2B
TASS5
TA8S6
D~,R4
8~£
TABS6
B
TABS!
STe,R~
*R6IR~
AI,R2
AI,R4
1
1
BE
TABS?
CI,R4
Le,R~
'2S8ncoD A
TASS]
LB,R!5
c: t, R5
A I, J(4
'0 ,
1
*
D",R~
B
TA,8S6
STS,Rc
*R6,R~
*'
OP 004t32
Fb04f.nOO6 A
*TABS?
eUTPUT CURRENT TABS
PT T6 rND SF' TABS
!NDEX BACK
ANV TAB ENTRIES
v£s
Ne
BVTE CeUNT
eUTPUT NeNE
MSSG
PR8MPT
DISP!..Ay TABS ReUTYNE
SPACF."
FeR eUTPUT
1b,R5
A
004+29
00-2A
00 4 30
TABS1
TABS CBMMANO VeRB
2210n750
0042'
o~
C~
.
fa.
215000F'0 A
6 9 30n42B
2040nOOl A
6 S00n .. 2b
1'!~
1160
F'cA[no03
6 9 30n41C
02 0041('"
Oi?
1'4~
'15
02
1. '3('
173'
1'43
1744
08,
BETWEEN ENTRlr.S
INITIAL eYTE ceUNT
GET TAB ENTRY
Ne[NTj:(V, GIViUP
C8NVERT Te DECIMAL
C6MMA
IS OAT A A ZiRe
10~
"'in 1
1AI:16
t:;EP 08,
ot'
1763
02 00435
2U2F'JrFFF A
C? 001+35
2~Oon040 A
0' 00436
O~ OO~3'
F'00*000" A
Ol' 00438
3~10noO' A
1764+
t765
1'66
176'
1768
1769
1"0
17'1
o~
on4t33
20200001 A
OO~34+
6b?oo4t22
004:;9
Or 0043A
Ot' 0043B
02 0043C
O~
TABS c:eMMANO \/F.tRB
"5
1. "1
1'6;?
0 4t l0n'9o
2t!5F'FFFo A
1~50n100 N
6~Oon01D
AI'R~
TASSi
1US
1
SIR,R1
,QU
AI,R2
LIIRo
STS,Ro
•, ,
LW, R1
~~
CAL1,1
WRITE
BUMP
8Ur:FiR AODR r6 R1
eUTPUT T6 TERMINAL
-16IR~
[\lEN UP
B
PReMPT
PR6MPT
• PAGe: CetMMAND VERB,
T111.£
TABS4t
-1
*R6,R"
BLANK
~n1
SEP 08,
18']6
,,5
PAGE CBMMANO
11'~
'*
*'*
177~
*
'*
PAGE
1'"
'778
118~
1784
178!5
1786
1781
1788
1789
1190
106
PAGE ReuTtNF:
THE PAGf FUNCTIBN ALLewS T~E eN.LINE USER Te RE.SET THE
CURRENT
PACif Ne. aUTBUT IN T~~ HEADER BV THe:: cec RtturfNE
*
1"~
1"4
1"!IS
1.719
1780
1781
t1gp
V~R8
o~
02
00*30
O~
OO43E
OJ:) Oc'+3F
ot'
004f.40
00 4 41
O? 0041+2
F'QU
C I, R1
•
6~30nBF'
BE
SVNT.X
2l60nOi+O A
6 9 30nBF7
6 AAon*8A
CI,Rt,
Bt\E
OO~3LJ
21100000 It
00443
Sc!AonOO7 A
eAL,SR~
BAL,SF<~
If.i,SR~
02 00444
o;:t 00 4 45
02 00'+1+6
2a600000 N
LI,Rb
6 a Oon01D
8
O~
O~
o~
00'+47
6 AB on982
6 9 30n8F'7
5b1Cnnoo A
BNrZ
STH,R7
TITLe:
0
,,
NS
INPUT FSLL.6WS
SVt-.lT·AX
G[TFIF-L..O
DECBIN
R?
SYNTAX
JHIPC
O,R6
GET NUMBER
ceNViRT T6 BIN
SE:E IF # T6 61G
VES, T~L i-fIM
PUT VALUE
PReMPT
,PLAT[N CBMMANO VERB,
IN JtT
H01
~e:P
181~'
1'9~
,793
,794
~'9!5
179t,
1797
Oa, ',5
02
1191
02 00448
Of' 00449
Ot' 001+4A
O? 001+46
ct' 004t4C
o~
on440
0044+~
PLATEN
PLATEN CeMMAND ViRB
rQU
2160n(1DS A
CI,R~
216ono6B A
CI,Rb
BE
6~3cn469
2i30nooC A
BE
Lw,D1
Ll,R:;
6~30n4!5A
3cConooo as
10,
•tN'
19 IT A PLATEN 8NLV
ceMMA+~
8NLV LE:~CiTI-i PRESENT
IF ViS ae PReCESS IT
,, ,
,",LATENt
V£RB1
o.
1'9~
O? 0044E
6AAcn~AO
1?gq
Ol='
21100000 A
CI,R1
21101")00] A
CI,R,
~
6~20n8F'1
BG
BAL,SRa
CI,R7
SG
LI,Rs
SyNTAX
SVNTAX
JB:PCw
wtOT~
STB,R'
1~O()
1801
180~
ooAf.l+F"
0; 001+50
O? OO"'!1
1804
O? 001+52
Of' 00453
OP 004!4
t80~
001+55
t80~
1806
1801
ot'
at?
O~
1811
181='
181~
1814t-
1815
6 d 30n4658
01.' 00 4 58
21?ono8C A
6 9 2on8F'
2~50nooo t\
7'6714.0000
CeMMA
DiCBIN
216onc68 A
CI,R6
•,, ,
6~300*6'
B~[
D8NE
~eJ
VES,
L II R~
D1
V£RB1
SCAN
0" Oo'+!5C
ot' Oo'+5E
21100000 A
6 8 30n8"
21 7 ono03 A
05
8AL.,S~~
CI,R7
BE
CI,R?
BG
6 9 20nBF?
3
ARE MeRE
255
C~£CK
217000F'; A
8ALIS~'"
OO'+~2
el,
O~
OO~~3
6~20ngF'7
SG
SVNT.AX
6ABong82
1~24
02 00464
2C!60nooo N
Or' 00 4 65
75'Cnooo A
02 004+66
Oi' 00466
2110ne01 A
182~
O~
1826
C~
CetNE:
R,
L II R6
JBIL..PP
STBIR7
Q,JI(6
!QU
CI, R1
6~200BF"
6 8 Oon01D
*
G£T L.ENijHT
INSURE DATA
ot'
•
1
8G
SVNT~)(
9
~r 004744-
6 AB on97g
1~4P
O~
22000040 A
18~:;
O[) 00416
C? 00 4 17
Ot? 004'8
02 00""
ct' 00"7.
O~ 0041S
Ot' 0047C
O~ 0041D
t84~
184"
1847
184R
1849
185(')
1851
N
?aCAnooo A
2C1F'F"FFC A
?i52noOE A
2150noFo A
6 5 1004'7
20000080 A
20700002 A
Op 004"
Q~ 00 4 80
1954
1855
1856
ot' 00481
O~1on,go
iB!'
00482
2cSonoOo N
Ot' 0048]
ot' 00484
Oc200030 A
2 A80n?5A
1858
ot' 0048!
1859
1860
ct> 00486
1861
186i.>.
FLAT£N3
100!nooE A
185~
t88~
ot:'
PLATE N2
6 51 30n470
BoOon007 A
2 0 "FF'Fi A
3i10noO? A
02 OO",E
LM,SR1
STM,SR1
A
A
Ot' OO~'1
1844
A~8onoo'
6~4on .. ' ]
1~
A
lSlA
00415
•
Lw,R,
A II R?
BUMP
N
A
1839
1840
1941
Q;t
LI,R;;»
2220oC'lOC A
PLATEN CeMMAND V£RB
USER eF CURR£NT PLAT[N S£TTINGS
OP 004B1
ot' 00 4 88
2C1F'F"FF'C A
0; 00489
680onC1D
2
OI~5
8AL,SA4
LI,Ro
II R1
La,R!5
L
el, Rs
,,
81NDECBCD
.~
D~,R1
•0 ,
PLATENlt
STB,Ra
8IR,R1
D~IR1
AIIR?
PLATEN]
eto·-e. ,
2
*R1
.p
R?
WRITE
Lr,Rcs
JBIL.PP
LeI
LM,SF(1
STM,SR,
:;
80~,R~
BUMP
*
JE·I Few
8t\[
AI,R1
LW,Rl
CAL1,1
1 3 10n100 N
*R7
LI,R~
STW,O~
A
wrOT~
LIIR!5
LB,D1
.. r,D2
PLATEN4
T£LSTACI<
B
LLINES
1V8
MESSAGE BYTE SIZE
~AI
1910
2u500001 A
V,RB2
LSTAT
CeCSTAT
4
c:eCSTAT
T£LSTACK
~,R5
Lt,R!
Lw,SR3
a
T[RMTYPE,F<5
ST~,SR~
*SR2,R5
AI,RS
CBMMAND IF'
WAS DATA PFfES[NT
GIVE ,[M STATUS
,
TERMINATED SCAN
VEs,SKrP C~ECKINij
INSURE NB TRAILING DATA
P8SS. LeASE STAT
LBW[R CASE 'STAT'US
C8NVERT
ep[N STACK UP
MeVe: FPT T! STACK
FeR CI-4NGE CAL
1
4+
eL-
2~1ono03 A.
LB,RS
LI,Rt
.-4
TERMTAB2,R?
3
KEEP GBING
CeCTERM BYTE
fNOX INTe FPT
6552nC)09 A
STW,RB
*SR2,Rl
ST6R£
?~5En~o~
re
UPPEk
IF' L.IN[ STATUS WA$ R£QUESTED
GET STACK P8INTER
8R4NC~
1
BUMP
cr,R5
BLANKS
USER
-1
T~~MERR
3;:900100 N
T~IS
sRC~TAB1
0
BE
tGNeR[
Ne~.CeC
r:eUNDF'
RES
Cr,R?
OO4AE
O? OOI+AI='
1
9
21100004 A
1~!ontoo
'
SYNTAX
SIZETAB1
TERMTAB11R7
cw,01
BE
..N
, I
BG
LI,R,
C~,
6830n400
2250nooo A
004B~
O~ oo~85
•• 3
eR,01
D1
31ConotC 06
2150n004 A
6 9 10n4+At:
1907
RE
AI,R,
eG£Z
6810049'
2U90nOO1 A
2C!50nOO4
SCAN
BE
8£
110
01
C I, R1
SRCHTAB1
C8MMANC VERB
PRBMPT
VF RB 1
n
ceCSTAT
CI,R~
2U?F'r:F'FF A
6~30n4+00
•JtJIT
BAL,SR~
CI,R?
6 8 30n4"7
6~Oon83B
T[RMINAI...
LI,R3
21100001 A
6 5f 2008r7
at' 00480
oe' 00491
02 004B2
02 004+83
1906
8CS,~
L~ilD1
2i30nooC A
6 AAon8Ao
2110nooo A
6"30n400
2160n068 A
6830n4+9£
C04AD
O~
TERMINAL rQU
LC
ceCT£RM
~o1
1~,
1q 11
sEP 08,
I ~6
o~ OO~B6
02 0048,
.,5
T£FH1 I NAL
1i5EnBOA
T~RMTAB3,R1
A I, R1
-1
SL.S,R~
19
X'38'
-SF<2,R1
OO~e8
O~
201F'F'FF'F A
2e>Son013 A
004S9
2 U50n038 A
AI,R!=;
ttl1!;
O~
o~
C~
0048A
004+S6
Bb52nOO9 A
2160nObB A
6 9 3004C8
STW,RFi
191(,)
1912
,91:;
1914
ot'
OO~ec
1911
191B
02 004Bo
t919
O~
1920
1921
ot? oolt-Co
6 AA on8Ao
192f.)
O~
21100001
"300AF1
0048£
O? 001+6F"
32Conooo
2i30nooC
1924
6 AB on982
192~
OOl+C4
221500002
192~
1927
1928
1929
19iO
1931
'9l~
1933
1934
1935
ot?
ot?
ool+C5
Oi' OO4C6
O~ OOl+C1
ott OOl+C8
C~
02 004C9
O~ OO4CA
O~ 004C6
OC? OO~CC
02 oo~CD
02 004CE
O~
oo~CF
22!F~F'FC
OOlt-DO
Ot'
1939
004D1
ott 00 4 02
01' 00 4 03
194,
VE'RB1
0,
2
SCAN
BAL/SR~
LI/RS
~
SL.S/R1
A II R7
19
STW,R?
X,]8'
*SR2,R5
ALGeR 6VERRIOE PRES
N8, TAI<£ T~E DEFAULT
OISP INTe BUFFER
SCAN FeR ALGe BVlRIOE
caNV£RT DEC I;
INOX tNT!' ~PT
St-fIFT ALae ' I
peStTle~
.,381 SEL.ECTISN MASK
PUT IN FPT
.S~2
BCS,8
C~NGERR
8
PReMPT
BUMP
S~Ir:T ALG6 *1 P6STTISN IN BITS 10-12
.,l81 S£L.ECTl6N MASK
STBRE ALGeRITHM #
1
SYNTAX
O[CBIN
CHNGTYPe: CAL1.S
A
-4,Re
[RR8R ~XIT
RESTeRF. STACK
ll!500100 N
6~OonOl0
2iS'FF'FC
A
CHNGERR
1~50n100 N
680on8l8
O~
O~
Oo~D~
3~gon('}oo
r
6 ABon96!
3cl0n100 N
20100001 A
Oa2onn30 A
194~
0; 00 4 05
2 A30n720
1944
O~
194~
00401
ot? 004+08
2c20nOOl A
5e>04nOO4 A
022on030 A
1.94t6
Lw,Dt
111
BUMP
-4,R5
MUST &:VE:N UP
e
T£RMERR
iRR6R RETURN
Lw,SR2
BAL/SRa
LW/1
MIUC.CeCLN
GET T~E cee ~INE NUMSER
CBNVERT Te t-iEX
STACK
'*
1~3S
19~1
fA.
201on038 A
Bb1.nOO9 A
S480no09 A
6'80n~CO
C~NGTYPE
8NE
25'onC1:i A
193/,
1940
fA.
t , ,
Bftt.[
LI,R3
LI/Rt
BAL/SR'".l
CI,R?
A
A
221ono02
OOI+Cl
OOl+C2
OP OOI+Cl
192~
~I,Rb
05
C!MMANO VERB
ALGa eVTE
LB,RS
O~
004D'
*CeCSTAT
• III
~e:X2EBC
T[l.STACI<
1
LeI
3
LM/3
LMSG
LI,Z
STH,O,.
Let
1
~.2
3
A WORt< AREA
IN BITS 1U-12
1-401
~EP
1P..1~'
08 ..
19_'
1948
02 00"09
t9~9
01' 00'+08
t 9!§rl
1*
O~
,.
~*
14*
19!1
t9!p
1*
i'*
tgps~
02
OO~OA
oo'+DC
O? 00'+00
at? oo_DE
O~
0040r:
ot' Co4tEO
C~
OO~e:1
O? OO'+!2
02 00'+£]
O~ 00'+£4
O~ 00'+£:5
'75
2~32nOOO
2~20no09
T~RMINAL..
CB,SR~
6830n~r:3
8£
M:uC+ceCLN,1
ceCSTATO
ARE W£ COUPLED Te SBMESODY
IF EQUAL, Ne~E.,·.
21700002 A
61'+004F']
2i10noo:a A
02 Oo4f.£8
1957
1958
1959
0;:- 001+£9
6 AB on961
O? OOite:A
ot' oo'+£B
O? oo'+£C
3i1on100 N
2U10no01 A
1965
1966
1.961
1968
196q
1970
i·
19'~
1916
1977
1979
1979
1980
\981
3C'OnOQA A
0220n050
2 A30n!'3'"
A
01' 004EE
!550onco, A
Or 00'+£F"
Ot' oo'+FO
Or 00'+'1
0220n050 A
Of' OOitF2
Ci' OOl+F3
02 00.F'4
Or 004f.F5
O~
001+'6
O~
O~
Oo~F'1
00'+F8
00 4 '9
Ot:' OO'+FA
02 OO,+FB
c~
ot' co4f.'C
ot.' 00 4 '0
9
11 A 20000 F
2 1801000 A
694toon4F'6
?C70noOA A
2510n074 A
19!5e
OoitED
LI,R~
CBMMAND VERB
cecSTATO
3JOonooo x
61$20n_F'e
O:? oo~E'
OJ.) 004£7
O~
0,1
SAZ
O~10n'90
O~8on51'
1954·
1955
1.960
1961
1*
t964
STH,]
PUT AWAY MSG w!TM lINE fI.
AND Hew l.eNG IT Is
se De tTl
New G~T STATUS SF LINE
tS T~E FEATURE ENABlED
B/NeIlE, oeNT TAL..K ABeUT IT •••
IS TMIS A 21Jtl L.IN£
B/VUP .. cAN'T De ceUPL.ING'"
LeeK AT CeUPL..E STATUS
IN UPP~R Twe BITS er: M9DEI+
IS T~£ CeUPLEO BIT SET
B/NetP£" DeNT C~EtK TIE BYTE.
A
A
2t:S3lnooo
2i20no12
A
A
6600nl+FS
2~20000i
A
321[n568
0"10n'90
1230no08 A
2 0 3FFFFC A
6~10o.FA
2~30n(j'F A
3c16nB1C
6 AI+OnS10
3i!90ne3S
2iAon!538
C:AL1 .. 1
CAL1 .. R
MTW,o
BLE
CI,SR1
BANZ
LB,R?
SLS,R1
CI,R?
L1,1
LW'SR~
WRITE
ceCSTATC
S:C6UP
ceCSTAT2
X'1000'
c:ecSTAT2
SR3
-I-,
2
l
SRi
eAL,SR~
I-1£X2EBC
LW,1
AI, 1
LeI
TEL.STACI<
LM'i
sTHI02
LeI
5TM,]
LI12
e
CeCSTATO LI,Rp
CSCSTAT1 LW, Rt
CAL1 .. 1
ceCSTAT2 LB,R~
AI,R]
elZ
SLS,Rl
MCPLD
R7
6P
~INE CeUP~ED
PLUNK IN LINe; NUMBER
!';
0,1
18
CeCSTAT1+\
14
CPL.,MSG,F(?
W~ITE
.-
SRi
LENGT~ SF MESSAGES
w,,",rc~ MESSAGE
PRINT IT aUT.,
LeeK
AT
CeCTiRM Te
•• 2
-1.
BAL,~~
MeDECvJ
LI,SRl
#
GRUNCH TO CHARACTERS,
1
L~"
SR2
se, GET
B
TTY?TA6+4,R3
CeCPRT
LW,Rj
IF
Te,
MBOECw
PRINT T[RMINAL.. TYPE
112
~O1
~e:P
18:~'
tga,
08,
·,5
2~90nOOl
O~
ontftF'E
t98~
O~
OC~FF'
6880n!50C
198~
198~
Of' 00500
20AonOOl
2clon723
1.98~
1987
c~
00501
00502
OP 0050l
ot'
198A
O~ OO50~
19S 00523
~o2~
2024
c~
Of' 00524+
02 00525
02 00526
O~
O~
2025
00521
00528
ot? 00629
Ot' 0052"
~02(,
O;;t 00528
O? OO!52C
O~ 00520
O? Oo!52E
02 oO!2F
~OF3F340
1b E3F"lE:8 A
4+0F3':540 A
15 E3F"3£8 A
~OF3F140
1b E?r:4£a
4tUF?FoFl
F=404040
A
A
A
A
A
1~F2F"4
F140C5C~ A
A
lbF'2F'F4 A
CiC~40Cl
1~F2"F4 A
00533
OlCsr3E3
00534
O'C9C340 A
EI!E3e4t4C A
1b F 2"FIt A
o~ 00538
~O30
O? 0053C
0·00054'
ot?
Ot>' 0053£
~O36
00530
0" 0053F
C? 00540
Of) oo5~1
Ot' 00542
TEXT
'NTTV 31.
TTVP3
TEXT
,NXOS
TTVP~
TEXT
tN2?41
EBCO STD.
TTYF'5
TEXT
'N2141.
EBeD APL'
TTYP6
TEXT
'N2?41
SELP.:CT~lC
TTYP,
TEXT
,N274t
S£LECTRIC APL,.,
MeOECW
OATA
'Ol~'
F'1~O[2C!§
D~C!5(~3E3
2029
~o3~
~o33
~O14
203~
TTYP2
Oioon!549
1:.iOon!ti40
OAoonS!52
Ot'Ooo555
1000n559
O"oon5~O
STD,
A
A
A
D!fC9r:340 A
Cl0'O~40 A
008C~CAO A
2031
,NTTV i5,
A
at'
O? 0053.
TEXT
F140CSC2 A
O~
O? 0059'
TTYF'1
E~C44f,040
F140r:2C~ A
02 00538
OP 00539
TEXT
C3C440E2 A
C? 00531
0' 00532
Ot' 00536
TTVPO
1ff,TTvP6
19,TTYP'
,NTTV ]3,
G£N,8,~"
GEN,8,'~
A
01034tn40 A
at' 00535
~O2~
T[RMINAL CSMMAND VERB
1 0on!531
1aOon536
15 E:3F'3£R A
00530
O~
202'
·,5 3
GEN,~ .. ~ ..
GEN,g,~*
X,e08C6CAO'
8,MMO
1.. ,MMt
19,MM2
GEN,8,,:t4 10,MM]
GEN,~,,,~ 1S,MM4
GEN,8,~~ 1"MM!S
GEN,8,'~
G[N'A,'~ 1~,MM~
114+
1-101
19l~'
20]'
~OlR
O~
C~
SEP 08"
005,.3
·,5
GEN,R .. , ..
GEN,S .. ,,.
1000n~6n
OO54~
OE.OOn56~
4+006n!;~O
A
*
CeCSN
~OD6CflC6
A
CbC!eA06 A
ceceF"F
2019
20~n
O~
~C~1
O~
00545
00546
O~
O05~'
lO~~
Ot' 005~8
~O,.~
O? 00549
0054+A
O~
ot>
2044
005~B
C~ oo5~C
ot> 005~C
OO54E
ot' O054+F
O~ 00550
20~5
A
EI+01"7C5
•
A
D605~C40 A.
O~
CbE2r:3D9 A
C9C3S::;40 A
C7C1n?CS A
O~
C~
204(,
E:iC1r24+0 A
EeC,n4E4t
DJC1'3C9
034tOr.3C1 A
00551
C~
O~
O~
ot'
00553
00554
00555
00556
OOS!;'
00558
E~C5.009
D~40r:3C1
Ea01c.1Cl
Cb~oe9DS
EcC!5n9E:~
.A
A
C9060540 A
O;:JOfl"C5 A
0940CJCl
204+8
OO5!5E
02 005SF
O~ 00560
O? 00561
O~ 00562
02 00563
E:;jES40C3 A
~O60
O~
00 5 64+
O~
O~
00566
00566
TEXT
,~Cj.ojePLEX'
~M1
TEXT
'TAB SfMULATteN,
MM2
TEXT
'UPPER CASE RESTRICT.
~Ml
TEXT
,PAPER TAPE'
MM4
TEXT
.SPACe: INS£RTrSN,
MM!
TEXT
'LeWER CASE
MM,
TEXT
'PARITY CI-fE:CK.
MM1
TEXT
'RE~ATIVr
MM8
TEXT
,8ACKSPACr'
07CS4C4+0 A
005!A
ot' c05S8
O? oo55C
O? 005!3D
?04C;
, eF'Ff
MMO
A
op 00559
O~
, eN ,
A
~O4'
O~
TEXT
CBMMAND VERB
010:lr.!5E1 A
O~
ot> 00552
TiXT
T~RMINAL
1~IMM'
1~IMM~
EiCe_oE2
SHt~Tt
A
A
C8C9Cee:~ A
O'1C109C9 A
CI$C5C:aD2 A
D'CSf)3C1
A
E;:tC9t:'SC!5 A
TABBING'
~OE3C:1C2
A
CcC9rHSC1 A
CC!C1C3D2 A
EaD'C1C] A
C~40C!5Cl+ A
EDIT'
115
~nl
SEP 081 "5
1~:3'
~QS2'
Of' 0056'
a? 00568
OP 00569
C~E34C~n
QOOonB6C
OCJoonS6C
O? 0056A
o~ 00566
OOOon5?O
0000n100 N
Ot' 0056C
Q~ 00560
OP. 0056£
09C!501C5
205:=.1
205~
2Q!~;
ot'
0056F
Or' 00510
O~
005'1
ot' 005'2
Q?' 005'3
~oS~
o? 005' ..
O? 0057S
2n!5'
~05g
TfRMINAL CBMMAND VE:RB
A
A
CPlwMSG
DATA
MSRCP~MSRCP,MSACP,TELSTACK
*
MSRCP
TEXT
'REJeCT ceUPLFS'
MSACP
TEXT
'ACCEPT CBUPLF."S'
~CPLO
TEXT
,ceUPLe.O T6 LINE
116
CeUPLE STATUS HE:SSAtlES
C3E340C3 A
06E~n'D3 A
C5E24()~n A
C1C3C:gC5 A
01E340C3 A
06[.",,03 A
C~E2.04ta A
C3D6F"~D7
A
Ot' 005'6
03C!5r ..... o A
EJ0640D3 A
O~ 005"
0" 00578
404040~O
C'O!5~e .. o
A
A
TEXT
TITLF:
,
,
,
F'IL.LEO BY L..INE NVMBE:R
'PRINT ceMMANO VERB'
~o1
~EP
1~:~6
C8,
,,5
PRINT CBMMAND VERB
117
• THE PRINT ceMMAND CAUSES eUTPUT ACCUMU~AT~O FeR THi LINE pRINTER TO BE
* P~ACEO e~ T~[ PR!NT QUEU£. eUTPUT OESTtN£O FeR T~E LINE PRINTER FR~M
* ALL eN.LINE CAMPLtATI8NS, ASS~MBLIES, pel ePERATleNS, DELTA DUMPS,
* ETC" ARE ACCUMULATED eN RAD UNTIL T~£ PRINT ceMMANO IS GIVEN,
~06n
2061
20bl?
t'063
t'064
~06!S
206~
~06'
1>068
~O~q
1*
O~
O~
C~
02 005,9
2110n001 A
onS"
OOS?A
005,e
O? on5'C
6~2onB"
O~'onoO'
6 d oon010
PRINT
~QU
CIIR1
BG
CALt,9
e
A
*
TITLF.
•
1
SYNTAX
,
PReMPT
'£RAS£ CeMMAND'
REMeTE weRK STATleN 10 eN PRINT
1-101
18:~'
~EP
OS,
~.
.,5
~.
4*
!I=;
*
,.
~*
$I.
9*
10*
11 ..
02 00!51 U
Q~ 005'0
21100001 A
005,£
6 9 2on8F1
1~*
02 005?'
O~8on1E9
00580
6800n010
1]*
14<*
O~
a?
~O'O
2011
~O'2
02 00581
20'3
~n'/'
2~50ncQt
t'08n
pe81
O~
00581
O~
005B2
PoS,..
O? 00583
6 H30n82F'
o?
31!50nn1b N
47500000 X
6 8 00n010
~c8t,
?088
ER.SE
•
....*
EXTEND
*E*
~O?'
20'~
~oa~
~084
208~
118
£QU
•
BG
CAL.11g
SYNTAX
ERASFPT
CI,R1
B
A~GU[MENT
IS PERMITTEO.
De LOFV
PReMPT
F,XTENO ceMMAND
[XTENC AVAtLABL£ ceRE
iQU
N6
1
~eR
NEXT PR8CESS5R CALLED
•
.*****.***.********-*.********.***.* ••• ********_.****.******************
*£*
F.'RR6R I
*
*£*
GR6UP 03, ceD~.011 SUBC60£pQO
•
1.'014
?01!1)
20'9
ERASE C6MMAND
****-.***************-**************************** •• ********************
*F*
NAMEI
E~.SE
*
*F*
FURPeS~1
T~E £RASF- C6MMANO IS A SHeRr WAY Te PERF!RM TH~
*
*F*
iQUIVALE~T eF LOrV L1~(O~LETE).
ITs EFFieT IS T6
*
*F*
DE~ETE ANY P~NDtNG eUTPUT FeR T~[ ~, STREAM,
WHICH *
*P*
IN MeST CASES WILL BE THE USER'S LINE PRINTER euTPVT.*
************--*******_ ••• *****.*** ••• ********* •• _****.****_.****-*******
0058~
O? 00585
O::? 00586
A
tf
4 50nooo X
DESCRtPTt8NI
*
*E*
EXTEND CBMMAND rSSU[o W~tLE NeT AT JeB STEP
*
***********************.**********************************.********.****
LI,R5
JSTEP
A~D,R5
JITE~'LGS
AT JeB STEP
BEZ
NT~BST
BR IF NeT
.
Lw,RS
STS'R~
B
TITL£
i~TNOBIT
~ITE~~L.GS
SET EXTEND BIT
PReMPT
,o£ceUPL£.ceUPLE VERBS'
1-101
181~6
1!O@9
!090
081 .,5
02 00581
O? 00587
2~C01000 A
~EP
~091
209~
O~
f.!09]
O~ 0058;'
O~ 005S6
~094
~095
O?
~O'8
~o9q
on5~9
'~Conooo
6~30n~62
O~80n'EE
X
6800n01D
O~
O~
C~
2CC01coa
0058e
00580
4~COncOo
0058£
6830n89]
CeUPL.E
It..
2100
~101
o? 0058r
ot'
2110nooo A
6!:'20nE.tB1
2240nooo A
680ones96
~10"
O? 00592
O~ 00593
2tO'
Oi? 0059.
651200599
O? 00595
o~ COS96
o~ 005'7
3C40n018 N
~1C~
?-10:1
1·
2*
00590
Of) 00591
~11!15
2116
~117
~1.1g
~t19
~120
SPACE
MDCPL..
F'ReMPT
2
rQU
L II D1
•08NT6fr
BE
c:eUPL.~1
.*'
2110n001 A
BG
LI,R4
CeUPL,E1
O£CeUPLE TERMINA~S
IS T~£ oeNT FLAG SET ••
IF se, HE SAY ,O~NT OEcBUPL.E'
ANO W£ SAY 'oeNT WHAT •••••••••
JUST ISSUE THE CAL
AND L.EAVE
S££ IF THE DeNT FLAG
IS SET. IF IT lSI THIS
IS A DeNT ceUPLE vERB
J:TEl.FLGS
oeN'T reUPLE ISSLJ&:D
Cl,R1
C J I R1
o
GYVEM~H
o
CPL.CM~
t
Vt::RBS
010 TH[Y SAY 'ceNT ceUPLE XX'
YUP. G!vE 'EM E~'
f8 R£S[T M!DE~ BIT
G8 De eeMM8N MICT
AN ARGUMENT MUST MEAN
CeUPL..E Te A TERMINAL
BG
CeUPL.~2
*
,ceUPL~"
L~IR.
2 0 40008014.
Q4t 80n'EF
6 8 00n01D
CPLCMN
AIIR.
CAL1,R
8
TYPEO. ISSUE FiRM!T ceUPL£ CAL.
Voo8
T8 SET MeOE~ BtT
X'80'
eeup~£ P[RMISSr5N BIT
McTCPL
SET/RS£T MeOE41 SfT 0
PReMPT
ot'
2cCO(')oo() A
CeUPL.E2
Or" 0059C
2i30nooC A
6 AA onBAo
217onn02 A
~109
211~
~tl::t
211~
J:TEl.FLGS
GrVEBrRD
B
.
~108
1·
~*
:;*
2111
A~O,01
At\O,01
X
•OBNTBtT
9"[
CALl,S
B
02 OO~8t.
2091.,
~og,
00588
OEceUPLElceUPL~
F'QU
L 1101
o~
00598
00699
Ot' 0059.
O? 00598
O? 0059D
6 9 2onBF'7
O~
0059E:
0220n020 A
Of' co59F
N
O~
005AO
O~10ti100
6 A1onC;9S
...
ceUPLE
L II 01
LIIR3
BALISR~
CIIR7
8G
PUSH
xx ISSUED.
o
D1
SCAN
2
SYNTAX
ATTFMPT ceUPLE T8
W~ERE
ARG
TERMINA~
WI~L G~
ae
GET IT
MeRE T~AN 2
AN ERRBR.
2,'<1
CBNVERT
IT
C~RS
TS
119
~01
1R:"~
r;Ep 081
21~1
Ot' 005A1
212~
0' 005A2
~123
Of) 005A:1
O~ 005A~
O~ 005A5
2124t
0220no2() A
~1,
2Q
213CI
2131
V~ReS
CeUP~r3
2.Rl
CeNViRSreN [RReR$
Te CeUPLE3 IF NeT
IF se~
SYNTAX
GReusf ••••••
OA10n100 N
6~oonBF'
B
..*
~1~~
~12~
o
6 e1 1on!5A6
2t2!=i
t'12'
QiCeUPL[,CeUPLF.
'75
218onoOo A
*
CeUPLEl
TRy Te ceUPLE T6 LINE
•
4f.'8onB2£
£QU
LY,R]
ca,SRt
BE
eR,SRt
O"SOnOQ8 A
CALl'"
SR1
02 OOBAb
Oi' 005A6
2c30noO:i A.
O~ 005A?
'~8"nooo F
6830nt,B1
ot' 005AI
NUMBE~
~
Mluc.ceCLN .. R]
GIVEMe:~
IN SRt.
CHECK TB SEE
I~
TRYING
Te euRs£LvES ••••••
f weN'T De IT ••••••
O~
Oo!5AB
6iJSonC1D
SCS,.
c:eUPL.[S
?1l~
ot'
6~'+00!5Bl
005AO
O~
LI, Rl
LI,R2
CAll.!
NeLIN~
~1l'
1!5
THE BAD NEWS
o~
WRITE
~13q
2il00!5B5
2c20000F A
0 4 100790
6 8 000010
B
PRetMPT
[XIT IN DISGUST.
L I, Rt
NeL.INr:
28
GIYE
CAL.l~t
TEXT
WRITE
"'ReMPT
,ceUPLE
TITL.E:
'DISPLAY ceMMAND V[RB,
2133
~13~
i'1]~
213$.\
Ot' 005A9
O? 005AA
ct' an5Ae
OO!AE
ot.' 005AF
214+2
005 8 0
Ct' 00 58 1
O? 00582
02 00583
214t~
0;.'2 0058Att
~1~4
O?
ooSBe
~1~0
~1~1
ot' 0058'
O?
C?
02
O?
c~
005B1
00588
00589
0058A
00S8S
2cl0n5BS
2~20n01C
C3D'~401
ceUPL.E:S
A
0"100190
6 1 000010
D~C!54COg
BCR,S
A
A
N8LINE
LI,R2
B
.X'10000000'
PF(8MPT
R~FUS£O.
eT~ERwtSE
SA IN
T~E ~PT
CA~.
ceUPL~ SUCCESSFU~L ••
LINE NeT eN. TEL~ 'EM.
UNSUCC~SSFUL~~ TELL 'EM
213~
ANO ISSUE THE
LINE
C5C"4E2 A
C~C.4840 A
03C9n~CS A
4UO!Sn~El A
4U06rH~4e A
'~M T~E
~eT
eN ••
BAD NEWS
DtsP~AV
19l~6
*..
2141
.....
.....
....
214~
214<;
t'1sn
2151
21!5~
21.5~
2154
~1. 55
•
*
~1S6
21157
2158
2159
~160
o;::t aoSBC
02 oosec
o? 0058D
?1.,j
216;?
02 00S9E
216~
ct' 005er:
2164
~16!5
~166
t.>16'
2168
216q
02 co5CO
02 005C1
02 005C2
C;:>
O~
O~
oo5C3
oo5C4
005eS
on5e,
*
DISPL.Ay
6 AB ont,tp
0"8005F#..
3~Conoo'
A
3~Conoo6
6 AB 00919
21'0
O~
2111
t'1't'
2173
02 OO!5C'
3cl00100 N
oosca
20100001 A
02
o~
3C160nooO A
OC!2ooo~o
CeMMANO eUTPUTS !N,eRMATIBN AB8UT THE CURRENT
T~E yNFe eUTPUT IS THE Net e~ US£RS
CURR~NT~Y
eN T~E SYSTEMS, AND THr CURRENT VALUES 6r INTER.
ACTleN AND CeMPUT[ R~SPeNSE TIMEt T~E eUTPUT IS AS
F6L.,L..BwSI
DISPLAY
USERS .'XXX
RESPBNSE 9C% > xxx SFCBNDS
RAOS • XXX GRANUL£S
RES
A
o
SUTCARR
CAL.,1,8
DrSPFPT
Lw,01.
R?
BfNDEceCD
Lw,R7
o~
l~.,Ol
R5
lw,Rs
o~
o;?
Lw,R1
T~L.STACI(
GET eUTPUT
A I, R1
1
l
USERSQT
ADDRESS
LeI
REt
BtNDECBCC
ct' COSCA
~1'~
O? 005ce
O? ooSCC
ot' ooSCD
2 A8onsFB
2t;8!nooo A
3672n002 A
3c20n71C
C? 005e!
3 0 22no03 A
1~
WR!TE
21"
~1'~
21'9
?lBn
ot' coseF
~181
O~
21.81'
218~
ot'
lM, SR!
STM,S~1
STW,F(,
o,R1
2,Rl
Lw,R~
C:AF\'RETR~
F;TW,R2
3,~1
24:200000 A
LI,R~
00500
O~10(')790
00501
Oc2on030
CAL 1 .. 1
Let
a? 00502
2 A80n!5F'£
A
E:TMF
LW,Ol
BAL,SR4
Lw,R6
BINoe:c:eCD
~1'4
~1'5
005C9
eUTPUT LINE SF BALNKS
G8 GET DISPLAY INVB 'ReM M8NITBR
Ne. SF USERS
Ge CBNV£RT Ne. IN 01- ANS. IN D2
PUT C8NVERTED N8 TNTB R7
G! C6NVERT T6 DE~ •• ANS, IN D2
RESET iTMF BOX WIT~ DEC VALUE
MEDIAN VALUE BF TERM R[SPBNSE TIME
Ge CSNVERT Te DEC FeR eUTPUT
RESET M£OIAN VAL.U£ re DEC,
BAL,SR4
.
ep[RATfe~S.
rTMF' • xxx
BAL."SR~
A
V~RB
T~[ OT~PLAV
SVSTFMR
8Al.,SR~
6 AB on9,g
3i,0nooO A
3~Cono05 A
6 AB on9,g
3250nooO A
C6MMANO
LM, S,R 1
:)
£TMFGT
eUFFE~
GET US[RS MESS AND STeRE INT6 BUfF
C8NS8L.E P~INT SUT.
PUT Net 8F USERS INT6 MESSAGE
INSERT CARRIAGE ~ETURN
STeRE rNTS BUFFER AREA FBR eUTPUT
~e. SF C~ARS T! ~UTPUT
wRITE MESS, ON TYPEWRITER
PICKUP £TMF QUeT~ AND PUT INT6 ~UFF
PUT iTMF VALUE INTe BUFFER
Je~
~nl
18136 ,;E:P 08,
2184
ot> 00503
~18S
~t86
at'
oo5D~
O~· 00505
~18'
ct' 00506
t'188
2189
O? 005D'
2190
2191
Oa20nC10 A
ot,)
COSOA
2A8on~Ol
2~82nooo A
ooSOt
219!5
Oil
t'lt~
O~
2191
02 005£0
o~
coSOF
005£1
219q
O? 00'5£2
2?OO
O? 005E3
3~22nOO' A
2c2onOl0 A
0"100790
3i30nooo F
3U30noOo F
22C~
o~
O~
005E5
2e'O]
3AConOOl A
61S0on5E9
~204
O? 005E7
e'20~
O? 005£1
2c~on040 A
2206
2201
ott 005E8
3cConoOl
005£8
2210
?-211
o~
221;:>
02 005E:0
Ot' OoSEC
OoSEE
ot,) 005e:F
221l
ot'
221~
~21!5
C~
221'"
2211
OoeFo
02 005F1
o~ oo'SF2
2219
ot' CoSF]
Oi' 005' ..
2220
O? 005F!
~218
A
6 AB on919
3il0M100
2Ulonool A
'"
Oi!20nC7o A
2 A!5onls08
3~Donoo' At
2c30no02 A
1 b 46nOO6 A
2U30nOO1 A
?5C6nOQ6 A
3cBon71C
Oa2ono?o
2tJ S2nooo
A
A
CeNVBIN
1:1
,
WRITE
MfANQT
o.. R1
~ .. R1
STW,Ri?
LI,R~
~g
CA1.1 .. 1
WRITE
JaJIT .. PROCRM
A\fo R3
8GEZ
JIJIT+PROPRM
RAOPLUS
X'60'
LI,R4
LCW,01
RAOPL..US
DISPI.AV CeMMAND VE:RB
1':2
o.. Rl
21Rl
CARRETRN
INS£RT CARRIAG~ R£TURN
l .. Rl
STBR£ rNT6 BUFFER AREA FtJR eUTPuT
CARRETRf\
1 .. Rl
LW,Rl
681on~E7
2C!4+onc6o A
02 005EA
STWI~'
Lw,R~
005E~
220~
220~
CAL1,1
LeI
LM,SR1
STM,SR1
3~620001+ A
ot'
02 005E9
02 005E9
ll,Rt'
3i2on71C
2201
001,5£6
STW,R;>
04t1on'~o
00509
OP 00500
Lw,R~
3c2on71C
3 0 22nOOl A
2220nooD A
0050S
02 00'508
O? 005DC
STM,SR1
STW,R!§
2t)82nooo A
3O!2nOO2 A
O~
O~
?19~
21g~
~194
~1g~
'15
R~
RES
C8NVerN
0
LW, D1
R~
RES
0
B
LI,R4
BAL,SR~
LW,Rl
AI, R1
LeI
X,4tO'
BYNOec:eCD
T£LSTACI<
1
.,
LM,Rs
STW,02
RAOSQT
R1
STB,R~
Rllt,R]
1
R/"R3
LI,R3
A!IR~
STS,Ot
L\tt ..
SR~
LeI
STM,R5
2
eUTPUT iTMF MESS. 8NTe TERMINAl.
PICKUP MEAN TERM TIME
AND PUT INT8 BUF~~R T8 BE PRINT£IJ
PUT M£AN VAL INT~ BUFF Ttf BE PRINTED
INSERT CARRIAGE ~ETURN
STeRI tNT! SUF'FER AREA FeR eUTPU'f
SIZE ! ; MESS T6 eUTPUT IN BYTES
eUTPUT eNTe TE~MINAL..
PE~M. OISC SPACE REMAINING
PERM • DISC PACK SPACE REMAINING
NEG 'VALUE GET MINUS SJGN
ANO VALUE
8L..ANI< FeR PL.US
C8NV B!N RAO VAL..Ur. Te DEC
GET aUF'ER ADORE6S
,
)(XXXX GRANUL.ES' I..IT
PICKUP ,RACS
PUT IN Net eF GRANULES AVArLA8~E
PICKUP BYTE e'FSET
STeRE BYTE tNT! ~UTPUT e~FFER
SET STBRE FeR LEAD BYTr Or RAO SIZE
CARRETR~
STeR£ L~AD BYTE e~ RAO SIZE
PUT !N SIZE eYTE
O.. R1
PUT IT ALL INT6 ttUTPUT BVFF'ER
,
~nl
18136 !;EP 08,
:?221
Ot' 005F6
~~2?
222::1
222~
O~
O~
O~
COSF7
OO5F8
OO5F9
'75
04+100190
6 A 6on612
6 8 00n010
~22~
??2b
'2t>27
?228
2229
Ot> 005'14
O~ OO!F'A
O~ 005'6
C~ o05F8
ct' oo5'C
0;'> 005FO
*DISPF'PT
13000000 A
USiRSQT
E4+E2rSD9
A
EC40'[~O A
4U40~CA+O A
ETMF'QT
2230
01' Oo5F"E
2231
0" 005'£
Oi? OoSFF
Ct>E:tn.C6 A
4()40'S:40 A
o~
~U4f.OAlO4toO
t?~ll>
ot' 00601
o? OQ601
ot:' 00602
~~33
00600
Ot:l 00603
ot' 00604
02
Oo60e
00606
0060'
00608
00608
00609
O~
0060A
o~
ot'
02
t?234
2?l~
Oi'
01'
OP 00608
Ct' 0060C
Ot!' 00600
~23"
OfSPI.AV CAMMAND ViRB
2~
BUFF'iR eUTpUT 51'[
WRITf;:
CAL1 .. t
eUTPUT BUFFER eNTB TTV
eUTCARR
eUTPUT LINE SF BAL.NKS
BAL. .. SR"
PRBMPT
B
ae GET NXT CMO
LI,R;.t
222onC19 A
~ES
0
DATA
)('13000000'
~ES
0
TEXT
RES
TEXT
..
'USERS
0
..
'£TMF
A
f!'~ANQT
RES
TEXT
D~C5F'2D' A
0
,~e:SP'8f\jS£
D60SF"2C5 A
gOl
<
MS[CS
4UFgF'06C A
4U404loC40 A
4040~O40 A
400~~~C5 A
C~E2~O~O A
RAOSQT
OjC1r.~E2 A
RES
TEXT
0
'RAO!
TrTl.~
tSTATUi
GRANULES'
I
44-01£*040 A
4f.V40~040
A
4t-U4f.040C1 A
D~C1rH5e:4t
A
D3C!U:"240 A
C6MMANO
v[~e,
14:3
2Pl7
2~38
2i.?1~
?~~r.1
~241
~243
~i?~!1l
2~~6
2~4+'
221+~
O~
C~
0060£
0060£
at' oo60r:
at:' 00610
OP oc611
6 AB onl112
*
*
F~TRV
TERMINA~
RBUTINE STATUS~. Ne REGISTERS ARE SET eN
T~E R8UTtNi STATUSL.
TH£ ~INE IS ~UTPUT Te THE
PRBM THE ReUTtN~ STATUSL.
*
STATuS
RES
a
?254+
?~56
225'
2?51t
1*
STATUS VERB IS
T~~
ra
BAL..,S~4+
BA~,Sr:(1+
B
SPACe:
2t'l+g
('>255
T~
BAL,R2
6 AB on612
6 8 00n010
22!~
2P!~
00612
OP 00613
02 00614+
o~
oc615
THE ~A~LewING ReUTIN~ BUTPUTS SNf
SR4 IS T~E ~tNK ~EGtsTrR
Rl ANn R2 .R[ DESTR6VEO
6UTCA~R
0
CARRiTRN
2i:!2onOOl A
~1,F(~
1
CAL..1 .. 1
B
TITL[
T~E
weRK II
DeNE
eUTPUT LINE eF BA~NKS
Ge C8MPUTE AND P~INT eUTPUT
eUTPUT LINE eF BA~NKs
*
*
*...
~tlRl
E8 0onooB A
BELew.
~rNE
4+
RES
04+1on'9n
p~eCESS£D
eUTCARR
STATUSL
eUTCARR
PReMPT
2~10n11C
O? 00612
at'
V~RB
T~E
6 A2onA3C
2250
P2!1
CSMMANO
*.
*
*
t'i.?4~
"-2'+4
STATUS
!;EP 08, '15
181~6
WRITE
*SR4
'SEND CBMMAND'
~IN£ B~ ~LANKS
pelNT T6 CARRIAGE RETURN WSRD
T~E Ne. eF C~ARACTERS T6 ~UTPUT
eUTPUT Te TERMINA~
£XIT
~Ol
SEND ceMMANO
1i!S
*******************************************************.****************
*F*
NAMES
SEND
..
.F.
PURPeS~1
T~E S[ND ceMMA~O IS USED Te £NABLE/DrSABLE
*
*F*
RrCEIPT SF M~SSAGES SENT Te T~E USER TERHINAL
•
*F*
BV T~r CP.v SPERATBR.
*
*r*
DESCRrPTIBNI
T~E DEPAULT SETTING FeR TME SEND F~AG IS
*
.F*
Te A~Lew 6PERAT8R MESSAGES. WHEN T~E USr R SAYS
*
*F*
DeNT Si~O, A~L apERAT8R MESSAGES AH[ OISAL~ewEO.
•
*F*
~eWEVF-RI ANY GLeSAL BReAOCASTS WHIC~ ARE DEFERRED
*
*r*
w~rLE TME US[R IS NeT IN TEL WILL ~[ PRINTEO BY
*
*~.
Tr~ TME N[XT TIM[ ~£ GETS ceNTReL,
DBNT SEND ALse
•
*,*
OtSA~Lews USE SF T~E MESSGE C!MMAND" SIN~E T~E USEH
*
weU~D NeT BE ABLE T8 RE~£rVE ANY eP£RAT8R REPLV,
*
!l;£P 08" '75
1~1~6
~*
~*
4*
S*
,.
~*
~*
<;*
10*
11·
1~*
1:;*
*,.
14*
1S.
11,*
1'*
18*
19*
20*
2\*
2~*
2~·
~J+*
2!;*
2~*
2'·
2_.
02 00"16
O~ 00616
2~301nOO
31300000
Ot' 0061'
O~ 00618
6'I+OnA1B
O~ 00619
2c40naoo
6 8 0ont,1C
01' 0061A
02 OO,1 tt
3i:~ono16
OP 00618
02 OOlt1~
0;> 0061C
4'40noo~
048001F]
O~ 00610
O~
0061E
6lS0on010
************************************************************************
S[ND
A
rQU
•
LI,R3
08NTBIT
BANZ
ONTS[NO
CWIR~
X
L II R4
A
B
DNTS[NO
'"
N
SENDCMN
~QU
LW,R4
~QU
eR,R~
C.l1'~
B
TIT~£
JITE~FLGS
0
srNDCMN
*Vo02
•
C:~ECK F'6R ceNT
USER SAID DeNT SEND
Te RESET FL.A~
MeDE! DEFER arT
x~o
ME~G&: MASK
SET/RS[T DiFER MiG
CTF'PT
PReMPT
'MESSAGE C8MMAND vrRB'
F~AG
.... 01
1R:36
29*
30*
31*
sEF 08,
M£SSAGF CSMMANO VERB
"5
1-=6
*1*
*****************************************************.******************
.. F.
NAME:
M£SSAG[
..
*F.
PURP6S~1
T~£ MFSSAGE C6MMAND 1S USED Te SEND A MESSAGE
*
*F*
T8 TH[ CP.V BP[RATBR.
*
************************************************************************
*0*
~AHEI
M£SSAG[
..
*0*
E~TRY:
MESSAG£O
..
*0*
REGIST~RS:
Ne R~GrSTfRS AR~ PR£SER~EO.
*
*0*
CAL~:
CALLED FR8M TfL CSMMANO SCAN
*
*0*
DATA:
TFLBU,. CBNTAINS M£SSAG~ TEXT
*
*0.
ATBZ • LIMITS FeR ALPHA CHARS
*
*0*
T~PUT:
JB:CCARS. SIZE e~ MESSAGE
*
*0*
eUrPUr:
TH~ ~~SSAGE IS TRANSMITTED r6 THE Be
*
44-
*0*
*0*
l~*
33*
14*
:a5*
l~*
l'"
3F!*
39·
~(')*
~"*
43·
4~"
~b*
4'.
*8.. g*
!SO"
!1*
5~*
~P5c;
*0-
*0*
*0*
*0.
*0*
*0*
*0*
O[SCRrPTIBNI
AN MITS IS ISSU£D T! SEE If TH£ USER HAS
*
DISABLED REC£fPT e~ 6PERAT6R MESSAU~S. Tr T~E MBD~5 *
IS S~T6 WE GIVE T~E US~R AN iRRBR. HE
*
ISSU[ A 'SENDt CeMMANO T6 ALL6W THE
*
ePERATBR Te REFLV T! ~IS MESSAGE.
*
BEF8RE TRANSMITTING THE MESSAij~ TEXT, IT IS
*
SCANNED ,eR L8WERCAS[ ALPHA CHARACT~RS, WHIC~ ARE
*
eeNVERTEO T6 UPPER, SeT~£ ep[RATBR WeNtT SEE GAReA~E.*
t~ TH£ MESSAGE weN'T FIT eN eNE LINFI IT IS 6R6KEN
*
'OEFE~' BtT
s~eu~o TH~N
*D*
tNTB TWe LINES w~ICH ARE SENT re THE Be SEPARATE~Y' *
********************.**************._.**********************************
TITLE
'MESSAGE C6MMAND ViRB'
~O1
~EP
181~'
~;?60
08,
,,5
MESSAGEO
02 0061'-
22.61
CP 0061F"
6AFnnb~C
t>2~~
~~6:1
O? 00620
2cF'onooo A
O~
00621
1~4onooo
22b~
ot? 00622
0" 00623
02 oo6~~
O~ 00625
02 00626
~~69
OP 00627
2050noo/, A
2?'O
C? 00 6 28
ot' 006!9
~2"4
2265
22~b
2267
22'1
22'i=!.
~21:;
22'4
~27!5
OP 0062A
OP 0062B
Ot' 0062C
Ot' 0062D
A
2l40n049 A
6820n626
7~68n106
~2'8
~2.,q
2~80
?281
22SQ
2290
~~g1
229"
t!29~
2~94
A I, ~1
.1>
!i1
M£SSAG[2
-!§1+'
t
wlL.l MfSSAGE FIT eN eN~ L.INE •••
••• > YES.
Ne. GET SIZE SF igCSNO l..lNe:
ANO S£T Tw6-LINF rL.AG.
2~9!§
229~
2cFonoo1
A
022on020 A
2A20n~4A
2~2on106
N
21FonOOl
A
.
ME:SSAGE
LI,04
*
c: I, R1
MESSAGE1
SL.£"
A I, Rt
L II 04
M[SSAGE2 LeI
-1
MESSAGEl
MESSAGE4
0
2
LM,R~
MSGMESS
STM,R~
CI,D~
TELBUF'
1
•• 4t
Bt\£
2c50n033 A
LI,F 0063C
T~£
MeVE TI-f£ BYTe:
OEeRE
MeVE P:M AL.L
LS, R1
6f:52on636
2CJ1FFF04 A
CP 00631
ot> 00638
O~ 00639
Of' 0063A
GET
C~K FeR L.BWER CA$[
EXCEED FL.G
GET f;EceRO SIZE:
ORep C/R& S~ACE
00633
O? 00634
op 00636
T£:L.BUF, R_
T£L.BUr:',R!J
•
!284
2288
Le'~b
b
SET Te MAX
SAVE: Tj.j[ PUr
AOD TABS &ASTERISK
FQU
8AL,04
6 8 0on432
2110nC3] A
~P8'
R~
GET RE:CeRD SIZE
SET INDX&DRep C/R
C~I( FeR MAX SIZE
.-3
00632
Of' 00635
Rt
CASF CHARS
BOR,R4t
8
O~
P285
2286
R4
~eW£R
FL.G
6~4tjn"2g
~~8:1
O~
'2
LW,R5
FeR
£xce:e:o
STB,Rft
02 OQ62t;.
6 AF ont.4C
OP 0062E
22F onooo A
Ot' OO62F
Ot' 00630
'c1onaon x
Ot' On631
2U1F'FFF'e: A
2e>82
,~
.~
C~K
1~1
?56AntOi! N
2(J!5F'FFFF A
2~?6
~2"
JB:CCARS
•• 2
L~,
N
0
BL,E
AI,RS
A
•MFSSAGE4f.
AI,R4
ell R4
LI,R4
2e4f.On049 A
3c50nOQ4 A
3~1onoo5
BAL'C~
LI,D4
LBIR4
x
2V4f.F'F"F'F[
MESSAG£ CBMMANO V£RB
r:QU
15Son10t, "-
0220n030 A
51
TELBUF'
T£LBUF
SET SIZE T6 51
C:~ARS
!-In 1
1R:~'
SEP 08,
006~o
229'
O~
~29P.
Of' 00641
~i?9(f
o~
Co6~2
00643
2300
o~
~301
230~
2]O~
00644+O? O064!5
O~
0064+6
~304
O~
0064+'
230!5
0' 00648
O~ 00649
O~
2]0(;
·,5
2ACon'£~
LM,01
21F'onOO1
6 51 30n/,49
Oa2onC20
2t'2onl11
1e>100111
22Eon111
0-2onooC
6 8 000010
A
el, D~
A
N
LCI
STM,R?
STB,R1
LI,03
CAL1,2
B~E
N
N
A
~ESSAGE3
2307
*..
~308
230Q
at' 0064A
2310
ot' 00648
0005n55C A
5~5CRC40 A
~311
02 00641;..
231?
1*
~
.
,.
t,.
8-
g*
10·
11*
B6UNO
DATA
•
D!
1
MfSSAGE3
2
SEND
1~8
T~E
MESSAGE
INSERT TABS & ASTERISK
TFL-BUrr+1!
rSR 2ND PART SF MSG
INSERT BYTE CeUNT
T[LBUF'+11
BUFFER ADDR F 6R p' PT IN REGS
SEND 2ND ~ALF eF MESSAGE
T£I.SUf='.11
01
PR8MPT
8
X'OOO~o55C',X'5C5CSC~O'
•
rQU
C8NV[RT l.ewER CASr:.- C~ARS
**********************************************************-*************
GRP Ol, 00-00
FRFH'R:
*E*
*
D£SCRtPTIeN:
USER WANTS T8 S~NO MESSAGE T6 6PrRATeR,
*E*
*
*[.
BUT Hf! weN'T BE ABL..E Te RECEIVE A REPLY.
*******************************************************************.****
CALi,3
cecSTATC
GET TERMINAL STATuS
C:~,SR~
Yt;
MeOE! OliFER erT
SAZ
OEF'ER NeT SET, MiG e.K.
•• 3
L I, Dl
X'030000'
OrSAI.Lew (ERRMSG KEY)
.
~.
5*
~SGM[SS
e
MESSAGE4
3*
o;:t
0064C
O~
0064+-0
O~
o06~E
02 0064 F
02 00650
0'+800511
31 8 0n01£ N
6a 4on/)51
2cC lODOO
A
6~Oon'o£
~313
at? 00651
'~1onooo X
t»:~ 1*
~315
231~
o;:t 00652
3c40nOO1 A
204FFFFF A
?2S8n10ft N
O~
006!3
~31~
Oi.' 006!~
CP 00655
C~ 00656
t>:i19
232C
'-321
~31'
CAL.1'~
04t2onoaC A
MESSAG[ CeMMANO V,RB
SFNOM[S
1~50n1,5C
6 9 6COh58
ct'
co6!31
2050no~o A
O~
O~
00658
00659
1558n10'
204':"F'FFF
.
~ESSAC3E5
8
CMNERR1
LB, R1
LW,R4
J81CCARS
AI,R4
Le, R!!§
C:L.M,R!;
BCS,6
A I, R5
GET R£c:SRO SIZE:
~1
-1
T[l.,SUF,R*
ATeZ
GET OATA
IS IT LewER CASE
5+2
~e
X'40'
YES-MAKE: IT
~
STB,R8
T£L.BUF,R.
fA
,A1,R4
-1
UPPE~
"'101
18:~6
232~
;.tl2"
sEP 08"
0::> 0065A
O? 0065B
·,5
E800nooF' A
...
OOOOnOAg A
ATez
OUOono81
.
t?32~
2J2~
2]2101
~!2'
O~
Qo6!5C
O? 00650
~328
~329
CBMMANO ViRB
MFSSAG£5
M!SSAGr;
6~10n6!34
A
BDR,Rt
e
*04+
seUND
DATA
8
TITL.~
'S.CKUP
X'''9'"X'.81'
CSMMANO
z •••••• T6 •••• A
VERS'
leg
Hot
!=;EP 08,
1~:j1'
t'3]n
2~31
~33~
~33~
~334
t'33~
.,5
02 0065t.
O? 0065£
6 AAnn48A
O? 006SF
6 AB nn9AD
O? 00660
6 A4onoOo X
O~
00661
~3l'
'-33~
~33~
234+0
~:;~l'
C;? 00662
2100noo] A
tt3~]
~~'+4
OP 00663
Ol' 006~1+
O~ 00665
C? 00666
6930n,..67
Ot' 00661
O"80n70~
~34~
234A
~3~'
~~~~
~:;5'
2358
'359
~1~O
23b1
~]6:>
~16~
2~64
O~
O~
O~
O~
00661
6880n~{,B
Oo66g
2cC3n~01
0066A
00668
Oo66C
00660
0066£
23'~
Oi' 0066"
o~ 006'0
~~6~
00"1
o~
8AL,SR~
68oon'o~
1~O
GET FILe NAME
~ ACCT, PSWO, TF
G£TFI~LD
Fro
'MTELCL
Flep
PR~SENT
SAFETY CLeSE
T[ST Tr FILE EXISTS
B~£
lI,D1
LIIRn
e
.+~
IT EXISTS.
CeDE
Xt030P02'
i~ReR
ClEANSTACK
SIMULATE
GtTPG
G&:T It PAGE
TsiRR
~ SuBceo~
BAL •••
*****************************************************.*************.****
*E*
fRR6R:
*
G~eup 03, CeD~.o~,SUBCeDr~01
*
O£SCRTPTtBN:
*
FAI~EO 18 GET PAG£ Te R£AO BACKUP ~i.CeRO
*
******************************.****************.*****.******************
A
3cEon7CF
3c r on'Oo
4t6e:onnoo X
46"00001 N
2c1onooi+ .14
O"lon,eFr
BACKUP C!MMANO V[RB
•
***************************************************-********************
*(*
r:RRBR:
*
*E*
GR6UP 03. ceOF.Oi, SUBceeDE'02
*£*
n£SC~TPTTeNI
*
*£*
T~E FtLE NAMED eN T~E BACKUP SR GET ceMMANO
*
*E*
OBESN'T ~xrST.
*
************************************.*********'*******.*****************
cr,Ro
3
oers FYLE ExIST
*
a351
t»35P.
o~
O~
O~
BAL,R4
6S0onooo X
'~50
~]!3~
BAL,SR~
2cC3n'02 A
2cOon90F
~3~q
'3!5~
?:;t5a
2'355
~QU
eALISR~
6 AB onB6 F
~3lb
'~~1
BACKUP
35£:onooo X
.*
BC~,g
•• 3
lI,Dt
B
X'030~01'
SWITCH ACC8UNT
LW'O~
Lw,D~
XW,D:1
XW,D4
L I, R1
CAL111
STw,O~
C~NERRl
T8
:svs
SVSACT
SVSACT.1
JIACCN
I,
GeT PAGI
Ne PAGr, ERR6R
TELL usrR ~ ABeRT
oe ePF.:N !NeUT
JIACCN.1
4
rr6R INSUT
ePENBl cn6a9
3bEonOQo X
3 bF annol N
O"Son'D3
stz£
SIZER
N8
•
10
F"LePBur:-+g
*SR2,R,
10
2
WRtTERC
PGORep
'MTEl.CL
Bt 006A6
O~
211on001 A
6 8 2onRF7
22Conooo A
2i30nooC A
6 AA on8AO
21'on004 A
6 9 2onsr:7
006A5
O? 006AD
O~ 006A£
t:'45p
Oa"ge»
************************************************************************
*F*
NAMEI
J66
*
*F*
puRPeS~1
T~E Jee CBMMAND IS USr.O T6 INQUIRE INTB THE
*
*F.
STATUS e, BATC~ JeBS, MULTIPLE SvSlOS ARr PERMITTEU *
*F*
eN A SI~GLE JeB C6MMANO LINE.
*
************************************************************************
JaB
FQU
•
BE
CI,SRt
BE
Ct,SR1
BE
CI,SR1
BE
F'QU
L I, Rt
o
1
JRUNNG
~
JwAIT~RN
:a
JONTe:XT
•JWAIT,ST
•
£~MSG
T~£RE
WAS AN
ERRe~.
ISSUE THE J8B CA~.
IS THE JeB C~MP~£T£D
THE Jee
RUNNING
REST6RE
ceMP~ETEO
BUF
R6uTINE
JeB RUNNING R6UTINE
WAITING T8 ceM~UTE
THE WAtTfNG T8 RUN R6UTNE
T~E
IS JaB WAITNij Fe~ SVMBr6NT eUTPUT
VESI Ge Te WAITING FeR eUTPUT ReUTNE
T~£
JBB NEVER EXISTED eR JfD' IS
~O1
~EP
181~6
f.'~5'"
245g
~46o
?4';~
Of.' on68S
~46]
O~
006B6
02
2464
2t46!;
02 00681
~46~
O~
00688
~46'
246~
at'
02
00689
~4t,9
OJ)
on6BA
~4'O
O~
006BB
O~1on7go
680on~BA
OO~8~
2aC!n902 A
2ClOon,C6
6 8 0onooo X
OO,e~
?4+'~
OP 00680
?4'4+·
O~
O~
0068'
'24"
o~
O~6C1
i?4'~
~4'9
ott 006Cl
o~
006C2
2480
?481
OP 006C:4
2~ClngO"
248~
0;':> oo6C5
"Oon'SA
ot' Oo6CO
3iFonoOO
t!48~
'2485
ct.' O06C?
O~ 006CS
~48~
0' 006(;9
ot' oo6CA
L 1,01
B
JDNTEXT
r:QU
L1,01
JeSMSCi
LllRc
JWAIT2RN
8
r:-QU
LW,O,
e.L,S~4
Lw,04
A
A
STW,D4
2aOon~C~
LI,Ro
L 1,01
BAL,SR~
6 8 00nooo X
8
JWA!T2eT
A
02 OOltC6
006C6
02200020 A
O~
JRUNNG
B
r:QU
2cC3n903
,ABanoOo x
35F!nOOl A
02 OO'C~
r'484
1.*
3 2C onoO A A
6ABon9,g
r;:QU
LII 01
22C3n901 A
02
~48'
JCMPI..T
OO~B7
01' 006BC
~4'~
B
2lCln900 A
6 8 00nl!BA
24?t>
~4'5
CAL111
6 ti OonotD
~411
Co6BE
Ll,R~
2220no04 A
02 OOt,B5
~4~1
JeB CeMMANO V[RB
08, '15
C~ 00682
Ot> 00683
O~ OO6B~
~QU
L 11 01
MULJ6B
B
[QU
PULl..
PR6MPT
INOECtPHERABl.[ SEND BUT
T~E ,£1-1, M£SSAGE.
G6 BAeK & GIVE ANBTHER PRBMPT
J8BMSG
[RRMSG KEY F"R 'C;sMPL.ETEOt
T~LL US[R , SCAN '6R M8RE
4
WRITE
•Xt030900'
•)('030901'
J5eMSG
•X,030Q02.
MULJ6B
T.e:RR
BtNDe:CBCD
OP
X'030903'
TIERRTXT
l.R1
MULJee
T.WRTfrR~
)(t030g0~'
~RRMSG KEY FeR ,UBESNT EXIST'
T8 Leek FeR MeRE ~YSIDs
*
PUT
SF USERS IN RUN ~UEU~ INTe D1
Ge CBNVERT NUMBE~ IN 01
C6NVERTfO NUMBER
£RRMSG KEY FeR 'WAITING:'
GET T~~ TEXT FeR MSG
STeRr ~FX NUMB~R tNT6 MSG
T8
CI,R1
t
9LE
PRBMPT
68000"9'
8
Jea.2
'SWITC~
C~[CK
wRITE MSG
FeR
M~RE
SVSIDS
[RRMSG KEY FeR 'WAITING Ta fliP'
~,R1
OA10n10o ~
21100001 A
6820n010
TtTL.F"
£RRMSG KEY FaR ,RUNNING'
TYPE MSG
•SR3
•
JeeMSC;
•
1:34
C8MMAND VERB,
H01
!;EP 08 ..
11\1~'
SWITC~
'15
~.
~*
4*
5*
,.
~*
~*
q*
10*
11 ..
1~*
13*
14+·
02
0" on6C:B
0' Oo6CC
02
O~
o~
t~*
oo,c t1
2a30n(J()t A
3130nooo X
006CD
684on8~F'
006CE
21100001 A
006CF
6820n~F"F
02 00600
1~*
OP. 00600
6 A A0048A
1'*
18*
19*
20*
21*
O? 00601
OP 00602
O~ 00603
02 00604+
2160t"lC7~
2~*
~~*
21+*
25·
2A*
21.
28*
29*
30.
Ot' 00605
o? 0060,
Of) 00601
O~ 00608
Oil 0060,
02
21ConoOg
21ConoE2
LB .. 01
C I, D1
BE:
C I, 01
e~[
SWSET
00600
N
2C!BooOO6 A
680onbDO
2cEonooo A
09Eontoo
Ot:' 0060£
3~·
O~
3:'*
34t*
Oi' 006£0
O~
006[1
3~.
O~
3~.
O~
006£2
006£3
2cF'on03F
3-·
QP 006£4
68oon~'6
OP 006[5
eG
A
OO,OA
]1·
37·
B~E
CI,R7
A
A
2cEon(')~F A
0060F
CI,R"
A
OP 0060A
Op 00608
0, 0060C
O~
BAL,SR~
6 8 30nltOC
6 9 30ngP-7
2iFonooo A
6 AAOO_8A
31Con71A
6930nbE:S
A
217onOOl A
135
•
6 9 30n8F7
2170no04 A
6'20n8F'7
,atonooc
CBMMAND V£RB
**************-*********************************************************
NAME:
SWITCI-I
*F*
*
PURPesr:::
*F'*
T~E SWITCI-4 CBMMAND IS USED Te S~T AND RESET
*
T~E 6 PS[UOe.SENSE SWITC~ES IN THE USER'S Tee.
*F*
*
S~ITCt-.l SETTINGS MAV NeT 8£ CMANGe:D ~XCEPT AT
*F'*
*
JeB STi:P.
*F'*
*
**********************************************************-*************
swrTC~
rrQU
JSTEP
L II R~
ARE WF:
CWIR~
AT JeB STEP
JITELF'LGS
SAl
NTJBST
Ne .. tLL[GAL
C11 R1
A NULL ARGUME.NT M'ANS
1
DrsPsw
eL.E
DISPLAV CURRENT SETTINGS
F:QU
SWGKEV
sWF(SET
GE'TSW
.
•, ,
G~TFIELD
SCAN reR SiT SR ~~ET
IS T£RMtNAT8R ceRRECT
SYNTAX
4+
N8
SvNT.AX
,,
Ot
~
SwRSET
'S'
SYNTAX
L II D~
..X.3F.
B
*+2
r:QU
LI,D~
MAXIMUM KEYwBRO SrZi
T8e erG"
STeF' New
CHECK eNL..Y 1ST CHAR
IS IT
VESt
RSET
IS IT SfT
NB, sa IT'S
ILLE~'L
16 ST8RE: l'S FeR SET
O's FeR RSfT
0
TEt STBRE
PUSH
D::a
SAVe: SrT/RSET FLAG
L88P
FeR, SWfTCH[S
CNT~
Lr,SR~
I)
LIID4+
BAL .. SI(,
0
GrTF'IF'lD
SCAN FeR SWITCH NUMBER
Cw .. 01
TXAL.L.
IS IT ALL.
Nt!
YES .. ALL 6
8~E
LI,D4
..3
X'3F.
8
GfTSWX
CI .. R,
1
IS FtE:LD
SWITCMF'S
LEN(;iT~
S'NGLE DIGIT
~O1
~Ef'
181~'
3q*
~o*
~1*
~~*
~~*
44.
~!;*
OP 006£6
O? OC6E?
O~
O~
O~
ot'
O?
... ~* ot'
474~*
08,
006£8
006£9
on6EA
Oo6~B
oc6e:C
006£0
o~ 006£E
OP on6EF
49.
ct' oc6Fo
5C'l*
51·
0' 006F'1
!S~"t
o~
or.
006'2
006'3
,,5
Sw%TC~ CSMMANO VF:R8
69lnn$\"
B~[
1il50nooC A
2150ncF'1 A
6 9 10n8F1
ct,R~
01
,1'
8L.
SYNTAX
2150no'6
"20n8r:7
8G
4t:t50nC04 N
2iConOAto
aAsonOOfi
2tsCAncon
A
A
4f.9FonnoC A
216ono68 A
6930n,F,
6 4t Bon6£O
5",*
SA*
5~*
01\'0' 006F'4
ot" on6F'!5
~n*
02
Ed·
E);:t*
O~
6~.
O~
Oe6F'6
006"
006FI
6~*
O~
e~·
Oio' 006,:'9
66*
f!,7.
O~
O~
e8*
ot"
~q.
OP 006'0
o~ 006FE
'0·
71·
,,*
'jl*
,~*
?!i*
ot'
ot'
006'14
on6'B
006F'C
2~C3neoo A
6 8 00°'°£
OOIlF~
2160n05r A
6 8 30n'F'.
2110nOOl A
6 8 10n8F1
006FF
00700
O;;t 00101
0;.> OC702
2c20nOO2 A
22?F'F'F'FA A
GET C~AR
CHECK tF IN
L.IMIT~
C8NV[RT Te BINARY
MAKE A BIT Ta SHIFT
F'eR Rtat-4T S~lFT
SL.SID1
BF(,D4
OIRS
MERGE
8N[
., ,
SJ.lfFT T8 PReP£R PBSfTf6N
01
GF'TSWX
Ne, GS ST8RE.
BCR,S~4
GFTSW
YES ..
MeRE IN THIS GReUp
Gs oe IT
**********************************.*************************************
GReUp 03, 08.00
F'RFHtR I
*£*
*
nESC~fPTteNI
Tt-4£ USER SPEcrFI~O MeRE THAN f, SWITC~
*£*
*
S[TTING IN A SwITC~ SET eR RESET GReup.
*E*
*
************************************************************************
L I, 01
[RRBR ceDE & SUBCeO[
X'030BOO'
...
GETSWX
8
CMNE:RR1
F"QLJ
•,, ,
Cl,R'
BE
•• 3
BGE
SYNTAX
PULL..
D~
C I, R1
sTS,o~
CI, R1
6 8 1on,Co
6800n010
3~Connoo F
25C on01A A
SYNTAX
MAt
1;j6
ILLEGAL IF NeT AI.L
)('*0'
R!;
CI,R~
08£00100 N
41e:onoo~ F'
211onOO1 A
02 OOltFI-'
,,; ,
Ne,
L 1,01
LCW,Rs
AP\O,R!';
A
55-
sq*
C:IIR~
A
S~*
51.
LB,R~
SYNTAX
BGr
8
CrSF'SW
~t;u
LW, D1
SL.S,Dt
1
,SwGKEY
JaJIT+SS
PR!MPr
•JIJIT+SS
~~
LI,R~
~
LI,~'
-6
NEW
YES
tiReuP CeMING
Ne,
[RR8R.
[NO BF LINE
feR S[T BR REsET
IS T~£R£ MeRE 16 SCAN
Y£S
oe STeRr;:
GET CURRENT SETTINGS
SHIrT LEFT AL.L THE: WAY
,eR WRITE.
CeUNT
HOl
1813'
,,,.
".
,tf.
ao ..
,~*
B1*
8~.
8~*
~48A
~£P
08,
Oio' 00103
·,5
2~ConOOl
swITC~
A
OSWLfH'P
SL.S,01
C~iCK
IT'S eN
00104+
00105
6!i80n'O?
BCS,g
SweNe;
22100'18
TXO
OJ) 00706
61:5000'08
C~
2C10n?19
L II R1
8
O~
O~
00107
0;> 00708
O~ 00'09
O~ on10A
0"100790
65100703
6 8 Oon01D
SwBNE
L I, R1
CALl"
BIR,R?
e
TITLE:
CeMMANO V;:RB
1.
A
BIT
IT'S 6F'F
$.2
Txt
WRITE
oswL.eep
WRtT[ Tt-IE eNE eR ZERe
De NEXT
PR6MPT
'BATCI-4 C8MMAND VrRB'
13'7
~n1
1RI~'
~~8C9
~EP
2~'("}
OJ!' 0010 8
~Af.91
~49~
OP 0010C
2~93
,,5
08,
02 OO'O~
0;> 0070D
8ATC~2
1c6nn73A
22Conooo
680onoCR
A
rQU
LO,RI1
L r, Dt
B
TITLf
eATC~
•
C8MMANO Vt;:RB
BATC~
a
GF on11B
A
D30'.~40 A
t'5 ~!5
~S~~
2!§~'
~~~A
1 ..
~*
~*
2S4Q
~55"
?~5'
~55~
l;'!li61
~56P'
~~(,~
~!=i6'
2!5'~
2S'~
OSD'4n40 A
060840*0 A
06Esr.p;D9 A
r:040*C40 A
F'140*040 A
C1C:iO:i4l'l A
0060ncoo
OooOoo1t;
2~5n
t'!551
1*
;>-
D4tC54n4()
0000001 6
A
~
,;
EXT
00000011 s
on71C
oUoonooo
at?
C6C8~F4+0
O~ 00110
1~J+oncoa
ot> 0071£
OU200008
Oi' 0011F
03Cgn!5CS
O~ 00 7 20
0'
on'~1
Of' 00122
Oi' 00723
OP Oo7i!~
OP 00125
~O40.040
A
A
A
A
A
10!Aooon
A
C7J+on~og A
01000008 A
~57~
OP. 00126
P5!1
258;>
~!li8:1
00721
Oi' on728
Oi' 001t.'9
OP cn?2A
Oi' 00126
O~
oo12C
OUooooFo
OOOonoF9
OOOoncC1
A
O
OO'l~
O~ 0073!5
~~9n
'75
00120
Oi' 00 7 36
02 00137
~!§91
0' 00138
ot' 00'39
2!;9,.
CP 00'314
~593
C~
C~
0073B
0073C
OJ) 00130
03C't':407 A
A
A
A
C"C;!~3e:i A
Cl4+04040 A
Oe)C .. r:50] A
EJC14040 A
04tCer4Cg A
E34Q4040 A
05e!rtE~ A
C3CS4040 A
o"D3r~os A
0240401+0 A
,
,
TABLES' CSN9TANTS.
,,rDP'
F'DP1
TEXTC
TEXT
TEXT
UNOER
TEXT
'UNDER'
OEI..TA1
T[XT
.O£I.TA,
OELTA
TEXTC
EOIT
TEXTe
,rOIT,
BATCH
TiXTC
tBATC~'
LINK
T£XTC
'LINK,
FOP'
A
A
TEXT
'FOP
,DEL.T.'
0704rgfl A
C1£2'804 A
~£TASVM
TEXTC
'M£TASV~t
O~
TEXTC
'F'e~T'
2n9~
O"Cbn~D9 A
E:i404040 A
ob03n6C7 A
D605~o~O A
F'BRTRAN
00741
OP 00142
OJ:) 0074+3
LeGerF
TEXTC
'LeGeNt
i'Fi9'
C~
on74~
obC2~1E2 A
BASIC
TEXTC
2S9R
007Jt!
00146
C'C:g4040 A
'BASIC'
O~
O~
xs~ew
TEXTC
oo1~'
E6 4toa04Q A
'SHew.
O~
ot'
eeUNO
TEXTC
0'
OO,~g
O~O"'AE2 A
C'404040 A
O~O~~AC' A
D64tO~04tO A
04+0 .. ,.03 A
TMISI
8
00 1 48
TMIGe
TEXTC
, ~11 Ge t
TMILe
T[XTC
,MIL-e,
TMIOS
TEXTC
'Mece,
259*
~!595
CO'3E
007lF
Oi' 001.0
O~
O~
1'599
l'600
2~O1
Oi'
OO'4+A
0074B
01' OO'4C
0" 0074D
O~
t'"O~
?60~
P~04
Oi' OO74+E:
at> 0014F
04+E2r';8C#) A
06404040 A
O"04~AC4
A
06404040 A
*
'MISt,
AND SUC~
14+1
~Ol
i8::'ol~
~605
2~O~
P.b07
OP 00750
C'O~n'E4 A
a~
Ej40r.B09 A
D306n960A
D9C!5':":;09 A
£ lt 4f.04f.040 A
08E.r.CJE~ A
6"'404n~o A
40J+Or:"6C9 A
00151
Of) 00152
0" on753
Oit 0015 ..
~~OR
O~
00155
O;J 00'56
;:t60~
O~
Q~
OC751
00758
Oi' 001!9
at' on?!5A
Ct' 001eB
21, 11
2612
2A1~
ct'
OP
on'ec
on'!O
C"E:gr.~'E
40404040
4f.04f.OrllC9
05C:SJ:"2'£
4tU404040
A
A
A
D5DftnSC5 A
~blq
CP oo?go
02 OO?!1
o~ 00192
~b2n
O~
2618
00193
~"2'
Pf,28
?~2q
~63n
2631
~bl~
BKMSG
TEXT
wrOT~
TEXT
LLINES
TEXT
t\6NE
TEXT
..
110onooo
300onooo
8QOon001
80oon002
N
A
A
•
'QUIT ,
WrDTH~
'NBNE'
RES
SO
IS THE G~NrRAl PLIST FeR w~tTING THReUG~ THE MaUC O~B.
ADORESS MUST 8E IN R1 AND TH~ aUFF[R SIZ£ MUST Sr IN R2.
T~lS
*WRITE:
GEN,R.~~
G£N~
1,
~
G£N~1,~1
G[N,8,~4t
ot?
FOOonooo A
OOOon
on?,
00''''
007A8
00'.9
CO?AA
C~ 00'A8
O~ 007AC:
ot' 001.0
ot' 001A£
O~ 001AF
02 00 1B O
C~ 00781
0' 00'B2
14tOon13l N
Ctl4Sn'19 A
OUoon241
OOOOn31+1
OOOonOOA A
OOOonoo~
A
8000n002 ..
OOOonn02 A
OOooooto A
010Co~oi'
06'Ar:4E'~
CeO'F'~40
A
A
A
0200n'02 A
*epUSR
T~E
weR~S
X'iC"MITEL
X,880C0010'
X'1t"MITEL
x.B000001n'
e~£N
G£N,8".
TH£
~eGIN ~tL£
X'ie' Te vs£ re; WRITE
kEY NeT SET
FeR 4
C~ANGE
IN
~A$SWe~O
X'l~"MITEL
OAT.
X,CB_a0219'
DATA
!pERR
ePERR
PZl
.~
~
RETURNS IMMEDIATELy
TRIF.:S
10
2
OATA
OIRECT
MeO£ (IN R2)
SAVE
OAT A
1f'.
G£N'R.R,~,g 1'nI2'~
TEXTC
MeDI~Y
FeR RWUSR T6 oe wRITE
GEN,~,~~
DATA
OATA
OATA
OATA
L&GIN R[CSRO
epERR
*R3
BUFFER AODR IN R3
L8GSIZE+L8GStZE+LeaSIZE+L8GStZE
*R3
kEV AOOR IN SUF~lR (Ra)
•• RWUSR
GEN,~,
~ZE
* PLIST USEO Te
265~
2660
c.ue.
OATA
** 'IRST
*wUSR
1JA54
26151\
* PLIST
*RwUSR
RWUSRSZ
~#)50
peS'
GEN,R6,4 X.14'60
GEN'1~._.1P
06X'A"O
GiN, 1 f,. 16 •• 0
GEN,~,
00'.0
OOOonl41
00'.1
8000no02 A
001A2
OOOonooo N
OC1A]
8000noO] A
00000006
2649
~b!5;:>
2b5~
FeR A 'ME. SPECJFICATtBNcep
sue~
LAB£~.uC)
6'~
O~
26'Q
O? 00'e9
~b80
O~
~~81
ott 001SC
~"8~
O~
007S8
on?SA
007B£
2 8 00nooo N
8(JOonooo A
OaOonooo A
OaOonoeo
'68~
t68~
~"81
~A8~
2689
2690
0" 0018F
GEN,8,P4 )( t 28 , , M : UC
*• PL..IST
*8P£NBI(UF'
GEN,l!t~
0
GEN,]~
C')
FeR
OOeon~9o
Of' oo?C~
0000n'8-
DATA
DATA
ot' OO?Cl
~69~
O~
OO1CEt
1',;94
2695
26gb
O~
007C'
007Cs
001C9
C~
O~
02 007C ..
O~
007C. 1
ot) oo'CA 2
OP co7CA 3
001C8
Oft on1CC
O~
02
on1CC
80000009 A
OOOon~Oo A
oOeonOO2
QOeonao;:.
A
OOOono02
OUOooeO?
A
A
A
80000001 A
01
00
o:a
03
..
ep~NJNG
G£N,g'~4+
DATA
o~ 007 C4
02 On1c!
2b,g
11+000133 N
A
X,OF£'80lF,
XtAF'CoBF'9F'
G£N,1,::Il 1,0
GEN,~a
0
F1*lon19
2691
269,:>
~b9'
•TABPI..
Oi'
007Co
CP 001C1
,
OEvICE Pt.tST FeR TABS CeMMANO VERB.
OUOonOOoA
OOoonooo
OOOoonon A
268l
,
DATA.
DATA
*
*
4
'6'~
*26',.,
TABLES, CeNSTANTS. AND SUCj!.f
'ISYS'
TEXT
TEXT
G£N/8,~'A,8 3'1,2,~
0301n2o,- A
Df'£F'''o3F A
Af'COBF'QF A
2#'1~
2686
SF'CAC
PZ[
T~r:
BACKUP RrC8RO
X'l~"MITEL
)("'*"0019'
RO£RT
ABRTN
-SRi
DATA
10 .. 8
OATA
I
DATA
'2
G[N'1'1"~11 11n,R1
OATA
2
DATA
CAT A~ 1.
1'01],3
,
A
A
A
08C"ACt'. A
C1C3n2e:~ A
0 7 40 .. 040 A
TEXTC
'FIBACKUP,
AeN6RMAL RETURN
MAXIMUM REC6RO SIZl
kEVED r;tL,.E
OIRRECT ACCESS
MeOE
SAVa:
MAXIMUM KEY L.ENGMT
1J+~
~n1
11i1:~6
~£~ 08, "5
~b9q
O~ 007C[
Oa
O~ 001C£ 1
01
a~ 001C£ 2
02
O~ 001CE 3
Oi
~'on
OO?Cr
1AE2V~E~ A
O~
00100
4040_0~O
0" 00701
OC-oonaot A
~'O~
270Fl
~'O#t,
Ot\' 00702
0800n001 A
'-'01
~'08
~70q
~'1~
OP
OO?O~
~'1~
ot' 0010!
t'11~
0010&
Of' 0010'
ot:' 00108
O~ 00109
2711,
2717
~?1A
O~
1000rH~~ N
eaOonn10
"21,
iJ'27
~12P.
, I SVS
Te G£T A PAGE ,eR
GETPG
GEN,8."t'
PLIST
PGCRep
T! R[L~ASE A PAGE AFT£R
GEN,S,?", X'Og'~n~1
•
..
PLIST
*~~ADBKUP
~BR
REAOING
GEN,8,,_
T~E
X'oS'.n,l
T~E BAC~UP
1't5
00000800 A
..
OATA
DATA
*w~IT[RC
10_8
Bt OO1F]
O;:t 007F~
062onnoo
Oleanaoo
0" 001r:5
8000noo_ A
A
A
17.
1~*
it:)*
20*
O~
o~
007F6
007'7
8700rtOOA A
A
a
06
05
ab
au
01
01
01
01
Ol
oa
au
ot)
SUC~
14+8
TERMTAB1,2,3 ARE: ALL THE SAME.PARALLEL TABLES .... •
0,1'2,3
esc TRANSLATI6N TABLE TAeL.f
0,,,·,1
0,4'6,8
OUMMY,4It,6,a
A
/4.
A
A
OATA,1
10,2.1010
A
OATA,1.
'it
A
A
Tl
BeUNC
~
0"14.,1
!5 ..
DATA"
0 .. 1,1 .. 1
DUMMY ..
OATAI1
1 .. 312,0
SAPL, M[M8, EX!CI OATAPfllNT
DATA .. 1
5
11
~QU
BAC.'.BAI'iRMTAB;)e1
...srlETA62
rOLE ALG8RYT ... M NUMBEJ( TASLE
0000000"
Ol' on80A
0' 0080A 1
CP 0080A 2
O~ 0080A 3
O~ 0080B
ot' 00806 1
O~ 00808 2
O? 00808 3
TABLES, CBt\iSTANTS, AND
•• TERMTAB1.1
OAT4,1
A
A
A
A
A
A
2801
~AOP
~80::l
~80~
**SIZe: SF
*
'ERMTA82
rQU
A
A
A
A
A
*TE~MTAB3
s,S,S
M3l, M"!;' M37, 101!
fsro,
E4~L, ..
SSTD
A
A
A
A
A
A
It
A
eeUNO
4
~n1
1~1:-:t6
~~Oq
'~1n
sEP 01 ..
TABL[SI CeNSTANTS, ANO
'15
OOOOOOO~
SrZETAB3 pQU
TITl.r
SUC~
BA(.).8A(T~RMTAB~).1
"
14t9
~O1
sEp C8"
1~:1'
'?5
1~O
2811
*
~eLLeWING GR6UPS eF ceOE ARE T~E ViCTeR AMPLtFl~RS FeR THE: LeAV
** THE
AND ceNTtNU~ TVPE SF CSMMANOS. TI-fE ceMMAND VER6 IS TRANSLATED INrB LM~
*ASSEMBLE L I" 01
PARSER
~~1.~
?R1~
~~14
?R1!1;
O~
on80E
2816
O~
oolOF
~R1"
;>81R
O~
C~
00810
00811
~~lq
O~
2820
2cCnn1"'O
lc60n135:
6aOonoCs
CeMPII.E
21lCon1~O
00812
O? 00813
680onoC8
OP 00814
Ol' OC81!
1260n'2C
1260n'40
2824
onS16
0; 00811
2A2~
?8~6
Of'
~82,
0;>
282R
Oi' 00819
t?82c.:J
~830
OP ac81A
O~ 00816
2831
ot:'
t?83~
0081.s
oo8tt:
*
FCLCAL..L..
6 8 0onoBo
6 AB on9AO
2i!5onOeQ A
4+ Asonooo X
6830n13C
2iF'0.000 A
4+1Fonooo
ESoonoon
MFTASVM
L I, 01
lD,Rb
PARSER
F'eRTRAN
LD"Rt,
B
peL
speASP
e
t'~21
~82~
~A2~
LO,Rb
e
•FIDER
BAL,SR&
GReUp,
GRBUP,.
FlO
LI,R~
eNS I T+!VERB IT'
LS,RS
JITEI.'LGS
SET UNKLMN Te STOP SCAN
G8 BR~AI< Fro
wAS eV~R/eN SPEC1FI£D
TrSTSI
N£tTH£R
LI,04
FJPRec:
STS,D~
JITEL.,LGS
SET FLAG T8
X
A
B
·0
BEZ
TITL..r
"~UN
INOlt;AT£ •••
••• ,IL'-' HAS SEEN F'R8CESSED
[XIT
AND LINt< C6MMAND VERBS'
~C1
~EF'
1":::t~
P~ll
2834
O~
os,
on81D
~8:;~
OP on81[
O~ 0081F
i'A~'
0" 00820
2Rl~
RuN AND LINK C6MMANO VERBS
"5
02 OOs10
:?RJR
at) 00821
~R29
Oi' 00822
2a5F'~F'F[ A
4 ti 500noo X
A
1c6on1lC
6 SCOoCes
..
..BREAKER
t'R4~
~8~4
~g.~
OJ)
~AI+~
o::t 00823
4t:tOonooo X
284'
O~
O~
00825
6ABonooo
00826
6t400nOl~
1*
c,
on823
0082~
3~Oonooo
x
X
•
.~
A~DIR!5
STWIR~
Jlcppe
L I, D1
0
J:CPFle
LO,RI,
LINK
8
GReup~
*
*..
~~~1
~A4~
1-'84!
~QU
LI .. RPi
35500000 X
22Coonoo
P-R40
1*
RUN
BRf;:Ak
~ES
ANO,D~
STW,O~
eAL,SR~
B
TITLf.
PReCESSING
(ie LeAD LINK
n 008!F
01' 00830
2~C3n100
A
6800n'0[
l08~
108~
~08!;
30gl,
~08'
:go 8 It.
lOSC}
22CSn113 A.
3090
:109\
30910'
C? 00831
~Og~
02 0083a
0; cc833
3i1onn13 '"
1*
309S
3096
0;:> 00832
O~ 0083~
O~ 00835
109,
OP 00836
~og~,
~1.00
OP 00831
OP 00831
OP 00839
~1
02 0083A
log~
01
68 0on,oE
3210n1.06 N
3510n102 N
22100'S5
~10q
1111
Ot' 0083B
OP. 0083C
*
BKBPTO
•IQUIT
2cC3n?OO A
6 8 0on'OE
r:Qu
Lw, R1
STS,R1
LW, R1
STw,R1
8K8PT
6 8 00ng03
:1101
310,.,
X'030100 f
CMNERR1
X'030113'
CMNERR1
2i2ono05 A
~105
310~
AMPLI~YERS
STARTERR LY,O!
B
O~10n'1go
]t04
AR£ ERRSR
USED TB PRINT THF
CeRRE~T MESSA~E.
iRRBR ceDE & suB~eO£
TELL USER & PReMPT
********** ••• *************.**********************************.*****-****
*£*
~RReRI
*
GR8UP 03, ceo,.01.1 suBC60£-13
*E*
*
DESCRfPTfSNI
*f*
*
USER SAID START 9R START UNDER WITH N8 LM NAME.
*f*
*
T~IS tMPLIES • F!L[, aUT T~ERE ISN'T eNE, se •••
*F.*
*
************************************-*************.*******.*************
47lonooo X
~102
~10l
~110
* THE F6LLBWING
..NTJBST
JtTEL,FLGS
TELBU'
NLSAV£
BKMSG
L I, Rl
LI.lR2
CAL1.11.
5
B
SVN1
[RR8R ceDE & sueCeOE
SET IMPLIED QUIT ceMMANO T! AL~ew
,eR' Te CAUS£ PReCESSING SF CU~R~NT
ceHMANO. SAVE 1ST weRD eF ceMMANU
FeR R~STeRE AFTER NEXT READ
WRITE
************************************************************************
*E*
F'RR6R:
*
*E*
GR6UP 03.1 CSOF.01, SUBC80E~OO
*
*E*
DEsc~rpTTeNI
*
*£*
T~E USER's T[RHINAL TVPE SPECIFIED IN ~IS
*
*E*
T[RHINAL ceMMANO WAS INVALID eR THE CHANGE
*
*£*
TERMINA~ TYP[ CAL WAS UNSUcc[SSrUL'
*
***********.************************************************************
TERME~R
Ly,D!
B
X'030700'
CHN£RRl
(RRBR ceDE & SUBC80E
~n1
~EP
1~1~'
08, '75
3t1~
~11~
~11g
**************************************************.*********************
NAMEI
ROIUS~RS
*
*0*
CALL:
*
*0*
BAL,RO
RO;USERS
*
*0*
CALLEO BY PASSW8RD AND s~ew CeMMANOS
•
*0*
REGIST~RSI
*
*0*
N8 R[GtSTfRS ARF PR[SERV,-O
*
~120
~121
*D*
*0*
~114
311~
3116
~11'
~11A
~1~~
31~~
~12*
312~
3127
~12R
]12~
~\30
*0*
.0.
*0*
eUTPUTt
~13'
~133
l13~
~\3R
~13~
~~3'
~13R
02 OOA3U
3139
~140
O~
]141
314P
O~
O~
0083D
0083£
0083F
OP 008_0
3~30n1no N
2030n001 A
2a1onoo~
N
13100100
~
~14~
02 00841
USERS
SCRATC~:
AUT~eRIZATteN
RECeRO IN MEM&RV
• ADDR£SS eF R[C8RD IN
.0.
*0*
O[SCRTPTreNI
epUSR~
weRO 0, IS USED Ta FSRM WBRD 0 eF READ
A eUFFiR IS CREAT£O IN TrLSTACK ,
T~E
*
*
*
*
*
*
ceRE
R1,R •• R5AR6,SR1,SR.,Dt,D],D_
DATAl
~PT
;U~ERS
KFY IS PLACED IN IT. JUSERS IS 6PENED IN THE M6DE
SFECI~IEO IN R2.
THE R£ceRO 1$ TH£N REAO IN eN
Tep e, TH[ KEV. T~[ CALLER MUST REST8RE THE
*
*
*
*
*
*
*
*
*
•
*
*
*0.
.0.
*0*
T[~ST'CK gpAC~1 rXCE~T t~ ERR&RS eCCUR W~ILE
*0*
ACCESSTNG tUSERS.
***************.******************************************.*************
RO,USERS rQu
•
LW,R]
TFLSTACK
CREAT~ BUFFER •••
AI,R]
1
BUMP
LBGSIZ£.RwUSRSZ,R1
NeW peRM TM£
* KEV IS TEXTC
~1~~
tN-1, IN8UT 14
US£O T6 FeRM KEV F8R lusERS REC.
IL6GSZ • SIZ£ SF :USERS R£CeRD
*0*
**
~144
R~ • e~EN MBOF.
JIACCNIJIUNA~[ •
R~
*0*
*0*
1131
31~'
T~PUTI
*0*
*0*
*D*
*0*
~12~
11~~
*0*
*C8NCAT
K~Y FeR IUSERS IN ~ReNT
ACC6UNT,BLANK,NAM~
•
6F THE
BUFrE~.
~n1
18t~6
~£P
08, "5
2a40noo(')
~14~
0;» 008~1
~14+g
o;::t 0084+2
2c5FFFF8 A
l1!50
Ot' 00843
3151
0' 00844
liS;"
O? 0084+5
O~ 0084'
0' 0084'
OP 00848
2040n001
7t:6Ano02
2 160nn4()
6 ti 30n84tB
F'568000]
318~
l154
!165
~16~
~1S'
31S.
:!1!q
11'0
~1b1
316;::t
116~
~t64
~1, 65
~1b~
ot'
0084g
o;::t C084A
ot> 00846
A
N
65500843
2260n040 A
20400001 A
2i!FF'FF4 A
'26Ano03 N
2160n040 A
6lS30n853
Ot'
O~ 00852
2U400001 A
F b 68nCO] ..
65500840
o;::t OoS!53
F540no03
ot'
00851
It..
31"
:l16CJ
~1'O
:11'1
:11''2
31,'3
~1'4
~1'5
C~ 008!54
O~ 00855
o;::t Oo8!56
O~
O~
00851
00858
O~ 00859
311b
0;» oo85A
~11'
OP Oo8!5B
Oc20n020 ..
C6NCATN
_g
t
L8,R~
JIACCN+2,R5
CI,Rt,
,.
AIIR4
STB,R,
LI,R!15
C6NCATi
*
NeW
e1i
J,UNAMi+l,R5
C I, q~
.,
BE
C:8NCATE
STB,R,
BtRIRs
STa,R.
*Rl,R.
c:eNCATN
*Rl
C~A~GE
1
ArceUNT T6 ISVS , De
LeI
LM,R~
LM,O~
2AEonooo X
2t:S50nooo X
STM,R!
22Aonooo A
LI,SR3
CAL111
LeI
STM,Dl
O~lon7A6
Oa2onC20 A
2t:SEoncoo X
1
*RlIR.
Le,,~~
A I, R4
2 A50n7S:i
INITIALIZE ceUNT
FeR 8 CHARACTER AcceUNT
ceUNT THE CHAR
G£T AceeUNT CHAR.
IS IT BLANI<
VES
Ne, ST8RE IT
oe NEXT CHAR,
BLANK FeR SPACER
c:eUNT SPACER
ITeRi: SPACER
FeR 12 C~.R US£R NAME
GET NAM[ C~AR
IS IT BLANK
YES, ALMSST oeNE •••
Ne, ceUNT IT
ITeRE C~.R.
oe NEXT
;TeRE ceUNT
T~E
BP[N
2
S£CAC
JIACCN
JIACCN
o
6PUSR
2
J.ACCN
SAVE
U;[R.S AcceVNT
SET UP Te C~£CI<
8P[N IUSERS
FtEST6R[ USER'S
Fe~
[RReRs
Acc:eUNT
************** •••• *****************************.**.*****.*.********.****
*£*
rRR&RI
*
*E*
GReUp 03, ceO[IO~6 suBCeD[~oa
*
~118
l1?q
!18n
*F*
~181
:;18'318'
:"184
C6NCATe
*
~16~
LI"R!;
AIIR4
sue.r14
l21!;
1~1~
02 ooa6t)
Of)
on86S
O~
O~
00 8 66
00 8 67
ot'
oo8~8
*
ASBUT
BTT l!S ~\I~I1.
SI.S,SR, -16
CI,SR~
X'140~'
e~E
t.i
L I, 01
RtG~T
R,UERR
SPACf.
!§
101
wE NEEONtT weRRy
JUSTIFY ERRBR. CBDE
BUSY
Ne, SeM£ 8T...,iRR ERRBR
IS IUS£RS
Xt030§OOf
e
VES, T£LL. USER
*************************************.********_.************************
*£*
,RReRI
*
.r.
GR6UP 03~ C6D~~oS, SUeCeD£~Ol
*
*£*
O[SCRrPTreNI
*
*E*
tlB ERRSR BF SBME se~T eN TRYING TB SF£N 'USERS
*
**************************************************.**.******************
X,030501'
[RReR ceDE & sueteoE
LJ'01
B
RzUERR
FPT
~c;u
LeI
LM,RS
O"lEtnoOO X
CAL111
x
[VI!:RYTHING FINE
SINCE: "'1: TEl. AnDR IS l..[SS TJ../AN X'10000 t ,
0220nObQ A
2 A5 0n'9£
2~56ncoo
~e,
..'*
..
M8VE REAO
..aeTUSRB
::;203
:J204
3l?O~
~~O~
GeTUS~fj
BE
STMIR~
T5 STACK
& oe RiAO
•
6
RwUSR
Lf!GSIZ[,R]
LeGSIZ£,;l
SIZE BF' FPT
M8vE
F'PT Te STACK
READ T~E USER'S
~F:CaRO
************************.*********************-*************************
*E*
FRRBR,
*
*E*
GReUp 03, cec~!n5, SU8CBOF.,02
*
*E*
DESCR!~TraN;
*
*£*
tIe ERR8R REAOING ,USERs REceRD
*
*********.*****************************************************.********
1-401
lAI~6
3~1'
~E" 08,
0;> on8b9
~~18
Oi.' OC86A
3~1q
C~
C~
00868
ot'
0086£
]?20
!~21
~2~t'
OO86C
C? 00860
SUB.ReUTINF;S
'75
21AOnOOO
A
ESl30nooo A
CI,SRl
0
2cCln6C2 A
2i5F'FFFA N
LI,01
.RO
X'030S02'
B"EZ
R:UERR
BUMP
8
*
iRRBR C:BDE & SUBC;"O£
CLEAN UP STACK
.C~~GSfZr+RWUSRSZ),R5
1:$500100 N
6 8 0on'OE
16.2
ANY iRRfH<
N&PE: •••
CMNERRl
SEP 08, "0
1~I]e
PAGE
:;?2~
~~246.
****************.*********.*******.*.*********~***********.*************
*0*
'~25
*0*
*0*
*0*
322~
:;;'>2'
322~
!?2c;1
*0*
*0*
.0*
*0*
*0*
*0*
*0*
!~3n
:I~l1
]23~
3233
3~34
l~3!5
323~
~~3'
*0*
*0*
32lR
*0-
3~39
~~~O
.0*
*0*
*0*
*0*
*0*
.0.
*0*
*0*
*0*
~241
!?4f)
:;i)4~
~l>44
31?~~
l~4~
J~~7
~2~A
l~4q
~t>50
]~5t
Or
0086r
Oit 008'0
1252
008'1
3~55
~~5~
at'
0:>
O?
Oi'
OJ:.'
125'
Oit OoS'l!
J~!51\
O? 008"
:!~!S~
"~54
00872
008'3
00874
00 8 '5
QC2oncF'O ..
N
O~1on100
3210n7A6
.'100014 N
32200124
2c30n~go
2240n1490
2i50noot A
2 c60nOOl A
NAME:
CAL~:
*
FLep
BAL,SR_
REGlST~RSI
PRES£~V£S
*
*
PLep
ALL
~£GtSTERS ~XCEPT
*
*
RO
r~PUTI
R,.SR1 • FILE PASSweRO eR Z£R6ES
SRi-SRI • FfL~ ACCeUNT eR Z(R6(S
01.03 • FIL[ NAM[ (N8N.TEXTC), MAX 11 CHARS
eUTPUTl
DATAl
eT~ERWlS£
Ro • Z£R8 IF Ne rRR8R,
ERR8R CeOE,
JUSTIFIEO.
R!G~T
CONTAINS
epUSR •
we~D 0 SF ePiN FPT
NAME. PfL[ NAM£ VLP ceNTR wD
PAce • AeC6UNT VLP C8NT~ we
PPAS • PAsswe~D VLP C8NTR WO
T~TER~ACF.I
NFNO • CeNVERTS ,ILE NAM~ T6 TEXTC
DESCRIPTISNI
A TEST 5PEN FPT IS eut~T IN T~~ ceNTEXT PAijE AT
'F~ePBUF'.
MeD£ 18 SET T8 eUT se i.Vi ReUTIN[
CAN USE T~E 'PT BY TURNING SFF T~E TEST BIT.
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
.0.
srNCE THr DCe IS NeT 8P[N£D, TH£ CALLER NEED NeT
*0*
CLeSE IT.
*
*****************************************************.******************
FLap
PUSH
1~,R1
lW, R1
EtPUSR
eR,R1
VOOOS
Lw,R~
F'L6PBTTS
LI,R:l
LI,R4
RFE
LI,RS
LIIR~
RFE
1
1
GET FPT weRD
a
TEST BIT
TU~N e~
P'~AM. PRES.
ERR
,eN
eRG
Ace
,,
C8NSEC
S£QUEN
8fTS
~n1
!;£p
18136
~~!'59
O~
3260
O~
:'f~61
0'
~~6~
326:;
~~64
~~6~
as"
t?!)
0(,)878
oc».20nc,n A
00879
2~lonl1B
on8,.
O? oo87S
ot' ooB1'
O? 0(')810
Oi' 008'£
O~ 0087F'
Of) 0(,)880
LeI
N
2i6onn02 A
3560n1.21
N
N
3~6on122
3 i 60nooo X
2110nooo A
,
SUB.R8UTIN£S
STM,R~
F"L6PBUF
Lt"REs
STW,R('
STW,Rt;
LW"R6
~
FL6PBUr+lt
P'L8PSUF+'
PPAS
cI,R7
BE
.+2
Let
3
a
X,a20n,
~26~
O~
00881
683nnRS1
2U60npoo A
Oa20no3Q A
~~~~
o~
00882
2~6on1~A
~
STH,Rf.,
FLePBU;+1.~
o~8~l
3280nooo X
LW,SRj
PAce
LeI
STM,SR1
BAL,SR;:I1
FLePBUF"+l~
~~6b
~~6'
~~,o
O~
::I~'1
OJ.>> 00884t
O~ 00 8 85
O~ 008a('
O~ 00881
Oi' 00888
O~ 00889
~~,::>
~2'~
~2'4
3~'5
~:;>,(,
~21'
c~
O~
~p.,c)
C~
O~
3?'~
32~o
O~
~281
3~8~
COl SA
0088S
anSsC
00880
OnSaE
OJ:' oo88F'
Ot' 00890
O~20no:io
AII R6
A
2t:SSon~, 27 N
6 AAon891
3i50nooo X
LW'R~
3
NF'"NO
LeI
STM,Re;
FL6PBUF+A
2iAOnooo A
Lr,SR~
0
04+10n118 N
CALi"
lB,Ro
PULL
A
Oil20noF"o fA.
eAl0ntOo N
ElIOonooB A
[800nCOM A
8
~F"[
e
weRDS 0-5
MeOE • aUT
DIS? I!! SAVE
SI
O?
O?
33ltP,
O?
O?
336<)
o~
:'!310
08000100
0800(}100
E8 00000A
OQgAU
1C6 .. 010'
20200001.
21600040
68300861
21600040
61$30n803
21600050
Leepl
N
A
A
coiSE
OOIBF
ooseo
OOSCl
ao8C2
OOSC3
008C~
ooses
COse6
a? case?
OP 008e8
OP ao8C9
Ro
Rn
*SR3
•
~EMArNTNti
LBIR~
AIIR~
TF~BUF,R2
CHAR
AND INCREMENT Te N[XT P6SITt6N
BLANK TEST
1
"
YBL.K
BE
PARENS
A
C I I R6
,),
2160000S A
CI,RIt
8NE
C:I,R,
BE
PARENC
X'05'
T£RMTST
0
BlZ
A I, SR 1
l.e6P
1
e
L8ep
[QU
•
6~30n805
6~30nABB
21700000 A
6~30n8Ag
ooaBt.
YBLK
T£RMTST
Bi500100 N
6830nBC8
201oncot A
202F'r:F'FF A
21AOO:l8A
6830nSC£
* N6TEI
*
Cj.1ARfH(
PReVIOv SKIP eN PAREN rEATURE
TEST FeR PREVl8US DATA
tGN8R£ LEAOING B~ANKS
SET BLANK FLAG
SUPPR~ss TRAILINij BLANKS
SCAN FeR TERMINATING C~ARACT£RS
0
T~RMTST1
YBI.K
~eRCE
LW,R~
*TE~ST'CK
GET T!RMS
BE
LfH'P.1
•
TFRMS,R!
,-2
0
BE
CHARetK
AI,R~
-1
L I, Rit
8
"
Le6P+1
AI,Fh
A
t
B
BORIR~
C I, SR1
21 8 cnooo A
,(
8E
CB,RA
6 4t 50ngBF
2c6ono~o
68aoo~AA
eI,Ro
TERMTST1 rQU
116AOSOe
6 li 30nBAA
BVTES
B
rQU
C:l,RIt
A
107
REM8V£ TERMS TABLE SIZr FR8M STACK
BE
CI,R e
1*
2*
3371
33?i='
SUB.ReUTIN~S
PULL.
PULL.
N
N
A
Of> 00889
2V8onCOl A
O? 008BA
6~Oon8A9
02 oosBtJ
O~ 008B8
2100nooo A
6 8 30ngB£
OP anSBC
O~ 00880
6~Oon8B'
336c
3361
·,5
1
BLANK
~eGl~
TAe~E
OURING SKIP
StZE
NeT A T[RMINAT!R-TEST
JUMP r, NeT SET
e~ANK
RESET peSITt6N T6 START
MAX Fr~LD LENGT~ -11, THr ret.8WfNG TEST IS SPECIAL
CASE FAR T~E W~[R[ C6MMANO.
CI,SR:a
WHSC
BE
CHARel(6
~F
fLAG
NEW
rlE~O
~Ol
1~::16
331~
~37.
3::J7!5
337~
~~'7
331R
~3'9
3380
3~81
338,
3~8~
338~
3~8~
338b
o~
SEF 08, '75
COSCA
21?onocB A
0;> on8C6
6 9 3008C£
OP onSCt:
6l:J0008AA
21300000 A
68300801
O~ cosec
ot' OoSCD
0;1)
ooSCF
BNE
Leaps
BE
.·2
CI,R3
STB,R,
20100001 A
6 d 0008A9
2U000001 A
AIIR7
PARENt!
o;t 008Ds
Oi» 00806
ot? 00801
200F'r:FFF A
PARENe
6810n8A9
~3g0
O~ 0080B
6 8 00n8A9
2i!oonooo
~391
**
*
*
3~g~
~~91+
:;39~
*R31~'
1
caUNT C;.fARACTER
AND GB FeR NEXT 6N[
BUMP PAR[N ceUNT
-1
O[CR[M~NT
1
B
L19BP
AIIRo
BGEl
PAREN teuNT
L196P
C::L..e:A~ ceUNT
STRAY CLeSE PAREN IS IGNORED
(')
o
BE
L8f!P
e
Leeps
LI,SRl
2aAon~31
6~Oon8AA
IS OATA T6 BE MSVrD
Nt!
VES
Leap
AI,Ro
Tee MANY CHARS.
o
e
LI,Rrl
CI,R1
A
21100000 A
6dSOn!A9
3392
BUT IS FLAGGED A~ [RReQ WHEN
CLes£ T~AN ePENS £xrST.
C~I(UL.M
T~E
::1::19,
339q
O~ 008DC
0' 0080C 1
~40(j
O~
40
A
6'"
:'4+04
]40'-'
0'; 00800 2
4~
A
A
A
A
A
A
0;> 0080D 3
Sf.
A
~40~
Q;t
6tj
A
3407
QP
0080C 2
ot' ooSOC 3
0;> 00800
ot' 00800 1
340~
O~
~40~
ot'
ooBOE
oeBOE 1
ae8DE 2
aoSO&: 3
1t.
61
4tf
61:.
10
A
60
A
7~
A
MBR~
T£RMS TABLE IS A 8VT£ TABLi C8NTA!NTNG A T£RMINAT8R CHARACTER IN
T~E SCAN SUB.RBUTfNF L.eeKS AT THE TABL.E FReM BACK TB FHBNT
ANO THE FIRST ENTRV MUST BE A DUMMY, A SPACE SEPERATeR IS NeT NEED~D
* AS TMIS L8GtC IS PERF8RM£O MeRE EF'ICIENTLY eUTsrOE 6F T~E TABLE.
• THE TERMINATe~
MUST BE LAST ENTRy IN TAB~E
* THE TERMINATe~ • MUST 6E THE N£XT T8 LAST ENTRY IN TABL.E.
T£RMS
OAT A. 1
C"
DUM.DUMB
EACH £NTRV,
*
339~
~402
140~
CHARel'
C'~'
c.,t
C:.",
e,,'
, ••
C'j'
INDFX 1
~
1
eROE~ING WIT~IN
T~rs TAB~E IS
IM~eRT4NT
l~
•
AOOtTteNAL ENTRIES
5
ARE DESIREe,
'ALWAYS INTiR
1
T~EM B~Lew
8
THIS PBINT
9
10
1AI36
~nl
~~10
~~
11
~EP
08, ,,5
OOOOO~O~
srZ£Te:~M
sue.ReUTINrs
,QU
BAC.,·eA(T(RMS)w1
eeUND
~
~01
r.;[P 08,
1~:~b
SUB.~eUTINFS
"5
1~1:;
**
*
*
'STeps' IS A VECTeR USED T6 O~'TNE T~E T~RMINATING C~ARAeTER ANO ENTER
THE CeRREtT LeGIC, IT IS FMFLeY£D CURING THE SCAN ~F A C8 MP IL£ eR
ASSEMB~[ Ol.R~CTtVE. T~E FaRMAT IS eRr[NT~D Te THE T[RMS TA~LE ANO MAY
• NeT 8~ ALTER~n WfTH6UT C8RRECT ceR~EspeNOENCE TB TERMS.
34t.1~
3~1~
341~
3417
~41R
3419
1420
~421
O~
•STeps
008DF
0; 0080r:Oio' 008e:o
ElSOonnoo A
l42~
6800n2~t
6aOon~~t
342~
Ci' 0(,)8£3
!42!;
0;:- OOS£'4
OP 008e:5
6 8 0on81b
6 8 00n231
]42/,
342'
342R
0; on8E6
OP CaSE?
6 8 0on'31
6 8 00n231
EtiOonoOo A
!42~
O~
008E8
6800n~31
:1430
O~
oo8E9
6 S 0onp31
3431
ot> 008£A
6aOon231
:j4]P
~434
]43!;
343A
3431
143~
0;> OOSEB
0;> OoSEC
C~ 008ED
0" 008£E
OiOonnoo A
6 8 00n8'"
O~
6800n8'7
020onoon A
~44~
Ci' 008F'4
OP ooaF'S
ot) 008F6
• IMPLIES
C~KUL.M
C~I 008FC
O? 008'0
O~ 008'E
0;> 008FF'
02 00900
346~
34~4
Oit 00 9 01
O~ 00 9 02
OoeF7
3~Conoo'
6 AB On97g
Oc20no20
2 A6cn'lD
2ill0nOOl
5t;02nnO'
3i1onl00
2010noot
Oi20nn20
A
LW,01
A
LeI
A
A
N
A
A
L I, R1
LW, R,
A I .. R1
PUSH
O~
02
00903
ct'
OngO~
OOgO~
3c1onoOo X
6830ngOF
2i90nooo ~
~4'5
~4'b
OP 00905
Oi' 00906
O? C09C~
3477
0;')
~4'8
O? 00908
~4,q
~481
0;:> 00909
O~ 009014
at> 00 9 08
04+80n'£0
2210nooO A
35100000 x
2~100010 A
4 A I0nCOO X
6 ti 30n90F
~48~
O?
2ClF'F"F'F7 •
::'483
O~
~484
Oi' 00 9 0£
0090'
on 9 0C
00900
BtNDECBCO
SAVE ERR6R peStTleN
ceNV£RT elNARY P~.CE VALUE T6 PR!NT
2
£HMSG
1.
R7,Rl
T[LSTACI(
PUT LAST 2 DIGITS IN M£SSAGE.
1
~ .. R6
8
WRITE
•* ANY PREVIeus
~468
~48C
r;TH,o~
O~1on,go
~46'
l4,3
3414
LM,R~
R2
0t.1600100 t\
34'!5
~*
•
BAL,SR~
2c2ono08 A
:;466
]4"
1/1
PAGE
~4~'
4+t:S10nCOO x
3 5 10noOo X
* WILL BE READ
*SYNl
rQU
PRBC~SSING WTLL ~AVE N8 LASTING EFFECT AS T~E
~RBM else AGAIN .. T~iR£BV NULLIFVING [RReR MSG.
LW, R1
•JIASUF
BEZ
SVN3
LIISR~
AMBU'
oeUGIO
FPFPT
o
Del
CALl."
L I, R1
STW,R1
L I .. R1
LS, R1
BEZ
L I, R1
.f'..O .. R1
ST~,R1
JIABUr:
STSET
JtTELF'lGS
SVN3
.(SIN6REL+l)
J:TELF'L.Gs
J:TEL.FLGS
AIM
N8RMAL MetO£
WAS AN SI CREATEU eN
T~IS
CMD
N8
TURN BFF 51 DeNT RELEASE
FLA~
TAB~E
~O1
,:;;EJ' 08,
1~1~'
'75
02 0090"
~~8!5
~48~
~~8'
148~
348c;J
].90
O~
SVN3
CLEANSTACK
OO90F'
o;:t ae9ar:'
0;:> 00910
Of' 00911
Of' 00912
2iCnn1~8
N
15Cootoo
N
~49~
:;.9'
1·
~49g
3499
~500
3S01
~50~
~50::l
3504
g~05
~!'iO~
~Sc'
~!;oq
~!§1n
:q~
11
..
02 0091:1
02 00913
O? 00 9 1.
Of' Oog15
ot:' 00916
on91?
O? 00918
O~
Oit 00919
0::> 0091"
0091e
0091C
Oi'
OP 0091D
OP 0091£
ot' 0091F
O~ 00920
c;» 00 9 21
Ot' 00922
OP 0092]
O~
~~15
:g~1~
01> 0092_
Op 009~S
O~ 00926
1*
i>.
Ol' 0092A
~*
O~
~~1~
X
O~
00928
SVSERR
x
4t:t10nooo
3510nooo X
2i51FF"FF A
1i40noon X
214tcnoo~ A
2U4t:"r:F'FF A
X
~RRABNl
2i40nooo A
32Connoo
F
25Con178 A
7iConooo X
2 6C onl08 A
1~4onooo
7S4onoOO
4t74onnoo
x
x
F
•J:TEL.FLGS
A~O,R1
NBtT30
X'1FF'rrF'
Cl,R4
JIRNST
4
&:RRA8Nl
LI,R4
LI,Rl
32
LS,R~
SL.S,R~
BCS,~
JI.SStG~
•
READ
STB,R4
JIABC
ER~AR
LI,R4f,
Lift, 01
Sl.D'D1
LS,01
SI...O,Ot
STB,F<4
STB,R4
STS,R4
MASK
FeR
STS
LATER
1
•• 3
.-3
T~E
TURN er:F ANV BREAI( BIT
X'lFF,
B
r;QU
,rM ANeTHER Get
JITEL'LGS
L I, R!5
STS,R4
LI,R4
F
2240noBl A
'!4oncoo
r:QU
AIIR4
680~ng10
GIVE:
LW, R1
BAZ
6 9 8ong21
4+14onooo
SYSTFM OFTECTED rRR8R.
La,R.
2~30noOt A
START SF STACK SPACE
STACI( SIZE
ST6RE STACK PTR DwO
A
STW,R1
6840n924
2i40nO!O A
2C!30nlFF A
4 A30nooc X
02 0092'"
0092?
OP 00 9 28
OP 00929
~C;17
3i1onnoo
1'72
R1..2
0
STACl 00940
OP 00 9 41
O~ 00942
SL.S,Dt
-I'
CI,,01
)('A9'
8£
•• 3
126on742
3280nooo O!5
LW, R1
BN[Z
LC"R{'
LW,SR1
LW,02
li Aonooo 06
LO,SR]
LI"Ro
6~30n117
3i!Oon712
32Eonooo 06
2iOonOO1 A
310onooo x
6'.on94166000000 )(
68 00n100
2200nooo A
0 4 900001 A
)('1F'~r:F"'
J:AMR
XASeRT
LeGeFF
V[RB1
svs
LW"O~
vrRB2
cw,Rc
JSTEP
JITEL.FLGS
BANZ
AwM,Ro
•• 3
B
LI,a
CAL.1'~
V~RB2
J:TEL.,LGS
INBRe:AK
a
1
173
TVP'E £RF(BR MSG
MASK Te STS ERe
CLEAR ANY ERR6R fReM
READING ERRM$G
SCRUB 8~F $USCeOE
AIM ERReR, SET BY TIAMAOWT
LeG '~M eFF
AIM ERR8R
Ne, AB"RT T6 GET CLEAN TE..L.
oe
INT£RPRIT!VE
EXIT
T8
LeG6FF
[XIT
fF AT
JeS
STr;;:? ••
S~T JaB STEP FLA~ ANO
ABBRT tF' NeT •••
~Q1
1~:~6
sEP 08~
.,5
~~4tF;
*
~~.~
.. eR ERR8R
* T~E '05'
* T~E TIMr
* T~£ USER
3~4t'
g6~"
~!54t9
l!=iSn
~551
]5!5~
~553
OJ)
OC9~l
~!=i5~
~55'
O~
~5611;
01'
~5SCJ
O~
:J5('c
Oi' 0094A
~t;61
~!li6~
ot>
ong~B
0;:» OO9~C
~S6~
O~
00940
~!;6~
Oi"' oo9~E
355~
I~ PReVIOF-D Ta ~ANOLr T~E eCeURANCE er AN ABNeRMAL
C6NDTTrSN INCU~R~D OURtNG THE R[AD SF T~E USER TERMINA~.
ERRSR TS tGN8RED AS T~E MESSAGE ~AS A~READV BEEN RE~EATEO BY
IT IS S~NSEO. eT~ER £RReRS Wl~L eUTPUT A M£SSAGr ANO ALLSW
T8 TRY AGAIN.
*
00 9 44
OP 00 9 45
O~ 00 9 46
3~54
PAGE
T~[ Fe~LeW!NG ~eGTC
O~
009.,
00'."
00949
2~.Onn68
A
21AoooO§ A
6 8 3no90F
2c1on106 N
3220n004 N
25 20006F A
202F'F'FFF
04to 1on'9o
A
2210(')150
22200011. A
0 4t 10n'9n
6 IJ OOn90F
*ABNR£T
SLS,SR~
-Pit
CI,SRl
BE
l II R1
Lw,R;.»
X'OS'
CLEANSTAeK
SI.S,R"
AtlR2
CAl1~1
TFLBUF'
PestTteN ERROR CODE
[c~e
ARB
-1'
-1
WRITE
L I I R1
PARMSG
PUT
C~L1~1
l'
WRITE
C:LEANSTACI(
GIVE
LIIR2
B
INPUT
SUT
ERReR MSG.
A"eT~[R
TRV
~Ol
SUB.R8UTINFS
!o;EP 08.. "5
t 81::1'
PAGE
1·
2-
*****************************·****t**.********.***********_.*._*********
4*
5*
~*
*0.
::..
*0*
*0*
*0*
*0*
'*
*0*
~*
q*
*0*
tn·
*0*
*D*
1~*
1~*
.0.
1'·
14*
1~*
1~*
1'.
11t*
1q*
20·
21·
~~*
2~*
24*
2!5*
C~
O~
02 0094~
OO94F
2i91r:£on A
00950
0 4t SOn?Flt
02 00951
O~ 00952
Oi' 00953
O~ 00954
O~ 00955
OP 00956
OP 00 9 5'
OP 00958
*
SR3 • MeNfTeR AOOR£SS T6 BE EXAMINED
..
SR2. VIRTUAL ADDR[SS crN USER'S S~AC£) Sr M6NIT$R
*
AOOR[SS
*
SCRATC~' 9~~ • c~eBBERFD
*
D£SCRtPTr6NI
MAPPER G[TS Twe CBNTtGueUS DYNAMfC PAGES, FRi*:
eUTPUTI
LI,SR~
~'1rECO'
CAl1 .. "
BCS,g
MAPIT
MAPF"AYL
X'lFCoo'
MAPIT
MAPFAfL
X'1FF'
SR2
CAL.l .. a
BCS,A
LI,SR4l
04t80n?"
6~80ng5g
2280n1FF' A
~1AonoOg A
STS,S~'
O~2onooo
LeI
A
£800n008 A
B
LAST VIRTUAL PAGE
TI-f£ 1ST SAO
SAD FAILED, SUA
~EXT.Te.~AST VIRTUAL
oe
oe
TM&: 2NO SAO
SAO FArLEDI SUA
MASI< FeR STS
MERGE PG orSPL INTe VIRT PG AODR
0
RETURN
*SRl
*****************************.*****.**********************.*************
*8*
*s*
*S*
*9*
*5.
2"1*
2q*
In*
*s.
3t*
*9*
3~*
:;~*
]~*
CAL~EO By RBUTIN[S ~HrC~ NEED T6 L~eK AT M6NITe~
TAB~ESI
PIDGMSG
~EGISTVRS:
USES SRiISR2ISR3,SR~. A~L eT~ERS ARE UNT6UC HrO*
J~PUT:
SRi. LINK R[GISTER
•
LI,SR~
2c91JfCOO A
2'*
],.
*
*
MAPPER
CAL~J
***************.***************************.**.******.******************
MAPPER
~QU
•
6~8009S9
~I,.
34*
35*
NAME:
02 00.59
OP 00959
0450n"8
SCRErc~
REPBR"D
M£SSAG~:
TYPE'
ceOEI
av,
SUA
~o·o.
T~L
TF.L rSSU[D StNGL£
*
US~R
ABeRT
eN
v~u
REGlST~RSr
SR2 C6NTAtNS T~E VIRTUAL PAGE ADORrSS T~ReUGH
W~ICH ~£ WiRE TRVING T! SAD.
REMARKS:
T~IS SCR£EC~ INOICATrS A PReB~EM IN MEMe~Y
MANAG~MENT 6~ A L6GJC P~e8~EM IN TEL w~rc~ C'USED
*
*
*
*
*
*
.S*
*
*9*
T~[ USER,s MAP T8 8E LE~T .DIRTY, F~BM A PREvreus SAD*
*******************************************.*****************************
MAPFAI~
F.QU
•
CAL11~
MSTRMeoE
~n1
SEP 08,
tA13'
]~*
Of' 0095A
o;:t
00956
"5
0"000000 X
006oot04 A
J9*
4n*
41*
4~*
4:J*
4+4+.
4~*
4~*
4t7·
4R*
49.
50·
51·
6~*
8::.*
51+·
02
ap 009SC
Op On9!5D
Of' 0095£
O~
OO9SF
Oi' ong~o
0095~
2i!91r:rnO A
04+80n7iD
2i91FCOO A
04+8001[0
E8 0onooB
A
sue.ReUTINFS
SUA
)(' 60' ,.
**********************************************************-*************
*0*
~AHE:
UNMAPPiR
*
*0*
C.L~:
MUST BE CAL~[O AFTiR EAC~ CALL T8 MAPPER
*
.0.
REGlST~RSI
USES SR1,SR2,SR.. ALL eT~£R ARE UNTeUC~EO.
*
*0.
INPUT.
SR4. LINK RrGISTER
*
*0*
eUTPUT: Twe VIRTUAL PAGES ARE RELEASEO.
*
*0*
sCRATC~1 CLeBB[RS SR1,SR2
*
*0*
O[SCR,pTtSNI
UNMAPPER ISSUES MIFVP CALi FeR T~£ PAGE
..
*0*
INPUT IN SR2 ANO T~[ PAG[ F8LLewIN~ IT.
..
**************.**************************************.*************.****
UNMAPP£R ~QU
•
LAST VIRTUAL PAGE
Lt,SR~
X'1rEoo'
'R££ T~£ FIRST PAGE
CAL.l"
FPF"PT
NEXT.Te.~AsT VIRTUAL PAGE
LIISR~
X'1FCoO'
CAL1,8
PPFPT
'R£E T~£ SEC6NO PAGE
RETURN
B
-SR4
~n1
1$n~'
SiP 08,
.,5
177
PAGE
~"'6!5
~!;6~
~~,~
**********************************************************-*************
*0*
NAME:
~fX2£ec
*
*0*
REG!ST~RSI
*
*0*
USES SR2,SR4,D1,02. PR£S~RVES A~L 6T~ERS.
*
*0*
CA~~:
*
*0*
eA~,SR.
~EXIEBC
*
*0.
INPUT.
•
*D*
BINARV NUMBER 18 B[ ceNV~RTEO IN SH~
*
*0*
eUT PUT:
*
.0.
R£TURNS [SCOrc RiSULT IN 01 AND 02
*
*0*
CESCRfPTreNI
*
~S'7
3~'R
*0*
*0*
~~b'
1S~~
356q
~!5'O
]571
l5?P
3&:;7:1
151 ...
~!I;?5
T~IS
ReUTtNE C8NVERTS
TH~
~57~
*0*
358("'1
*0*
SUPPR~SS[D.
~S81
~58t>.
358~
O~
3584
358~
~§8~
~~8'
00962
02 00963
0' 009~.
O~
O~
00 9 615
00966
On 9 67
!~8A
O~
3!5SQ
l!l'i90
Ott 00 9 68
00 9 69
~~91
O~
~~g~
0096A
O? 00968
ott OO96C
O? 00960
]~91,
Of' 0096E:
!S97
OP Q096F
O~ 00970
~5g4
l59~
359q
31,00
12 Conooo
2a1FFFF8
2280nooo
25800104
680Cnooo
OJ)
ot? 00971
Oi' 00 9 12
06
A
A
A
21 8 0nooo A
226on96C
218ono09 A
6'2nn9'O
2USonoFO A
68oon971
20S0noB7 A
65'on9~'
~[X2EBCl
A
6 8 300912
1=8£noo£
**********************************************.*************************
~QU
•
PUSH
J .. R6
LI, R~
LC,Oi
LI,Fi7
LI,SR1
SL.O,SR1
t-fE)(2ESKP
N
02 00963
359i'
3593
022on~'O A
O~6ontOo
2a6cng~9
*
•
~EX2£BC
02 00961
ott 00961
*
*
NUMBiR IN SR2 T6
iBCDIC. THE RESULT IS RrG~T JUSTIFTED AND
BLANK 'ILLiO IN 01 & 02 wrTM LEACING ZERes
A-
~fX2iSI(P
e
~QU
C:1,SRt
V£R B2
-"
•o,R6
•o
o
SET FeR SKIP LEADING zrROS
CL[AR Ot & 02 T! BLANKS
MBST StG, OIG!' T8 SRi
NBP IF SKP
IS IT L£AOING ZERe
I-IfX2EBC2
LI,R,.
SR 1
•• 1
RESET SKP
9
NUM&:RrC
•• 3
Ne, ALPJ..fA
sa
AI,SR1.
8
Al,SR1
STB,SR1
~~X2EBC2 etR'~7
~L.~
X'FO'
•• 2
c'.'-x,,A,
Te MAKE [eCOIC
"'fF)(2£BC1
De NEXT OIGIT
O:;,R?
5[T
VES, I GN6R[ IT
BE
C J,
F~AG
T5
BVPASS
TEST
1-101
~EP
1~1:;6
1~C1
360~
]E,O~
ll!lO4
3itO!;
0;
08,
on"3
Ct' 009'*
009,S
Oi' 009'6
02 009"
Q~ 00 9 '8
O~
'75
31Dnnoon
06
6S1l0n!;',
2000nOBo A
QZ2ono3o A
OA6on100 N
£8000008 A
ew"D~
8t\[
SUS-ReUTINrS
VF'RB1
.... 2
,
ALL BLANKS MEANS zER6 vAL..UE:
R£TURN~ Pf)SITIVE VALUE
RrsULT lERe
REus
AI"Oi'
PULL.
C·O'·C'
]"R6
REST6Rr:: SAVEO
B
*SRAt
RETURN
MAKE:
178
~n1
sE~
181~'
08 .. ,,5
179
PAGE
* THIS IS A SUB.ReUTINE W~IC~ ceNV~RTS A BTNARV eUFFER peSfTleN
* PRINTABLE DFCTMAL VALUE,
• ENTER WTTH
*
01 ~ DTG1T T6 BE ceNV£RTED(~EX).
3AOl,
l~O'
]~O8
360Q
3~ln
3611
*•
~b1~
*
~61::1
3~14
*•
~61~
3e1~
~61'
~"18
O~
•
on9?g
:iit19
02 00919
O? 009'9
2i1onoO? A
3620
O~
009'.
3~~1
~1s2f)
O~
009,S
3cF"onooC
2iEonooo
36Eonooo
20EoncFo
~62!11;
ot' on91C
O~ 00970
OP 00'7£
O~ 009,F
l626
O~
00980
6 S iong,S
:1~2'
0' 00 9 81
EaoonooB
l62~
31124
EXIT
X
A
"E2nooC A
2U1F'F'F'FF A
A
Oil 0, • 8 CHARACT£R RESULT
REGS
R11
RES
SINOCS
BINDECeCD EQU
A
A
wIT~
BINA
L II R1
L.w.,D4
LI,D:g
OWIO~
AL.D~
STB,D~
AI
I
R1
D~
ANO 04
0
,•
D1
0
XA
X.FO'
D1,R1
-,
aGEl
erNA
8
*SR4
AR~ O~STReVEO
STATUS
ReUTINE ENTRV pelNT
Te
A
~O1
~EP
1A:~6
C8,
'75
'A2Q
~~3n
~b31
3~3p
~~3:;:t
~~:)4
~('l!5
Ot? 00982
OP 009B3
~63q
~('4n
lloJ41
~"4;:t
~~~3
3~44
ot'
00984
0098!5
0'
n~ 00 9 86
CP 00 9 81
Qp 00988
O~
00989
~~4!5
0;)
on98A
~'4b
ot:' 00 9 88
~~4'
O~ oo914C
CP 0098D
3~4~
36..,Q
~~50
~~51
~6e~
~~5~
]654t
180
T~£ Ce:C8IN ~aUTtNr WILL C8NV~R" AN [BCOrC DECIMAL,
* BINARY.
* [NTEF<
WTTH A 9AL,SR~ ANDI
*
NlJMBER eF' CHARACT£RS
R7
*
R3 " WARD AOORr&S eF FIRST CHARACTF.'R
'* &:XIT WIT"': "
'*
RF'SULT
R'
'*
eTHER
REGISTERS ARF' R£TURN£O INTACT
..*
~
l('3~
~(,3'
3it3~
SUB.R8UTINF.'S
'AGe:
~~2~
O~
O~
DECBIN
PUS~
l,SRa
Oti 90n10n N
O'~on100 N
PUS~
R.
2~90nooo A
LI,SR~
C
Oi20nn30 A
2240nnoo A
FiBSnnC3
A
20BF"J:F1.0 A
6~1onA"
21 8 onoOA A
6 8 10n8F?
OrCBINl
LI,R4
l.B,SR~
AI,SR4
Bi-Z
CI.,SR4
aGE
0
*R3,R4
.X'F'O'
SYNTAX
X,A'
SyNTAX
A
MI,SR~
A~'SR~
009a£
3090(')00B A
204f.onOO1 A
SR4
1
0098F'
64+'on987
STW,SR~
R7
R4
0; 00990
O? 00991
0" 00 9 92
O~
00993
ot'
OO99l+
2~90noOA
3590nOO7 A
084f.on100 N
02200(")30 A
OA90ntoo N
E8 0onoOB
..
IAI,R ..
BOR,R,
PULL.
PULL.
B
X'A'
orceIN!
],SR2
*SR4
R[M8V£ LEADING F
CHARACTER STRING TP
i-4n1
s£"
181~'
08,
~b!5~
·,5
lb~"
36SR
365q
*
..*
.
..
....
..
3'6(')
1~61
~1,6~
it
~663
1664
1665
~~6~
:':'667
~"6~
3~'n
~6'1
:;6',
!"'l
~~,.,
:;6'~
~b'"
..
•
1681
1669
SUB.ReUTIN~S
PAG[
T~IS RBUTIN£ CBNVERTS AN [BOTe ~EX FIELD
ENTER' tBAL.Rt
D1 • NUMBER T6 BE ceNViRTEO
02 0099t5
2i!Snncoo A
(j~
on995
O~
0099(,
01' 00 9 9'
O~ 00 9 98
O~ 00999
0;> oo99A
2C!2onooo A
1i94000C A
2190nooo A
EI30nCOl A
l'90n'726
EXIT
,
T~E
~E:X2eIN
seN
'SLL6WfNG
R,
rQU
L r, SR 1
Ll,R~
LS,SR,.
F'oF'9
BCR,9
CeNTINU
C1C6
on9~O
BCR,9
~6"
0;
:1b1R
0; 0099£
6890n99F'
6800ngA6
8
~b,q
O~
2090n009
AI,SR~
!~8n
OP 009140
~f,81
O~
~"8'
l683
O~
009A~
*Rl
c:eNTINU-1
,
[RBIN
Sl.S,SR~
II'
SL.O,SR1
4
AI,R~
2120n(')o~
202onOO1 A
A
6 9 10ngg,
ct,F("
BL
seN
B
*R1
L I, SF( 1
.1
B
.F(1
~'84
0;-
l68~
Of:' 00 9 145
[800neOI A
368~
~68?
O~
009146
!68~
0'
228F'F"F'F'F A
£aOOno01 A
oog",
D"R2
CL.H,SR~
t:L.M,SR~
C~
..
~RetN
O£STReV~D
•
0
BE
ceNTINU
wILL BE
0
0
CI,SR~
l'90n728
009A,1
009A,2
009A,3
R~GIST~RS
NEGATIV~
SRi
68g0n9Ao
A
2590(')(J1C A
2SS0nt04 A
Te BINARY
BINARy R£SuLT
SR1
WHEN A N8N H£X C~ARACTER IS rNceUNTE~EO~ A
BE R£TURNEO TN S~1 T8 INDICATE T~r iRRSR,
O~ ooggS
OP 0099C
oo9!F
1al
1
~
INOICATE ERRt3R
VALUE WILL
I-fn1
1Ii\J~,
!;[P 08,
"5
PAGE
THIS SUe.R8UT,Ni CREATES A 4 CHARACTER FfLE NAME FeR. FILES. THE VSER
~INE NUM6ER f~ USfD T8 ~AK~ T~E NAME U~tQUE. A TRAILING L BR R IS USED
Te DIFF~~ENTJAT~ B£TW£EN A ReM BR LMN FILE. T~E ~ C~ARACTER LINE
iNTER eN BAL~~R. WITH.
~5 , ~~x L eR R RrG~T JUSTtFIEO 'eR DESIREO TVPE.
.. EXIT WITH R~ C6NTAINING C8MPL!T£O NAME. R_ IS O£STRBVEO
~~89
*
*
*
*
*
~bgn
~"91
~69~
369]
"e9~
36'~
..
:!69,
~697
3b9~
O~
O~
009A8
009A8
~~99
02
~'on
~'01
009A9
ongAA
01'
Oi' 009AB
3'O~
O~
009AC
~AME:.
2!>50nOO8 A
RES
sl.SIR5
0
8
2U50n040 A
3c40ncoo X
AI,R5
Lw,R4
J:JIT
$540noO!5
STH,~.
R5
8
*SRAf.
A
E8 0onoOB A
)(''+0'
~C1
!o;[P 08" ',5
181]6
PAGE
BIT e~ LAGte IS USED T6 8BTAIN A CeMP~EX ~'tO ~RleR T6 ENTERIN~
THE Ne~MAL P~ACFSS FeR T~F St DCB. IF AcceUNT HAS NeT B£~N SUPPLIED,
* IT IS 8STAI N fO FR6M JITt LMN IS CU~R£NTLV IN 01,021 AND 03' RETURN
• AcceUNT IN SR"SR~ ANO PASSWBROCSR ZERBS) IN R7"sRl.
~70:1
*
*
3104
~'O~
310Et
]707
~'Og
]709
:1'10
3' t 1
3'1~
371]
3'14
]'1~
371~
O~
2i]onooC A
O~
0220n030 A
0~Conl00 N
009AD
OP 009A£
O~
O~
On9AF
00980
009S1
0' OC982
0; 00983
0;:» o09B~
02 00985
"17
QP 00 9 86
371~,
0;:» 00981
3'1Q
O~
O~
00998
009Bg
~';;>j.)
Oi' 009BA
QP On98B
02 0098C
3723
0;> 00 98 0
~'2n
3721
~'24>
Oi' 0098£
op co9SF
OP
OP
3'2A
~'2'
~'28
3'2~
O~
Oegeo
angel
on9C2
enge3
0;
0' o09C.
OP 009C!
Oi' coge6
373(')
3':31
coge?
Or cages
0;."
O? 009C9
OJ)
009CA
c? cnges
,c6.niO~
T~tS
*
Ftc
01
GET NEXT
PUSH
3"D1
SAVE LMN
LI"R:;1
SUe.FtE~D
N
La,Rlt
TfI.BUF',R2
~Io.
21600040 A
CI,R~
t
6830n9Cl
8E
FTD3
IS FeR USE eN A
T~E US~R'S
LD,01
VERBa
SCAN
BLANK FIL.L
2C6onooo A
liConooo
6 A,4on8AO
LI,R~
06
8AL,SR~
,
o
T,..IS LeG!C
~MN ~eAD
AcceUNT
2110noOo A
6 8 30ngC3
el, R?
BE
o
wAS AN AcceUNT GIVEN
FtO]
N6
Oi2onn20 A
N
2 160no4B A
6 8 30n9C8
~USH
"-,,01
CI"Rb
BE
, • t
IS
FtOIt
VES
LI"R7
o
Ne.PUT TN lERBS
2"SR2
;EGAIN ACceUNT
O~Con100
2~'onooo
A
Floe
o
2280nooo A
Oi2onC20 A
OA90n100 N
Oi2ono3o A
OACon100 N
L I .. SR 1
PULL.
e: 8 0onooB A
8
Oc20n020
2 A90nooo
022on02(,)
01;900100
660009814
Oc2ono3n
Ot:tCon100
A
LeI
LM,SR,
JIACCN
A
N
fttUSH
2,SR2
2c3~ncoC
liConooo
X
A
N
A
06
A PASSW6RD sue-FIELD
REGAIN LMN
PULL.
B
PUSH
T~~~r
*SR~
2
FR6M
Ge PR8CF-SS THE RESULT
GET AcceUNr FReM JtT
",01
~EP
1~1~'
~?34
0;'»
~'3~
3'3~
01'
~'3'
3'3~
08,
OO9CC
cageD
009C£
Ot> 009CF
O~
O~
00900
0;:» 009D1
,,5
6 A Aon8A(')
SUe-ReUTINfrS
BAL,SR~
SCAN
A
STW,01
R7
A
O~2onc3o A
STW,02
PliLL.
SR1
llD1
680on9Bi
B
'102
3bConoo?
3500no08
o·Canton N
11$4
SUB.RSUTINiS
PAGE
* THIS ReuTtN BLANkS TH, SSPECIFt~O
* R2.. BVTE CeuNT
* R1. BUFFER ADOR~SS
1~1~'
l':l9
:'7.0
3741
174P
174~
J744
02 009Di
00902
2~lonoo~ A
~'4~
O~
3'4~
1747
02 009D3
Ot) 009D4
~'4~
0;>
3,~q
ot' 009D6
on 9 D5
,!520nOOl A
2eOOnC40 A
61000003 A
E8 0on004
A
37Bn
*'*
!,e1ot
]7!5]
**
3754
~'5~
3'P5~
~'!57
02 009D7
o,
97!i8
Of' 00 9
~'!5q
O? 00 90 8
o~ 009D9
~'61
3'6~
~'6:;
Oi' 00 9 014.
ot:> 0090B
2c Aono08 A
3 8 14.00002 A
£820nOOB A
3~30n001 A
3i4onc03 A
304onoo:;J A
2130nOOl A
O~
:;164
ot> 009DO
oeioe
3'6~
3'6~
02
O~
oc 9 DE
009DF
204F"FFF'F A
:1767
O? 009EO
~'6$\
O~
3c600004 A
306000014. A
,,'69
009£1
SHl~T
*
..SHFTBUF
J
STa,RI
R1
LI,RO
MBSln
B
"
]
*R4
CeMMANO RIGHT Te CBNTSTRUCT LeNG
~eRM
CeMMANns rR8H SHeRT
F~RM'
*
*
rQu
•
Ll~S~l
SW~SR~
8
BL.El,
.SR4
LW~R~
LW,R~
R:i
Aw,R.
6 8 2oneJio
CBMPUTr # SF P8S1TIBNS TO
SH!~T TB ALLew 2 weRD cMND
[XIT r, NBN£ T6 S~I~T
R3 IS seURCE BVTf P6INTER
R~
Rt
Ri>
C!~rt~
1
BlowE
A I ~ R.
•• 2
LW~R~
RAt.
C8M~UT~ seURCE BYTE P8rNTER
C~!CK IF 1 C~AR 'eMNO
MeVE T£RMINATBR
.1
S~3
R6 IS D[STfN~TleN eYTE POINTER
*******************.*********************************.******************
AW~R~
*[*
3711
*E*
l"~
~'?:1
*E*
*E*
*£*
37'~
•
Rl.
eF R[MAINrNG e~ARS IN INPUT REQU~ST, I,E.
rB MeVE
R1 • * SF C~AR.CT~RS IN CeMMAND, OrT£RMtN~S # re M6VE
l"n
3'74
~QU
Sl.S,Rt
*
]151
l76n
•9LANKBUF
BUFF[~
~RRBRI
GR6UP
DESCRTPTt6NI
03~
ceDE-Oi,
suBceDr~oo
T~E SIZE AF THE EXPANDED MESSACie: WeUL..D e:XCEED TEL-BUF
(~ CL.e6B[R T£LSTACK).
RiTURN IS TH~eUGH C~EANSTACK.
*
*
*
*
*
**************************************************.*******-*************
Io.1nl
sEP 08, "5
lAI~6
~17'
~"'"
040' 009£2
O~ 009£3
~"~
O?
009E~
O~
O~
00 9 £5
l"q
3780
~'8,
~,a~
3783
ot'
~784
O~
~'8'
:;'88
l,gq
~'9n
~'9,
:;'9~
2cOOo90F'
68 00nooo X
02 OOgEI
2oACOC18 A
009E'
009E:8
66 ·onooo X
02 009E'9
0'
009£A
LI,Ot
LI,Ro
2~C3ngon A
02 OO9E~
~78!5
]78~
009£6
SUB.ReUT!NFS
CI,RIs
St.[
21600060 A
68 2on9E'
B
*
Si-fFTO!5
SL.S,SR'q
.WM,SR::1
SHFT10
1cCS0106 N
?OCCn106 N
O~
00 9 £6
6·3009£0
o~
O~
009EC
009EO
[SConooS
64+60n9££
O~
Oo9F:E
6"4009£9
rQU
F.'QU
LBID1
STB,O\
BCR,R~
9
A
St-tF"T20
SHFTlO
.
BDR,R,
BeR,F(.
8(')
SHFTO!'i
X'030"oe,
CLEANSTACK
TsE:RR
•2-
IS SIIr > TEL..BUF"
Net.'
'1£5, ERReR CODE 0- SUBCeOE.
RETURN F"eR TtERR
REPeRT ERR6R
Sf(3
IS
ALSe THE AnctT!eNAL SIZE
JBICCARS
eF' T"E: INPUT R[QUF'ST
Til.aUF,R~
MBVE IT
•T[L..BUF',R'
S~FT20
*SR~
SHF'T30
SI-IF'T10
1b6
1~7
1$1.1:l6
..
~"~
3,g~
3,9!5;
~,g,
~'97
~'9R
3799
l80n
02 OQ9£'"
* T~IS ReUTIN[ nELiTES ANV tNPUT SVMBr6NT
* wITH T~~ SP~CfFt[D SYstC. IF TH[ SystO
* T~£ JeB IS AeeRT£O(tF T~£ CURRENT USERS
* TME SPECIFIEO ~eB).
*
FQU
CANCEL.
22Connoo A
•o
'r~ES
IN THF SYMBIONT TA6L~S
REFERS T6 A RUNNtN~ BATC~ JB6
ACCeUNT ~ T~E ACC6VNT eF
o sVStD BUFFER
],.01
Of'
C09Er:
~gO~
O~
00 9 '0
2cOonooo A
Ot:t 009F1
2230000C A
6 AAonBAo
Oc2on020 A
O~10n100 N
217onoo~ A
PUSH
2,~1
G[T SYstO
SAVE SCAN,S REGS
CI,R,
4
sysro MUST BE c 5
Oi' 009F6
C~ 009F?
6S12(')n~F7
SCi
BAL, R1.
SyNTAX
H[X2BJN
Ot' 00 9 '8
6~10n8F'7
BL.Z
BAL.,R4
SYNTAX
O~100AIA
CAL11t
LI,Ro
380~
1904
lRO~
0" 009F2
C~ 009F]
O~
009F ..
~~ot,
C~
on9Fs
~RO'
3$\O~
~809
~810
"Sit
O~ 00 9 '9
O~ 009'.
~~1~
O~
3813
ott
:!IB1~
3~1!;
381~
Oil
OJ:)
009F6
2200n04+0 A
009FC
6 8 0on9FF
02 009FLJ
1!SO[nooC A
009FO
009F£
2U1onoOt A
009F'F'
21,onoo. A
OOAOO
6 5i lCnCJFD
00A01
2cD3nAOn A
4+ oConooD A
00 14 02
6ABonooo X
00 14 03
3~02n001 A
onAO~
3Rtq
o~
~820
ot'
]821
0;:>
382~
01'
3823
Oi=' 00A05
Oi' 00A06
Oi' 001407
F'52onoo1 A
O~
00.08
13200100 N
O~
OOA09
022ono20 A
~~2~
CNCL9
8
rQLJ
STS,Ro
Ar,R1
CNeLia
CI,R1
8L
l I, o~
XWI01
8AL,SRa
STW,O?
Sl6,R~
C:AL.1,~
04+200A1£
BUMP
2a2r:r:F"DD A
382~
~82'
8.L.,SR~
6 A40nOOO X
0;>
0;')
:!g2~
LI,02
LIIR3
6 A10n9gS
~818
3817
L 1101
•MUL.IOS
p~LL
o
01
SCAN
F"MTEl.CL
CANCl.
)(,4+0'
CNCL.1n
•D"R1
C~ARs
ceNviRT T8 BINARY
B IF E:RReR
SAFETY eL.SSE
DEL.ETE: IT
SUPPLY TRAILING ~LANKS
IN SP£crFIEO 10
1
•CNCL.9
08N£
*R1
NeT oe~j~
ERRMSG KEY FeR ,CANCEL'O'
SAVE TrXT FeR 10 IN 02
GET MSG
STeRE 10 INTB MS~
MAKE MSG TEXTC
.(MAXMSG**.2),R~
GrVE MSG BUFFER
X'030400'
D~
TtERRTXT
11 R1
srNOCNCL.
~ACK
18:~6
~828
~829
l830
:;83t
C~
O~
O~
3gl~
3835
~g3~
~83'
ooAoe
O? OOAOO
O~
O~
ooAaE
ooAoF
at' 00A10
OJ) on"11
at' 00"12
*CNCL.20
2220noo1. It.
2b2onn7F A
2120nc]9 A
:.~~n
1R4~
:J84~
02 00A13
:'81+4
O~
00A14
ot' onA1!
2cC3nAQt A
2iOonAOg
680onooo X
:i8.1,
~849
02 00A16
OnA16
212onn3A A
O? 00A1'
6'30n6Bl
O~
!RSn
!15S1.
]85'
~853
~854
~R55
O? 00A18
2~C3nA02
~85~
ot' ooA19
680onA14
385'
lRBR
O~
:aA60
Oi' 00A18
3861
COAle
O? 00A1D
l86~
A
02 OOA1A
~859
19,~
r:QU
•
ABNBRMAL eN
Le,R2
SRl,R~
GET susceoe:
SL.SIRt'
-1
hi6PE:
ce NEXT SYStD
1
O£LET~
IS IT T~AT THE ID DBESNT ExIST
B IF N6
X'39'
CNCL.3n
**********************************************-*************************
*E*
FRReRI
GR8UP 31 caDr~OA, sueceOr-01
*
~A~1
:uu.,~
PReMPT
CANCEL
CI,R~
e~E
6 9 30nA16
MeRE YO,S
1
Bl.E
B
LIIR~
?c24f.nooA A
]83'9
18~'
el, R1
6 8 0on9£F
~~38
]8 .. 5
SUB.RBUTINFS
6S2onC1D
02 OOAOt\.
383~
lR13
SEP oa, '75
OOAOA
eAl0nl0n ~
ooAoB
211nnOOl A
O~
ooAt'
2fi'Oont33 N
88oonooo A
OUOonAOrr:
8UOonCQ8 A
*[*
OESCRrPTISNI
CNCLMSG
LtlRc
B
T~[
SYSIO SPECIFIED caES NeT MATCH TNE
*
*£*
USER's ACC8UNT 6R IS INVALID.
*
************************.*************************.*********************
LI,01
X'030A01'
[RRSR ceOE & SUBCAOE
..CNCLlO
MULIOS
TtERR
f8 SCAN FeR MeRE AFTER MSG
TYP£ ERR8R MSG
•Xt]A'
IS IT Tee LATE:
GIVE HIM EH
***********.******************.****.*****************.******************
*E*
FRR&RI
GReUp 31 caDr,OA, SUBCSO£'02
*
*E.
0 ESCiR t P T teN I T ' "e: sp[ elF 1£0 SvS I 0 0 eE SN t T EX 1ST YET eR
*
*E*
HAS ALREAOY ceMPLETEO
*
***********************************.*****************.******************
Ll,Dt
X'030A02'
iRR&R ceDE & SUB~AO~
GfVEM£H
'*
CANCL.
B
CNCL.MSG
rQU
•
GENI8,~~
X'2~"M:TEL
GEN'R.~~
OAT~
CNC~20
X'S8'.o
PZE
* M:MESSG£ FPT
.SR1
T8 TEL.L.
ep£RATe~
AeN
'CANC[LED.
~O1
1AI:;'
~864
3gbS
3R6~
386?
08, '15
02 OOA1E
onA1E
Ot.'
OOOonooo It
Ot' OOA1F
8UOonnoo A
0;> OOA20
gOOOnn01 A
~e:p
S£NDCNCL
r;QU
OATA
PZ£
•
PZ£
*R1
0
*0
SUB.R8UTIN~S
189
~~1
1~:~,
!;EP 08,
'15
..
'861\
]869
:;~'('i
3R?1
Or
l8?~'
Or' OoA21
0;> 00A22
:18'~
]~1~
~8'~
~A'~
~8"
C~
0"
O~
O~
*TF'LCCBU~
00A21
2i2an10h N
OCA23
2~30nooo ~
2520n102 fA
ooA2S
21~oncSn
OOA2~
OC A26
7i4f.onoQo X
A
6 t4 2cnA29
3878
:1"'
9
188(')
l881
l~8~
3S8~
~88~
~U~B9
O? O(')A~?
ct:' ooA28
3~90
C?
:'JR91
6120nooo A
£800nooo A
~893
Ot' OOA~A
Ot' onA26
Ot> OOA2C
38941-
Q~
2220nooo
3895
Oi'
~~8A
]A9~
.F'~eM
~2
~3
"T6
~E:S
0
LI,R,
LI,R3
SLO .. RP
L8,RI.t
1~O
TFL.,BUF
JzCC8UF
F'RSM
T8
i?
JS:CCARS
CI,R~
8n
SL.E
•• 3
MAX Cto1ARS
SIZE e.K.
************************************************************************
~R~eR:
*E*
*
GReUp 0], C60F,OA, sUBC80r!Ol
*
*E*
DESCRtPTt!t\i1
*
-E*
IN TRANSF'rrRRrNCi c:eMMAND TB eR FR6M J:CCSUrl
*
*ET~IS IS REALLY
TIo-fE SrZE IN JIf'UP IS ) An.
*
*E*
MeR£ S£RleUS PReSLF,:M T~AN T~E £RR~R MSG
*£*
*[.
INDICATES .. SfNCE S8M£8NF- ~AS UNoeuttTA61.Y STEPPED
eN TI-f£ JIT FfF'LO.
**
*f·
************************************t***********************************
..
.
]881.t
lAS,.
38B'
Bu'CeM
SUB.R8UTINF'S
pAGE
oa A 29
00"20
onA2E
22C]rHH) 1 A
680on'Oi
1540n003 A
L 1,01
B
eMNERR1
TELL USE'R
Rl
MBS .. R2
19
0
CCeUF'TEL LI,R]
N
LtlR~
6tsOonA23
[RRBR
STB .. R~
2i30nl0& N
B
ceDE
X'030R01'
*0
T£L.BU~
J:CCBu;
BuFceM
Te
& SUBCeDE:
&
ABeRT
~O1
~EP
1~1~'
Sue.R8UTINF.S
08 .. '75
FAG[
1·
2*
*****************************************************.*************.****
*D*
~AM[I
F~[EBU'1
*
*0*
CALLI
CA~~EO B[~aR[ EXITING 6R AB6RTING T~L
...
*0*
REGIST~RSI
uSES R*,R~,SR1,SR2,D~
*
*0*
r~PUTI
0•• LINK REGrSTiR
*
*0*
eUTPUTI sBUFl IS RE~£AS[O IF IT'S IN THE U5ER f S MAP
*
*0.
t~T£AFACil
CALLS KtLLMT[L T9 RE~EASE TE~'S DVNAMIC DCB
*
*0*
DESCRfPTr!NI
FREEBUFI FIRST R[LEASES M:T~L ANn
...
*0*
T~EN FREES SBUF1 (IF PRESENT),
THE CHECK IS S~IGHTLY*
*0*
RrDUNOENT, STNC££ t\!eTHING IN TE~ weULD WeRK rF WE
*
*0*
LeST seurl SrFeRE wE GeT ~ERE,
...
********************************* ... ****.*******.***********.*************
3*
4*
~*
~*
,.
R*
q*
10·
11*
1~*
1:::i·
~90~
FR[[6UFl
02 OOA2'"
..
39C~
3Q04
:!905
g90('
1 ..
1911
1·
...
O~
00A2F
OP 00A30
0; 00431
O~ 00 4 32
O~
1.
Or
ot'
00A33
~*
O~
00A34
00A:;5
CoAl'
~91~
391~
6 AI+OnOno X
O'+8on,£o
3280n004 A
['-SoanooF' A
~*
,.
b*
~*
9·
11·
1t>*
02 OOA37
,Des'
BAl,~~
I ooAlS
SUB.,FH3UT I NF'S
"5
2i50nnno N
LI .. R5
2290nooo N
719AOOOO N
ceHPA~J:",SR,.
6838nnoo
A
6 8 08nOOl A
JSBUFtVP
LI,SR.,
FPMC
8E
8
O.. R.
t .. RI+
JXICMAF',J(S
NUMBER OF SttUF1
;R[£ PAGE MAP C8 NSTANT
oe Wi MAVE Tt-f£ BUFFER
N8, R£TURN +1
YES .. R[TURN +2
PAGe:
192
~EP
1RI~'
08,
.,5
Sue-R8uTINpS
PAGe::
:;g1~
eL.eSr
eP[N
:;917
191A
391q
**
~~2n
~92~
*
*
*
*
*
*
*
392~
•
~92~
:;92!'1j
~92~
3927
!q2R
:;92q
~93n
•STATUSL
:1931
393r."
~93~
O? Ot")A3C
ot' OOA3C
~9]~
19l~
~93~
01.' 00A30
3937
Ot' ooA3£
3q3R
ot.? COA3'
:Jq]9
OP 00A40
39~O
o?
OoA~l
~g~1
O~
~9~P
ot' OOA~3
00.42
3i100100 ~
2010n006 A
ElAPS~O
L w,~,
LM,R2
STM,R,
Lw, SR i
*
i9~lt
C;» 00A4_
19.7
0;> 00A45
Op OOA45
Ot' OOA46
3951
a? 00 4 47
3~5?
0" ooA48
6ABonnoo x
3a1onooo x
32EIOOOC A
,TE'L.STACK
14
T[XTJUNI<
O.R1
,eRSEC
PLW,SR1
BAL,SRa
BAL.,SR4tLW,Rl
LW,D3
CR,AT£ STATUS LINE OUTPUT
SAVE R~TURN ADDR£SS
TtHE
oe1
oe1
6 ABonAOo
T~LSTACK
R1
-4
CALi.1
,q4~
0
• I, Rt
FSW,S~1
]9~~
]Q!50
RES
PSW,R;
LeI
2 A2onB1C
2 tJ 22noOO A
3i?8onOOl A
201'FFFC A
~q,+~
C6MPUTE
~eUTrNF
A I, R1
Oa2000£0 .A
:19~3
:!949
*
*
STATUS PRINTS eUT T~r. FeLLeWING LINe: eN
TM[ us,Rs TERMINAL WHrN T~[ CALL
STATUS
IS RECEIVED
FR6M T~E USER.
CPU' M,MMMM CSN • ~IMM tNT. NN e~G ~ XXX~
W~IC~ TS I
t.
CpU TIME IN MtNUT£S
~.
CeNSeLE TTME IN ~eURS ANO MeNUTES
~.
NUMBER SF INT£RACTI9NS
4.
TeTAL C~ARGE UNITS
~eNT[NTS SF ALL RrGrST£RS CAN BE ASSUMED ,e BE OESTR6V£D By
T~IS ReUTINE.
TM[
*
*
3921
TYPE,OeN[
TyPE:,OeNi
T£LSTACK
TIMER
FeRSEC
T£LSTACI<
TIMEvrRT
R[ADAM
JIASUF
1~,Rl
GET
BU~'ER
ADDRESS FeR eUTPUT
MESSAG~
MeVE eUTPUT TEXT Te
BUILD BuFFER
SET IND£X T6
TIM[ CAL
~ANDLE ~
weRos FeR
SRt OiSTRYED BY MaTtHE
R[ST8RE SRi
C8NVERT TIME T! StN MIN FReM 12100
~ew 0] WAS MIN. 'ReM MlON. IN eJ~.
GET J:TIME FR$M AIM TABL.E
Hnl
1~1~'
SEpt
~9~~
O~
:9q~4
O~
086
00.49
OOA4A
·,53100nOO(
6~1onA4C
00000000
:1955
~9!5(,
sUe.ReUTIN[S
A
*9*
!l9!57
~9!5R
tDAV
OOOOO!5AU
~9!;q
3960
~q6'
ot' 00A46
O~ onA4C
~q6~
39~~
lq64
~96~
396b
:1q67
~968
!969
!9'o
~q'1
~97~
2000n!SAn A
3S0nnoaE A
00000001
OOA .. D
Or 00A4£
0;:' O044F
ott OOA!O
O? 00A51
O~
O~
0'
o~
OOA!52
ooAe3
OOA~*
Ot' 00"55
02 00A56
C? onA.!!;,
Q? On A!§8
O~Oonl00
2i!Conooo
36ConB2F
3~Conoog
3cConooD
6 AB onCJ7g
3cConoo!;
3~Donoog
6 ASon9?g
N
A
O~
BGE
.... 2
~QU
1440*1,0
oe
r:1.6£
FQU
FIN
FeRSEC
AI,O~
10AY
Ol
De
PSW60,
L!,01
DW,Ot
STW,Ot
A
LW,Dt
BAL.,SR4
A
Lw,01
A
STW,D~
BAL,SR~
LI,Dt
1~4+
CeMPARr L.eGeN TIMIt WITI-f L,"G8FF T1ME
IS L8GeFF' TIME LESS T~'N L8GeN TiME
1440
Sw,o~
A
2iCOaO'A A
5bCooooC
1DAY
Cw,O~
r:eRsrCIo
TE:L.STACK
0
"0
SR2
O~
BINDCS
SR2
SRi
BtNDCB
I,
,
STI-i,O,
32Cono09 A
O~
LW, D1
SR2
,eR CRSSSING MIONIG~T
SUBTRACT LeGSN TIME F'RftM
L.f!G8F'F
SAVE MINUTiS
D1 FeR DIVIDE INITRueTI8N.
SETUP
GET TIME IN t-IRS
MINUTES
SAVE
CeNV[RT
~eURS
ANO
MINUTES.
T8 ,BCOIC
GET MINUTES
SAVE: HeU~S
C8NV[RT MINUTES T6 Escort:
02
~
,
,
, I MM
~97!!5
OJ) 00A59
e.L.,SP~
Z[R6SI<
!~,~
O? OOA!5A
25000208 A
SCS,02
:MM'
GET ~8URS AGAIN eTN EBCOIC)
C6NVERT L,EADING 'EReS 16 BL.ANKS
8
02
]977
01' OCA!58
20Con278 A
SCO,D1
[L.SE
-I(
01,02
~9'3
~9'4
A
6 AB onAE1
~g,g
~9'c)
19Sn
3981
398,
~98~
1981+
398!'5
398,;
3987
:'5q8~
~98q
*s*
*5*s*
Lw,R7
L I, Dt
*s-
STW,02
BAl,SR_
'6R?
Xw,D~
76 R1
LI,D1
DW,Dt
STw,OR
8AL'SRM.
0
*S*
*S*
*9*
*S*9*
*s-
*s*
ow,Dt
PSw,O,
•
,
,
t-n, t MI MM'
SJ.(1
0
,bO
T£1.61.CI<
BrNOeS
~60
R#,
BfNDCB
01J,BtN SECSI 021.6IN TeT MINS
BIN TeT MINS ARE SAVED
TEMP SAVE er: BIN TeT MtNS
Oa:IEBC SEes
D2:,SYN T6T MINSI SAVE EtfC SEeS
01t~a1N MINS~
R61.StN ~RS
C21·iBC M!NS
02,.BrN
I-fR~
rIME
Hot
sEP
1~1]'
08 ..
~99n
·,5
3g9~
*S*
]99~
~991t
~99'
l
~7
*s-
*S*
STa,R.,
:;q9q
4000
4001
400~
4003
~OO4
~oo,
400~
4009
R3:,aA(OEST)·6*_·~
R,
0
LW,01
R~
RESTaRt'
'*~·2
11.
BtNOCB
BIN io-tRS
SL.S,R'
.1
ST~,O~
, .. 1=f1
-1
D2:-e:BC HRs
F<' New HAL.F weRD AOOR
~H·I INTS BUFFER
R1 weRO AOOR AGIAN
*R"R1
BS
SL.S,R1
L I, R1
L I, 01
STB,Ot
Lw,01
L~ .. Dt'
FIN
'*.·1
,I ,
fNTe SUFFER
fuR?
, .. ~?
LW .. R?
35C[noo~ A
SRl
STW,01
f,.. R1
PUT MtNS
3bOE'n007 A
STW,O~
"R1
tN L6aeN Te
*
*
~O1!5
401~
01>
ooA!SF
3c6on100 N
4601'
C~
aoAbO
2U60n04[ A
401R
O? 00A61
4019
O~
~02n
at?
~Q2'
Oi' ooA64t
402~
00A65
O? 00A66
ot:' OOAt,?
at' onA68
402Fi
402('
.~
02 OOA!50
Oi' OOA!5E
~()14
ooA62
OOA6~
a~
Ott
on
A 69
04+1onAF2
0 4t 1oneOt
01+10(')808
3210(')000 X
2~C?nooo A
4+t5C2nooD
25Conn10
6 9 30nA6.
A
A
2 0 CO(,)001 A
*
,,,
C8UNT FeR MBS
R3:.W.CDEST)
3i1onno8 A
"'01:';1
4024
S~IFT Fi'SC MINS N~XT T6
oeASe
C'lP
195
Te PRECEOe: MM IN BUF"F[R
Mes,~
B.L,SR~
*S*
*S*
*9.
400~
,I ,
R3JIltBA(OEST)
a[T CBUNT IN RUl
R21.B,(SeURce:) (SYTE 3 ef Oil
IMM tNT! BUFFER, ••
LI,a
*s.
~no~
402:q
AI,R]
*i*
*9.
*s*
*5.
*s*
*9.
*S*
*S*
3998
1~
LW,R3
SL.S,R]
*9.
39g~
,: ' SUe.R8UTINFS
Lr .. R2
*s*
3993
4n12
LI,Ot
SL.S,O,
*s.
1991
4010
46011
*$.
+
~RS
ee:
TIME IN MESSAGE bUFF
PRYNTEO SUT LATER
c:eMPUTE CHARGI!" UNITS
Te
AI, R6
CAL1 .. 1
CALl .. 1
CALl .. ,
TFL.STACI<
GET BUF"FER
78
eRATE
ePFN RATE ,Ilwe:
RRAT[
CRATE
LW, R1
J:ABU'
READ IT
CLeS[ IT
L W.. Rt,
LIID1
At\O .. Dt
SL.S,D1
8NEZ
A I .. 01
C~£Cf(
READ RATE f-ILE:
THERE IS
IF'
ANYT~ING
Xt?OOOO'
1~,R1
•• 2
·'6
IF JIRATE
1
IF' NeT ..
,
0 .. SET DEFAUL.TS
DEFAULT 1e TABLE 1
IN J:f
1~EonooC
A
A
MW,Dt
LO,D3
o,R6
L W.102
JtUTIME·'
JIPTIMi.a
~0]3
4034
37 CCnooo
40~~
403~
O~ 00A?1
3cDonnO~ N
403'
OP 00A12
4038
O~
3000n002 N
37CCnOOl A
403Q
4040
O~ on.'~
10EonooC
A
O~
2cDl~FFF
A
404'
404~
404~
00A?3
00A75
00 4 '6
O? 00A7'
C~
A
404~
O~ OOA?'
3~Oonooo
X
404,
404A
404Q
40!O
O~
O~
OOA,.
OO.,e
37CCnOO] A
10EcnoOC A
O~
OOA,C
0800n10n N
Q~ 00.'0
O~ On A7E
O~ 00."
2iCorPFF A
4C!!§1
405~
4053
~054
40~~
4C!~
40~'
4058
4059
4060
4061
~06'
40t,~
CP 00A80
O~ 00A81
Mw,D1
*
37CC0002 A
10Eonooc
4C4!=S
O~
.~'02
4~OOnOOo X
00A78
4044
.. ceRE-TIME:
4~COnnOo
01
CALS
LW'O~
JICAl.CNT
*
.0,03
ELAPSE:O T!ME
*
LI,Ot
A~O,01
F
LI,02
2cOOrPFF A
4~OOnOOo F
A~D,D'
X,r:FFF"
J:JIT.OCACCESS
Op
X,FFFF,
JIJIT+OPACCESS
Aw,D1
02 00A83
4~DOOOOO
F
O~
O~
OnAa4
30ConooO A
O~
00 4 85
AW.lD1
3cDonooC A
3 7 CCn004 A
LYf.lD~
01
Mw,01
10EcncoC A
AD.I D~
".IR6
01
OOA8'
A~O,D2
*
TAPES
TtM~
X.FFFF,
LI,O~
O~
t/~ CA~S
JIJ%T+TPACCESS
A
O~ 00A86
G£T NUMBER SF
PLW,O,
T£LSTACK
LeAD [LAPSED
TeTAl NUMBrR e, lie 6P[RATteNs
2aOOFFFF A
00A82
LeAD MASK
G£T NUMBER SF ce NS6LE tNTERACTleNS
M~.ID1
3UConooO
O~
USER ceRE-TIME FACTeR
PR6C£SSBR CBRE.TlME FACTeR
1,R6
AO'D3
01
TERMINAL INT[~ACTIeNS
LI,O~
)('1 FFFF'
A~D,D,
JatNTF.R
Mw,D1
2,R6
AD,03
01
.. lIB
USER EXECUTE: TIMr
USER eV£RHEAO TIME
PR6C£SSSR EXECUTr5N TIME
pR6CESSBR 6V[RHEAD TIME
C~ARG[S
IN
PiNNI~S
~nl
~EP
11"~'
~Ob4
406Fi
08, '75
OOOOOOOU
on4aS
40t,7
C~
C~
406~
Oi? COA8A
4069
4070
CP 004se
40~~
407'
40"
40'~
40'4
4075
4n7b
40"
407A
4079
4080
4081
408~
4083
40B4
c~
O~
O~
ooAa9
ooA8e
COAeD
onASE
0' ooAaF
ot.' 00.'0
O~
O~
O~
ooAgl
00A92
00A93
0' ooAg4
O~
Or
at'
Oi'
0'
ao A9!5
00.496
OOA"
ooA98
00A99
~087
onAgA
O? OOAge
0' OOA9C
02 ooA90
4088
4089
o~
408~
408~
o~
2~Dcn()oo
F"QU
REF,t
LI,02
Ll,R!l;
LB,RO
A
N
A
A
N
2250nooo
1cOAOOOO
3000nooo
2c50nooo
?COACOOO A
.W,O~
LI,R6
LB,RO
3UDonooQ A
AW,D2
31CCnOQ!5 A
MW,01
1QEonooC A
3iOonooo F
AO,O]
LW,~o
sLS,Rn
2500nC6F A
3ionnoOo F'
2 0 00n06F A
LW,02
3iOonooo X
250onn6, A
Lw,Rn
Sl.S,Rn
30 0 0nooo
&1..6,0,
A
Aw,D2
3UOoncoo A
3iOonoeo F
3000nooo
250ono6F A
JB;TMTS+Z4
O,RS
RO
JBIF'MTS+Z4
O,RS
S,R6
01
c:pe·J:JIT
.17
CP6+JsJIT
-17
Rn
J:CPP8
-17
CUPB+JaJtT
RO
Cope.JIJIT
.17
00149'
MW,01
O~
onAAO
1,R6
409(')
3UOonooo A
37CCn007 A
10Eonooc A
AO,03
01
~C91
ot' 00AA1
36Eon011 N
DW,Ol
TF.NT~eU
LW, D1
04
409;:>
409]
4094
#095
OP aoA'E
ot'
OOAA2
OP ooAA:i
0,
OOAA~
O? OOAA!
ooAA'
4ng~
Ct:'
4097
409A
409Q
41.00
Oft ooAA'
31lCnnooF A
6 AB on97g
AW,O~
C~.RGES
6 A BonA£1
3210n008 A
3SCE'nooD A
360F.:noo£ A
BAL,SRa
*
....
*
Ro
BINOCS
BAL/SR~
Z£R6SK
LW,R1
SRi
~TW/D1
STW,D~
PACKS M8UNTED
RO
Sl.S,Rn
Lw,Ro
SL.S,Ro
1~1
o
·1'
Ro
AW'D~
A
3ieonoon F
SUB-RSUTINFS
JBITMT&,JB:PMTS
AW,O~
Lw,Ro
2500(,)0t,F A
o
1~,R?
1*I R1
GiT reTAL CPU TIME
GET CARD INPUT C~UNT
&~rFT T8 RtGHT.JUSTIFY THE CeUNT
GET CARO PUNCH eUT CeUNT
I~IFT T8 RIG~T.JUSTrry THE CBUNT
ACD CO INPUT CeUNT TB PUNCH6UT C~UNT
GET PReC[SS6R PA~fS eUT CeUNT
S~IFT T8 RIGHT.JUSTfFY THE CeUNT
ADD CURRENT PRSCisSeR pGS eUT T6 TeT
GET CURRENT USER PAGES SUT ceUNT
S~IFT T6 RIGHT.JUSTIFY THE CBUNT
ADD ~[SULT 15 TeTAL
G£T OJAGNSSTIC PAGES SuT CSUNT
S~IFT 18 RtGHT.JVSTrFY THE ceUNT
Aoe CBUNT T8 TeTAl
UNfTS IN P(NNt[S.
C8NV[RT CHG UNITS r8 EBCOIC
C~G
. ceNVERT
~EAOING
'ERes Te
BLANKS
C~RG UNITS IN MSG£ BUFFER IN
L8G6N.PRINT BUT ~'TER ,eR eN ~IN~.
PUT
~o1
l~J~'
~EP 08~
~t01
0::'1 00AA8
,,5
LW"D1
3UConooo X
AW"D,
Aw"D1
3fJConn01 N
"1C~
410~
(it'
O~
CCAA'
OOAAA
4104
at>
onAAB
~10s
410~
02 OOAAC
O~ 00".0
56Con8l0
6 ABcnQ1g
41.01
O~
4108
02 OOAA;
25ConnQ8 A
4109
4110
411, 1.
411~
00 •• £
OP 00 A8 0
Ct:' COA81
0;> 00A82
Ot;' 00A8]
30Conoo1 N
20C00048
6 AB onA£t
3a'00008
0220n020
21:SCt:n002
A
A
411n
0"
0"
01'
02
O?
00484
00A85
00A86
2cC1F'F'FF A
4rJCOOOOO
6Aeon9,g
x
ooA81
6 AB onA£1.
00A88
3i'oncoi A
Of' 00AB9
4'23
~1i4
aQABA
412~
o~
02 onASB
412~
4129
4190
4131
4+132
4133
4134
41.J~
411~
41.3'
C" onAse
O~ ooA80
ot' OOASe:
at> OOASF
O~ ooACo
01' coACt
Ot' OOAC2
C? ooAC3
Oi' OOAC4
Ot' OOAC!5
O~
coAC6
3c"'O~1cn N
2V"'on04[ A
3250n008 A
2i30no3C A
221oonoo A
2220nooo A
.
BJNDCe
II
,,
BAl,SR~
ZF'Real<
Lw,R7
LeI
SR1
STH'Ol
2~R1
L I, D1
BAL,SR~
BAL,SR~
2
TB eLANKS
T6 MESSAGE AREA
X'lF'FF'F'
JIINTER
BTNDCe
ZFReSK
STRIP eFF 1S1-1/2 WO-Net INTERACfIBN
ceNViRT TH£ NUMBiR Te BCD
C&NVERT L.EAOING ZrRes T6 BLANKS
PUT
Lw"R4
A I" R4
T~L..STACK
GET ADDRESS 6F eUTPUT BUrrER
7"
SR1
60
L L,R2
o
a
B
~xx
21Cono4o A
~XXL
el,01
,,
BE
""IXXB
FilC~n()05
~xx
LBI D1
A
F5C~n004 A
2 U20n001 A
2010n001 It.
~ev£
l~Res
10lR.,
L I" R1
6 ti 30nACA
ceNVERT L..EADING
SRi
Lw,R!5
lI"Rl
6 8 00nAC]
1~8
GET T8T USER £XECU TIMr FeR CURRtJ8B
ADD T8T USER EXECU TtMr T6 TeTAL
ADD TeT PR6C[SS EXEC TtME Te T6T
AOO PRBCESSSR eM TIME 18 eTHER TBTAL..
ceNV[RTS TICS T8 MINUT~S
e&NV[RT TIME Te iBCOIC
Lw"R,
STW,D,.
**
*
JIPTIME:
J:PTIME+1
IX'000300 nC'
8AL"SR~
A~D,D1
3bDEnooA A
41.2~
4121,
41~'
.
..*
JIUTIMi
JIUTIM;:+t
SL.S .. Ot
AI"Ot
A
4~.14
4111
4118
4119
4120
4121
AW~ D1
D~,,01
A
4i1::1
411b
sue.RBUTINrs
32Connoo X
I-IXXC
STS,D!
*R5,R1
*R4 .. R2
~XXU
AI, FU
1
1
Ar,R2
Ne. INTERACT. IN
eN.~INE
MSG~
GET ADDRESS 6F TEXT Te BE eUTPUT
LeAO M[SSAG£ SIZE
LeAD P6INT[R T6 PReCURrNij AREA
LeAD petNTER T6 ST6RAGE AREA
PICKUP TEXT ~YTe:
STaRE rNT6 BUFFER eUTPUT AREA
ceUNT
H~1
414+0
SEP 08, '15
OCAC?
64t30nAC1
ot' onAC8
0 4t 1on8oA
6t40onAC[
O~ OC AC9
4141
C~
414~
4j4l
C? ooACA
OP OoACe
4144
O~
41.~
Ct:.' OOACO
C? ooACe:
19r~6
413R
41lq
41.~
B
De~E
FINISr-t,D wITH R6UTINE
RES
0
NE:XT
F'cC2nao~ A
L6,D1
C I, 01
*RS,R1
6'30nAC4
6800nAC&
Bt\£
~XXC
~XXU
~XXB
OOACA
COACC
21Con040 A
OBNE
B
RES
TVPE
,,
0
Ne
YES
OBNE:
W~E:N
**********F'ND er: RBUTINE**********
4148
414q
41!1
199
t-IXXL.
414'
41l5(j
SUe.ReUTINF,:S
BOR,R3
CALi,!
O~
OP. ooAC&:
01> OOACF
0820n100 N
[loonOO2 A
*
PI.W,R~
TF'LSTACI<
8
*R2
RETURN
WE G£T j..4E:RE
~01
sue.ReUTIN£S
1RI~6
415~
~15!
PAGE
* T~E TtMFVERT ~UB.ReuTtNE PULLS T~E HeU~/MfNUTE TtMl FReM TIMBUt AND
• CeNVERTS fT fNTB A BrNA~V, MINUT£S FR6M MIDNIGHT REPRES[NTATfeN I A~D
* ST6R[S TME R~~ULT IN JIT.
* i~TER WTTH BAL,SR_. TrMeU~ MUST ~AVE HAD A MaTtME DSNE INTe IT.
4154t
~155
41!5b
...
41!57
4158
41.59
O~
41.60
4161
4162
416:1
O? OOAOO
02 DoAD1
O? 00.D2
41114
4t6~
4166
4167
416R
416q
4170
00 4 00
00000001
O~
O~
ooADl
00. 0 4
02 ooAD!
O~ 00.D6
O? oeAD?
0' 00AD8
O~
41'~
OOA09
02 OQADA
O~ ooAD8
417~
O? OOADC
4\74
417,;
41'6
4111
4118
411q
4180
02 OOADD
O~ ooAOE
O? ooAOr
C~ ooAEO
4~?1
4181
418~
.18~
41~4
IF
S~CFLAG
TJMEVERT RES
aaCOn001 A
2~30nooC A
22200002 A
6 AA onBoi
De
LWI D1
LIIR3
o
12
OECetN1n
STW,R ..
R~
MIIR~
60
B~ConOOI A
20100001 A
SiOOOOOl A
LWIDl
AII Rt
Lw"D2
25Cant18 A
2~30nooC A
LIIR3
22200002 A
6 AAon8o£
O~Oonl00
N
3VOon004 A
£800no08 A
*8*S*
*S.
*s*
*5*
T£LSTACK
*Rl
sL.D,D1
LI"R~
2
PL.w,02
TFiI..STACK
t~
DECBIN10
BAL.,SR~
e
F-L.SE
LSIR]
MII R3
STW,RJ
SL.S,SR,
Le,R~
*8*
418!=;
*6-
Mt,R3
AWID;?
418~
418.,
*S*S*
La,R:;
4~8Pt
*8*
SI..S,Sf:(~
AWID~
MICKEV MeUSE r!R HI INSTRUCT IBN
C8NViRT HeUR$ Te Mr~UTr.S
5.'1£ R£SULTS
ANO GrT MINUT£S V'LUE
1
*1=<1
24
.w,o~
MUST C6NTAtN OATA FR6M MITIM£
*R1
LI,R~
BAL,SR~
PSW,R~
SR~
F'e~SE'"O
3 5 400003 A
2 3 30no3C A
0 9 300100 N
SET,
R.,
CURRENT TIME
re
*SRJ+
SR2
60*60
D~
A
SR2
Itn
R:g
8
SR2
R3
G£T t-fRS
I-fRS .> SEes
ACCRU£ IN 02
St-fIFY IN MINS
GET MfNS -> SEes
.CCRU£
SHIFT IN SEes
GET SEes
02
MOl
SEF' 081
1~1~'
9,5
e
*S*
"'189
419n
201
RETURN
'IN
41.91
*
.
..
D1-02
,LfAO
DCB
04, Rt
USED
2i1F'F'FFs A
*ZF.ReeK
L I, R1
1aF'atnoOE
Z£ReB!<1
LB,Li.
41~1'
*
4193
4194
419R
~19(,
O~
4197
419g
C~
4199
SUB-r
ooA£,
4203
OP
OoA~8
A
21FonoFo A
E~30nooB A
2iFon04to A
7!:iF2noo&: A
211F'FFF'£ A
El4 30noOB A
C:~ANG[
C:I,D4
ZERBS
-"01+2'R1
ALSe
tNT!
ANSWER
BLANKS
C:~ARACT[R
GET NEXT
CeUNT ANO eYTE pefNTER
C~ARACTER F"ReM
,,
IS IT A ZER8
IF' NeT" EXIT
IF IT IS, SUtiST I T'UT£
C:IIF(1
8£
01+2,R1
-1>
*SRi+
C8N,T C8NVERT LAST ZERe
*SF(4
e~[
L I, 04
STe,D.
4~O4
o?
0014.[9
6510nA£2
BIR,R1
420!15
0;
ooAE~
E80oncOB A
8
, 0'
*SRi+
Z£R8BKl
L.EF'T
A SPACE
Mot
SEF 08,
1~11'
',5
4~O'
*•
~~O~,
4~O9
421rJ
O? OnA£B
90000001
A
4211
4~1~
421]
4~1'+
421;
O? CCAE:C
OCAED
OoAED
c"
SUB.ReUTIN[S
PAGE
420~
0 4t 1on808
OJ;)
.
PLtST Te 6BTATN
TIMER
*
*
~1RATER
~ATE[RR
~~R~
C:AL1.1
F(ES
ooAEF
2 bC on14t.O A
Oi8on100 1\4
3i8onl00 N
421CJ
O? OoA'O
2080nOOit A
PLW,SR1
Lw,SF<1
AI,SRt
4220
0;;
6~OonAA3
B
421~
4~1'
4~1~,
ot» ooAE:'E
O~
oeAF1
OATE/TI~£
GEN,8,112l
CBHE
SL.D,D1
202
X'gO,,~eRSEc,Rl
eN SPiN 8R RFAO ERRBR BF RATE
CRATE
o
.~~
TFI..STACK
CJ.04ARGr;:S
T[L.STACK
t,
rt~£
CLf!SE IT UP
ZER6
C~ARG£
UNITS OrST'NATt8N
CALCULATE AOORES5 SF
TEST AREA
ceNTINUE PReCESSING
~O1
SEF os ..
1AI~6
,,5
4.221
4~2~
4~2~
4~24
OoAF2
4?2~
C~
422~
0" onAF2
ott 00AF3
01' 00AF4
422'
4~28
4?2Q
C~
OOAF5
423(")
C~
00AF6
4231
Oi' OOAF',
OOArS
00AF'9
4~3t>
01,'
4~l]
('};:t
4~34
0; OOAF.
42]5
O~
4'3~
O~
ot'
oeAF'S
coArrc
OoAFD
onAF'E
4231
O~
4t.?3~
ot' OOA.FF'
O~
acaoo
4~4Q
O~
00601
4241
ot' C0 6 01
1 4t OOnt"lon N
Cli'4onoo9
ot'
4244
424;
0::> 00604
02 00 8 05
O~
00 6 02
OoB03
4f'4~
O~
4t>47
42 4UI
O? 00 8 01
00B06
Oi' OO~O8
4~5~
O~
4t'!5g
42S4
C~
4~55
OC~08
co e09
*
BR.4T£
RES
a
/It.
DATA
A
A
A
A
DATA
DATA
OATA
[,}ATA
A
OATA
X'0100020~t
051An9Cl A
£4C5_040 A
T[XTC
, I RATrr. ,
Oi!01n2Q2 A
DATA
Xt0201020P'
010oo~o~
7 AE2'8£2 A
404o.n~o
TEXT
"
F4 00nooo A
OUQOnAJ!C
RES
1
1
2
SAVE
FIL.E NAME
ACceUNT
, tSYS
OAT.
DATA
OOoonAEC
0
G£N,R .. , ... X,10·.f-'lIXX
OATA
XtF'4000000'
M1RATF'R
M1RAT£R
1,Rt-.
GEN'1'~1
DATA
288
DATA
0
80000006 A
OOoon120 A
00000000 A
*
*
*CJ6~
q.~6/'
*..
426'
4268
426c)
4270
0, 0080£
421,
02 0060F
"2'~
42?~
ot!' OoB10
00B10
0' ooB11
4"4
4?75
o~
"~8~
4~Bl
~28~
4285
!II
~r:-SULT
F~TER
eel
ts
wlT~
s~,.
RiS
a
LI,R4
0
0
0
LI,R5
D£CBIN11 RES
SA""
eN
ot'
6~4on8tA
BCS,4
D[CBIN~l
3050000' A
AW,R~
R~
00 6 12
00 8 13
00 6 14
*R3,R4
.X'FO'
10
O~ On B16
O? OOt!11
AI,R4
BCR,R,
1
64t2onB1.0
3b!5onOO4 A
STW,R!
OiCS1N11
R4
O? 00 6 18
OP 00 8 19
02200000 A
ooB1!
OOt:i14
02 OOB1A
OP OOeiB
20~onOOl
E~OonnOA
A
A
LeI
B
O£ce~N21 RES
C~
Oa20008C A
LeI
£80oonOA A
B
C~ARACTrR
SR3
IF AVN [RReRS eCCURERS
206F"J"F10 A
2J50nnoA A
O~
O~
4281
R4
LB,RA
AI,R6
MI,R!§
4271
4280
CHARACT[RS
wARD ADDR[SS eF 1ST
R2
RJ
•
205
EBCDIC STRING Te BINARV
V NA. !F
Fi68nOO] A
C~
4~'9
.
2240noOo
2c50nooo A
Ce~VF'RTS
O~
4?16
4218
oot;o£
"orCBINln
PAGE
0
*SR3
0
R
.SR3
LEADING 'F ,
MULTIPLV By 10
CHI( FeR IL.LEGAL Rr:SULTS
F<£MeVE:
SET
[XIT
SET
eel
II
0
FeR GeeD RiSUL,T
ccu
~
1
Fe~
SAO RESUL.T
~ni
1BI~6
O~
4"8A
Of)
4~aq
O?
429n
4~91
01' 00610
Of) OolitE
429"
C? aof:31F
4;?93
O~
429~,
4~9!1;
0;') cnS21
Or Oot;22
429t,
Q;'o'
OQti2]
4~g,
Oi'
OoB24
4298
O? 00825
~~99
O;:J 00826
02 00827
Oi' 00828
430n
4:;01
4~O~
4]0:1
4304
4305
',5
SEF-' 08"
4'8~
~28'
ooBie
oeBte
ooB1e
00 13 20
01' 00629
01' Oo6e!A
OP
OO~2B
02
o? OoB2C
O? 0062D
O~ COB2[
o~
00B2r:
O~
00830
t;
1
SUB.RSUTINrS
PAGE
e30'~~
A
A
~O'E:.040 A
~(J40.040 A
40~O4040 A
~U4+0r306 A
Ot}?e:4040 A
~(J404040
A
TfXTJUNK RES
CFU
DATA. 1
nATA.l
TEXT
CF'UV
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
TEXT
DATA
FND
C6NV
~O404040
A
40CgnS£3 A
4U1[4040 A
~O40.040
A
I+OC3C8C7 A
,+(')1£4040 A
I+U404040 A
40'+04Q40 A
INTV
C~GV
OOOonooo A
oooou
206
0
X'~5'
,, ,
tC·U'
M£SS4G[ AREA
t
,
C!.
F'tLL£O
F'1L.L.iO
,tN" ,
, ,
FILLED
FIL.LED
.. ,
F'ILL£D
, INT.
,, ,
,"
t
C~G'
a
;ILLED
r:rLLED
ENO t!F
MESSAGE
TJ!L
'+0'+04040 A
,+UDbnS40 A
11.)00nooo A
OOOonOlC A
Ooo:Jnooo A
CRNTRBL SECTleN SUMMAR': 01 00000
n!S 00028
PT
0
PT 1
02
06
cne~1
cnOlA
PT 1
PT 1
03 n0028
PT 1
04to 0OO2n
PT 1
Hot
•
1~1~6
SYM8eL
SEP C8,
VA~UES
ASt\Qr:T/02 00943
ASSFMBLE/O~ OeaOE
B.SI~/02 00 7 4+4
BINOCB/02 00919
BI<"F'TO/O~ 00833
BREAKER/02 Oa82~
BUILDA/06 00008
CC8u~T~~/02 OOAiC
C~GV/02 00929
C~t\GTVPE/02 OO~~8
CNCL20/02 OOAOE
CeC~F"F/02
00546
ceCSTATC/02 00517
C6MMA/o2 00451
CBNCATA/02 0084;3
CBNTtNU / 02 OO~AU
CB~VBIN/02 OO~E'
eBUPLE~/02 OOSA6
CPU/n2 ooBlt;
C1C~/O~
00128
OBtT'I050008J+C
DCMPRS/02 008!O
DEC9TN1/0! 009a7
D~ceUPLE/02 005 8 1
OELTA1/02 001!4
DISPF;W/02 Q06FF'
DeL~/O~ 001 0 1
DeM~'/02 00161
DBBN/OP 00168
DswLeBP/02 0070 3
D4/nnOOOooF
F~MSG/o2
sue.ReUTINrtS
'75
00110
2U1
ABRTN/a2 00/'84
ANSPReC/OOOOOOOO
ATSZ/02 0065C
.1/0~
BATC~/02 0073A
8ITS/0000000l
BKUPCAL./02 n07E1
eUFCBM/02
OO~23
C.ANC[L./02 Ong[F
C~ARGES/02 00AA3
C:~l(eur:1/02 ooA37
CM~OSET/02 0023F
eNCLJO/02 00A16
cec:eN/02 OO~"5
ceCSTATO/02 OO~F~
C6MM£NT/02 0025A
CBNCATe/02 00848
CBNTINUE/02 002~~
ceUPLE/Oi 005Se
CeU PL.E5/02 00561
CF'UV/02 0081£
OBrTSI/0J+ 00010
08Ll0/02 OOOAF'
oEeUG/02 002~9
OECBINI0/02 C060t.
OELTA/02 00'36
D!SCBPReC/ooOOoOon
ONTS[NO/02 nO~lB
06LB1/02 0010F
oe~1£/02
OOACE
oeeViR/02 0016A
01/00COOOOC
EOIT/02 OO'~8
£NTPRG/02 on12A
ir.RBtN/o2 009"6
~RRABN1/02
F.:XTF'ND/02 00581
r:rOFR/o2 00 8 16
F'rO~/O~ 009t:a
FDP/02 0072F.
F"106/02 0098A
FL..AGS/02 0071F'
00924
OC)!.3B
BATC:~2/02
0070B
BKMSG/Oa 00'55
BKUPK£V/02 no,OF'
BUFINT/op 00016
CANCL/O! OOA1A
Cl-fAR6K/02 ooses
Cj.jKULM/O~ 002:'1
CNCL.MSG/02 00A14
CNCL9/02 OOgrO
ceCPRT/O,. 00510
caCSTAT1/0~ 004'4
CBMPfLE/02 001'11
CfJNCATE/Oi OOI!]
CBNTtNX/02 OOiEB
CeUPL[1/02 00593
CPLCMN/02 00596
CRATf/02 ooBOR
OBITS2/04 OOOlF
DBlJG/OOOOOOOO
DEBUG1/0~
00263
D£cefN11/Q2 00B10
~iL.TAeK/o2
01SP~PT/02
06SLT/02
OOIFS
oalrA
OO~O~
DBM£/02 00159
De~T/02 OO~~E
DB6V~R1/0i 00160
D2/00000000
~OITA/02 0072'
e:RAS£I02 00870
iTMFQT/O~
005;£
~DPsrT/02 (,)02r~
FID~/02 009B[
F~ePBITS/02 OO'2~
ARS/OoOOOOOAt. S
6ACKUP/02 0065E
BINA/o2 0091tJ
SKePT/02 00837
eLANKBUF/O~ 00902
SUILD/at? 00237
tARR~TRN/OP 0071C
CHARttK5/02 Q08er
CHNGERR/02 004+CO
CNCLlo/o2 oo9FF"
ceCM~BeP/02
OO~FE
c;eCSTAT/02 001+00
ceCSTAT?IO~ OO~F6
C8NC AT/02 o08J+1
c:eNCATN/02 008.0
ceNV / 02 00B22
CBUPI.E2/02 00599
CPLMSG/02 00568
CTF'PT/02 007F"3
06rTl/LIST
DCBP~eCIOOoOOOoo
CEBUti2/02 00256
O£CBIN21/0' OOB1A
DELTASET/02 002F2
OISPL.AV/02 oosec
06l.L/02 0o,11
06ME1/02 00150
06NTfJI
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:09:24 05:50:23-07:00
Create Date : 2009:09:24 05:50:23-07:00
Metadata Date : 2009:09:24 05:50:23-07:00
Format : application/pdf
Document ID : uuid:6453789a-be08-4b7f-b0a9-f885b00308a0
Instance ID : uuid:32b9886d-6f3b-4fb7-9d29-7018d2191ed8
Page Layout : SinglePage
Page Mode : UseOutlines
Page Count : 212
EXIF Metadata provided by EXIF.tools