Google
 

Trailing-Edge - PDP-10 Archives - tops10_integ_tools_v4_10jan-86 - 70,6067/tvaxv1/tv.ool
There are no other files named tv.ool in the archive.
%lX-11 Librarian V03-00@2v

vW
!2h>>  vG64KGBUFSGCRX\GDELRGEBUFFAxGERR13GERRNGEXITGEXP1GEXP2?GEXTHOLRGFBUFFAGFCNTGFPTRGHCNTGHPTRGI1LLGI2LLGIBUF2AGIBUF3AGIBUF4AGIBUFFA\GINSR\GINSRXGINFABGINRABGMIDPTR?GMOVHOLRGNONDISR\GSIADR\GSILL\GSITR\GSITT\GSXLL3GTERMF3GTERTAB3GTVR013GTVR01AVR06OSUTAB3GTVR01?GTVR02JGTVR03\GTVR04nGTVR05uGTVR06xGTVR07}GTVR08GTVR09GTVR10TVMAIN3u	GTVR06OSFu	GTVR06OSLxGTVR07}GTVR08}GTVR08C}GTVR08O}GTVR08W}GTVR08WEGTVR09GTVR09RGTVR10\GWICC\GWINCGWRITRGWRITR2GX2COMGX2SRCGX2TERGXCTLLGXEXECGXHPGXIN1GXMOREGXRNGGXSRCH1GXTERMGXVALRRPRFBRRPRFESINFABTVMAINJWLTABJWUTAB7GNONDISGTVR01AGTVR06OSWUTABB
?GTVR02JGTVR03CJGTVR03I\GTVR04nGTVR05uGTVR06uGTVR06INuGTVR06ISuGTVR06ONuGTVR06OSGOBUFFAGOPTRGOUT_FABGOUT_RABGQBUFFAGRERRGSBUFFAGSCT\GSHIFTLR\GSIADR\GSILL\GSITR\GSITTGSTATGSTAT2\GSXLL3GTERMF3GTERTABGTTAB3GTVR013GTVR01A	

 !"#$%&'()*+,-./01241-@hd

00GTVR010 9-APR-1984 16:06                 VAX-11 Macro V03-00&/OBJECT GTVR01/LIST/CROSS+TV/LIBRARY T	FAB$L_STVGEXITGIN_RABGNONDISGOBUFFAGRERRGSTATGSTAT2

