Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-01 - 43,50210/basic.hgh
There are no other files named basic.hgh in the archive.
DTZ-F>O8G"
eEI$ERI4E\I&l
K:$M&dGcM:,fBM?&O?fIO?$fSS&\S;fwY$'"]DgA_8'YaJLhsetie
i$elWeI&e$i2gHLgR|I4oJLhaI$IdAWKLAYtAkY'Ar]<_2$etB(eB0eB1eVtg4B}gCggCo
Ab                          

 

 

@


 

 


@











 ,>F60v
+
S+\9+
+:+"+G+9+>+9+>+8+=+D+++{++J+7+s+S+t6+\E++/+5+6+B+U+h+n+p+60v+K+\K+4+L+a++7+VCLCRtMG?G?$4I$TzKc=S;$cY><i]VlTza&,Sa?Se:$Tgtg&tgG"it58t8x<<t=>gO@ B	` pO@|7@m+j 	n+^7@3N+a
&@@m[( BQ B`  BR BaQ`X"Z B(Z"
XB*O@"+"h+i+"j@@",d6@+p6@}+X@@{O@O@,
NEWOROLD--O@XS@@X]=vq@@
@@
6jXV*@6 6 V a 6,Y6@+I p7 +|,
,
=,
7+7@}+m,
,5,<,
+y 4`j+y,
,
 +P,
$+P,u+PZ 6@}+0V1V++meV@+X,
(7+Xaj`j@+P+X6@+,
+pTaj+PO@,(,>PH5 K B}
M@@+6+
|}<BP~@B@	b1+!P5X"(9B3,Fb+&,B ",;Z`.$ "/S`X" B7 	b1+1 5 B3,F
&	b+3,
+E,ENTER EDIT TMP FILE
+E 
4@=@+;,~	l
 *&,..)N}=j? ,~ . 
