File PASS2.SV (save files (Executable program)

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

?=2C(D(HHR(K3P*DW D3P.H68+HI(XD$$*H*01H,*H*(
1\,H,0M3VDRHCD0,H 4C"D1P+H%IDSPD L
PYDH 
4\D[DML4HH H ^HK, D+P&ZDIIDBHI$CCPID$BIHIRCLI$DDC$CLCRLCCPDIDDHDPDD+DCF"1602J3C3O3SP&,3TSA" 	I7CCFT7R6JNIN	A2IF/+NCY7MKO3EV 7NKT7IOE2 ;I2 T7ER 7ESN3A	TV7E2J*IM	P3GGO7W	A2IZ/3IWL2 GT3BWL"?*M2IOD3ANI7TCM6I&/+ECS6-N 3AWV2 	F+LCE3L;E3GT6 SPR*M2ISC/FB "M&J3TSA
 	I3C7TP*M2ISC/FF "0*M2I;SA*M2I7J3P&I3G?NR	C2/;U3W	R3TWT^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"S3HJS3Q"S3M7S3?>?=Q"S3M7S3?<?>?=?>?<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//*???=S0?>)?*	*J*	?>?=S0?>),?>):*J*	),?>S0?>*G):)0*	)0M7Q7?=S0Q7M7K3)0M7Q7HJK3S0Q70L0O0Q0T0W0Z0L0]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"?>?<???>?<M7S9??HJS9?>???<?>?>?<):??)5?>?>?<?>?<^3G+4444494=4646*X46???=M:*G):*S?>405J5L???=5W5W5Z5\5Y5Y5\5^???=*G?>?=IC(],+,/R5(",(C1DNDMDJDK+"3*DWDX3.D6+.IX*$*Y*1,*+*
*1,G,M,3VRCR,\ -C"1+T%I ST A
Y4D B
\M[MQ40 " ^ K ++&TZAIIBIRCICDIDBIIBIRCICDIDCCICCRCCCDDIDDRDDDAFBFCODRBFBFCODRCUCUCIDXDXDLE[??Q"G+C??%)A<>(A%?AA8B,B+8FORTRNTM>GA?<B0GX)]DBDF.KFB=HUEL?:R.] NOC%414P,
]+BLBY BUGDP B\S6BB-C]WFXB.HPQCZ5BQKJ,6D:F%6CMC
?M>E*<)&%+HN-?TAK?%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/MC7< K8C7K8%G/WK?%GK>%G/
2AO%S%%H-IO*%H-8.+2,1%K4*-IP +,G?B B2I>E==BBJBMHU<H%MK?XU2ILU2AXU,U9VIE*O9V8AY9%L07EI9=H8!* :AY9%L//E:AA9> IPY9%MXUHUK>>(*/I99DK=Z-:A	<-JHXAVIEYA%Z.5SA%L2S*
C;[[R>*>+X+UK[9F8FC:O/
/K[9J8J8HC:O0
0K1Z>S0S2.:[.:K0[/S0K[
0.:K3<(+-8A[3$>"$+-S$W9K[0K8[2/[	7OF$*>>12IHC*>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[[/XNEGELEGTL
EQM9?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-+%..+10XNLN<(?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
"5H+%2H!%2%]/?XT%^K>%
*-:L
X\%^: L
XTHT9K=<XXT>XK<K;%
H,%2HT9DHT%N%]/?2I%I&%2HTCI	I	X"HUK%3.5AVIE< 8A> SC/C[]K:[C+VH <P+U9K]8HX H"8HX"SC+P/K\NPNPN/]EXTERNCADCNGCMLJLEORGSTARTEDPT?3S9E2?>]5OS%M%H-IH4>(*MX4%TQ1H)%(%]P):%XPCHC<Q:H*XN""	?-I%T^RHC%NH+%2IF%2%]-IH-<(."%(H+%2%ZX$%XX-."X$%^N.R.%
..%+%L.(: HX> -I%Q(V-IY9% +$HXK>> +$HV>(+L%Q5W%MXUHUK=>(+]H)X-I98!IP&H)%(P)%]-JI9&%M2I%\%]-I%WLI9DK<[+%T/&FMULFDIVCACLIT+TMP^?Q?;/U)<X*%0*UVUYHV\NPNH)\NHY\NPNPN%]H)%(H+%2P)X$%X-I%0*9&HX>X9&H[>X/?%WDP%XI>(	>%MXVHV8AXX2ILX2AAVXXIRH*XNHNX*LN[UPNLN[1LNXYLN9TH
IR>(K=K<[H%Q%SHM%UUU%TQ/K1%(%]H*XN-IOUSU[19VK1XS9&LS?*O1<(+2I7?H+.O1XH2ILH2AA"> /U%SHJ%UH.
1%SM7P.K1[:%U/U(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-G)?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[&BI)\LP.H2^81HGHJ6NZ8HMXNHMXYH(<(*/X[PYHY8AXZLZXXPZLZXWLY9K?<P**K><X/=<(+	K<X52IL52AC;<(*+A!> /:/9:PYPYP[*KIC<(*6%(H+
2YCHNXT/8%T^1LT2I%%]H(>(.%T^/I*%2H,%2;$H(9$%N%]HNXMLM< +]9VHMXTLT%(H+%2%Q(0+"XY%S^/%UYPMPMP(+P.LZXV%Q)B%TM7H)%(%]H)\Z\YP)%Q(**^[/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%]/+0DOTMP/:CGBZ*^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%&O=B;
9*6^Z?=H2> *EK?ZF%Q)!H.K"=(*M"]5:H]K>=(*U8A"Y+:H7<(*78!X7H6XO2ILOXTLO2AK=XU%TQ1JL%
H,%2HU9THU%N%]%T^1HT2I%%]P7*]K<%2	;2J	:H2J:A%%D:/9KB9F8F8!8AXF8 

	82IM8>(/72J2A:A%%B(Y-8KV8A[
$>ND?&-8/^HXTO"S"%
H+%2%TQ1I*%2H,%2HT9DHT%N%]/";?U(
0E-?E[BZH?>)+-8LHXOHOX6LHXILH
?LH8 
>LH
=LHXGHG
<LH
;LHX1LHX3LHX2LHYDLHHD> +&HI9K:>P*0LI8AXH2IK9	82A9&HIXI* 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/..283S-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/U.2.6N;.;^1.;.4.2)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) P51.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<>(/-	>/=LITCOMMONIT$<K) >XNZ?RJ;XRJ<XVHRJ=
Q2ILQ<(*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/7> /9/8RC)&)VFS>GC1.:C) BE&$(H&(G &.I[&6LM&=C2	9T]	C[\	
[%	M\<	R
^	Z
R	IYE	
8A	$/M	$/K	4]6	*??	FBAD ARGUSER ERRORPARENS TOO DEEPFORMAT ERRORUNIT ERRORINPUT ERROROVERLAY I/O ERRORNO DEFINE FILEFPP ERROREOF ERRORDIVIDE BY 0D.F. TOO BIGFILE  OVERFLOW^BX NCLI?>4

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