File RANDCA.SV (save files (Executable program)

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

??2CBP
>,K4)> HKL=L)8KH8)[:,H7$HIL7LH$K$)6 HKL?L) I,HH=$HKL>L)T.D+,HL6XKL8 JLHT[LK 5J 8[,44(8D8,HL3 K,)L/[KL3L1HK,)L4L[DK,5L4XKD[L5D0(+HKL8) /LH&D0L+(+H$/?<\B0XCBL A0CCLCE4BBLJOAD(GXXLHK&:(ABC?9DCBGCJDJD>PI=XH\HHH8!I<> (R>D8F=H(*!,Y7I7=H(&8!I=?H(*(\8!I<?H(\>D8F8
=H(=!,Y6I6=H(98!I=?H(=(/8!I<?H(/>D8F8F?H)D!,Y8I78!I6<((X8!8 >((XI9]7I78AY;I:];I88-7<BM68!I8> %?]6]7];HI8AXIHIHJ> (XXIPF(X$G(X:I59D<XHLY5I5-,UUXXAUU]6)XXB>DHBA(P>D8D?H.A"5I=XHLH> "[HH8!I<> *IK<)K=)K>)>D?<B.AHH8!I7>(.[HH8!I;>(.[K:)HHHHHY>K;)M>HK=)K>).[:K7)I
HK9)I6HK?)I8HK=)K>).5+H[6K68J8H[5K58J8H[4K48J8H[3K8)K/[0K3C1K2)K4[3K5[4K6[5S0+ZK8)/H0&0!++:/)?<GB0CFB CACLCCCEBMBJCOJGXFHK0&:.?9H(? *RHU>(*	H%X\H$X[H[Z"H\ZH!>(HU>(H)8AZ!I,Z$2J%0JPTL-+JX.DBWXUXVXWXXI*XZ: X]XY%)X H I(<(-3I	>(+T%&.)<XI68AX HYI%?*3HY9HHZXQH <
+P8F8F8FLQ\QPY*3HU> P]-3PZI$*2B1[&HU>(+0(-[&J2J%0B+5K	I=H:9F8FA"2IH\OK&/[HY>(H">(+<PY(2%!%- NOT FOUND<(-3X I1XP%&-3<XI I
PP=*NXQ9P8DPQ*TXQ2IHQ8 DPHQ\P2A.DD=H I^9I]<X*+I\9PI <PR . H[%[H\%[%- DOES NOT EXIST:%-ILLEGAL SYNTAX%Z2II=XNIYXP\NPP+K2A-XD4LMIW<(+QIV<(+]I;<(+ IU/PLM%T+QLMIS<(+QIR%T+ H!> HU>(-3I	HOXZ;VX^K?%Q9F8FA"LZ\Z2AH IP<(%)X -OM9IN$6XTI?XM0Y*EI00\XU0ZIMXNLN<(*UHU>(,
PN*M.HU\MHMIL?H*EK-3K\M\M-K=+*<=3*^<A+Z<C+R<B+R=%+R>*E=1*E=D*9=6+7==*<.IJ*WII$6HUIH$6KLN> *B2I: ]G0!+H-FIEXU.ID$6/KICXU;X2I]12A.*
HMIB>(+*IQPT$6: XTHMXPLP$6: HM*DPT+AIQ+IYPT+3IQ$6XTHU$6/.K\MI?XNLN<(+	$6+;CPCTCRB:8!JE>(*72I:AM0X*M/X+MAX"];2A2J%0KH"J/> *)J0X(J1X	J2X&^3^4J5^6X"X)..OS8D?H(Q..GFVA<?"EB$CF+BD8%?HKCXKBXA:AXH(\H*AH7X\"1H6$S/EOL<(,?SSL+M??XPHP8J8J8J]HP]/S><(/]H==HIHH<6/]HUSH
SHWSHX>(/	H;]HXS/	I680!+80&:H:[7/6,4%0BAD
(AH3XOL4X!H!%JPOLO$Y<(J\JZP!*KJ9F8FH(2J$RC\P+9H(2J$RD\A+9H3XO$ZM88D8 ?P%J[[2.LO[1;XLO[0K18D?X+YK02> +Y%: K09DK18D?X+HK0H<+XK0X!K18!H19X[0.;Z[1K008!H!=H/[0.T4*0%0FHK(A: 2I\=,.S*/%%0HH??[(A/%$V!AF+9K0$YK2[2/.$>SAVE ERROR%+$> NOT FOUND$>TOO FEW ARGSF08 A3>(.
H.X[$>BAD CORE IMAGEM88H:HR?X. 2J$RIH=XR. F:]8%&2J$RK2A.-$>NO!!L!]TH&>(%OK8A[]HV]UHV[-LM\NSL+E/J=MF,W*+UK]
+0!+Q/T?/O)[\S)O)[[	-AD+%K[7K][]S)+M2J	,G<D<?2?>G?:O0L\L!LRLLLALXPC9J8J8JC?8A9H/7
PPAPBPCPDPEPFPGPHPIPJPKPLPMPNPOPPPQPRPSPTPUPVPWPXPYPZP[P\P]P^P
P P!P"PP$P%P&P	P(P)P*P+P,P-P.P/P0P1P2P3P4P5P6P7P8P9P:P;P<P=P>P?QQAQBQCQDQEQFQGQHQIQJQKQLQMQNQOQPQQQRQSQTQUQVQWQXQYQZQ[Q\Q]Q^Q
Q Q!Q"QQ$Q%Q&Q	Q(Q)Q*Q+Q,Q-Q.Q/Q0Q1Q2Q3Q4Q5Q6Q7Q8Q9Q:Q;Q<Q=Q>Q?RRARBRCRDRERFRGRHRIRJRKRLRMRNRORPRQRRRSRTRURVRWRXRYRZR[R\R]R^R
R R!R"RR$R%R&R	R(R)R*R+R,R-R.R/R0R1R2R3R4R5R6R7R8R9R:R;R<R=R>R?SSASBSCSDSESFSGSHSISJSKSLSMSNSOSPSQSRSSSTSUSVSWSXSYSZS[S\S]S^S
S S!S"SS$S%S&S	S(S)S*S+S,S-S.S/S0S1S2S3S4S5S6S7S8S9S:S;S<S=S>S?TTATBTCTDTETFTGTHTITJTKTLTMTNTOTPTQTRTSTTTUTVTWTXTYTZT[T\T]T^T
T T!T"TT$T%T&T	T(T)T*T+T,T-T.T/T0T1T2T3T4T5T6T7T8T9T:T;T<T=T>T?UUAUBUCUDUEUFUGUHUIUJUKULUMUNUOUPUQURUSUTUUUVUWUXUYUZU[U\U]U^U
U U!U"UU$U%U&U	U(U)U*U+U,U-U.U/U0U1U2U3U4U5U6U7U8U9U:U;U<U=U>U?VVAVBVCVDVEVFVGVHVIVJVKVLVMVNVOVPVQVRVSVTVUVVVWVXVYVZV[V\V]V^V
V V!V"VV$V%V&V	V(V)V*V+V,V-V.V/V0V1V2V3V4V5V6V7V8V9V:V;V<V=V>V?WWAWBWCWDWEWFWGWHWIWJWKWLWMWNWOWPWQWRWSWTWUWVWWWXWYWZW[W\W]W^W
W W!W"WW$W%W&W	W(W)W*W+W,W-W.W/W0W1W2W3W4W5W6W7W8W9W:W;W<W=W>W?XXAXBXCXDXEXFXGXHXIXJXKXLXMXNXOXPXQXRXSXTXUXVXWXXXYXZX[X\X]X^X
X X!X"XX$X%X&X	X(X)X*X+X,X-X.X/X0X1X2X3X4X5X6X7X8X9X:X;X<X=X>X?YYAYBYCYDYEYFYGYHYIYJYKYLYMYNYOYPYQYRYSYTYUYVYWYXYYYZY[Y\Y]Y^Y
Y Y!Y"YY$Y%Y&Y	Y(Y)Y*Y+Y,Y-Y.Y/Y0Y1Y2Y3Y4Y5Y6Y7Y8Y9Y:Y;Y<Y=Y>Y?ZZAZBZCZDZEZFZGZHZIZJZKZLZMZNZOZPZQZRZSZTZUZVZWZXZYZZZ[Z\Z]Z^Z
Z Z!Z"ZZ$Z%Z&Z	Z(Z)Z*Z+Z,Z-Z.Z/Z0Z1Z2Z3Z4Z5Z6Z7Z8Z9Z:Z;Z<Z=Z>Z?[[A[B[C[D[E[F[G[H[I[J[K[L[M[N[O[P[Q[R[S[T[U[V[W[X[Y[Z[[[\[][^[
[ [!["[[$[%[&[	[([)[*[+[,[-[.[/[0[1[2[3[4[5[6[7[8[9[:[;[<[=[>[?\\A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z\[\\\]\^\
\ \!\"\\$\%\&\	\(\)\*\+\,\-\.\/\0\1\2\3\4\5\6\7\8\9\:\;\<\=\>\?]]A]B]C]D]E]F]G]H]I]J]K]L]M]N]O]P]Q]R]S]T]U]V]W]X]Y]Z][]\]]]^]
] ]!]"]]$]%]&]	](])]*]+],]-].]/]0]1]2]3]4]5]6]7]8]9]:];]<]=]>]?^^A^B^C^D^E^F^G^H^I^J^K^L^M^N^O^P^Q^R^S^T^U^V^W^X^Y^Z^[^\^]^^^
^ ^!^"^^$^%^&^	^(^)^*^+^,^-^.^/^0^1^2^3^4^5^6^7^8^9^:^;^<^=^>^?

A
B
C
D
E
F
G
H
I
J
K
L
M
N
O
P
Q
R
S
T
U
V
W
X
Y
Z
[
\
]
^


 
!
"

$
%
&
	
(
)
*
+
,
-
.
/
0
1
2
3
4
5
6
7
8
9
:
;
<
=
>
?  A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ 
   ! "  $ % & 	 ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ?!!A!B!C!D!E!F!G!H!I!J!K!L!M!N!O!P!Q!R!S!T!U!V!W!X!Y!Z![!\!]!^!
! !!!"!!$!%!&!	!(!)!*!+!,!-!.!/!0!1!2!3!4!5!6!7!8!9!:!;!<!=!>!?""A"B"C"D"E"F"G"H"I"J"K"L"M"N"O"P"Q"R"S"T"U"V"W"X"Y"Z"["\"]"^"
" "!""""$"%"&"	"(")"*"+","-"."/"0"1"2"3"4"5"6"7"8"9":";"<"=">"?ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^
 !"$%&	()*+,-./0123456789:;<=>?$$A$B$C$D$E$F$G$H$I$J$K$L$M$N$O$P$Q$R$S$T$U$V$W$X$Y$Z$[$\$]$^$
$ $!$"$$$$%$&$	$($)$*$+$,$-$.$/$0$1$2$3$4$5$6$7$8$9$:$;$<$=$>$?%%A%B%C%D%E%F%G%H%I%J%K%L%M%N%O%P%Q%R%S%T%U%V%W%X%Y%Z%[%\%]%^%
% %!%"%%$%%%&%	%(%)%*%+%,%-%.%/%0%1%2%3%4%5%6%7%8%9%:%;%<%=%>%?&&A&B&C&D&E&F&G&H&I&J&K&L&M&N&O&P&Q&R&S&T&U&V&W&X&Y&Z&[&\&]&^&
& &!&"&&$&%&&&	&(&)&*&+&,&-&.&/&0&1&2&3&4&5&6&7&8&9&:&;&<&=&>&?		A	B	C	D	E	F	G	H	I	J	K	L	M	N	O	P	Q	R	S	T	U	V	W	X	Y	Z	[	\	]	^	
	 	!	"		$	%	&			(	)	*	+	,	-	.	/	0	1	2	3	4	5	6	7	8	9	:	;	<	=	>	?((A(B(C(D(E(F(G(H(I(J(K(L(M(N(O(P(Q(R(S(T(U(V(W(X(Y(Z([(\(](^(
( (!("(($(%(&(	((()(*(+(,(-(.(/(0(1(2(3(4(5(6(7(8(9(:(;(<(=(>(?))A)B)C)D)E)F)G)H)I)J)K)L)M)N)O)P)Q)R)S)T)U)V)W)X)Y)Z)[)\)])^)
) )!)"))$)%)&)	)()))*)+),)-).)/)0)1)2)3)4)5)6)7)8)9):);)<)=)>)?**A*B*C*D*E*F*G*H*I*J*K*L*M*N*O*P*Q*R*S*T*U*V*W*X*Y*Z*[*\*]*^*
* *!*"**$*%*&*	*(*)***+*,*-*.*/*0*1*2*3*4*5*6*7*8*9*:*;*<*=*>*?++A+B+C+D+E+F+G+H+I+J+K+L+M+N+O+P+Q+R+S+T+U+V+W+X+Y+Z+[+\+]+^+
+ +!+"++$+%+&+	+(+)+*+++,+-+.+/+0+1+2+3+4+5+6+7+8+9+:+;+<+=+>+?,,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,[,\,],^,
, ,!,",,$,%,&,	,(,),*,+,,,-,.,/,0,1,2,3,4,5,6,7,8,9,:,;,<,=,>,?--A-B-C-D-E-F-G-H-I-J-K-L-M-N-O-P-Q-R-S-T-U-V-W-X-Y-Z-[-\-]-^-
- -!-"--$-%-&-	-(-)-*-+-,---.-/-0-1-2-3-4-5-6-7-8-9-:-;-<-=->-?..A.B.C.D.E.F.G.H.I.J.K.L.M.N.O.P.Q.R.S.T.U.V.W.X.Y.Z.[.\.].^.
. .!."..$.%.&.	.(.).*.+.,.-.../.0.1.2.3.4.5.6.7.8.9.:.;.<.=.>.?//A/B/C/D/E/F/G/H/I/J/K/L/M/N/O/P/Q/R/S/T/U/V/W/X/Y/Z/[/\/]/^/
/ /!/"//$/%/&/	/(/)/*/+/,/-/.///0/1/2/3/4/5/6/7/8/9/:/;/</=/>/?00A0B0C0D0E0F0G0H0I0J0K0L0M0N0O0P0Q0R0S0T0U0V0W0X0Y0Z0[0\0]0^0
0 0!0"00$0%0&0	0(0)0*0+0,0-0.0/000102030405060708090:0;0<0=0>0?11A1B1C1D1E1F1G1H1I1J1K1L1M1N1O1P1Q1R1S1T1U1V1W1X1Y1Z1[1\1]1^1
1 1!1"11$1%1&1	1(1)1*1+1,1-1.1/101112131415161718191:1;1<1=1>1?22A2B2C2D2E2F2G2H2I2J2K2L2M2N2O2P2Q2R2S2T2U2V2W2X2Y2Z2[2\2]2^2
2 2!2"22$2%2&2	2(2)2*2+2,2-2.2/202122232425262728292:2;2<2=2>2?33A3B3C3D3E3F3G3H3I3J3K3L3M3N3O3P3Q3R3S3T3U3V3W3X3Y3Z3[3\3]3^3
3 3!3"33$3%3&3	3(3)3*3+3,3-3.3/303132333435363738393:3;3<3=3>3?44A4B4C4D4E4F4G4H4I4J4K4L4M4N4O4P4Q4R4S4T4U4V4W4X4Y4Z4[4\4]4^4
4 4!4"44$4%4&4	4(4)4*4+4,4-4.4/404142434445464748494:4;4<4=4>4?55A5B5C5D5E5F5G5H5I5J5K5L5M5N5O5P5Q5R5S5T5U5V5W5X5Y5Z5[5\5]5^5
5 5!5"55$5%5&5	5(5)5*5+5,5-5.5/505152535455565758595:5;5<5=5>5?;[>>DC9> *T	&[-8 A[+8 B[,8 C[.8 D[/>DC:> *\8 C0	*[0>DC;> *$8 C1	*[1; C+
,8 C->(+B8 C.C7> *>8 C.C=>(*>8 C/8!8 
.8 C0
/+E8 C/
.*:8 C0
.; C0<Q8 C1	)[38H[28 C	X8 C,8A<(*B[%8 C6
%9 C1/,[48H[5	<S>*B	(*B87]<":<XQ
,?0?8ABD;KH7?QE;P"\OIC[JSI?OIC9J8JKJ8J8JCSI80Y*;0\C2K>> *;2C.[>9O2LJY[ANBQK;Z08HNR=H+9BG8 [=NR[INB3>(<X*TK10&0Y*60Z*TS=.\J0> RR2K.0V0Q+EC /C ;KJZ"\
I[C8F8FC OI
IKJ8J8J8HC KCSI<
I*P9TJ0>(+,0LZ0R0+.K0[J+6K<[JBZC^A?0I+)0J[<KJ/;X*?2A?=33[$=A[; C<Q8 C$=A[%=A8 C$<Q8 C$8 C=A[&[	8 CC$<(*<<Q=QC%<(*$9D=Q=A*\=AC%C(<(*+[	*09XCC$< [	=A[)=A8 C&<Q8 C&8 C)=A[&; C	> 8P8 C&.<Q8 G?">PSC/C; G>> 8P8 G=> 8P<X+!; G<8 G;< +!8 G;8 G<> 	*/K <G:G:G:8 
:+^>D[:O:8 
:O:8 
:+173747572942KP0CPHHH ?H+XKBI?M(/J%4OVERFLOW-*I&%)4	;PQK:	9	8/7;M9F8F8F/):X9J8J8J/..:JHU5T(,!B1?N.? D<?0",G[1K1	?[0	>.<(*EK=> /<	>.<(*BK=<(*L=+SK;[-	>W*+UK]
+0!+Q/T?/O)[\S)O)[[	-AD+%K[7K][]S)+M2J	,G<D<?2?>G?:O0L\L!LRLLLALXPC9J8J8JC?8A9H/7

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