. @=nC,~+p<INX+F|5+6,~ @@ p	b1+O,>X((9 H3,F
J+Z,>PH5@5+Z K H}O@|+$ETE`j+S,( !1H F,\+X R2&a,~[2`,~3 9\,
,5,
+\VE@@,
4L
L+n@+a
=,
7+i @,
,5,<,
+fGTH,
,
,`/Q$",-+pTO.,
1H@.,(4N
,

,x,

+
,>,>[}1BLu+|Sl ,
{ },
{[~1B(9+l",
{,0&8&8 &,8 &.6 **,
,^,^,~ R2&a+[3b3"9,
j,
97@+Z+`j+@@|+`j+O@|+@@|,
=,
4K7@|+$
J+n6@|+#@+$@+a 
,+,,% K V}6@|+f+ZAMEaj+-,
=,
4}aj+P,%+XLACEO@|+~EQUENCE,( Z@  7@ @aj+=,
,
7+P5@=, BY ZERO IS NOT ALLOWED
+p @S 4,u+ 3HR+B['2 +x".a/8$.0xO+v,
 a/4PX"!<p/R HBX,>Q/ 
 LZ.RZ8Q"A`,
`j+p`ji.`n+]`jm.`n+] an+Waj@+]+``naj+Zl.+], ( 3F$^m.=([*J+OO?X@O?%pi"-`,>,
7+a3 +n 4S,u+j/R/B$. ,1,^d.*,
+OI,,+]J[8,5E,B*|L,^.R Q@p.*|t+X,
+pE@@|,
4N,(
M+n,
6@|+@++r@+a@@`+\
ATCH,> Q V` R Va,~TEM	`,^,", :0Z(+ G +aj@+4FP0X+P F 8,
+Z1F~0X+P7F}+P F`R~Y},#1 F` & F(+ 7
S,Dd( & cJ,~,
&+ `vp+,~ &LuQ&(9SG RF 8,~  V}  V~,~`j++,
1--+*,
7   @`j+/aj+P,
,
7!  @,~@A&64V3,>,1,^ 8`X,~S 4,u,~ 
 Q,A` $
d0J+8O@m 0+U  
1J+?J+=4$
J *`d`+@+B $/$H.`3$R+G/` .0,
`AQ"H*" D`,> 4S,u+M+L 0,a,^X&0 F ,~,
6@}+p+m,SPECIFY WHICH LINES TO DELETE
+Q,
@@!+p,d,iSHpE+fO"+f,d,
+Z,d, ,
{,
+Z &,
1H &aj+P4F
,x

,
, V 4,+ P^ZP].QPO/POZVPO*6` XP^,~ XR Xa 6 ,Y . " B!O@{@@O@@@~@@:@@~ .
,* &,
_ 6 ,
(+(Z &$,
`j+(aj +!+' &%((|,
_ HH 6!,
(1&*|+).4PY"!<p,k 8O@@Q." 8^0d*",~ p,
,
  V@@ @@@@O@6@+8 Y Vh,
_!&)6`j+F,
0J`j`+D,
 +
!0V@1V{@+F0Vk@+C,
$+
`j +D+F,
$+
+F!&I:!Q"A`,
 4,u+
Z  a/R \.8pQZ`Q,`dF ,H eV@=O,
(+
aj+X2J" " 8X0X	'1Xw+X1X	$+x0Xa1Xt+b "aj+
*|27@~+@@!@@
"$&(*,.024@@{6@!,
+pV4,149bYX f T+u[5Vl!88 6 3"T8Zj+kX8 6< XQV.."3bT+u[<xuZ<xu@@{,
3BTP3"c+fO@n/c,,u+  QF9{@@{,
m,
9{ ]2(l+	 "%  ,
	.(+7`+
, DATA@@{7@{+X 
R Z i R (,9 T c  (,9 T f+[XR.."3"+ [ j S (,9 V f  (,9 \ k R (,9 U e  (,9 U d  (,9 U2"+([.\[X. V9$ ] l R (,9 \ k S (,9 U e,B f ,B@@,6 4,-@@n 6@@Xg@@Xq@@X=v3O@,}6@:,q 6]XV*,
+R !62",~Z5H=[.4Z@XZXY5Z>5HA9:..+:Q@@X8*6g,~NGEQ.`j+O,
g1F+
4FJ,	w+O!, P,M,
/TO,	6!,  6@+
,M+V,	6,	x,
/TO,
g!,`+MA6 \,U '+Vaj+W,>)+,
aj,~,
+UFN6@ *!,Z a3vR,Haj+
,
,> 4,u+c + 0,a.a/R.& F  *Hg!,X,H H" ,,H0J+v,
,
aj@+nj.,
 4
 Y2(h+q3F +
9o 0,a F :x`j+kaj+
,
,
 W VW Vf  V#O@O@aj +,
@@,	8,5,^!,,M f f Xe XW Zf ZW^# VZ".RZa.8XXX 
.+	3,^QV" l/]QV#,^RV+V@.,
^0F5F
0J+
.8O6`  /,
,
7+
Z
*l L   aj+,
5F
,
7+
. Q
!L $ 0Q@ aj+
,
aj+V,
+
 R.6p3Va+O@~ 2 
4,H+baj+
  4,i,
;1Faj +
,
,>,	8,5!, x,M,
/TO,	8,1,8,>aj+, 5,
,
/STEP,	8,8*x,> ,1 [A61V
+4!,&,M ,^!,7 !,,M!,X,H a/R6@{ & 4,i,^*x,i*x,i,^!,,M 4 ,i  F+VND7F 6@@l&x,
N,5["Q(
[#.]2Vl 8+}UB,
7+
S 4,u$:/RS 4,u+O+Q 0,a F /UQ(!,,M+VO,><,
7=S~4,u$:/R Y. X2V$=Q(
1END#+c@!, ,H,/*!,0X
,H,
+r,	6,1,,
 60V(`j ,
!+  4,u ?S
 ,>,	67@ A,1ah+o,( 
x`lh,
 Lx6 +s,5,#,^,M,+T,	x,#!, 0,M,^,H+rUT+~,
,!,X
,H/*!,X
,H,
`j,
+!, ,H 
D,Haj+
@.,
;4F1f+1f++
0f+
!,,M+,>,
+!,4H
Zx.T7@XO@X!,*x,M,^,
7aj+V,
+,	w!, @,M+aj@+,~O@:,
;0F+
!,X
,M :`=z> 
E,~ Gd62VE+^6+ 7@+ 1616+h x.8XW,~aj+
@.O@ ,	67  aj +*6 +:,>F,>,
> +$#` ?` +
60+;,1 HD 
F7` 
G6 +2 
G x.T7@XO@X7 D!
,^,M,^5h6,
7>` +-0J+VO@,
aj+"+V,+(2P  A,>,	x,#!,  ,M,^>` +<+7T,
;0F+
 l3v] H2H_~ H,W H H,W,1,W!,@,M,W 6 .R *XT@@:.\ `XZX : XZ`!&  4,i/]Q(7 ::!,X,M,W+V6@~+OX:XXZXO@:+N>l X,~,	8,5 
J,H@,*H`Q(
+^6@~+] 
a@,M+]ES`j+
7z~ :0z+e, Fh 9l% X(+@h+nzJ F@@+@7K 8 Xh 80X(`j+p+V,
:~9f0YC.07+uO@:,~FX:8<X(/258;>AD<INX50INX5`INX6INX6@INX6pINX7 INX7PINX8INX80INX,INX/INX2INX5INX8INX;INX>INXAINXD-0369<?BE-0369<?BE1#{m`	R
EHHH$HH	H|HnHaHSH	FH
87@+57`+pO@
Z p1V+D0V+R,~@|
,~^ X7@,~7`+p0X+N \vK \!?`+@,
0J`j+<+@,~+
vL+@ \+?Z X1X+DvL+@ 9\% X(+@X+n X X@@vJ+@+V 8 XX,~ATCH#`j+
,!,X
,H/*!,PX
,H,
aj+V,
aj@,
+N^7`,~ X1X+D 9\% X(+@X+nvM+@ X X@@vM+@+JvN+@ 8 XX,~TE+t,
,!,X
,H/*!,`X
,H,
`j,
+v^7@+n7`+q p1X+D0X+NO@
,~@@@
,~Z V,~7 :+l <+mNT`j+	!,p,H@@#,
1USING+	O@,	67 +
 60V(+
,
!,$l,`jl,,MO@#+	O@`j+	,
1TAB1+	
`j+		,	66 +	,E!,,	6@#l,@,M+	 
N+	
,	8,5!,,	,H+	,>,
x+
!,,	6@#l,@,H,^,H`j+V+	 
O,H+V`jl,1Jl, `jl,0al0l, 0J`j+
,~!,$,	6@#l,@,M+	DOM,
1IZE+ aj+
 
O,H+VD6 T` 
P+TORE+	.!,X
,H,
,/*!,@X
,H,
aj+V,
+	) 
Paj=
	1`j.,,
,H+VURN 
Q,H+VP 
4,H+V@.`j+
rajO.,	Baj ,~#` l.,,	B`h,(,1,>,#7 xh(!,H,L,^AQ+	9,	Qaj,~#` l.Z`xaj\`x,
,,	Q7 x,9`h,( g _dxh( X_,1,>,#!,h7 !,x,M,^+	C,>`jh* ,	\0J/+	Z#` ,
,,	\,(,5,#!,,L 
R,H (+	S,^`vh(,~,>`j ,
`j+	q`j@@+	d0J+
,
,	8aj+
,
+	Z,0J/av+	h"@@x S2(b+	k2@ 9	h/S+	o 4 ,i 4
 &,i/[Q(
+	Z,>F+	h,
;0f:+	s+	z+	Z+
!+
+
+	z+
*+
*,>F+	q7 ,~!, +M,>,>,+,
+,^7 6  +
aj +
,^/T,>,>+(,>!,
6 !,"4H
6  U!,
 .8O7@XO@X,^*x,M,^,
7 (6 ,9+	Z,>,+,0J+
@@,
,	8,1!,cp,M::x`j+
aj+
@@,
,
,^,#!,,M (+	ZZQ,	p  HXR 4
,u+
2@  W,~ 0,a @ ,~,>,+1J+
%aH@ W+
',
,	8,5,
6,^d
@Q,ap,H (+	Z,>F+	Z,
,> #` ,>O@,	86  Z,^,E,9, (aj+
5,
,	8,E,9,"(,^ aj+
+
4H
9,#,(,
:,#!,  +M,
X.`j+aj@+
Oj.,
`j+
n`f+
D Y2(h+
D2F 9
A+
L 4	,u+
FZ
 +
K 0,a.8^/8OZ
 F  48 &,i l(8+
M/hQ( &,~ .+
D0J`j1+
@`j+
nX.l& 4	,u+
VZ
 +
[ 0,a.8^/8OG& F Z
 48 &,i,i A(Q(8 &,~X.aj+,
`j+
d,
R .8O7@XO@X,~,
1J+
f`n+
n,
|+
a,
^0F5F
 X5x
k"8 XX,~4x
`xaX,~ ]4.
l&X.`j,
1J+
|,
@+
~&4:,i 4
x+
+
*,
`j,~aj+
x,
+
X.l&`j,
,
S0F.&,~GOTOSTEPTHENTO,>,> 6,
(+,^,^+
@ 6X x 
6@X+,^,^,
 +3F_+,
$+ 4,u+#` Z  &,~,
3F+ 
 4,u++ 0,a F , X26g+[X1X2hX9:X9/ZQ( &,~0J &,~l&x+
N 4	 ,i/Xaf\H,~ 4	 g/(,>  0,U,^ah@@,~ g 8_/Xah\X*_+&7@,~ X.*X,9 X.*X@@,~5(
ah,~,+!,,L (,~5(1`h+2!,,H (,~ 4+: 4`h,~ &!,5(=!,0T+C: W.26f,i Q(P,>,M,^,~,i/V+A`h,5,~l,/X
7@{,~04,khLO/R,~5(Mh,7@{,~dh+F4HH,>,Ha,^4`.PO`XZ^/R/6XV`,~".vP^P.!X*8	,~$BOB^0dX=Z,~P.P^2xPO+.PP^,~/PO, 9.(2f`+vX6`1(X+yR 3Z:x,~,
1THEN1,~,
1GOTO `,~:x,~ b d ` f7@{+
,
,
	+W  ,,
j64V
,.R[,
@@{,~7 |@@|,~6`|+ZO@|,~7 |+Z:|+,
0J1J,~1
P
,`J Q
+w`j+
,~,
`j ",~Z(&|+
aj,~afe&l&(F h+
&aj,~ hajh
J:x+
Q6A`4X
/8(4X
,`j2Xi+
-,
+
)5X
-,~,^,
(+
+X,^,>,>,
(+
4+
5,^,^+X,^,^+Xg 6aj@,~  /h ,
<V
aj@+
$ . /h+
96@
+
h,>@  $+
O6@
+
C
F+
D?at!+
ct1J+
O4J
O1J>+
0J+
IO@@@+
K0J	+
L@@O@=
O1j1*1+
V1$/J6@
9
A>`F9
A
` +Z
 @9
A,d,RROR+X *JdV+
],^7@
7* t*6@
+
\@@+
@@p+
7@
+
?+
A R."p !
ZLQ"A` Y.2p+
|L+@|K+@+^|i+@+
C+
S t*,>@ $+
CQ"A`
3J,~,
m+
k6@
0\6@
+
v?`HG7@
+
t0J;p@@p,~0J;@@,~?at|+
xKtw+
q1\+
z|N+@+
v+
v 
4J
~.*,
m`dp+
|,~4V
,
m ,
,
m  &? *1b,
m+"7@!,~,
TIME:,@x/!&8&82 4X
@@!g  6X,,
m *5
m*x ,,
j*x+
,FhO/h^26,~7.6j+ VH^0z`+
7`,~.36,~6@n+
0**.*&*.0HZX1X8XRXRX*2@: P+
aj@+h`n/(+
`j+
aj@,~ &/h,
aj@+h,
`n@".4@
#&65Xl06+0
+
O@g#4BF+.0	<+2"=+/0F++$4,u+h2F/(/(?5P1(1(+2"G+,GG2V+Gd"d"~,^+
m,57@ +&9p& *,
m+$@@@ ,,,^4H
, *5(+ *,
m#+. ,&"4B35D07 ,QDx,.x5$34p
 $ *,
m=P
 *+
m 6,>,,^,~00@@ 6@ 7l 6, (+
29:z8]p1:T=8)9Lf30!!y">T#SD$85%B&	4&wka']fY (RPd)7$]*
,~Z67!Z6QWx,~4`YGZ4BY."h3"h+,/+6@"+e`vn+k`v+nav@+j,
, A`j@" BP,^7@7@n+X Vn+X!+X P6@n P7@+,
,
,`j@" BP6@n BP+!+X,>@@,,^+9,>@@,,^+>g : h*B: BhZQ"A`,
,
1DATA+5z+O:+g :7@o+",
7@
@5\%,
=`j4:
 t*4\* 6,
`j@=v) B,U+,4Z5z,~,^6@
+?,ATA NOT IN CORRECT FORM--RETYPE LINE
@@Zn+X,7g 6 .R/n BX@@X,~,
+X,NTO LINE Z,
+X,REESTABLISHEDE-REFERENCEDIN LINE +B,
{,TIFOUNDEBYRESTORECOMMAND IN LINE +B,^,
!:Y@Xt* 8
@A=xd+X,
+X,INUMBERIINLLINE+B,}ZZX X[X. VXX 6Q Vn,1+	Z26+:,>n26++O@o`j+z`j+	1J+x+.,
+5[nXV+xZ/l67G V,~aj,~:x,>,>,4,
@86@8@@nXXO`jh+J,
=`j,
Z,^,^+T6@n+,+,^`j+_~+_~.o+.`j+
x`j+
,
+ [`V@+27@
@4\&6@pS,,@@pg , x:x,
k p0V+1,-6@
+,~,
,>7@
@O@pS@@pg@@pq,^x`:x*1J+9`,
m`B=v5+) *+7[`V@+A7@
@4\>6@pS,, ,:pq+),2 46E 28p6@ 2+F 2"&o8p5xO 
0R> :.q4NL> >,c0f+N26t+y,g+) (/&4VW3vq+Sq9Q26r+Uq=S >,c26t+a  
.*,g 25([ 2"  . *",
m`B 
,
m`B *,g+)&608:9V4zdq=zc26r+}rd6,~ :h4np=np5Nk 8 :o+q1R+p5Vp  :m+q 8 :q+q :h1J4Vj&6 8`QXx>`,h[
x`B+
m2t'PB 1@ka,
NUMBER TOO LARGE FOR FORM
+X,
AN ATTEMPT TO PRINT TOO MANY SIGNIFICANT DIGITS
+XO@!7@
@4\6@pS,,7(pq4`)Gd /p/4`).@pq+)1\,~ 8.Xp],> p],
m, 6 pq..p0\+06E+++06%++4(+4H
0\7@
+ *+ *,
m=h@@pq,~6*p pq4&/.p+\ ,~,~+*0\+$0f8+/+%0f+/6@!+)&&4H(/("`.hpq,~@@!,~0\+,0f?+/+-0f"+/; pg:pq,~O@pq,~6@
+2,>@ 6,,,^, _5r
Q.A`,~Z 842<Gd2["`.4v<9
,OSSIBLE VECTOR LENGTH IN +P@2@*4R

5rC9
1J+@+
9r
 
84*H:sd*~(Jo2aJ@9
,-ASCIInCHARSEENIN+P,,+D+@+TXVJ=PQY8XV,~Z [,@+[<8]l*7
G JX*VW[Q67GW,~,,4,^,^,n5zh4Zf3J+cO:1J,k,q8zfRx:xGt+@,~+
,@,~1J+k *,~O:,@8,q,@8***,~[`V+	`V@+,>7@
@4\y6@pS,,,4,@@g,@+},
m+{,^+)".6&6 ,~Z 56
avZ,~,,4,26o4V.,@ *,
m`B=v+),,4 6$ V$32t t@@A u :,1J/+1J+#1J+@@A:5R
J,~ ZAO@A+7@A ZA 6:,1J/+!5V1J9#(V./A6@AlQA W$:$4R+:4V997@A ZA:,1J9% /A16+l+6o.VA:$,26u1V+.Z$4V.,~,- 8 XA u XB 8$ X$,~[$/A4v6
B,
m=V4[$ VA,~ 
v+: 
v+:7
w!, & Z
 aJ[
 +B 
v+?7
w!, [
 ,FZ $Z
,F..R+@,~Zl,~:@rd030,~,Dh(  Bo a b@` b@` ao`Hc1 c7 "`,~ &`V-G {G ZCv\ 7f ]V#QI+0`} 9~j #`7 h2 h+]hh+]&p 4 ~#`4@v3@{+z)r. !@o! n@o(|h"| | Bp }}~po,~,
R,>,GATIVENUMBERINd,Q,^+iB`@4@z!+]cBp#`3b,~c3b{+%"(?"@($)B!\Rw ,~ Y~p q.0 (@l 7G,~ 4".4Bz)r/"@("XB(Bn(|D? D
,
-QD+@,~`@s/M{,>,4@9*o,o,~,(|h&fo LM!M4oLDN+@,~!t0'"S'qf!um.	.#Y%"!vrX4"S,,ix,=,^,~! ,~5"z,
 ,~G~|{6$.xNP.G.A'S "SUPER" BASIC REV JAN 3 AT YOUR SERVICE
CC[Q8H.BAS/B
U x
7HH8i&l\@I$PHHX@HHI%}:eVvJ6DEFFNFNENDFILLEGALLCHARACTER:FORXWITHOUTNNEXTDATARNOTIN,CORRECTFORMXNESTEDDEFFUNCTIONTDEFINEDRTWICE,+rVARIABLEDIMENSIONEDTWICEENDIS,NOT-LAST+XSTEP1q@,bILLEGAL CONSTANT0STRING VECTOR HAS 2 DIMSINCORRECT NUMBER OF ARGUMENTSNESTED STRING VECTORSUSE VECTOR, NOT ARRAY,M8$DILLEGAL FORMATILLEGAL FORMULAILLEGAL VARIABLEILLEGAL INSTRUCTION<0p.G?P~B |[O%2ArXAsPw%$ $"$$! 0&p6 R\H6.+D"@ @