File BRTS.SV (save files (Executable program)

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

?>2C>EDRH\8$GPRH\"BBZJRZR2ANZ$2AN$2I^%R$R%R&*F2B	?\I<BN(2A^	2IR(R	R)*T2CK>
=K>
<: Z/;PD*?6PD*?6> +Z%78H=P-/8DA-[B\[C2B%=B-,I4X$H$%08 KB9XKA?\!\8!KC> +XL"A+KB\!P$+GL	-*L"9F8F8FA)I(/\FYA)<(-	X*H*I&X"H*I%X!H*I$X(L!/$&Y/S3<4<3=4H4IB>E>,G>G2IOSSS=H*M2C.2B	?2B	>SY;K=UK<[S*12CO;
:	>J K9[RKRU0ZKRK8<(*JK7<(*4K6<(+GK5>(*SKSK4>(*HKR
SSS: 
S*SKSK3>(*SKT>(+AK2UK1UK2<HK0U: KS[S*12B	>SYKR
SSS: 
SK<[S*AD2B	>JD/UDSK8A*LOH%X%P++BX%M]< *)/AGVM 8!HOXO/*C\ H<:A?3A2>V=+BJBJDB?L!LJCZB<B.DLL%JMCNK^2AO?2IXPK>XQK=XRHP\QPPPQPR*S.JLO>(+;&%ULOH"X"P+*ZH.> *3M]< -TH$%^> H&>(-6H,P.-THOX!I
%UM 8!HOIS?-RL!\O: H!X!;$HOXOH!91H*> *=I
X!H*XOH$%^\OP$P!+NMQ\O8A%U\OHO]P: M!]!L(H,\(%O-NLO9!X!HH&:H<(8PH!:PH!8!H&>8+<H!X&;$HOX*MMX,H"X%H!?	U6	?2B	>S2B	>NN2AL
9!O=:TL^8!O<[]<P*VO=\
O<\^L\<(+X	;+XK:9!HQ>X+XK:	9HP9 L >P+XHP9 L[>X*/HP8A\[HPLZ8!LW>(+D2B	>[Z2B	>[2AHPLZ\WK82B	>EX2AHQXPXQK7	9HQ8J:LUC6<XK5\UHP9DHQLV\X2C/42I2B	32C/2	?2B	>N	9< K1<8+,2A\\\
\^/02I2B	3\(KVBR	LBMA>?CBHOTFN3%&L!HJ
?*T2B	>X%2AO?K=?(*WO<C;2I\T2APT: O?
?PR*C*!2I2B	:*^2B	>X%PR*[2ALS> T]/9*12ILT2APT<HK82B	>X2AO?>(*<W?8PR*	2I2B	:*>PR*,2ALS> T]/9LS<(+R8!XRK82B	>XPR+I2APS+D2B	>SY2ALUC7>(/92IO6?H/9K?2B	>X/92AO5XUO4X]L]XSLS8 XRK3XT/BCOMB>6K]D KVLA?+BEL!Z2B	?S2AO>X\L\>(*0O=X]L]XSO<K;8!HS>(*02B	?N	2A\SPS\ST];$L\
PO<K:XSLS<(*+9!HP<P*0XPPS*!HP\SPS\S/92I2B	8[SXQXPKS<(+P9H[S<P+GO7HPXP8TO6HQ=X+QXQO79D
7O68D=X+Q
6*7R3;.39![(K5XR+]HQ8DXQHQK(=XQ:HP8DXPPR+Z/TBASICWSR ?>X	LO>(+RR ?3%&LKVQW6>=L!"L"LA"LHA"L "L0"L8"6/?:"6 %?"NL8F?H*\K?X"K>X* K>X"K?XB"/B2H/H2NL=*1X/NL8D?/=/<8H>XK;K:/9N6R6XXN6R6XY\XPXPY*=.6OBSBXXLXXXHXXYOBSBXZ: X[: X\X]K8X^LX	7Q?SR[?RRV? R
?UR
?7R
/6/B<(+WIX$	;X+WHIX$	/S?:-4I\$	I%$	/0RWZ?0R*ZFJXT= S AP[*CPZP^<H/?TZP]LXK>?H*!LXK=?*!LXPXK>\YPY/<P\*$P]PZ*
H]> *	TZPX/<2B	;*
2B	;*
2B	;*
[MH"XXH08!K:XYH0H18 XZPZ<H*=LXPX\YPY*5H3H48 X(H(8 HX	H4K:X&H&8!K9X)	8H%>(/7KMK6> +X2B	;/5P/K4XX: XYK3XZ: HZXZLZ< +):AHY>(+.PY8A8!K2\ZPX+
/7+7J!C?"U"%:TYY $ 4LQT?F?PQK?X\K>XXK=XYXZK<X[K;X]"4P\*RK:\YPYPZLXPX< *YHZ>(*$PZK9\YPYP[*$:AH\?H/8*&P]*LH\?H*3: HYXYLYK7<(*)K6> PY+VH/8H>P.4K5\YPY.4H"H0H1XXK=XYHH3H4XZH3H48 X[H0H18 X\P\/4H1H4K3X\*BO=K2>(: HYK1>(+"HYK18!+%K9
=: 2C/0	;LI9!HP> +7LI9!HQH^=?S?!V-B?PSU0.?"?1!C %?0: HXXXLX9FLX9DK?X]HYX^HZX
H[X X%P *&: H^X^H%<(*"L^K>=H* \^:AX%*RK=\^: HYXY/<: H
X
: H^X^H]L
X!L!C;L^H%K:=H*9\^K9+AK==H*?\^K8+AK=\^L!8J8JC;X%*PK7XXK6XYK5XZLX<(+YK4>(+YLXPX\YPYPZ+M/3<(+&[)SZOZSZ<(/ZK)> +^OZ[)/)<P+1*NHZ	=>X	<;LNUV?R?.!C AP ?,OUOJ?6^V	?!C?"H3H4> *K82B	>/=L> *S: H3X3P*CH"XXK<XYH0H18 XZ* LXPX\YPYPZ*\H38!H08AX$H$=*,8!*/K;?/:K9XXHXK8XYH
H4HX	H	8 HX(H(8 K<X&H(X)PX+JH$=H:8 X\/7YZPH%> +QTY+JYZFPYP&: H)X)+BOYSYX*H&X+H	X,H(X-H)X.X%P.<H/Y: H+X+P-/6H%>(/Y: X-/5ZZDZTB 6?/SU?0!CU"LP6: H,X,L,H%,*L+K?=H*M\+8A/>K=\+/>8!L+=H*V\+/>K=\+8A/>: X8K<X6K;X7O:>(*%K9X5L5	8Z9?]Z>?ZZ>?SZ>?VZ>?RZ>?\Z>L5P5	7*%K9X
H6XY/6H8>(*;X8K5XX2X3X4	42H5XXXYXZX[LX	8\?][!?Z[!?S["?V[ ?T["?\[$/3PZP[PX+OPY+"OZ[)/)91O0>0*5*<]O$=V\QB SUV^JWZ!" >0!CJY%?6X^L5	?\S?]\U?Z\V?S\1?V\V?R\??T\6?\\$	>/=P^H[8!H3?*;P3H^> *&HZ>(K<K;	:P5*A")K9*HY>(.)XYK8	:.)H2> K7K6*H^>(*
K5*")P^	4*$")	>K3	:P5L5	?Z%?]]Q?Z]S?V]U?S]W/=]0] ]*H2> K7K6	:+C: H4=H+%X4	4+C:O]+[/Y: H+X+P-/6H%>(/Y: X-.^P, M$0^J*?6Z%^WZH38 H[X[<H"PP[*F.\6P6P7.J/?LPK>"J.PABCDEFGHIBDFHPRTVXCFIRUX!$	DHRV $(26EPU %05AAEFRX$06ABAHATGT!(5ABAIAVAHV$2AAHAVA$A2IX	6AEATAA2BA$>
%CJ0Z;S)/3PWK2[**P^SHZK1> .9O0> //K.XRZ/-	4ZZ+LJZZ>H/-J	,:PRLR[ZOZ[)SZOZ	)*:	>XZHZ	7/Z:HZC6SZ/Z	+:HZ.??D3J$=/(*./%

=SD/+;?:?&X?</-U=AB=]&0S^!ZHS>(*1O?HV>(:AHVZ;H[XRO><(J;<(*U"=>(*^LR8A>(*8J;> *^LRXVK=ZO<	;B+)?9*3PRLRYJ$9K:<P>9F8FC9J<.J;>(LR>(/8PRPR*UB$S8!XPLR<(.=HP>(+IPRPR+LR.=%TO7>(N->(/6/K	56N%^K+	4B/TU<(/Y[K	K/YT=	3/
[	L[K2>(L[22	1/
H^W,/0TA:VQ]8()0>A*N?0DB!NS]])XZK?XPHZ"X*$<XK>90XQ<XPP8H<PPQ*KXQHQ8 DPHQ\P.+ZK=9K<<X*"K;9PK><PRX.X:	:8J<TK9XPK8XN\NPP*,.	"QGK7<(*1K6<(*=K5<(+K4.0G"*1GK3<(*1K2"+&22AP\L\2I/GO1S>(/0K/H]XW;V
.: 	-9F8FC,LW\W2AHZK+<("0XZ/*K)
(/$>$B^:<?0  -?<)0

B)=WB(G?1= =??^(?UJ=FZ>"C2Z(AX[%SYKEMKGD=<2IMM2ABM66A6B6C6D6E6F6G6H6I6J6K6L6MEWCN><D><B<A<CNH<EVBG?/?4?2[?1?0?.??A-6	S4M4.EXW\DR	JDG4SY=3X%X?4Z3G	S-N	4![*A?CT3]R,LBFC SBMOBK C?<J2H+ZSI*FJFI?ZFKGOI2A.?88AX-;X
"X.%>H.A=9F8F8DJJ=*%X H-> *:H J(Z"JB"8*MJ)Z	B	&2.223T01R4!4...JLRLQD^D+HOFBMKJH KGZ?9	HB?ROQLTRHDRNT/HOH.A<X H 9DH HQH/J?<>X$X&X%/T<D> 80&W?80!+^HP
<HP
=	>&FKR
9K:XIK;XJKTX 2ILI2A\JP +0%;/8DW?&>GMGK)K.DJ0HY?I:I=^V:AY>(%;2INTA:^U2ANR^S.JJB?VGTK9N\K?^].[HWMIMLH.A9<(/>K)Z$<BZ	H%<B*0%:-8%7L69J>P*)%:
BH.A69JKZ]5-8=,>?> ? ?H>(?(/AP4CI000000000["2AL7[L8[$L:[(	(?/X%4J8X./,L]%:XF-8UAUBUCVE2ZERO P\CH-> +TH.C?9FHRXIFHLIX4LI[GLIX"H[9 H">P%4X(LI<(* [IH\9 KI>P*SH\%39H[X	8DH(X(H	9DX)H(8DX"9H	H)X)8DH(H"X(9H)H4XI8DH(9F8DKG[GH.A69J8J8HK&[I8AX
GGHIGI8-8.23T01R4!4..JH.A69J8J8HK^[]9P	><B/
ROQLTRHDRNT	LH.9J8JA9/		=X$	=X%	=X&-8L69H>XS4/4B?&0CSEO
XZ:A	?/>:A	?/=:A	?/<:A	?/;%2-8H.X/%:X0-8K:	?/9HU]5HV^*%1HP^)HP^(HP^,HP^+HXXN-8FHOKCISKCRLKK?9H>X"<P+X!!!HQH"XQ+JH AP9F8DK1]6HQ/ FN>?HQ9DXQH 8DX /!I,XLIUX!2I\LP!+.2C,=2I\!+1DDH<X\\D$&$ $$-L00!*E0&A0K?> *[RB*[JZBJA<(*[ZCS *T0Y<H*[RC*T"2KF> *[.DK>0Y*+;"20Y*!
^A0. R0*"R184*"0Y.20\A0K=<(+DK<<(+AK;> .28A[F0Z.20Z%4/G>$H.A9KO[NKN/PMRNAPHMP&N/LULOM ZZLT$L]L\L
L^K4X HY8H8TXYK9X4<BL4X2IL <B\42IH\ P4>P +)2A/ %2?>?2?=**?3;2LJEZM2C;AY> %;K?	>	=<B.RW*URW%/	<%.%/%-X[%,K;ZW-88A8A8A"0/:2IZ.N!R!Z/2AJ.&/<HR!2K.!X 2AH 8!KG>(.0H KEX4L4[	FF\M%4H [G.0MH>GMHMIMJMKML0,($%+KV[U<B/WS&T9UQB"UXS1E-HGHJ%+2K/9S(/%2HH??[(A/$V!AF+7K.	
K0[0/,%SAH\AX[CJ\1L0D%4%+JEZD<B.FP:SOE)RAPAG-BLBKH%?H%4H$?(*$H$K?=%4X$*!H%9HX%H&8HX&P$*[.NX%X&.N2A"NH%> *XH&.	H5>(*=	>: L;\8L7\9L6C=\6%*-8HXXN-8<X+1H.A<X H 9DH HSXJOKLJX3LJ[)LJX1<P+)H[9 LJ>P/<H18!9A9H9AX"H[%3H3X38DH(9F8DK)[)L32AX2K)
;	:/H.C99FHT9P+J8J8J
WGWTFS>][Z?(%-X5H59PK?>0%4H59DH59F9DH5K>XIK=XJK<X4HI\JPIP4*SH6K;\>-8N3?%4M5^3R3O:^3R3/9: J3Z3N3
:: J3Z3N3=%4]5/8EE<(/8J>?H/8/9;X%Z>-8: L7XII=XJK72I\IPJ+G2A.?X-%1H2>(K"<(	6X4HZ>(K"2I<(LH2A9!H4> ++H2> P2 HZ> PZHZH2> +N-8:(X%-8-6	S4M4.EXW\DR	VBZD)D0CIQ?256?<8EX2HN
?K>
=KK
<XZ"QO?XN-8XZ"Q-8H2>(.QHZ8!I0XH	;2I\H2A: HZXZHZK:?H%4P2*Y.QL69J9V\6-8X,X(I)X	H"8HX"H(<P*99H,8HX(P	*1H"8H.,L:>(%4/HN9 HW>P%4SKLN2A/EO9[VO8[WK7[X-8HA I8%(K6%(]B/YL6C5> S / (-8H%?H%2/(%.HW/-%-A<%(-8DBJ J1J0BEVWEVBVFWZHZ<(/?X HZ8!H1? %42ILH2A	>P *I/?H+	>%	H+I
<(/?8A< K=>(*RO<H1?H*P%4I8X+/?[&HZ<(-88!MBHO? %%HZX2I0XH2ILH2AI:	;P2*1-8%$-8K&>(+K:%(8A[&+KH48!MB=H+^>(-8H4K9X4H4HO?(+CL69J>P%$-8%%-8%-8!MB8A=-8[	%$-8K:%(S	+!-8A%;<H+5S8+0: [8+2H 	9%<+(	9S8+4/%NB XWYBVZWT.B2AA0."?OZA=[GOZ"B"?OZA=Z;OZ"BJ;9J8JKG9J8J"B*FA0[[
^
Z2ASY.Z"?KEZ3KZ[GK["^"?KEZ;K["^K[9F8FA=OG
GK[9J8J8HA=OZ"^*SZ+EKEI?[E.?KT[EH3[ZK?ZBK>Z^[YI0XH/GKY8!\3-8X(%7L9X)2IH(\)2AT9L6C=K<\6;VD6>(/\%4-8K;-HW?=]E$& ?
VVFX %$%4UB8H5>(*ZF*P.A=H 	?.H 9F8F"]H 9J8J8H"].H %.A=X4.C>H4	?.]%$%4H5>(+CF*/ *9 A=X  A=9J8JH 8J8JA0<(*(I:X+H+K=>(-".%2K	<*9L6C;< +YL7I!8!L9>(%*8AD9> K;L6\6SF/F8 D6\6;$L9\9/F	:<H%4;VD6>(+*%4-8%7.T9/ L9[52IO52A/.]FEC?/=TS AF=&C?W\%$*D	?-8"+	>X$	>X%	>X&-8%
*"	=HI8!K<X,K<XHH,8!MBHO? %%LH%(P,*[K;%(*)"+H$% H%% H&% 
:-8L7K98!L9>(%*.+L6C8>(+	7*<Z<HUT8.3ZT8L;8!L89 L<>P+LU.3	7-"L<9 MA>P-"T<.3	6K5%
/UL6C4>(/ZK3%
	6/ZL7\9L6C2\6/%^HW/*X /9+PY(>
"H BHP?S PC?U&B HV(Y ,6A%+JFZD<B-8&G$"+G^\Q$3
 "]O %^H*H$? *\H%?H+I%1.QH%?*!%28AX"X	9XXH$8!X4H9XXH	8HX	P4*(H%X%H&	X&H">(.Q%^H		?H*H%X"%1H">(+E	?]L	?H	%2.Q%.]L+GAPO>X"O=X)O<X(H)8F8DC;X%H"8F8DA=X&H"8F8FC:H%X%X!	9	8	9H!
>H&
=H%
<X$	7%]-8A,I6>(++243/G?8SVSWSX2%^H^H%ZX.&H%.CJ2AH%<(+Q?*RJ>(/?J>(+O%^H$	>H$K=?+T	<H$H%> +T%.H$H%Z	;	:H%[^H&[
%.]L%^H!*:%^H!%.H^	9H^%^H^%.H!K^9H[^K
8H[
<P+D	9H^K^<(K
> *0J?-8	8]L-8%1-8%.]L-8J?H%4%.H^	7	9H$	6-8H%<(-8?H+(8A<H8 X$%\-8/6A.<??BL*M+BG$3.J0NNS(3T?(\Q5(;Z[W[X2AKYX"H%<(.?H%2H$=H8P8HX$<XP$8<P	V;$[U;Z8JX(X)KTH%X%H%<(H&>(+O*,H(9HX(H)8HX)	VH)KX9!H&<(SUX8TH(KW9!H%<P+K< +SU+8 X"X%HX&H)9DKX[XH(8DKW[W;$[UP"*%KWX%KXX&.
24?*J\??COPY NULL:<TDA0:":	?	"0KBC>JJZI*I.K"V"O"R"T	=]L*V%2*V	<]L%^H*	;%^H		?%?	:%<	?H		:%9	?H		:%6	?H*B.	:&B".+%^H*	9H$[B%\	=H*.0H%?+%28A[G.:KG> %2/B	?&E"0	?&H%^H*	;	:&K	8&N	:&Q	<H*%^H	%.H*P$8	7H		:]L	;KBH$X$/GTW3B1R.J&;253T.C0&1%^H*	2]LH%?H*P%.]L	0H*%^H
8AZ3%.H*	4%^H		/&&	1&	/& 	/H		1&]	/&Z	/H		1&W	/&T	.H*J3>(*/	3&B&2.":BH%=(/59F<(H$8!8A<(H&> +DX$X&X%.3H$ZX$%^H*	/&)%^H	%.H*	2&)	0H	%^H*	4%^H		.&2	/&/	.H		/&,	.H*	2&5%^H	JX$%\	/H		.&8.3021R.J3T.55+AYH
	+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>(+U: L\LK+X%K6\%K+8!H%K7.*QS[6K+Z*[7K<[+ICXI>*6BQ&?8=1B?PSKNX?5K?XIH%?*I%2K><HK=\IH%>(+X	<K;XJK:H,9K9<P*4K8>X*:LJ
K7\IK6X"LJ(P"* K5\IH,=H81X,8FK4\IZ>\Z?6H,(.X K7\I(P *7K8X!K3X": H"X"P!H,8AH!?+JL">(*>: H,X,;VH,> +SK7\ILJ(P!+J.(.X!H,OZ=H+X,P!+\:H!(SZ/ZK2\I/(/&XUH K69K5B0W6B+CE?;B.?9?<EW/*B B-HVX!<HH,X,H%8D?H*N	?: H$X$*EH$= *ZKLX$++++
: *CK>=H*0;K=X"H%K<=X%:4X 	?P P!P"* H%A<X%8A*CX"<H+P"*2H%K<?*]9H!K;X!8A8DH&X&<XP%H%K<> +MI:X%X&X!P,DK:X K9XK+VH%A0X%
H%8F8F8FA9\KP +R.H%X(H&X)H!X"	?	?	8	?/
H%9HX%H&8HX&H!8HX!/+^9G)3/W/?:	1,? ?;24: 
H8 [2AX*X$X&BX%[DQ*ZP*SD	G-N%^H*%.-K%]	IH**LWH*!SLSL>H*K[DS	C: [H+KE>(Q*0H9FH9DKL*(HS8!8!KD9!=H918 [D8DKF[SD+.-N*=3]<;	G01R2JKDTX&H+K4<(+\K5> +][&H+K%9KJ[L<XSQ/Q=F	2H*> +1H+K3< K?>(+	/&X%= =U?>< +;H
> S6/6CK(V%[N&$2A&HJ.I3]3Z%[NJ&$H&X)L"X&H$9!H	X$X	H%X"H(X%H"X(2AJJ^&J	^%..*4.(1R1V	C2A;$XH(?*2	BPH)9DX)H(8DX(X!H%?*?	AP8H	.(3]3&4H"9!H%<P/ 9X%	
H!=+\9P&<H8A8HX%H&8HX&P$8H%+MX%/^1"1%5MX$<(X&X%	
H&9!X&<P8 +L%[N	<H$X$[%X"H%>(X$"H(X)"H"X&K%X%H%8D?*]X!RP.	;.8 H$X$&"*X24K=X	H)< *,X!.H)8HX)<P*69H"H&X"8DH%K%8H[%H"8HX"8HX!P	*+.X)H"<P+G9H&8HX"H)8HR+A9!X&8T/Q/D%[OR	<8!H$X$H(9!X(%H&X!K>Z+IKRZ*WH%H(>X/?K>X"+5H%8DX%H%H(<XX%:H&8DX&P"+-/%3].(?4?35(%[N	\2AH(>(*
H%>(*X;X$H	8D:H$81H	<0*^8!"!"?H	X$/%]R."?"!*X8 X H(8D:H(8HX(H)8HX)8HX"P	8P *$.!H!9DX!H&8DX&H%8DX%.48 X H%8D:H%8HX%H&8HX&8HX!P$8P +B.?;/=%[OT	\&KTZ*D4H&9!X&8TH%9!X%/]H)9!X)8TH(9!X(/&9H"H!X!8DH)H&X&8DH(H%X%///! ?(X"L"X	HL"88X(HL"X).H%<(H&<(H!>(+!;ZH%< *[H&>
?H*^+\X!.M24%[N!"H	X$H)X&H(X%R!2A.!%[N.Z!H$^!"=H%^!"=H&^!R.2A..R!.=<HZ=2LKG[E5E.=2IP"/HKH+A8!X%9H(H%<P+XX%8 H!X!;H%/[/"90H$X$& *UX$*^	?$/%4%4%1-8%4[0	>T<B/=%SUPERSEDING%CAN	TBA>G0AAL * O

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