Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-03 - decus/20-0081/tpdemo.rel
There are no other files named tpdemo.rel in the archive.
 lA-80lA-8p`@u4./(kd%MFx	 F$6"AXe>\y5}m_1T0"A(RO&p$A+0U?(YC:&A)ix	 O&U)i(A*Y@ *A,S; "*A+,S; $*E,S; &*E+,S; x	 W(*I,S; **I+,S; ,,A,Ra@..A(2H0.I(7g^. 2.Q)9x	 `e?82AZ]O&*7N$:2A&YKQV):kJs(9K<2AVYi@>2AfTL@x	 h2AvPYBDVK B2APID2A
Wk6.*1F2A
&YSF@H2A
FTLJ2A
fPx	 qIL2AV_Z(N2AV_Z($P2AWk6.*15,:6C0R2A&TLT2AFPx	 yIV2AfPIX2AvTLZ2API\2AQ_7^2ATL`x	 2AVRq'#&( @42eK,z_@,5-i9CR,FXCJ
|Pa!Uh6Jh$5-i9CR,FYK%w5:
	#B	'BkOC#(7g^. HC#(7g^.&VS:(	*D	.Dk
E=@x	 UEJ,mk@	EUTY|EUTYoaEUTYCd	sEUTI1nEUU-9hex	 EUUIzPYEUUksYEUV=d	jEUVN8	1F	5Fk	G!T;v[x	 $G>vLWXj)gBHt
GW)7hjeR	8HI$VVKOrI$VZS6(	Ix	 ,I':G". 	I5TI	,I5U
	3I5U[ 	I5U[`	%I5W 7IVm^-Y&tP>x	 5IVm^-Y&tVW^
K;$\M[+`	Q9Q>dFVZTRj{-r	CS1RI	?x	=S1RK	FS1R6KS6(9eH
	&S:$^
S:$^fzYFVS;.I !Y&t\mY6FZQ'(ZeO Qx	 NY&t\m_W Y&t\ma(ZeO ~Y&t\mi=V
T]PuY><y25&pqY>=MiJL\`	 x	 W['0	[4	[<M[?VZ^j{2]=TXt^`_1RK(d_1T89e&
y-x	 _GR`[_W#+]X_W#,ze&tpa=weT:G,a=weT\Y_KeKyx	 hJj,:	gL

gR-lkN.&ZC
dPikN.&ZC
d\`boJZ`	sdx	 @@p(@@F
8x	   y`Fh@@	  `@@x	 	G
PX0@@
@@
Gx	(
H`@@ x0@0@G#x	 P
F@pD@PD@P	(@XH Px	 #0D@P00@XH
 L0@Px	 @@,8?X%h	!C0GXx	   4h@xx`0@ K@0@x	 =("0@Ex L@@x	(E0 L@E0 [8 B `x	  N0X% G` 
H@P%8x'8x	V0@K8Xzl@4E@z
(`8J0x@08G@9G
xX@@x	@@:0@Xt@:Gp0@	?GxKP
<x	 E	H!Y "H
`!H@@XKx	(@M! QaxH`XH
!yex(Y	Hx	"V
H! 
xA@YJH!h
H@Z
Hx	 @^
0!0
0@ZJH
 !
A0@[
x	 gH\!I|	0 [IH	p!y0 x	  o\
H	`!@0@ \KH
x9!@x	 x`]@0X;X0@]H <@$x	 @`F<!P0@$ a Bpbx	"	PB#@8L(d`B#x8L(gpC$0x	 8L(iGC$h8L(kGD"P8L0(x	 nGb,h@
	8@

AX@

Ax	 @ "
`@
a@
0@
,H@
4x	"@ +H@
=h@
V@
\0@
cHx	(3@
{h@

@
\@
c0@
zx	 <H@
`@
 x@
3@
Gx	 @ D(@
I@@
zX@
|p@
x	"@ M@
`P@
m@
s @
w@x	(U@
yh@
@
@
(8@
Cx	 ^P@
Gh@
N@
P@
mx	 @ f0@
qH@
y`@

@
x	"@ o @
18@
5P@
Ah@
fx(w@
j@
x0@
p@
	!p@FF(k8>@	  x.@Fhp  DATE:   -   -     TIME:    :     LINE #    - DEMO MULTI-USER    YOUR TOTAL IS   ; @D
	04*"@iB$[77@b 6@D,O@D \E <,,@iB$[7,	+,
	"E
+s,
+E,
6p0p,/0$0p`p`+d0p.	(""Q(zX(@*(@ <,@@6j0j,/*$*j`j`+d*p.
Q((	*T"*X(z*(| 
   .%h, 1f5f#+)++,+,+,+,	*U(Q
&+,+,+,+,+,+,+, <, < ,*,,
$  %	*Q
T*. D! &*(':Z(,h&Z('h'  4 @E+,, -*(% % D&	* U"7 D& D'Z('h':Z$ . "D=b;  = @E+,4 .2B	(Q*?+AZ(h/+\   
/ ( 8, .@#
 0 /h0,	(*U"H 
/ ( 8,C 0@+Q1  % D! &*(':Z(,h&  V	*U*U
P @E+ 5*(" % D" 5*(':  = @E+,=6  %	*U(U*Y D! &*(':  , @E+,V1  % D! &*(':Z(,	*T" ah&  c @E+,\:Z$6t0t,/4$4%t "%D=bi	*"j:6p0p,f/0$0%p`p`+od0p. 7 H@Z$6t0t,k	 A"
r/4$4%t7 "#D=bt6t0t,r/4$4%t8Z('H  { @E+	(U*U*{,c 82B+~+
 92B++c 92B++z :2B+	*U*U*+z :2B++| ;2B++m ?*(# % D# ?*(':+c	(*
,{, 
@ ( 8,I @#
 @ AhA,G 
B (	"*A 8, @#
 @ ChA, 
C ( 8, @#
 @	*P ( DhA, 
D ( 8, @#
 @ EhA, 
E ( 8	(*U*%,  @#
 @ FhA,# F*("(GhG %dH D# H*('	*U.: 
E ( 8,% @#
 @ Ih0,) 
I (@nhJ+7	* A6+\ 
I ( 8,0  
E ( 8,8 2$+C   
E ( 8	(*A?,; .@#
 @ Eh0,3 
I ( 8,? " 
E (	"*P G 8,E .@#
 @ Eh0,C 
E ( 8,H 1`+P	*DEP+\:6p0p,v/0$0%p`p`+Vd0p.Q(KX(@*(@Z$6t	"
 X0t,R/4$4%tP "
D=b[,
 
I ( 8,N @#
	*U*a @ Ih0,L+c,\Z$ Q "%D=bf T*() % D* T	*U*U*i*(. W*(0 % D1 W*(6 \*(: % D; ]*(= c*(C % DC	*U*U"r c*(E h*(I % DJ i*(L n*(Q % DQ n*(T  .@+c	(Q z,c :6p0p,Y/0$0%p`p`+d0p.Q(oX(@*(@Z$	(AD6t0t,}/4$4%tt "
D=b6t0t,/4$4%t8Z('H	*Q"  
u(8,@z7`z+z0	2++	*":6p0p,/0$0%p`p`+d0p.Q(uX(@*(@Z$6t0t	(*,/4$4%tw"D=b+z,& 
u ( 8,	"T*Q6  @{7`{+: {0 2+:@@|+G:6p0p,./0$0%p`p`	(PA>+@d0p.Q(uX(@*(@Z$6t0t,</4$4%tw "D=bE+ 	(T(*G,3( { @{,G*:|#|& t@#
 | }hA,b 
} ~(O  , .
`2@Q	 (AQ 
XL .hR,!>{:6p0p,C/0$0%p`p`+Zd0p.	("
ZQ(X(@*(@(hZ$6t0t,V/4$4%t "D=b` 0@	(U*U"b+eZ(,h&  I @E+ |2@z+g+c6@{+z:6p0p,^/0	" k$0%p`p`+nd0p.Q(X(@*(@Z$6t0t,j/4$4%t "	"D(sD=bs6t0t,q/4$4%t8Z('H  G @E++I,I,:	* D(|+c,z.:6p0p,u/0$0%p`p`+d0p.Q(X(@*(@	" U"Z$6t0t,/4$4%tt "
D=b#  @E+,|0 	*(A	 *U
 0 
h0,N(h(h
 

,.h
T:F:!X2,> 0x+ ! H(h <,X @Z<,	*T"@
+++` 4`'@@ 
 ( ,5 " )n  h0	*U**&, $h % H(h <,X @Z<,+.+.+` +	*E*/4`6@@  
 ( ," " )n  h0,& (h (	*T*U*7 H[)QH <,*X @.Z<,,+=+=+` :4`E@@/ 
 (	**T(@ ,1 " )n  h0,5@@> 
 ( ,@  
	"A
H ( ,G . 
 ( ,I . @  )n  }*TQhA,D 
}   , .
`2@T	* U*U 
QXLS .hU,Z$ Q "%D=bY *()(h %d D*	*
"] *(.  .@+c,2:6p0p,/0$0%p`p`+fd0p	**f.Q(X(@*(@Z$6t0t,b/4$4%t "D=bl+|,`4	*U*Q"n   % D! &*(':  , @E+,m6 !"/2@+w+c	*
(w+=,s8@@B@@C,w::C6pC0p,i/0$0p# "2@	(D"+Z$6tC0t,|/4$4t# "D=b+
 $6tC0t,/4	"($4t# "D=b	 

 ( 8,L 3`C++y@@C,y<:C	(** 

 ( 8,
 2 C++,> B0@$++:B6jB0j$	(A(A ,/*j$0@++6pC0p,/0$0p# %2@+"	*("!+G6pC0p,/0$0p' &2@+'+N@@B,@6jB0j$	(D*D*,#/*j$"'2@+.+:B6jC0j,*/*$*j( ( 8	(Q
2, 2 B+: 46vC0v,//6$6.t(Z(H+C6jB0j$	(Q@ ;,6/*j$6pB0p,;/06rC0r,=/2$2.p(H,(	"(DCB B0@$+F+:B+(,CD6jC0j,?/*$*j) ( 8	(U
L,2 5@N+N+
,GF@@C,NH6jB0j$,I/*j$"'	"QT2@+V+q6jB0j$,R/*j$1@+Z+_ 

 ( 8,L 	*UD]2@C+_+q+_+m C0@+f 46vC0v,W/6$6.t(Z(	"Q
eH+m:C6jB0j$,b/*j$6pC0p,h/0p)H,PJ	(U"T n B0@$+p+q:B+P,mL C5@s+6jC0j,j/*$*j(	 E
T"v ( 8,\  @D,qN C5@{+ D5@ 46vC0v,t/6	 A""$6.t(Z(H+6jC0j,~/*j)6pD0p,/06rC0r	(
Q(,/2$2.p(H>C>D+y,yP@@B@@C,
R6jB	"
D 0j$,/*j$"'2@++j6jB0j$,/*j$1@+	**T"+ 

 ( 8,w 2@C++j++16pB0p$,/0p$ *	 UD!2@+#:B+5 C0@+* 46vC0v,/6$6.t(Z(	"Q
)H+1:C6jB0j$,&/*j$6pC0p,,/0p)H,T	(U"D2 B0@$+4+j:B+,1V@@E6jC0j,./*$*j( ( 8	(D(:, 6jC0j,7/*$*j) ( 8,: / @D,5X6jB	"
D C0j$,</*j$"'2@+G+j6jB0j$,C/*j$1@+L	**UK+Q 

 ( 8,? 2@C+P+j+Q+f:D6jC0j,H/*$*	("Tj( ( 8,M 2 D+] 46vC0v,R/6$6.t(Z(H	*"\+f6jB0j$,Y/*j$6pD0p,^/06rC0r,`/2$2.p(	 D*Q*eH,AZ B0@$+i+j:B+A,f\ C5@l+@@66jC	"Dm0j,b/*$*j( ( 8,U 6jC0j,n/*$*j) ( 8	(*Qv,q / @D,j^ C5@z+ D5@ 46vC0v,s/6$6	"Q~.t(Z(H+6jC0j,}/*j)6pD0p,/06rC0r,	 *E"/2$2.p(H>C>D+x,x`7@F+>F[x2P,(D>+,b,+	  U x HzHH BhH H@%!?? TR	 ANSACTION PROCESSOR HAS MORE TTY'S THAN COBOL PROGRAM - -
?? CALL APPLICATIONS PROG	 j#RAMMER
!STOPECHOF     !:'WELCOME TO MULTI-USER COBOL -DEMO- USING	 
+ T/P - - PASSWORD:  @dx HzO?' 0zHz@a!STOPECHONERROR - -  PASS	!p
4WORD:     @f( (#!STOPBADPW*    H 'I$PQfaJMmeX:C gR~INVALID CO	 hA*<MMAND  -  TRY     HELP   @g8 8$0@:aH,H	*u:@E0: TT"<"0#H0z@(P.S. - YOU ASKED FO	 (xMR DATE LESS THAN 5 MIN. AGO!!)H%H DATE = TODAYS DATE & TIME@j' *HELP = THI	!pxVS TEXT    @jP/1PRINT= PRINT NN LINES; XX LINES @ A BURST    @k60;REPEAT= TY	 p^PE BACK TO THE USER EXACTLY WHAT HE TYPED    @kX>8DADD  = ADD 3 NUMBERS AND PRINT	 <g THE RESULT    @l@E	 JSTOP = GET OUT OF THIS PROGRAM & UNSLAVE SELF@mM
RHOW M	 oANY TEST LINES DO YOU WANT TO PRINT (01-99) ?     H%H?? NOT WITHIN RANGE H"	 *xHOW MANY LINES PER BURST (01-99) ?      H$@H` :@},8,8@	( ,"(TYPE <CR> FOR MORE)     H"ENTER 3 NUMBERS (SEPARATED BY COMMAS) TO ADD TOGET	&E*(	HER  <H!"Bp@
x
x!
x$H
'@
x"
xHIPH@@	*U*@`%`

0P`  4	`@	:\`': :*t*(+NUMBERS ENTERED NOT NUMERIC   H#!STOP     r<!B	*D"U("<"$!H! AH<\<%d<&!;<!H!
!H9<*	D"BzV?QjbgsC(+`[G;`	Vl>9`-$`x7VbT3[eVZq	D"eks.
d"a*emWOnemWP	D"eWc!o+fPa-+Wb2,Cd]NDUbQ0%BvbDw