File PFCF3.SV (save files (Executable program)

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

~|U0H@H	?C h	
8	<{ h	~	LF	MI	9CI	<CI	?CG	M}k	~L	=LE	@B/*oo;i0	|G	|E|!>{H/z8	~	L ^	8C	<@[HE	 	8C	{@gHE	E	yy"Hx{" h	]P8P;
ARG \921
TAD (6
CMA 
CALL 3,SUBSC
ARG \JB
ARG \IB
ARG \A1
^E
CALL 1,IOH
^E, ARG 0
CALL 1,IOH
ARG 0
\77, NOP 
JMP ^C
^D, 
\78, NOP 
JMP ^A
^B, 
DCA \JC
^F, ISZ \JC
TAD \JC p{	<@<tr
LI	)0)
lJC&EK	L01	$K=%	L%0)	L)0	L11	6K	L;1$E!p$P
@@^_4P(q`Y/KS"U
pFtgpqz |VPq-L20 "&;q"M/g%[q)!rS&S?(CzTTDS9J$TM&M.Lk@zwH /Ku2,ifjkf	&
& !Vf
C		GV\J
&zV&
9VfJv,&Kc2b22&")mm4zg|}w7wket;4_B4;u	I 6b60d Oc=tOLrA4d0o/O3t(> >gSbTx!ZfT<(RZJ>+yL5K\334	TKEHb(Z{ZZC^^c^ZdZZC\\b(wz
nm~Fn]f\m ~]"\5b][dX-IZZK0)	@(/s,vK2 w{e;tT +	k{Ji@'t?zkF-@0Y@D	RC	OC  d !.~H/}!6!!B!~bH|{	{C	7C~ .p (rrtT"{03D	!C	 C	:A8E	
E	~>}	<|	|||S!{bH6z	zC	7C h	"	<&.E	@E	@j<*11KiP h	y	<-{ .D	yC	yC	:AXF	XG	 
	xC	B{R hD	
x	<y	<:F	MG	M j;hkAY"_3f>	~D	B}R hD	~	L|	L:F	MG	M h	{	L-} .D	{D	|D	:AXF	XG	 ^	|D	0B ^	|D	&AXF	XG	zW	zEz!>{H/yx7	xEx!>{H/w >	#C	<B}R hD	|	L#	<:} . 9$;5#0D	~D	~D	:AXF	XH	
8F	
XH	E8I	B8J	E8G	}R hD	$	<#	<l-| .D	$C	#C	:A ^	#C	<B|R hD	$	<~	L:F	MH	BCF	MK	BCH	BCF	ML	BCG	M h	#	<|- j|}w7wk	#C	&A ^	#C	<B ^	~E	&AXF	XH	B8F	XK	B8H	B8F	XL	B8G	^}>| >	~E	B{R hD

z	\z	\l-F	MG	M h	z	\-{ .D	yE	zE	lBXF	XG	 ^m ~]"\5b]`NVD	~E	B}R hD	}	\|	\l-F	MG	M h	|	\0- h	|	\|-F	MG	M{	|{{S!}bHz{y	|yyS!}bHx{ h	#	<H-} .D	|E	#C	lB}R hD	|	\|	\l-F	MH	BCF	MH	ECI	BCw+e;$c#c
J	ECG	M~ .D	$C	#C	B~R hD	
$	<#	<l- h	#	<H-~ .D	$C	}F	lBXF	XH	B8F	XK	B8H	B8F	XL	B8G	 ^	#C	C ^	#C	|B ^	#C	HB ^	}F	|BXF	XH	B:F	MK	BCH	BCF	ML	BCG	M~k}k h	|	l'-{ .D	zF	zF	BXF	XG	 ^
	yF	'B{R hD	
{	lz	l-F	MG	M h	z	l0- h	z	l=F	MG	Mx	|xxS!{bHw{vzp $X7#03;^%~%X~s!}bH|{ h	#	<T-} .D	{G	#C	B}R hD	{	|{	|-F	MH	BCF	MH	ECI	BCJ	ECG	M} .D	$C	#C	LB}R hD	$	<#	<- h	#	<T-} .D	$C	{G	BX
	
XH	B8F	ZVp$>K	BCH	BCF	ML	BCG	M h	#	<= h	#	<= h	#	<T- h	~	|=F	MH	BCF	MK	BCH	BCF	ML	BCG	M}k|k h	{	|--z .D	zG	zG	LBXF	XG	 ^z*nokg	~H	0B ^	~H	CXF	XG	 ^	~H	0BXF	XH	% >
	~H	@ ^	}H	-BXF	
XH	B8I	%8J	B8G	~R hD	~	|	 h	{	'- h	~	F	MH	BCF	MK	BCN.~rspG	M~ .D	~H	}H	@ ^	|H	B ^	~H	@XF	XH	B8F	XK	B8G	~R hD	~	{	 h	~	- h	~	F	MH	BCF	MK	BCG	M h
	
|	0-~ .D	~H	|H	@XF	Z@H	BCF	MI	BCH	(C h	~	 h	}	'-F	MH	BCI	(CJ	BCG	M| .D	~I	{I	@ ^	{I	B ^	~I	@XF	XH	B8F	XK	B8G	|R hD	~	}	 h	~	- jsp	~I	@XF	XH	B8F	XK	B8G	 ^	}I	
B|R hD	
|	}	F	MH	BCF	MI	BCH	BC| .D	~I	}I	@XF	XI	B8H	+ >	}I	@ ^	{I	BXF	XH	B8I	+:@J	BCG	M~ .D	}J	|J	@ ^	}J	B ^	}J	@XF	XH	B8F	XK	B8G	 ^	|J	0B~R hD	~	,|	,F	MH	BCF	MI	BCH	BC
 .D	{J	|J	
@XF	XI	B8H	B~2  hD	~	,}	,F	MI	BCH	.C h	}	, h	}	,-F	MH	BCI	.CJ	BCG	M	}J	SJ h	}	,L
E	@E	@`/*oo;og;*0j=l	qn)`	}J	K h	
~	,p
E	@E	@|:	0'*&1=(lqn)^	
~	<  >	}K	@8E	E	)
'*&2=(lqn)^	
~	<@ >	|K	@98E	E	I
'*&3=(lqn)^	
~	<T8E	i
/o+og;D1	8T`_S!q {p?go+@(	
~	<8E	18E	{,#K	i,!	l~(?
}+	|K	KE	@-/*og;N TDR	88N2`N% 'ik	
|	<J8E	28E		|	<J8E	58E	N
p,4@:	{G	{E{!>zH/y8I	
58L	28J	L8H	 .	8C	<@^!{cxzL	$HH2<81>O	HCK	BI	2CG	M h	~	L h	8	<<F	MH	BCF	MK	BCH	9C h	}	L h	8	<<F	MP	~LH	BCF	MK	BCH	<C h	|	L h	8	<<F	MP	}LH	BC,"@F	MK	BCH	?
 h	
8	<{ h	~	LF	MI	9CI	<CI	?CG	M}k	~L	=LE	@B/*oo;i0	|G	|E|!>{H/z8	~	L ^	8C	<@[HE	 	8C	{@gHE	E	yy"Hx{" h	]P8P;' &g {1n,X]Y=l1n)]8Q	I8	}	\D(=E	@E	@P	*DHZz	zM	D h	"	L>R=E	@E	@;j	zM	
D h	
~	\Dj=E	@E	@ "@kDLA
CALL 1,IFAD
ARG [3
CALL 1,FMP
ARG ]A
CALL 1,STO
ARG ]A
CALL 1,IFAD
ARG [1
CALL 1,FSB
ARG ]A
CALL 1,ISTO
ARG [0
\235, NOP 
JMP ^T
^U, 
\230, NOP 
JMP ^R
^S, 
CMA 
CALL 2,S p{<@<tr
LI	)0)
lJC&EKL01$K=%L%0)	L)0L116KL;1$E
LI	)0)
lJC&EK
(q`Y/KS"U
pFtgpqz |VPq-L20 "&;q"M/g%[q)!r	LLLLLLLLLLLLLLLLL@U=+u2H6:);;^4[[o[n)mL%K<Z[r)LaNo'p?)-7676_7
B*)j).c77cl&	C_g	L	)&/767-6-(6B*-d-_77d)b720-7)l-&IK8-7'7B7g)&JK87y2*7d776*@ 
p cN((bG*&(C[*c(]z7`K
<H%abE

H
NI|z&l%+fr[2(
|N)mBRzb nO`bPwjEOR)@Cz NN&O&PH/&.NNC|DP.PfNU:NP~! )bE;T;JQ0C3$Wsf-JC;*SP*.f| MM7.|`SS7/;&SUJSM&SBS)tC _T&2S&/;&W>>

I)e3&Wenu:m

)QFs
l
@
 vOy3n	|PPsR|ST2( n((/("); (b.)Q	@UQ(U)8VW'ZY'hX'K Fn[&&!&'&.&3&8&)2\	&	
&]&F&	C
GDJ;K	80
hOhc`afOedL^	fGfgD_,e%0YzAJQ@*Y$sQ"66)nK8rc(gz6{b&t,('H/)"<b~*rC(2<+bi/' J,&H"z)=&}~'*C(K(=&+*$C	,|{0(,{z(&y)&x*&w+&vu'tBtr}	|, 2sss!rgCKEL(?{SLM/b

n
]h](S0>(]=2HHr<v(]0S(S(S((/g;2se]o?CU #2qVq)
l
&
L&Kh,@/
@O	&
0h#G$%'"+AHPz,END LOCK 2,CHAINYNOMIAL FUNCTION CURVE FITTINGi[6m9e["w]]idM
,lr@Y

 	/s/>3	DD	HNw0+B`Y@C*vR@4
7N+
C@%*A`3+O`M3J6I@!
fL@JfL@JfM@ JfM+fI@]9+aM@6\
7@*fA}*FN]+N@2m+aDo
f
%)vFZ,+P`G@WS&
GN@ JFA@ 
fO!
FO#
G$
'@$
R FS!*F4zJF4+fC5`9+Pc
vS4*vEA\+SE@N

d@Ld+dR@1e+E/8Jd>JdN
d@

d

d	Jd>Jd
NKdO+KdAvM@@@vN@@(vNCvP@@HJvT@@ JfTCPfZ@@ vZCvP@@H
wQ*&V
TO!N!(/X~b2b}3&S2E- P5c5L#0
+4,b57j2f)
f4$&#@# nJ>
n!"b|G#]#V3f{Urz xO33$HVbn?d
.

ny
W0%?2A1U=i~+Q uRfuTuWBuX-uY#u`u}G| }c{z(yy yxy)w(zvu)$t)A$ kbklsA7A|I!AgVkbHzsi6Aj6 yA^d.AA&kJrisjr!f ls(?\A$AgA NA ~k-j Abeles7 |e uF7@'B3uW'Yxxo)*W~}7} ~|b'{"zhd~yz)H?!hT*xRzxzi~}@? lw!>}S(}@?O
.vuz}hHz f} .~>zxz)OD,~<Z}C!o}b`vy J	.xz)1 tC@s{ozrZJtc(S{yz)S7i671K7@17 eO.pEe0-p{Pwx% >NKf Lf l~~NO7})| R2v`vUvSv{6vMhK
oXHlMRIlEKJLKKj MfL<J}/K .{	z(?H,~yR	zGM]Jx0 ~E\K&Y(KoKTU]*{G~wHIq}I<
 Z*8Oeu~(?}"
8)| {H/zy"xC0(wy0~C -z2b *z8$
2lv2u2}t 8K2 /4Z.xCsr(3zq@.z/94*-sp?JMx! P@`W P2X	~8F
~OP	l}(?M@/|"O}G	l}{2@zKoEPJQHlzR	}GyCx(/P!.}@/ wiIlEQ	}>HIz}H>}vsvgu>u}st}s}'5	,}r0}|0	}C{H/%Qd>w PP&R $ !.~H/}!6!!B!~bH|{{G7H|pZz)utK#h)$
("   .)bn
~6Cl4X7hFn(hn!JDD"@~b>z*N*C*(O?D"(>z*3JDl**6D*+!Dfj	}6|6{z0b{jxj	}2}~|2|~{2{{sH
nzyxDHE+	
}D>}|s|g{>{|j >0p
F}l(?~9h_w&xz"{oo-P}E70(/l0(|y{ ?##Kz}!Yf#>
O9z

n
y`xY2,*wZOZIznnsv'Y>J, ~W&}Y"HbnO0Ya(J
oYT],Z>uC Yfmt"xYkz) .**e`8w?p2u*)} .G =f l~vEz}|`
U
SWX
"={K~E!7h~ziy<&x=&~7x~@5z!l~XT
*VjPG b=d /5}"wG} .=v"uCH$zts)O bFbblWB7F@LBGG@ h#w0Se|#xO*8ONv5N+F*0bXn)bn4 n4bG	~C(WzU"b(;z!b@;zbHf.bf/JC .bAj@"@HzfiH/@/Rf.Xl
ye"onh rm	
~nx	|Gn	{ ~mfVbkn?n;r&s&hmf E
hn8b tbcc	l8Ef	~C}ck)).
|`Xn)){ 0Df.bf*0@b&b&b&5N;i0zH/NC)GJE(/X$X$X$EGjh/q&fb`cz* X"DnHD{"	G~'}'F>fj())**$7xp&cF6&&cF cb7#j&c7F c	l68	G~68	~G}68	}GVN4&k6{	 	C|	~Cb{@/kz"yiKJ./!f	G~}w ([c\
dhF	
[<Vn\=&>(S:h.S(FHBN{}t 5N+:F;+h;'&	c	F 	c	F"b"bbbf~&f.bfy(J 		P;rAn<<4 n<<4ir"&!.}"f|A&X`H/\)f.bf{AV"bbi 
S9Kh	lzpz*
cpefnl >A~0~&J0n4"cF%&&&c' @H1~fn~bl}|y 6:&7c7BF 7c7Fc n66,{7rzy{Hf.bfl}N{V
1	xC wr	xG hC^hdh_6S\KhdjF	FE*bn4c)F)c )bDnbDf)r$+	IP@/$!f)b3n**4:*c*Fc(&{@Bz!NDd@BzHf
!.b f&b$czPHo@f.bDoR"S..f/! hnnDBHrH~wJ k;t&cF4nH?! hD S'Lh h	G~}w (
00bH ~1d~3&2>&c|(H#[c* n/c_c)c+c,2bcc-b3f/_J n* ?s){2.n+-'-0BH.rD.b,-'V2bqn3<BG*4075@OR.n
bDB(|hT&]*
]-1]L]=V]VV]VV]VV]J, hZ.C$=B"&L5
 DB |
	LC&+J^}g~@ ZJ(/VJ$]F"+,X,:Z9eZJ!.KJbKH.G	,EH+-S-HIbEIKJb!HnG&	KBzzno7 JbJej(?V,IV  C(VzBV
R Q)&6ML
Hw 1~[<$6}"An8zDb6|R( ~<
j	rFB{ /Mz /Kf.M
 !,O&,MkM

SMUfBtLvx]zLojl:np;rD@	|&!#%')N.~rsvvN]
PoxRC `0&
cd0cdaf>atHf666b&bC

n
PhbP8b(J
.
Jhb&.fJ(b8J~&}f}a(]z 
PJ|(2z{H/zy"P0
0!c (bbcoz

n
r`gK?
BxI+ p@`?M|&&HN f&c!d6N@>H1~b(r zz /2"	~GoB" zzJNHN@/j(/yH.oQ"(^z]Nb(yz(/c"]NBjKNP(HhIhKhHhIfB"  OR!W7(T(?'LXLV SpY*bWb7U(zLx0'&(&[&\(0Z"
b;`F6C;dEE70;c;LE{ 7ES'L1<=ajwao[2\bLhTsRSbhB
r|~tGugzCVDyo|:}ozo	pHIFAD
ARG [1
CALL 1,FIPOW
ARG (3
CALL 1,STO
ARG ]A
CALL 1,IFAD
ARG [0
CALL 1,FMP
ARG ]A
CALL 1,STO
ARG \G3
CMA 
CALL 2,SUBSC
ARG \I
ARG \YY
[0
CMA 
CALL 2,SUBSC
ARG (1
ARG \

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