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"@ @