File BASIC.OV

Directory of image this file is from
This file as a plain text file

?=2C>E0\FXPRP\F\(YPU"B"B&*6/KB+T;S+PCA6 KB+TCS7FKO6 OO*7B8+VB4* B * B * B * B * B 3P3A68Z-+AB02 ?N2 GD+TCE6 B 3AWG. R8"M6J*JB * B * B * B * B * B * B 2 N/7ROO3SZ 3I3E3D2 3IWT3R3A6 GE7USAE7S"J*M* B * B . F0*6B7* B * B * B 3P3I7OCO6=. 3I?LO7P*JB * B . B .1B
* B * B * B 6 CP3UOT+HB=A0	?JEZD<B.F ^"A""D"C%Z\NHZ< K>?(* %*"2A?+?2J%[H:A2J%9B]E%8	=O<C;K:
<J^Z1"2+?=?2J%9K2J%9FN2R2XHN2R2XIHZX 2ILHA/I9\IP *<\I2A.2CCLSVC0B>P1GYISD(JDPAD?&$"	GQL:> H5>(-7L=>(%&*M	?*MK>%0	=	<%*	?*!L<Z
ICZ^L69F8F8DA=2J%[D%8: H^X^L7\^L:I9?+"K;X"K:X H"H5>(*9L C98!L:C9>(+"H K8X P"*.L:K78F8F8FC68 X L6A?>(K5K49XP +K]X]K3X L:C9X"K2X42IL C98!H">(\ P P4+X2A\:\6%*-7PHBYL.	%?1>	>
 GN?.>1H?;P([]ZSV%*&OBA%82J%[HMAZNMBZO2J%9J&%8JP> *[JO2J%9A8A*QICZ!JO2J%9B%8ICK?X4L4K>>(+J2IO=> O<<(%8[FJ!
;J"9F8FC:JO
9K8
7HP9J8HC6
52A	4	3HHP<B2K/2: JO> %8	4K12I
02AJ![[2J%9K2J%9F<B]B8 L;\8L7\92J%9I%*	/	.-7Z6S	>"J\ZA>G$">&G> >O?0>P>E>F,*CK?8A*DK?X H5>(-7H \6\=L:> %8%*	>DA+,2J%[HMAZ\MBZ]2J%9J+	J]9H8J8JL6\62I: J]O=X L 2A9D>XK<K;X <XI?L6\6J^< +R8DK:[OH ]>(+HH 9HX <X%8KOI9*;H H]X]J]2J%9A%8KO\:L^<(%8\7P^L6C?>(+!K9	8]A\
/7;V	8\<L<]A/72J%9I%8<H%8\6\:-7AK	BZ!\$C2 P
&DZGICZHO?2J%9*\JH<(JI> *WK>L6\6;$JG>(8AJH\;JI8!.2J%9I%8%*/=K<
XK;
:KX
9HY?+DXYK8
7K8
6%*;&O5> +DK4X L K39K2>P+BL C1K>\ P *8O0C/>(O.8D?."O.C2KV[Q2IOX<B
YSXSY+O2A.">?<%*""2IO-2A<(/:/,/!>D??D?&?G8M>]>JQIQE2QQR>E2K"G^!P"]NR[*: [: [$I/XHK?[%K>[&K=XIK<X4[	[([)GPI<H.H A\9F8F8F\4GH A\L4\4P4*US.K)>(K	<(.[%K(*MS$.S8K;X4[*;$XI*U: IAXIK:XJK9X LJ\IP +AR.HZ>(*:PZ82ILH2AX H K8>(*09H K7=K6<(*&=K5=K4>P./GDM?&?9?6?P?R?:	
	*		?<KDSA0I/XH	?JGZF<B.H^H^ ^L"-"^%
G$[!$$^^5^U\	\(\X%PK>X4H%8F8FC=K<	;	:	:	:P4*[/9K88AX %2HZ>(+E2ILH2AX4H 8 4K7> +IH X"	:H"9H< *9H 4H&X&PZ*.K6X$%,-7HH8!I//5L3JZ"P)SC^0RL/F?HZ
ZAPI$JZY:^NW?PF^C,4!D0G?8GQ%:2	?HH8!I/XZ/>2ILH2A*NHZ8!X%X&X!K=X$%,-7"^K<>("^K;>("^:*C	:X4H4	?H4.^	9HI8!K8X4K8XILIK7<(*2K6	?P4*,*CHZ<(/>[ZI/XI2ILHK59K4<XK7K3\ISZ*</>: HZ[ZK2
1	0K/
1-7SZ+UI\+X2ILH2AX*/PANKSJ(C$^X(U2W5
PA!Z>E ? I"U-J"?A?%KBM!DHPZBHY9D>PO?<XO>2A<(/=[O<C;9J8JZBKC:9J8H"6K9DKA>9F8F8FK8X4L4DP4L48J8J8JA\K7DL4A\K7DK9DKC6JBKM"6/=SIK5=*7K4[JKIK3DKJD[I.62I\H2A/DAJANAFEBAMARAAPRAMAYAJUNAJULAAUGASEPAOCTANOVADECH%>(K(
2-793I
/:?6GA !I-C8F??^C<6>6H%? %:<(8AZ,HZ8!91J,>0*)X,&O%+C H%?(*)%:9PHZ<P:8 HZJ,=*)X0J,K?XJH0XZ2ILJ\HP0*$/>;XZ/>;X,	=H0>(+[HZ>(+YH%?(%8%:[]K]9PHZ>0*8H08 K]HZ? +Y	<K]K?XHH0X"	;8!2ILH2A>(+US]+P"+LK]/:%2-7:A/:A8NPM8D8^NVWGN8BMA>XZ*/"=K?XIH0>(*N	>2I\I2AP0*H2I\I	=K<
T2K<BPPBPDPFPHPJ"=2K/;"=2K
:.WK9"=2I9V
8-7K7"=2KO89H
8/6I/XHK5XIHZ<(/4X02ILI\HP0*8/4K8XII/XH2IHZ>(+JLH\IPZ+F\I2A.=NUQ
APASHF\(GAVVFBM!BZZR A! SWG.UBV RIMTEO	A[G0ML+UB H:IPJU% /BPDRK4,HCHJ!H+MFKKTHIMRVO	A>KTAQH+LSA3C:O	/EI(G=A/KBGJZHC$HUJZ.KA0K?%$"JI.%$K?%$	>-7I.%$K=Z%H-8J8J"H-"H.8F8F8D"H.8J8J"H.A=K<%$.JA=<B.K<%$K;Z%.K:[$O$S$[[O$S$< M8> */K$K9?(+B[ 
8
780&K6K?[TO5> 	>KT%$K[A>9F8F8DO4K3[T	2B"<BK[A<K1[[	0	0
,"J	>.,K/X,/.K6JCK%FYL	A  ">GBML/6ZJ.KG!^^<H0<( 2%H:&SIJ(PIZ73I"+ I2-]JD-ZJY-WJ$,)J7	6MA3	MU3GLX4&FS[ EW\UN$;,N3
8F&\S]2OR1HU:=&X99!AB:PAN22A
1;A11[O$15BB/^BK-\B[-AB+,:CB;JCY	UD	<DX]GD!
D8
.EH
\E&\;E4\/FA\*F:+7GK74GZ )HJ1?H]
OL^2M6
<L/1KM*4SH49NN
O70KK AT ^LINEI^]!A?GKH;Z^KHDQLNZ1RK?Z^"\%$"\K><(*FK=<(*U9K<<XI.K;*G"\K:<(*HK9%$*U.^ ]A\<(.^I.A\I..\N1<(.9J8J8J"^N1R1"^*&I(%$K8%$
7.2+)NL VADRHF!MC$DHK$.
E\D,J6Y&ZC^/6JA]>AAZC>" &%*2IO?2AX%%*H%C>>(*PO=[T	<L	;H%C:>(-7HU9J8JC9X HVC8H 8J8HK7X H 9F8F8FC6X!X"H!K5=H*.X!P"*	:H"< HH!HH C4X H 9JH 9J9JA=<(+DX K3	2H H	<V	;-7K1	2/HB[RTS V]ERSION [K ^FREE ^SPACEM8AB.DE +$,+DHK	D(X(0JD.A??6
2 ?<C  2 FD>$ATTEMPT TO [OPEN] AN ALREADY ^OPEN ^FILER[ETURN] WITHOUT A [GOSUB]ATTEMPT TO [READ] ^VARIABLE ^LENGTH ^FILESUBSCRIPT ^ERRORDEVICE ^DRIVER ^ERRORDRIVER ^ERROR WHILE ^OVERLAYINGATTEMPT TO ^FIX ^NEGATIVE ^NUMBERATTEMPT TO ^FIX  ^NUMBER > 4095ILL
GAL ^FILE S[AC O]VERFLOW ON [CONCATENATEATTEMPT TO USE ^UNOPENED ^FILEATTEMPT TO [READ] ^PAST END OF [DATA] ^LISTTOO MANY NESTED [GOSUB]S OR ^FUNCTION ^CALLSATTEMPT TO [READ] ^STRING FROM ^NUMERIC ^FILEE[K$\RATTEMPT TO [WRITE] ^STRING INTO ^NUMERIC ^FILEI
LEGAL ARG IN [POS]^ERROR WHILE [CLOSING] ^TENTATIVE ^FILEI[NQUIRE] ^FAILURE IN [CHAIN]L[OOKUP] ^FAILURE IN [CHAIN]I[NQUIRE] ^FAILURE IN [OPEN]NO MORE ^ROOM FOR ^DRIVERSF[ETCH] ^ERROR IN [OPEN]NO MORE ^FILE ^BUFFERS ^AVAILABLEL[OOKUP] OR [ENTER E]RROR IN [
PEN]ILLEGAL [DEV:FILENAME] ^SPECIFICATIONSTRING ^TOO ^LONG OR ^UNDEFINEDNUMERIC OR [INPUT] ^OVERFLOWATTEMPT TO RAISE ^NEGATIVE ^NUMBER TO A ^REAL ^POWEREXECUTION ^ABORTEDILLEGAL ^ARGUMENT IN ^USER ^FUNCTIONC[HAIN A]TTEMPTED WITH [BCOMP.SV] OR [BLOAD.SV M]
SSINGATTEMPT TO [READ] ^PAST [EOF]ATTEMPT TO [WRITE] ^PAST [EOF]DIVISION BY 0STRING ^TRUNCATION ON [INPUT]ILLEGAL ^CHAR IN ^NUMERIC ^STRINGMORE THAN 1 ^DECIMAL ^POINT ^ENCOUNTEREDILLEGAL ^MINUS ^SIGNSTRING ^ARITHMETIC ^OVERFLOW ^ERRORDIVIDE BY ^ZERO IN ^S
RING ^ARITHMETIC^ILLEGAL ^ARGUMENT5^^BYE/I%E[E!HCATTEMPT TO [CHAIN] TO [.SV F]ILE NOT ON [SYS:BAD ^RECORD ^NUMBER IN [RANDOM ACCESS F]ILEERROR IN [DEFINE RECORD S]TATEMENTSTRING ^TRUNCATED DURING [RECORD READ]STRING ^TRUNCATED DURING [RECORD WRITE]ILLEGAL
^RECORD ^SIZEBAD [DEV:FILE.EX F]ORMAT IN [CHAIN S]TATEMENTBAD ^COMMAND ^LENGTH OR [CCL.SV] NOT FOUNDO[N S]TATEMENT OUT OF RANGEIMAGINARY ^SQUARE ^ROOTILLEGAL ARGUMENT IN [LOG] FUNCTIONNO MORE ROOM FOR ^RECORD [DEFINESATTEMPT TO ^FIX ^NUMBER > 2**23-1IABYK
E]I%K8K=X]A0%;JFZD<B-7&G$"+G^\R$3
 "]P 	
%)I6H$? *]H%?H+J%2.RH%?*"%38AX"X	9XXH$8!X4H9XXH	8HX	P4*)H%X%H&	X&H">(.R%)I3	?I6H%X"%2H">(+F	?]M	?I3%3.R%+]M+HAPO>X"O=X)O<X(H)8F8DC;X%H"8F8DA>X&H"8F8FC:H%X%X!	9	8	9H!
>H&
=H%
<X$	7%,-7I7>(*,4-.G?8SMSNSO,%)I*H%ZX,&H%+C 2AH%<(+Q?*RJ>(/?J>(+O%)I0	>H$K=?+T	<I0H%> +T%+I0H%Z	;%PH%[^H&[
%+]M%)I-*:%)I-%+I*	:I*%)I*%+I-K^9H[^K
8H[
<P+D	:I*K^<(K
> *0J?-7	9]M-7%2-7%+]M-7J?H%8%+I*	8	:I0	7-7H%<(-7?H+(8A<H8 X$%"-7/5A.<BL*M+B*AA4G$3(H*S^-T?(\RHLH%<(-7?*H%3%8;Z[Y[Z2AK[X"H$=H8P8HX$<XP$8<P	X;$[W;Z8JX(X)KVH%X%H%<(H&>(+Q*.H(9HX(H)8HX)	XH)KZ9!H&<(SWX8TH(KY9!H%<P+M< +BSW+B8 X"X%HX&H)9DKZ[ZH(8DKY[Y;$[WP"*	KYX
KZX&-70,4?*<B	0X>\?6/\<BA/\/<B[>[?;K>O	<P+2S?[>+*;K?I!%0S	O	> +)K>I!%0/	":	?	"0KBC>JJZI*I.K"V"O"R"T	=]M*V%3*V	<]M%)I6	;%)I3	?%?	:%<	?I3	:%9	?I3	:%6	?I6B.	:&B".+%)I6	9H$[B%"	=I6.0H%?+%38A[G.:KG> %3/B	?&E"0	?&H%)I6	;	:&K	8&N	:&Q	<I6%)I3%+I6P$8	7I3	:]M	;KBH$
$/GTW3BH%9HX%H&8HX&H!8HX!/*+P(H&;,	[-T(C*&1%)I6	2]MH%?H*P%+]M	0I6%)I68AZ3%+I6	4%)I3	/&&	1&	/& 	/I3	1&]	/&Z	/I3	1&W	/&T	.I6J3>(*/	3&B&2.":BH%=(/59F<(H$8!8A<(H&> +DX$X&X%.3H$ZX$%)I6	/&)%)I3%+I6	2&)	0I3%)I6	4%)I3	.&2	/&/	.I3	/&,	.I6	2&5%)I3JX$%"	/I3	.&8.3*,+
(H-T(	[HOAYH
	+UI7?=TVT6?9.HY4AYH
.AWET\??VK$MF^B8,J-LYDDXA;A?>VV1/B]+H9C[CF8C$*7BZ!=,??/C  AWKY V(I8BWET ^1E6SJ-UPVK$M:H$= +B:+QK?<(+P=/>X$9H%=H8P8HX%P$+HH%X$.;H$X%X&K=X$%,/S	<$/[%)I0	;%)I-%+I0	:	9I-/
IEAF> /+IN] IN]
K8]^/+&CY+P""+*KN$?5

Note: Lines longer than 256 characters were wrapped



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search