File PASS2.SV (save files (Executable program)

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

?=2C((HHR(KHD,KH"(3DPWHX83HD,6D. IH*($LYD*H,(D+<*H*01G4,D,X3LRHR0\ H-HCH$1T$$L 8RHTDA$
H4DDB0
M4[Q4H0D"8 H KH+X+TYA$I$BRLICDPIHIIDBHI$CCPIDLCILCRCLCD$DPDRDPD^NE4Y	HJC.I\M5??HJ^G^/HEQ"O/^5O/Q"K7^3K7^L]4Y	Q3I\???=M7^???<M7^C^/I5???=HG?>M7?????=HG?>(QM7???=Y	^NE4^R](Y	)S)S)V)\)SHJHBQ3HJHB):Q3HJHB76^/^ ??Q"
;^1
;76Q"^]^1^]???=?>???<?>?>Q"S1HJS1Q"S1M7S1?>?=Q"S1M7S1?<?>?=?>?<Q"O	^3O	?;Q"Q)^3Q)Q"Q&^3Q&Q"Y.^3Y.Q"Q,^3Q,Q"Y1^3Y1+I+L+N+R+U+X+I+[+N+!+$+%+,+4+5+:+?,A,F,J,NM:HG?????=HG?>*S*G*X)?*X*J*X?>?=HG?>*S),*X),?>):*J*XM:M7Q7???=?>HGQ7),?>HG?>*S?>):*G*X*G):)0*XM:?>HG
?)0HG??M7Q7)0HGQ7+G,*,,+Q,/,2+G,5,,+ ,:,;+*--A+9-E-G,D-J-P???=HM?>)?*]*J*]?>?=HM?>),?>):*J*]),?>HM?>*G):)0*])0M:HG??M7Q7)0M:HGQ7-.-1-3-6-9-<-.-?.A.D.G.H.M.S.T.X.].
..".	S+?????=S+?>*G*")?*"*J*"?>?=S+?>),*"),?>):*J*"M7Q7),S+Q7),?>S+?>?>):*G*"*G):)0*")0?>S+??M7Q7)0S+Q7A/C/EA/H/KA/N/PA/S/TA/Y/ZA/^/ A//*???=S.?>)?*	*J*	?>?=S.?>),?>):*J*	),?>S.?>*G):)0*	)0M7Q7?=S.Q7M7K3)0M7Q7HJK3S.Q70L0O0Q0T0W0Z0L0]0Q0 00$0)0+0,0/0.04080
0:0L0O0QHM?????=HM?>*G*M)?*M*J*M?>0K),*M),?>):*J*M+%),,<)0?>):*G*M)0*M)0+?-K1R1V1X1R1[1X1^1 1!1$11&HM???;???=HM?>?>1R+%),,<)0+?-K-.-1-3+I+L+N0L0O0Q3"3%3)4E3"3$3	3+4G3$3"3"3/4J3"3$3$314L3$3434*O4N343636)94P364W4W4[4"4W4Y4Y4^4$4Y38383=4%3"3:3:4A4	3$???<???<
Q*J):??)5(Q*J):??)5???<?>???<^3G+*J??35??)535?>?<??3"?>?<???>?<M7S7??HJS7?>???<?>?>?<):??)5?>?>?<?>?<^3G+4444494=4646*X46???=M:*G):*S?>405J5L???=5W5W5Z5\5W5Y5Y5\5^5Y???=*G?>?=IC(],+,/R3(",(C1DNDMDJDK+"3*DWDX3.D6+.IX*$*Y*1,*+*
*1,G,M,3VRCR,\ -C"1)T$I R>T A
Y4D B
\M[MQ40 " ^ K ++&TYAIIBIRCICDIDBIIBIRCICDIDCCICCRCCCDDIDDRDDDAFBFCODRBFBFCODRCUCUCIDXDXDLE[??Q"G+H$ZAA?<(A%?AA8B,B+8FORTRNTM>GA?<B0GXHDBDF.KFB=HUEL?:R,] NOC%414P,
]+BLBY BUGDP B\S4BB-C]WFXB.HPQBZ5BQJJ,6D:F%6CMC
?M>E[3*<)&?BX[K?%2K>%2K=0\K<>(0Y./;8A[WK:Z	JLZ\K9*$[WJ$Z	JUZ\*	[W2LJ$Z	OWSWSW2A%2SWOW2A<(.\ZLJL8J8J8JK8C7K8%2JLC7<(.\K8C7K8*%Z\IEZJ\9F8DZ\J\8DC6IF%2R+A.=ZUJU8J8J8JWJUW/M4AC7< K8C7K8%G/WK?%GK>%G/
2AO%S%%H-IO*%H-8.+2,1%K4*-IX
: G?B B2I>E==BBJBMHU<H%MK?XU2ILU2AXU,U9VIE*O9V8AY9%L07EI9=H8!* :AY9%L//E:AA9> IPY9%MXUHUK>>(*/I99DK=Z-:A	<-JHXAVIEYA%Z.5R?%L2S*
C;[[R>*>+X+UK[9F8FC:O/
/K[9J8J8HC:O0
0K1Z>S0S2.:[.:K0[/S0K[
0.:K3<(+-8A[3$>"$+-S$W9K[0K8[2/[	7OF$*>>1%!-(C*>B<C?*6G+?X5 RU*PRW<H/?$>B:*SRIK>ZUJHZVNVRV.	=IE??2I8AX	L	P	BG>(*L	X	L	.XH <(*+IF%2H"%N.%%OD/<HV>(IPHXN.Z>2IN><(/<Z>%Q\NPNPNR...9&HNXNHNXMLMXVLMXXLMXWHXIR?/DPY	;SD/D0&0!+Z:0Y/X0^C:K9<(-8K8> /X[Y[Z[[/XNEGELEGT
TEQB?4?=A?J-K0C*<"+2VAL.+4FADDFLDAFSUBJPZU9$*WK?HNZ2N2> .UH\^2R2N2"".UZ2J2IE<(*-8A> *0%Q)9"2"9.""2."%SM7%U\"9.2H\9!H]>X+AH\X]P\.9"U%MXTHT\NPT2ILT2AAV\N\NHN9!K>>X-IH*XN%WPD%M\N%M+MSTARTF%K5M%ZK=[-%MXUHU9K<>P-J%THU2I%\%]S-S-+%..+10IZXKI^?H^+9??;HNIRXMHMXNLM
VLMXXLMXWLMXYLMX[LMXZHXIR?.H[IR?HR"-HYK?> .HV> *&H\XVHX	>HZXY%Q(+K=XY.HVK?> .-HY> *9H\XYH[	>HWXV%Q(&K<XV.-"+0HX9FHXH[9DK;["2IO"<(+-XXS"O"2AO["2IO">(+0SHY> S"HV>(S"O"["%Q\NO<(HX\N\NO< YA/	:%WMT	:%WOTDPT+6FIXQ\6>12H"?O2AHL[ENRXL[D2ILL2A<(*4=H*(ZQ%S2ILL2A<(*
=H*
XT%^HT%
%]*H8A> *%%UV*H%UY*HIP=H*.K?Z-<BXTHL[DHTXL*HKD< *FKEXL.	>V*H	>Y*H%[*HQ9*H+B*=*:+%Z*HSETX0,1&%Q(%M8!XU^PU+W-I%Z^-I%T^/%M2I%\%]/^% +39&HX?+3HV>(/&%Q5W/&%WGVJACFSTAFNEG5B+FNX
RL
9K?<P/>K=<X*<<(+UK<<X/;K:<(+TK9XT2ILTA!2A> +
%^2ILTC8<(*&A">(+Z*0H18!HT>(*9: HT%%].PTLTXT2AI$%
HT%N+RK7%
+RK6X!P
L
X
2IH
8AXULUA!>(/52A"H
2I%H+%2H!%2%].K4K3XT"HT*:: HT%\K2*:"2I*+K1%2%^/"CEQBASE,1+UEB%H^CPB8HB(37NPXH1?9P]?VLUXTHTPUA%>(*ILUXU9VLUXULUXU2A%^H
"4H+%2H!%2%]/?XT%^K>%
*,:L
X\%^: L
XT;$HT<PXT>PK=K<%
H,%2HT9DHT%N%]/?2I%I&%2HTBI	I	X"HUJ%3.4AVIE< 8A> SB/B[\K;[B+UH <P+T9K\8HX H"8HX"SB+O/J2A\NPNPN/\EXTERNCADCNGCMLJLEORGSTARTEDPTG8?3S7E4]5OS%M%H-IH4>(*MX4%TQ1H)%(%]P):%XPCHC<Q:H*XN""	?-I%T^RHC%NH+%2IF%2%]-IH-<(."%:%ZX$%XX-."X$%^N,R,%
.,%+%L.(: HX> -I%Q(V-IY9% +"HXK>> +"HV>(+J%Q5W%MXUHUK=>(+[H)X-I98!IP$H)%(P)%]-JI9$%M2I%\%]-I%WLI9DK<[)%T/$FMULFDIVCACLIT+TMP4%$Z^?Q?;/S%+HNX*%0*"TVTYHV\NPNH)\NHY\NPNPN%]H)%:P)X$%X-I%0*"9&HX>X9&H[>X/?%WDP%XI>(	>%MXVHV8AXX2ILX2AAVXXIRH*XNHNX*LN[TPNLN[0LNXYL
9THXIR>(K=K<[G%Q%SHM%UUT%TQ/K0%(%]H*XN-IOTST[09VK0XS9&LS?*"O0<(+1I7?H+-O0XH2ILH2AA"> /T%SHJ%UH.
0%SM7P.K0[9%U/T?9(3GR"-E%M8 X(H(9DH(HNXMHMXLP(8LMXWLMXXHW\MHW8AXT2I9ZDT>(/?HW%)XVLVH(2A> />PVPVPVXK=
<X&2AW<<H/;PH9F9FK:XKLK=H*8> H&> *=HX&*)HK[5LKXU2ILUH(> *)H([4HVXJPUPUPUS4<H+WPULU8!LJ> *)+MH(2A[49$HN+
9&K6[6O6K9>P*)O68!LK> *)S4+]HK8\L9VHLXN: 
5-I-H)?O5?XX<?8X:X=H&9F9FK?[
: 

S
9&HV

H(8 HVXV%OK><HK=Z(9&HNXNHNXMLMXY9$LM?*:LMXZHYS


HY>(*+%S%UYP(+HH&> +UK<\LPLH\\L	;%Q(	:-I%WSSIB? /9LT2AC8<(*:A!X?/7%Z%SS+2ILV2AXY: HVXV%UY*R%T^NH&IF%2%]H&K6\L-IK5%2/ FCLASTARTDTMPXCSBCDV[IBI)\LP.H2^81HGHJ6NZ6HMXNHMXYH(<(*/X[PYHY8AXZLZXXPZLZXWLY9K?<P**K><X/=<(+K<X52IL52AC;<(*+A!> /:/9:PYPYP[*KIC<(*4%:YCH
XT/8%T^1LT2I%%]H(>(.%T^/I*%2H,%2;$H(9$%N%]HNXMLM< +Y9VHMXTLT%:%Q(0+^XY%S^/%UYPMPMP(+N.LZXV%Q)B%TM7H)%(%]H)\Z\YP)%Q(**%(H+%2/3//]L\!HP2\>?9?V%O%+%Z\LH?>(*W%SHJ%UW%Q(]%TM7H)P)YCIC%(%]%Q(PW2ILW2A%,YA%-<H-I%THJLY2I%%]%Q(]2I9ZD52A>(/?LY%)I	X5L5[W2A%THGI$%
KW%N%]/?K>X!%T^PH!%2%]HW%)2AI	XV	=/?LY2I\OH.\O2AH.\YP.P7/<XTK;%2K:%2HT%N/WX$%^O S %
%^/ -1,2IA>(/+YA%SQ3%]/+0DOTMPPCCGBZ*^8B8[	BASEBASE+3.+3,0JXNALNATXXTALDXREWENDFBAKEXITRTNJNEJGEJLEJGTJLTJEQJAJSRJSATRAP3%SS+HX%,IPK?XT%UT%Q([%THGPW2ILWA!>(+P8 HW%+W2AI$%
2ILV2A%N%].8%Q)+-I%M8 XT%T^/I*%2H,%29$HT8 ++%^%M%N%]PT+)-I:A2J%%D+^8/0=.PAUSE8K?K?K>ZI%K5M%Z;V	=-IHNXWH4> *WP4%^H)%(K<%
%]: XXI4XY8 X[-I%M8!X[-I%M8!XT%M\YPYPT*%-II4XTPX+HW8!HN>(+7PW%TQ1LWXUHUPW2I%8 XX2IPULU%,9&K?XV9ZDU2A>(+X:ALW> +Y8 HU%)8AXULU8!XX2A\WH,%2HV8!X"LW%/%3%]PWHVX(%^+)K;%2LTPT%NP(+	%]HY9!HT>P*-P[*+*Y%WDL? PAB;
9*6^Z?=H2> *EK?ZF%Q)!H.K=(*M]5:H]K>=(*U8AY+:H7<(*78!X7H6XO2ILOXTLO2AK=XU%TQ1JL%
H,%2HU9THU%N%]%T^1HT2I%%]P7*]K<%2	;2J	:H2J:A%%D:/9KB9F8F/8XTIEHEXH2I\HHT\HHHXEHC\H2AHT%5%5IGY2HC%NK7Y2%6%Q(Q/HHXTOS%
H+%2%TQ1I*%2H,%2HT9DHT%N%]/IUD:)]E-?E[BZH?>)+-8LHXOHOX6LHXILH
?LH8 
>LH
=LHXGHG
<LH
;LHX1LHX3LHX2LHYDLHHD> +&;0HIXIHIK:>P*0LI8AXH2IK9	82A9&*!K72IXPLP<(+C8AXTLT?H*?HTXHK6	8K5\TLP*22A	44	9VH2>(+Q	48	4)Y	48./3O2
1K02I
/2A
./-LSA!>(/Y /,LP\QHR\P/ K+%5%6-8/&VE<L-A1[6D"7..M*<AHUS24\DNYE3E$=-FWFI	?^/7M	>7GQ1I6%T7"H,%22IH1%	=H,%2P1%]	>7D7\7G	?7
^	?^/7)	>^Q17+H3<(+WXH2IL38!X(XUY>(*.PUP(**2IL39!X(H3XHHUIR<(+IXU>X+7Y> +CPU<H+GP(*=	</;	<+S	<K9[0Y> +S2ILTC:\TP(+J2A/;	</;2AOY[$SY2ILH8AXT9ZDT/YSY: HT%H+%22ILT2A%,8J\[5	?Q1/YI;-<9V?/,64L6.6*	?:3K>	=K<%
H+%2	;0A!?=	;.A"?=	;/A$?:	;1A?:	?8M	:K9XP2ILP<(+AXPHPXHJJ\HH^\H9&Z2ILH2A<(*<X
H
C8> *7H
I"*=H
	7R***(K6	7R*<*]2A	?4	?;-%^K5%
%]2IO4
3O22A<(+	XS%S;7%]2IHSXHLH<(+"8!XTLH	=2IPT+]LS<(+	XS+V2A	?<[	?9G	1Q17;/0.6*RAD575  1.?-<?:<;4:C;&<H2> *N	?7M:^	>7
^	>7\7G/=	?^ :^H3<(+NXH2IL38!X(XU2AH(K<?+N	>HJ/4	>M7^2ILH8AXTPULTA!2A> +J%T^RHU%NK;%
%]%Q(]	>7/7%	>M7^C)%THJ8 HT2I%%]	>72^CP(*&%Q(H2?H+Z2IL1AVK:[YOY[Y%Q	>^/7I	?7MY	%^K9%N%]	>M77O/82ILT2A%,K7KM[2%Q/)ARGS?=0BH)N79F1P6*6.%^I%%N%]	?7\7G	?7
^H3<(/>X
	?^R7-	?M7^	?M7/42IL38!X(2A	?7/O*XS2IP
L
8AXT9ZDT>(/=8 HT%)8AXULUPUPU>(*?LUXU2A%THMI$%
HU%N%]2I\
2A%TM72I8 HT%%]P(<H/>HS>(*[%Q(]*[2IH2?(+WL1C<\1K;G:2A>(
92IO:2AC8> W72IO+2A
,S+S,S-+"/6>A:?<P^X
%^H
%N%]/.=*RMBRW>$R7?22N6*LTA!> /?2A	>M7^C	=	>7/^CPS/<%Q(H3<(/;XH2IL38![)2ILH<(+[[	K	%)[(O(8!X(S(S(S(O(2A[*K:[1H(8!K([(*6K9[1%SHG%U38P(+
S	2IO	2A%,IPK7.	>^L]4%TM7I$%
: K*%N%]	>M:	>Y	%T968 K	2I%%]	>I\S)*X2A/;: K([(2IO(2A.*0.+14[5%S%U35/..083S+HJ1P0=/)6*0>LSC?<(.C>> .	=HP	</;9VH18!N[IEXT*XK:%2K:%2PT*T.LCW%5%5LH%5LH%5LH%5%6.\LSA%>(.	HSXHLHXH:ALH[,LH90LH[.O,?X.	LSC9\SPSLSXX:AHXXHHP[-O,I%
,S,LX\SO,\XHX
,\H\H2A	85U/7LSA%>(/UPS:ALSXS:ALS8 K,> /UK-\SPSLSK.8A\S/UKE3N2;3T;R/EB;"M)D<=?B <K:C) "P2P2A"*Q17T"*7Y"*^/7D"*7Y".7I7>ID>(*\".Q7Q13+"*93H2<(.?H*%".HBQ17+"./4Q17).J*Z.*4N.R.%
H+%2%^N.R.%
N.>(*>%^N.%
R.%]..SECTRETXRGOBAKSTGOBAK,0BASE+30FNOPSETXSETBTEXTBASE,1.+3.+60,1FLDA%FSTA%LBL=.,1LBL0;0LSBM> .HRKA9J.>PTSTS.A9ZDS>(.MLSXTHP%)K?XSLPZ.HR\PLSXUPS2A	>%T^/HP	=%]2IH^\SP^P^J.\P.MFLSCG>(..	<H18!HP> *=H2>(/;K:K)[A2A%T<1HP2I%%]/;HLSA%>(/G	<LSXXPSLSXH2A%TQ12ILH
IHI%H,%22ILI)I&%22IHX)%]2IHP	9/;Q"%,I	I	X"LH2A%/%3/)DPCHKFADDM:C%
<K) P41.BBASEZ<2LJSZQJQZYJ<%H+%2%TQ1R<N<2A%,I	I	X"X 9ZF<>(*+N<R<A%>(*%N<Z<N<8AZ<N<2A%/2AI*%2H,%2%3%].CLSC?> .3	>HP"C/=N<XPR<N<XSR<N<R<[-2ILP<(+$XPHPXHHS\HHHXIK-XT2A%^2ILH2A%N%]PT+S2IH^\IK-8!H^X^+G2A.<BP;+TMPACLSC<>(/-	>/=LITCOMMON$<K) >XNZ?RJ;XRJ<XVHRJ=XQ
ILQ<(*VXP8AHPXS&?LQ*JPRPV*H2A.LSJ>> .[2A%T;72I	?HP%%]PS2ILS<(*LXSHSXHLH<(*)8!XULH	>2IPU*5*)CA?&=R>7H3<(.?XH2IL38!X(2ILH8AXTLTXU9ZDT>(+	PT9VLTXTLTX"PTH^8A\T2A	=HU%,K<K<%/H 	=H"	=P(+H.?	;G(/:O9HD> /8/7RC)&)VFS>GC1.:C) 

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