GTERMF
*
GTERTABGTTABGTVR09GTVR09RGWRITRGX2COMGX2TERGXCTLLGXHPGXTERMIO$MNOECHOIO$MTRMNOECHOIO$TTYREADALLSINFAB	SYS$HIBERSYS$QIOSYS$QIOW	5SYS$WAKE	.  ABS  .H	. BLANK .PH`
|GTVR01&M~PQ64&~0:
{GTVR09o{1{GTVR09RoxUP1GX2TER%GSTAT2oz1
GX2COM%GSTAT2o|11GEXIT{1P6
o|
owWTg`'%65
%5:y
oPGOBUFFAozXIM|IfPGTTABoqQP!Q(a!hPSX#:
@%5XTERM%GSTAToy1{	SYS$HIBER
GXTERM%GSTATox1@1{	SYS$HIBER
GXTERM%GSTATo4
ow]]_f|~"
o<IO$_TTYREADALLIO$M_NOECHO3&~~<SIN_FAB	FAB$L_STV3o{~]{
SYS$QIOW|hP1GRERRx
oy
o|.f*
ox
o>tn4&.n4&Xn4&x
o~7*|4&*|4&*|M4&PGOBUFFAosXf 1fPGTTABokQP!Q(a!hPSX19PPx
o~I64&I64&I64&PGOBUFFAouXf1PPx
obhPPfGOBUFFA|0Q0GWRITR}|~]l
ow]]_f|~"
o<IO$_TTYREADALLIO$M_NOECHO3&~~<SIN_FAB	FAB$L_STV3o{~]{
SYS$QIOW|hP1GRERR|1*5fok1
@'0W@'|~]z
o}]]fo{_f|~"
o<IO$_TTYREADALLIO$M_TRMNOECHO3&~~<SIN_FAB	FAB$L_STV3o{~]{
SYS$QIOWP|hP1GR8ERRx
oy
o<"
3oyQ1y
oz Q'"Qfo|@QV1fo"
3oz1	x
o{1."
3o*
ox
o"
3o~fPGOBUFFAo{X1>
o~Wy4&Wy4&ey4&+y4&fy4&dy4&=y4&@y4&y4&y4&#y4&6y4&y4&ey4&y4&|1=Cbo|VPx
ob|TPx
o~W94&~e94&+94&f94&d94&=94&@M94&94&94&94&694&z994&e94&94&z6'VV7fo|1#GXHP%GSTAT2oz10*
(,SX1GNONDISo~7for6'
1"hoW<'QBQV'10-1b5'1'1o{1$QVbon11QV0RPGTTABohQP!Q(a!hPSX	f1gWhoPho~Rl~Bofom1|~]l
o{]]4
o<IO$_TTYREADALLIO$M_NOECHO3&~~<SIN_FAB	FAB$L_STVM3o{~]{
SYS$QIO|hP1GRERR@%5
oy
of119}11;R	VV6'<fojQx}QRxRRBRQ1QPho}RQl~BoVho|g"Qfo|102?QVbow109&&oz1PGTTABo{QP!QMV(a!hPSX170]1!11<1VV<'QBQV0Z0PGTTABohQP!Q(a!hPSX1
%
o*	of	o}#P	oxP1"P	ou(PfhPQVPSX
%
o5	op1f1$P|VV
%
o|1IGXHP%GSTAT2oz13%
ot1BX1%
o0*(,GNONDISo|VV7	ow11RQ`QiQv~6=`o1`o<
3xQQz
3|
p
K3x)Q`Q
Q|QpQ{QQq	Qy
QQv
QQhvYZK
QQQQQQQ

A
GTVR01A&5v/n1GXTERM%GSTAToz]]{SYS$WAKE5o:+`(


LCGINT      GTVR01:+@GO


LCGINT      GTVR02:+-\z


LCGINT      GTVR03:+@g&


LCGINT      GTVR04:+U,2


LCGINT      GTVR05:+ .jA


LCGINT      GTVR06:+@$:O


LCGINT      GTVR07:+@)Yb


LCGINT      GTVR08:+yu


LCGINT      GTVR09:+@
9

LCGINT      GTVR10:+ U(

LCGINT      TVMAIN@1-@w

00GTVR020 9-APR-1984 16:08                 VAX-11 Macro V03-00&/OBJECT GTVR02/LIST/CROSS+TV/LIBRARY- TV OUTPUT ROUTINEG64KGBUFSGCRXGERRN
1GEXTHOLRGFBUFFAGFCNTGFPTRGHCNTGHPTRGMIDPTR
vGMOVHOLRGNONDISGOBUFFAGOPTRGSBUFFAGSCTGSTATGSTAT2GTTABGTVR07GWRITRGXCTLLGXHPGXMORE	.  ABS  .H	. ABLANK .PHe
GTVR02P|
|GTVR02&RPGFPTRo{Q0jPGOBUFFAo~XPGTTABosQPaQ(a!hPSXGSTAToGXCTLL%w1N0UGFCNTow10/\GSBUFFA(&=
oshPSX1$CGFPTRoGOPTRoz1TGOPTRosP
W001AUGFCNToz1)@%V
ot10*0/\GSBUFFA(&=
oxhPSX1E%GSTAToz1+
GXMORE%GSTATo%V
oz1CGHCNToa
oGOPTRoy01UQGFPTRoGOPTRou1!CGFPTRoGOPTRoBz1TGOPTRoyP
W1CGOPTRNoGFPTRobQQQ@11DPW0G0G0&
@%V
oPGTTABorQP!Q(a!hPSX
%V
o},` %}@GSBUFFAy;@QQGHPTRoz1\AGHPTRoGFBUFFAo~VAGHCNTo|VWCQGHPTRo}XPQGHPTRo~QXGHCNToz1 BGHCNTo~VBGHCNTo~WBGHCNTo~X(GHCNTohfg1TBXVBXW(Xfg1J1EAGHPTRoGFBUFFAo~SCGHPTRo|QXPQGHPTRoAGHCNTo|SQQXG64Koz1(G64Ko}acBG64KonX1b(Xac:@;@AGHPTRoGFBUFFAo~X@GHCNToM~XAGCFCNToGFBUFFAo~V@GHCNTovVCXVXAQVWCGFBUFFAo|WPQPGBUFS54y10GERRNo}@QGHCNTopPQYQXY1<BYXQYG64Koz1 BG64Ko~VBG64Ko~WBG64Ko~Y(G64Kolfg1TBYVBYW(Yfg1<QXG64Koz1 BG64Ko~VBG64Ko~WBG64Ko~X(G64Kokfg1TBXVBXW(Xfg:@
@%V
oAGOPTRoGFBUFFAo~VPGSBUFFAo~WCGOPTRoGFPTRovP10co@GHCNTozV10Pcoio4$oAGFCNToGFBUFFAoQN@GHCNToyQaPQo~Pyo}'P}otD0$0AGOBUFFAovQQXQ1CGOBUFFAo}XQ0GWRITRPGOBUFFAo~X
%~Qyoy1"CGFBUFFAoVGMIDPTRo5coz1BGHCNToGMIDPTRouyo~CGFBUFFAoVa
oQQQAGOPTRoGFBUFFAo~VCGOPTRoGFPTRoo~PV;~Go~0go{P
/E1gooz10goo|10oo*ofGSCTox1+"Po"oo7oAN{QVaGCRX%t11f1"ooi11	PQVQOE10gorWO411gfGECRX%x1VV7oz1&GCRX%n1 f1
@V"o5ol11+VWQW1((;(3o;$3o}WWCGFBUFFAo;(3oGOPTRo|1k~QQPQQz;@No}VP
Jo4"op)fg1@V@W6"ouJoxd091A1"o$oz1B1"o$oz1ovf180GGSTAToGXCTLL%z1PGTTABopQP!Q(a!hPSX,` %Fo~g@Fo^W1P@W0Q'|1FP&|'|01+GXHP%GSTAT2oz1@%iot10Z1	%{1	%~6"o6$oWJow11X~	%v(1WXGXHP%GSTAT2oz1"@%iox1WX0(oz'
@%ioz:@GXHP%GSTAT2oz1D@%iow11*&|GSCToy1"@%io0&o}CJoxPxPP,` %!iPg0$1 BVPPf 1
GNONDISorVV1uPf:|B|P~o~0~3o|;NowPBPQyQ.xhDAGTAPP{ZP|8.xowh@XC0&ol:1uP"&a-1rGXHP%GSTAT2oz1 @%ioz1
@%io~((o{hPSX	%	%	%	%	%	%	%	%	%	%	%	%	%	%	%	%	%	%	%	%QQQTQQrYZK;P
_o{/W %}/[%ioz1
%ioz\0go|0Oeo{10go|0Peo1cogoz1P*cofGSCTox1T#Pco}P"Pco7co~a	%x1!,Pf %govgVQPQVPSW"gNoeoz1,Pf %eotgAQVH1i1g(coqfg0/\PQVPSW co"cogo"coeo@GHCNTo{V0co5goy1
0gop111gofGSCTox1#Pgo}P"Pco7co~a	%x1,PfQ%gowgAQVPSW"goeo{1[aGCRX%x1,Pf %eougAQV1=,Pf %eomgQQO(y1%CVQPVP"Pgo~"Peow@PWPQVVV7gos1[PQV1Q1$(gowfgPQVPSW"goco"goeMo~0goWoz1GCRX%yf1.5coo1OC}\17coIxVV1nWW%ioo1FO }\1
oAGFCNToGHCNTo~QQa
oyQ18%V
oz1%
%V
oPGTTABorQP!Q(a!hPSX0T
ou1
1(%V
ot1
1%V
o(
&/W
oxhPSX*PGTTABorQP!Q(a!hPSXCGOBUFFAo}XQ5GERRNoy1
GXCTLL%GSTAToW/\




















--MORE--
"oVR02VR02>}8o	. BLANK .8rGTVR02e
8uDATA=wwK1-`Nz

00GTVR030 9-APR-1984 16:10                 VAX-11 Macro V03-00&/OBJECT GTVR03/LIST/CROSS+TV/LIBRARY- READ FILE ROUTINEUG64KGBUFSGCRXGEBUFFAGERR13GERRNGEXITGEXP1GFBUFFAGFCNTGFPTRGHCNTGHPTRGI2LLGIBUF2AGINSRXGMOVHOLRGOBUFFAGSCTGSILLGSTATGTTABGTVR01GTVR02
zGTVR03CGTVR04GTVR07GTVR08WGTVR0
L8WEGTVR09GTVR09RGWICCGWINCGWRITRGWRITR2GXEXECGXVALLIB$GET_FOREIGN	SYS$CLOSESYS$CONNECT
SYS$CREATER	SYS$ERASESYS$GETSYS$OPENSYS$PUT
`WLTAB
`WUTAB	.  ABS  .H	. BLANK .PHGTVR03IP|
|GTVR03I&OMro~{LIB$GET~FOREIGNoyo%z1U:%royo~#Prowo0wo5o(woyo7o|0P
GXVAL%GSTATo{PZ%4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&RM4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&k4&R4&R4&R4&R4&R4N&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&14&R4&R4&4&R4&R4&R4&n4&R4&R4&R4&R4&R4&R4&kM4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&R4&14&R4&R4&4&R4&R4&OR4&n4&~0GERRNoz Z%4&4&4&4&4&4&4&4&4&4&4&4&4&4&4&4&4&4&M4&4&4&4&4&4&4&4&4&4&4&4&4&4&4&U4&4&4&4&4&4&'4&H4&4&4&4&4&4&P4&4&K4&4&4&E4&4&T4&4&4&14&]4&X4&4&4&4&4&4&N4&U4&4&4&4&4&4&'4&H4&4&4&4&4&4&4&4&4&4&4&E4&4&T4&4&4&14&]4&X4&~0GERRNo}0GERRNo~UGEXP1ow1PVQ4AQo*GSILLKaGSCTo}0PGSILLKx1j9a&CozWQck4&t4&}4&t4&	4&4&}VQ7GSILLKMg1600A1-008051!6Ao|17Aoz1
GXEXEC%GSTATo0#oGERRNo4#o{1N0P%oPGEBUFFAo}Q{GTVR04o5GERRNoz10GERRNo#o4GERRNo~{GTVR02o0%oGI2LLoPGEBUFFAo~QPGIBUF2AoGEBUFFAo~PQGIBUF2Aot1VPP0]
1QQPGIBUF2Ao~Q<GI2LLoxP10GERRNo~0GINSRX|1A1GEXITVGFPTRoQGFPTRoGFCNToz1PGFCNToGSFPTRo~0GERRNo~AGFPTRoGFBUFFAo|QWQQGFPTRNoGHPTRoz1@GHCNTo~QTGEXP1o~aGEXP1oGXVAL%GSTATo|1XPGFPTRo~QPGEXP1oxP0C1DPvPTQ0415PyPTQ0%TGFPTRoTGFCNToTGHPTRozP GHCNTo|1	P{PTQWoy0M1sPGFPTRo~QPGEXP1o}PWoy021XPyPTQ0H1GEXITz;0(GERRNo~{GTVR02o\3ozV1HA%ov11E0(GERRNo0GERRNoko~{GTVR02o|0	05owo(5oT7oyo0!oo10N
1T0yGFCNTo}	.xhDATAMPuD,D,>P|8	.xoGERR133o|0sGERRNo|11P{PTQWoy0u1PGFPTRo~QPGEXP1o}PWo_0Z1:!@11!~@:1	%Vo|!Vo}VQ7GSILLK|VQ7GSILLKz1:VoGSILLK}a0PGSILLKQQQQ	

 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^`abcdefghijklmnopqrstuvwxyz{|}~J	

U !"#$%&'()*+,-./012345M66789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^`abcdefghijklmnopqrstuvwxyz{|}~QafABCDEFGHIJKLMNOPQRSTUVWXYZQ	

 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^`abcdefghijklmnopqrstuvwxyz{|}~	

 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^`abcdefghijklmnopqrstuvwxyz{|}~QAfabcdefghijklmnopqrstuvwxyzQ%z;@AQGFBUFFAo{VPVW@GHCNToyVPPO]}0GMOVHOLRMPGFCNToVyOU}QOQ}G64Kon1
POC}XTO>}1PG64Ko~XBG64Ko|O+}:%RXf1VQ1UO}1
CVQP@PO
}12CVQPBPXOw}hb4&wb4&	b4&-.PfOq}PfPQV1.PfOb~PfPQV100UX1UOH}1
WO;}11b1
WO,}11}:@0P|
o%w@&17|
o~
o|1
o1|
ox1
0
o|10|
o
o~:	
oxf1%CP
o{PVP"P|
o~@PGHPTRor(PfgPQVPSW1wP
oqP @&1uPs1
oyP1(
o}fg@
oMGHPTRo{1,@PGHPTRo~CP
o{QWQBQGFCNTo~@WQGHCNTox(Pfg	VGHPTRo|PSW@
o~VB
o|
o5|
ol11('	1WWWGHPTRoVGHCNToWGFCNTo|1`
ox1
VV%~VGHPTRoPGHPTRoGFPTRoQQQ~PP}o~PQuo~0)GERRNoPGOBUFFAo~XPGTTABooQPaQ(a!hPSX
oxhPSX*PGTTABorQP!Q(a!hPSXCGOBUFFAo|XQ{GTVR07o4GERRNo0GWRITR|05oh
SYS$CREATEC8ECTwhP1,TQ0GMOVHOLRAGHCNToGFBUFFAo~WPGFCNToX~XGCRX%}Hg@uo~WP}oyo~PW8




















5oT
43o_T
o~{SYS$OPENT&$PP1
%o|TPAGFCNToGHCNTo~W@GFBUFFAo~WPGFBUFFAo~X@GBUFS5P4uXQWX10YGERRNo}PW$
o~{	SYS$CLOSE
%o|TP<$VGFCNTo|@PWGCRX%|1 Q@$ABS$MT
P~PQNQ4Q||7|PzQ$
Q~PQNQ4Q||7|PzQ~DQBQ@QQz|h|TVR01o7o~yp4&yp4&Dp4&o1`&E11g5woz1\(woyo7o0wo5oPGOBUFFAo~S(woyo~cCGOBUFFAo}SQ0GWRITRPGOBUFFAozQP{GTVR01oGOBUFFAg
1a195wog11f1o5o(woyo7o05o~P7o~Q0GTVR08W~0M}Pmo~Q0GTVR08W~0GERRNo}0P5o7o~Q0GTVR08WQ
QQQ%Q;QQFPGOBUFFAo~XP	o~Pr~@owR"Q<bP0GWRITR2w(b"hPSXPGTTABorQP!Q(a!hPSXPGTTABojQP!Q(a!hPSX
Qfno input file name givenQV$Q&ifile cannot be openedQC;Q9lerror during writeQ3OQI]!record more than RPPP charL split.QrQhcno recognition on vax
		;Y#oTVR03>xGTVR03I?}8o	. BLANK .8qGTVR03I8uDATA=ww]1-

00GTVR040 9-APR-1984 16:11                 VAX-11 Macro V03-00&/OBJECT GTVR04/LIST/CROSS+TV/LIBRARY- COMMAND PARSE ROUTINERG64KGCRX
(GDELRGERR13GERRNGEXP1GEXP2GEXTHOLRGFBUFFAGFCNTGFPTRGHCNTGHPTR
GINSR
aGINSRXGMOVHOLRGOBUFFAGOPTR
gGSHIFTLRGSIADRGSILLGSITR
GSITTGSTATGSTAT2
^XGSXLLGTVR03CGTVR05GTVR06INGTVR06ISGTVR06OS
GWICCGWINCGX2SRCGXCTLLGXIN1GXMOREGXRNG,GXSRCH1GXTERMGXVALWUTAB	.  ABS  .H	. BLANK .PH9GTVR04P|
|GTVR04&OjBX^P^[PPk1P1GXIN1%GSTAToxPQ+T+
GXRNGGXVAL3GXSRCH13%GSTATo~{GTVR05o5GERRNos1P+V7kGXRNG%GSTATov1qK-&Y4&5Y4&5Y4&5Y_4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&&Y4&5OY4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&5Y4&Y4&~0GERRNo
GXRNG%GSTATo~GXVAL%GSTAToz1U
GXVAL%GSTATo{_&_4&_4&_4&`_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_M4&_4&_4&_4&_4&_4&W_4&4_4&Q_4&_4&_4&_4&_4&_4&_4&B_4&_4&Y_4&_4&_4&_4&+_4&_4&&_4&/_4&5_4&w_4&_4&a_4&_4&z_4&_4&z_4&}_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_4&_M4&B_4&_4&Y_4&_4&_4&_4&+_4&_4&&_4&/_4&5_4&w_4&_4&_4&_4&z_4&_4&z_4&}_4&_4&_4&_4&_4&_4&~0GERRNozxY,4&j,4&q,4&,4&~,4&&b,4&,4&,4&,4&,4&,4&,4&,4&,4&,4&,4&	,4&,4&,4&&,N4&,4&,4&,4&,4&>,4&I,4&I,4&,4&,4&,4&,4&L,4&,4&,4&,4&,4&,4&QW,4&<,4&F,4&,4&A,4&,4&,4&?,4&,4&B,4&,4&S,4&,4&,4&,4&;,4&z,4&&,4&c/,4&5,4&w,4&w,4&w,4&,4&z,4&,4&z,4&,4&M,4&,4&,4&i,4&,4&,4&,4&,4&,4&,4&,4&?,4&,4&B,4&,4&S,4&,4&,4&,4&;,4&z,4&&,4&/,4&5,4&w,4&w,4&w,4&,4&z,4&,4&z,4&,4&,4&,4&,4&i,4&,4&,4&,4&,4&d,4&,4&&,4&~0GERRNo~GXTERM%GSTATQoy10GERRNog5k1PV+1e}U+10
GERRNoyPGEXP1oq0
1<WV6k1JPGEXP1oy0l
1(GXCTLL%GSTATo|1GX2SRC%GSTAT2oz1
GX2SRC%GSTAT2o|0^GERRNo|1GX2SRC%GSTAT2o|0]GERRNo|1hGXMORE%GSTATou1]110GERRNow7kVV9&&!ozclxk4&k4&k4&k4&|1&GXSRCH1%GSTATo|1GXSRCH1%GSTAToV1l0-
WP01
WP1v@SseRrKkXxGXVAL2%GSTATo{PV+0GTVR03Cw1`~PGEXP1ouQ+10GERRNo~UGEXP1oy10%GERRNonV+P+Q@QQ~A+
XPVH~0kHPGEXP1oHT
H|1~yGEXP1o}	.xhDATAMPuD,D,'P|8	.xoGERR133o|0sGERRNos1e~U+10GERRNo~V
HQ
HHc1W+1
P+Q@QQ~A+
X1
PH~V0Hxk1!~1G~AGFBUFFAoGFPTRo~QQGFPTRoGHPTRoz1@GHCNTo{QTPaGEXP1oGXVAL%GSTAToy11
TGFPTRoy11"QGFPTRoGFCNToz1PGFCNToGFPTRo~0GERRNo|1#}PGEXP1ouP1"NPPCPGFPTRoxQ10GERRNo}BPGFPTRo|1AGFPTRo|PRQRMGFCNToy10GERRNox0X	1S}TGEXP1oVGEXP1oPGFPTRo5o|0z	UGFPTRoz1P5oGFPTRo~0GERRNowUP1WGFPTRoy1}fQ0GTVR06OSu0]VV7k1{|GEXP1ocQPP0I1k|&~@17k10 GERRNotVV:&kf1:%fkf#PkP"Pk7kPVQ@PVVV0j1,|TGEXP1oQGEXP1oGFCNToy10GERRNo~gPGEXP1oGFPTRoj1|00|1w|05	1q|fQ0GTVR06OSxBP^(PanPGEXP1okRP^QC^SPUR1{O$y5GERRNog1WR1\@P^VV7k1/|1U|0O|PVox0G0PVo{0:0Po|0?<o~PUGEXP1ow130u<o~PPo~QPGFPTRo5o|0P5oGFPTRoVGEXP1o{1!BPGFPTRo|0;<o~PPo{Q0cWGEXP1ou111@QQQQo0uPV/o0'0h00UGEXP1oz1	VGEXP1o|1WGEXP1ow11[GXSRCH1%GSTAToz1
GXSRCH1%GSTAToGXVAL%GhSTATozPGEXP1ov1,{1R{fQPGEXP1o~P0GTVR06INrVV7k1{1;{0'AGFBUFFAoGFPTRMoao@GHCNToao~PPeoPGFPTRo~Q0GMOVHOLR|fQao~P0GTVR06ISPeouP0NVV7k1EzQQTGFPTRoTGFCNToTGHPTRozP GHCNTowWV6kPV+0GTVR03Cy1z18{yGEXP1oo;c@PPpa1
oPGEXP1o}P+
oz1

3o{Q1	
owQVP01$zQQg1:z&~@11&}@:1%\o{1	\oiu7k5k10BGERRNov5k1\o%{1T~0!GERRNo~:\onkf#PkP1P10GERRNocAQV"Pk7k5P15Or}10GERRNor1.0PO]}(P\}\	oz0OO}P\	o~Q:
PGFPTRo~Q0GMOVHOLRAGFPTRoGFBUFFAo~WPGFCNTooXBOR{WBOM{X1GX2SRC%GSTAT2oO1(gO}1WWWX1])O%{Oo}g1WWWX1I1O.gWUTABoGOBUFjFAGOBUFFAUkOG~1WWWX1".OjzgWUTABo}O`zGOBUFFAy)OWzO!~GOBUFFAs1WWWX1wCGFBUFFAoWGFPTRo|15GXSRCH1%GSTAToz1 
GXSRCH1%GSTAToGXVAL%GSTAToTGEXP1ot:PQ1v0GERRNo{1&QGFPTRoGHPTRoz1
PGFPTRo~Q0GMOVHOLRAGFPTRoGFBUFFAo~S@GHCNTo~SCGFPTRoGFCNTo~XGX2SRC%GSTAT2oy1XQXG64Koz1PG64Ko~PBG64KoOX1PXPTX9OzOZ|Pc1UX1COzyQ@QXBQS1:19CGFBUFFAOoSGFPTRokV1}PSWQX1
GXRNG%GSTAToQGEXP2oGFCNToy10GERRNo~QGEXP1oGFCNTow11eCGEXP2oGEXP1ovP11QPGEXP2oGFPTRo|1@GXRNG%GSTAToPGFPTRo5o|01
GXRNG%GSTAToC5MoGFPTRosP1NPP1P5oGFPTRot;@PPVPQlW:
;@PPVPQWPGFPTRo~Q0GMOVHOLRvAdVPQPGHCNToj1@Px
PQxtQQ0GEXTHOLRAGFPTRoGFBUFFAo~QQGFPTRoGOPTRoy1@VGOPTRo~@VGFCNTo~@VGHPTRo~@VGFPTRo~BVGHCNToxPQSPWQQVG64Koz1(G64Ko}acBG64KokV1b(Vac:@;@PPVPGFPTRo~Q0GMOVHOLR~@VGHCNTo~BVGFCNToQGHPTRoGFCNTou1P GHCNToNv:@;@PGFPTRo~VPGEXP1oxX1=QVGHPTRow1PVQ0GMOVHOLR~CVGFCNToyW1
mGXRNG%GSTATo~0GERRNo~@GHCNTo~VAGFBUFFAo|VQQWG64Koz10G64Ko~PBG64KovW1PWPTW:GCRX%vPa1VQCGFBUFFAo`QV7PuXgPP1/UW115QX1GXRNG%GSTAToy10GERRNo~CGFBUFFAo}QVCGHCNToVGFPTRo{1uQVGHPTRow1PVQ0GMOVHOLR@GFBUFFAo~VPGFPTRokWNXXVXUW1WX1GXRNG%GSTAToaz10GERRNox1WVfGCRX%j1	uWr1I1WWuXAVVCGFBUFFAoVGFPTRoxPP:@Q"oo1-@)2

00GTVR050 9-APR-1984 16:12                 VAX-11 Macro V03-00&/OBJECT GTVR05/LIST/CROSS+TV/LIBRARY - EVALUATE EXPRESSION IN INPUTGERRNGEXP1GEXP2GFCNTGFPTRGMIDPTRGSCTGSIADRGSILLGSTATGTVR06INGTVR06ONGXIN1GXRNGGXVAL	.  ABS  .H	. BLANK .PHGTVR05P|
|GTVR05&MPGSIADRK~V
o~XHTpoGXVAL%GSTAToz1
GXVAL%GSTATo@%HPGEXP1ozWf Zj?4&l?4&l?4&t?4&l?4&z?4&?4&l?4&?4&J?4&d?4&z?4&?4&H?4&N?4&X?4&^?4&^?4&^?4&^?4&^?4&^?4&^?4&^?4&^?4&^?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4&?4&l?4&l?4&l?M4&l?4&l?4&?4&l?4&l?4&l?4&l?4&l?4&lq?4&l?4&l?4&r?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4&?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4&?4&l?4&l?4&l?4&l?4&l?4&?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4&r?4&l?4&l?4&l?4&l?4&l?4&l?4&l?4M&l?4&?4&|1t@%Hy10GERRNo~%Hw1	NWW
%H@%H %Hz1Y
r%HH~H<4&P<4&Y<4&a<4&y<4&<4&@HzW19CWH{W10DHsW1(UW10GERRNo}GWH{W1HH{W1RHxQJQW1B@%Hr1!P1	%Hv1
@%H}VV7GSILLKy10GERRNo~
GXIN1%GSTATo|1N~
GXIN1%MGSTATo~PVGSIADRK 3%Hy10GERRNo~@%Hy1PWGEXP1oGXRNG%GSTAToz1GXVAL%GSTATo|1=GXRNG%GSTATosy10GERRNo~
GXVAL%GSTATo%Hu1PGEXP1o{1PGEXP1otP1&Q0GTVR06ONvVPPPW&Q0GTVR06IN}VV7GSILLKv1b~P1p~VoPo~Q~
~AouXQQ
10GERRNo~%H|1%Hy10GERRNo~@%Hy10GERRNo~WoMPo~Q~
~Ao|X1p}QQXyP1"~GXIN1%GSTATor11r~P1Nop@(11kPWGEXP2oGXRNG%GSTATos(1~P1>}PtGFPTRouW1 }P1.}+GSILLKfGSCTo}#PGSILLKuY1Y	10	GERRNo|(Yf3o{PQV"YGSILLKu.f17VV7GSILLKmTWTRWQ<YY7a10$GERRNoeTP0aPxRPP@PWWQ@RuY[1	Yoo~6o|WWV6GSILLKy1
|9&&o{1	}VV7GSILLK|1f}PGMIDPTRofW1h|:ISRisrTW1\|(10GERRNo~GXRNG%GSTAToy10GERRNo~PGFCNToGEXP1oGXRNG%GSTAToTGEXP2o7GSILLKy10GERRNo|AVGSIADRK|VV7GSILLK|fQ0GTVR06ONyPPW1t{PGFCNTo|W1j{Q+Q	"ov1- 6vA

00GTVR060 9-APR-1984 16:12                 VAX-11 Macro V03-00&/OBJECT GTVR06/LIST/CROSS+TV/LIBRARY- HANDLING Q-REGISTERSG64KGBUFSGERRNGQBUFFA
aGTVR06IN
GTVR06IS
GTVR06ON
GTVR06OS
X	GTVR06OSF
)	GTVR06OSL	.  ABS  .H	. BLANK .PHGTVR06P|
|GTVR06&Oh;@0Ua1U!10GERRNo{0AGQBUFFAwonoySP VAVno}TQTGBUFS5y10GERRNo}@VnotPV!PSaP`QQVG64Koz1(G64Ko}acBG64KogV1b(Vac:@0Ua10GERRNocP!P1RPPPaQ0uUa10GERRNouU!10GERRNoQP!PR!!PaQ0FR!!;@09Ua1U!10GERRNoe0"TaPP!:@0Ua10GERRNoiP!P;TPQPH1(Ur~@oz1Qr~@owa1	B!r~@oy@P1LCGQBUFFAo{aXB!n4o~CXnouYPaSAa!QQYG64Koz1(G64Ko}acBG64KoIY1b(Yac:TR0QR1:R	1)
 QAQR1R1

R~r~Bo|Q0
GERRNo~~r~Bo|Q0
GERRNo{Q-"oo	. BLANK .8sGTVR06=wwy1-@1dO

00GTVR070 9-APR-1984 16:13                 VAX-11 Macro V03-00&/OBJECT GTVR07/LIST/CROSS+TV/LIBRARY- ERROR MESSAGES FOR TV=
GERR13GERRNGOBUFFAGTTABGWRITR2	.  ABS  .H	. BLANK .PHGTVR07P|
|GTVR07&M}TV5GERRNoz1
0GERRNo{V1.GERRNo~VPo~FotRPQS"Q<bP0GWRITR2~ASGOBUFFAonS
(b"cQV(1PGTTABouQP!Q(a!c0mzo~CGOBUFFAo{SQQb\"Q-reg contains no character stringQz~QQ-reg contains no numeric valueQ]~"Qdexpression without commandQE~>Q7V(more than 15 levels of iterations nestedQ~hQ]mno iteration actiM~veQ~}Qnecommand not yet supportedQw~Qginvalid TV command charQb~1Qatoo many digits in expressionQG~PQ5linvalid Q-registerQ7~dQ{Eefile buffer size exceededQ ~Q\jiteration not closedQ~Qnr
XXX,XXX,XXX-Q~#Qxcoperand error in expressionQk}@Qboperator error in expressionQQ}^Q+dwrong syntax in expressionQ9}zQCd%more than 10 nested ( in eMuxpression )Q}!Qfedivide by 0 in expressionQ}<Q}dQ-reg buffer size exceededQg}XQ`argument exceeded buffer size QK}xQ1crange not valid for commandQ2}QJV(two times a r|ange (,) in row not allowedQ
}?QpqQ}NQ{ocommand abortedQt|Qno argument allowed for commandQW|Q%no previous search string givenQ:|!QB`"maximum search string is 256 bP|ytesQ|EQbpno match foundQ|UQneno previous input presentQw|pQ\"Q-reg locked for command executionQW|Q%fno nesting of ;E allowedQA|.Q;hinvalid command syntaxQ-|FQOY%no argument given on @R or @S commandQ
|mQraexact match op S en R commandQo{
Q[#upper/lower-matchopSoen RLcommandQN{1Q.ainvaliddigitforoctalvalueQ3{PQIjiterationcountLE0Q){f:QSoinputfile:Q{wQ`ooutputfile:"o~1-LCb

00GTVR080 9-APR-1984 16:13                 VAX-11 Macro V03-00&/OBJECT GTVR08/LIST/CROSS+TV/LIBRARY- LOGFILE ROUTINE1GOBUFFA
rGTVR08C
GTVR08O
GTVR08W
FGTVR08WEGWRITR	SYS$CLOSESYS$CONNECT
SYS$CREATESYS$EXIT	SYS$FLUSHSYS$PUT	.  ABS  .H	. BLANK .PHGTVR08P|
|GTVR08&h4go_lo~{
SYS$CREATE<o~{SYS$CONNECTyiP1#(poLoGOBUFFA<po~Q0GWRITR|]{SYS$EXITXTV-BACKUPFILECOULDNOTBEOPENED$lo~{	SYS$CLOSE{;PQ<(3o~0P<"3o~Pgo<o~{SYS$PUT1goy14go<o~{	SYS$FLUSHy:;PQ<(3op<PP@PQ0a@P0P<"3o}1)QQ@$ABS$IlP~PQNQ4Q|||zH$RMSNAMmPzTVBACK.PQnQQ<P~DQBQ@QQz|lQ"o

00GTVR090 9-APR-1984 16:14                 VAX-11 Macro V03-00&/OBJECT GTVR09/LIST/CROSS+TV/LIBRARY- FILE INPUT ROUTINE&GERRNGIBUF3AGIBUF4AGSTATGSTAT2GTVR02GWRITR2GX2COMGXCTLLGXEXEC	RAB$L_UBF	RAB$W_RSZ	RAB$W_USZSYS$GET	.  ABS  .H	. BLANK .PHGTVR09P|
|GTVR09&Iu08PPWPQVPVo5Hu1P
%HVoHXz1wBH~SA
1|GTVR09R&Mu0PPWPQVPVo5Hu1PQXy<fPQTHv1Q<1
PQ1P<o~Q0GWRITR2P
X	RAB$LUBFG|0	RAB$WUSZG|g{SYS$GETyiP1;0o~fGXEXEC%GSTAToz1P
GX2COM%GSTAT2oGXCTLL%GSTATo~{GTVR02oP
XH~koo~XUHy1PPH}QPHy1|o}XPPHQ
GIBUF3AQQ
GIBUF4AQQ~Q5o8o	. BLANK .8sGTVR09=ww1-@P
00GTVR100 9-APR-1984 16:14                 VAX-11 Macro V03-00&/OBJECT GTVR10/LIST/CROSS+TV/LIBRARY"- DUMMY ROUTINES OAP REGISTRATIE	.  ABS  .H	. BLANK .PHGTVR10P|
|GTVR10&
RRPRFB&
RRPRFE&Fo. BLANK .8sGTVR10=ww1-3vW
00TVMAIN0 9-APR-1984 16:15                 VAX-11 Macro V03-00&/OBJECT TVMAIN/LIST/CROSS+TV/LIBRARY- TV MAIN PROGRAMP
WG64KhGBUFSGCRX
,GEBUFFA
GERRN
fGEXIT
JGEXP1
NGEXP2
0GFBUFFA
<GFCNT
4GFPTR
DGHCNT
@GHPTR
GI1LL
GI2LL
GIBUF2A
$GIBUF3A
(GIBUF4A

GIBUFFA
,GIN_FAB
|GIN_RAB
8GMIDPTR
VGNONDIS
GOBUFFA
GOPTR
@GOUT_FAB
GOUT_RAB
 GQBUFFA
<GRERRV
GSBUFFA
WGSCT
HGSTAT
IGSTAT2
RGTTABGTVR01GTVR02GTVR03IGTVR04GTVR08CGTVR08OGTVR08WE
TGWRITR
GWRITR2 GX2COMGX2SRC@GX2TERGXCTLLGXEXECGXHPGXIN1 GXMOREGXRNGGXSRCH1
	GXTERM@GXVALE
\SIN_FAB	SYS$CLOSEqSYS$CONNECT
SYS$CREATESYS$EXIT
SYS$EXPREG
SYS$GETDVISYS$OPENSYS$PUTSYS$QIOW	.  ABS  .H	. BLANK .PHOTVMAINP|
|TVMAIN&M~{RRPRFBo_\o~{SYS$OPENyiP1 %Io_,o~{SYS$OPENv1p]|~]_To}]<\
3o{~]{
SYS$GETDVIS doz1ioR
o%Io@%Io_,o~{SYS$OPENxhP1,,3oz1 %Io %Ioz1-_|o~{SYS$CONNECT_@o~{
SYS$CREATEyhP1k_o~{SYS$CONNECTPhh33zQ]]Eo|]Q{
SYS$EXPREGyhP1>PEo}QPQow@QPQ
ow@QPQM,ow@QPQow@QPQow@QPQ$ow@QPQ(ow@QPQ o@h5}QPQ0o0GTVR08O~{GTVR03Io~{GTVR02o}TPPo}Q{GTVR01ou5P11_P
o~RPo
o~PRo0oo~0PoP
o~Q0GTVR08WE~{GTVR04o|1{0GTVR08CPo~XPRosQPaQ(a!hPSXPRorQP!Q(a!hPSXCozSQ04@%Ioz1
3o{~]{
SYS$QIOWxhP10@%Ioy1!PQ(3o~0P"3o_o~{SYS$PUTuhP1]P{SYS$EXITQ|	Q3sSYS$INPUT
b3rSYS$O
UTPUT
xQ
|QTQQQQQQ|QQQQQQlQ%wQQmQ{Q&vQQQ5QhQQ|QDQ~Q|Q@$ABS$L\P~PQNQ4Q|||zH$RMSNAMMP}TT:PQjQQ~PQNQ4Q|||zPwSYS$INPUTn
PvSYS$OUTPUTPQj
Q
Q~DQBQ@QQz|@QTPTP|dxQQ!%)-1Q6;@EJJHJKCAT"o