File PFOCAL.SV (save files (Executable program)

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

?<2KBNH OHQ,I,B0GH]X>BDZT?L4JLF,<D/H=RW\LA(?\ABHZDL$ H?8:LM\<D2$L3LLV0>L>0?CL0XVDFDIH3$%L04H3L3X/ <B"B"BBZ* CI7PSLC*M"/*M3LOT+N3T"I60"J6/*JB/3A	R3T7H3E	T3C> 7PKE3A?T+RCS3TKAL7E6JOT3BGC*,6I"7&2.I*/2 ?C3L;O"M&J.-N5*I>I"+*M.IV-"5&I"/6-*J6I"5&2*I*/"M&J.-^5*I>
"/*M.IN-"6&I2/?P7WKE"M&J.-B5*I>I"(*M.IV-"1&I"/6)*J6I"7&36IN/3E	M3C3OO7N6JOM3BGC*,:I6-OT3BGC*M>J6 KP7IKO5ZKA48YOZMBAZ!8PH6C7T?0Z?K,TLV>V6ABMFBLBLBGC
BJBM<B?B.?A>?0A?OB??><?B0= =R=3?<?;?7?B PXEQ/M02AFBHZ!BTPOTGTLM3K,D?EHR<UBKLGQT5Q-TUCMR"S0DKMOM[P]G$GP2WVU410153,31U:Z! >H->ISXR8AYXVJVXKJU%)H0XHX2H0XW%*%	<D<%&*OB*^K%&%&H0XOXP%%K9XK%0%1+2*9PV%,ITH5> %6H0XHX2H7%;%0<H%%%&H6IN> *0%5%.)?% FI%7<()?XRHR8A*ZGYP
0H6IJ>(+*% NK$G3I$+X7H7K:?%6H7%/8DX7$)$GKIBKE$+H7X7;H7AD> 8PH7AF<0%6> K;8TX5/M^K? PPL=/I0I"=*K(&P( *E*<=R=^WU9F8F8F.K%,HR%"%O%5H5?H*3%-8HSXI%:%3%6% FF%$5%7<(*98AXXH5? *0%9%3*9%9X7*U%-%6% FH%$5%$O%VXR.>FIN?R?[E2B	G.?.0OH[NSH2B	P/H/G2B	U/Q/\KQ8A\K8 H,9: O\X
S\IOHIOX9LI\KP9+%IOH/\: O,S,XIIOX9LK\IP9+3/,W BJBOBWH=I
WUH5FHFL<:%,%-%6HSXR%%H6IN>(-!%(K>*HH6=%"%%%(K><H*S%V%	G;A7%6%,PV%-*7H7> %+%%%)H6IN> *$%8<(*98AXXH5?%9%3*;%9X7*
HS*+XV-!H5?(*9%)*4%0%(O7/H6SJB>(+O%1/<H/SS/OQXJLJ=H+ 8!H6> +TOQ8 HJX,<HSQSQ;/QAD8!X9H7ADH9>(S$/$H^> +4%%/.%*%	7>\B/.H]FHFLCSCFCICDCGCCCACTCLCECWCMCQCRCO%4&
%V& IIXZH%=HPZ?(PZ<H/7%	K?;9%%*X%%*UNAP	% LC%0H6K]< %6HX%"% NJ%VXX$G4X%	K?9?%6HX%"% NJ%	K?9<%6%PX% NJ%PX%O% FH%$O%$PX%$<8%VXX$GDXO[4XUUH%? -!HX%"%<8+A=C=T%TE+A$+%"H6K^> %6% NJ$+03:%V0/<H$+:-^H!H!HKDPFCFLJBJC=CRDF]J.A?M1Y.: XCXV%	K8A>PC*V% LCH6%".OY P^8A%Y
VX6*B% NK%X*CPV%%%	LCG;%)*[%%%,H7X**DJ-%)*+H?%)%%*DM%,%-%6H0XHX2H7%;HHXW$4YPV%%%)%	>J8%&*;H08AXHX2%*%	:J8%&+F<(H68!X9OLSLXJLJ=H+ H9> +THJOLX9L9X9,9SL;/L$+83=3Z+&32X&0A-^2B	0/,.Z:/,J;J8KBJ9B1KJB:B%B"B!BB$B B,B;BM%4B"BM%6X2%&%%%(O7*VH6ARH1X1%%%(O7*V*Q%2*
H1X.&0%VX1&/$+[OI=XXHX8!HY?(*1LX8!H1>(+EHXH8*!P	NAHYHE9!H]>P%6HYH8XYH1\XPXKO\XPX$GE
4X-!HXXILI8!KO> *,PXPX-!H6IL> /O%%+P=P=GB =DH6IM> S[H6KVX,H,?H/[H6KW?(S[/[;% DQKXX6/YISXR%VX9,9;+*J!JZJ)J&X*J+J+FHFLH,%"H-%"H.%"JA%"%%X-%4*W+Z+% LG%4*$BJC?*(I
XXIIH,<(*	8A>(+SH,IQ?H+3%2<H%6H,XTHTIQ?XTHT8!H-?H+HH-9J8JKYZ<H-> %$$$G5UIUXXHTH->(-!%VX-*-%2<H+5H-%"HX[P%HTX-%%%4+3+Z+*PDX%$IUXXX^%Y%$$*RX.%%%(O7+,H.9DH6+%2%6"A%V%	Q42G%2%6"A%V-^B B+B-B/B*C^B(C[B<B)C]B>B,B;BMB=2A]Z2I)?JY?H$)$G82XIUXX"	.WNRCH,IQ?.]H,IP? R]
]%VX-%VJ\8!H,> %6%%.	0B%-.2PV%%H6IN> *7HO8 HSX/I[8!HS>()?2ALS\UI[X9L9<(+WXZHS9!HZ>XH/HZ\9HZ+I8 HSXIH/8 HSXJH/H0X0HH8 HJXZHHH/XHLJ\IPZ+(*3$4X6%(NS/-%)/-U[V(V^U5VXUOU:VTVUV,U=WBI V:CX%4*
*R*KH6IJ< %6I]X02A][,
)?%,H0XH%5PSH5?%8%3,
%8X7*UI\XY-!I[XUI[XSHSXIH79!%:<(*6>X*7HSXU%8< *&<HR"HS8AXOXP."X?HHFK/H6<(+NH=X6HVI>(%).<X8 *>HV> +VI>(8AY*=IH+EPP+%HQARX6H6IC>(+KH6K./X%<XQ8 XPHQ9J8J8J+\? >!2ALU\0H0\UH1< \HHH8AX0]Z2I/0J+FL2BG/G/2(AP?6;AJL%"NLX9,9IS.LH7%/AR""IB%)H7""K.X6%).UAFXZIKX[**P[XZ
ZJK=*(:H[%)HZIK%)."<(H62B$*>8$3.5H?$3H>*<IH8!H6<(K*IA<(/-K+X9H9C,K.< K,>(+ZH9AR< ]2I/BIR]+TP2+/H1%;X1HK9!HEHH>P/]%6 C?A XD> %/X18 X2/]2ALR2I/4[A2ALO2I/:[G=0Z8HZA0!*U0"XNN5<(*U0$XN^5J58AAGJ3Z50Y*&0^AF<(*&ISZ2J2JB>(+^H\> %6J2X\0R0J;JA9DJ2C..DPD*7*/YPYPYPH\=
*/Z>X\J>.6Z60AN4> +A0BHN> +LJ60&XN+SJ6^4J48AAGJ3Z40A.>[V0AHN> +X; KV<HISX70BIEX/8 J3XHJ3Z5J3Z42I\HP/++X\2C/1/*; IA%)%+PR%7<(+?X7IA%)%)%+H?%))?Y*)?H2> *LHH8!HW?.!J)%)HHX92AP2*"L9ARIC> *
8 X28 HHXHL9AAX1.!UXL9AAHF> *X\9*YC\I\XXHY8!HX>(-!LX/NKMXOXP%%%)%%%)%%%)PXLX	L%%%)PX$GDX%XH?%)H8IIHX*+T"BC36()O	>(/&K(%)/&JPQ3B:2C	-/) 82B/0 	*V6%(K>S32C/32A
1O-2IX9K2X4IH&D$4,9V>X9<H*MH9<(;X&DH92B&[H9J\>(RZ.EIAZZH;X9*M?^9=6$32B.][Z.%VZ/K?	>J7>(*-"7"7J/Z,J.Z+K=	>-^GN7C<K;	>QR7GN7C<K:	>QR7.7N78J8J8HC<K9	>Q/GK8[YSZ+TSY+T/Q%0H6K7> %6% NJ$+/[/\K5XUK4XI: \IPU++	3S&/&GW"SS?([&=T?= AA 
B
V>B]K?Y>XN0A% DQ0BK>U>(*M\"9K=U<(*[?H*W\K<*Z\DK;X]K:U; HXZ!%K9U>(*2\!?K8[UK7XHK6XILI\HSU*.K5U>(*8\KK4U>(*>\PK3U>(+D\SI\XYK2UK1UK:U; HX[P%$HYY\/TRLX1% L
PXLX/UO\S\XHLH<(/\X9LH\9+ XQ>X/YPPBJBMB0
XYETI"!GED" :8?	B)?+?CA3<8EAO?=-V?:-WG+H
.+L
.+P
.1?92?Y	4BX	5 X7^W8^*39EP	8:X	:0?)H"H&Z.8DH%H!<P+DX%J.X&:J,8DZ,J8DZR-*7J,X&JX%.1BV.YC9.HJAWUDEWUDFWUDBWUDCWUDDWUJN;JO80B;.2=Z1[B&3A=Z3(LK8N1NL9]K8N,L] %K8N&HF.XK83
K7I^H=%EK7H=K.$	W!K8Y>1"0?1*720J3&7:;\LP/*CK29K8X8 17:19>(*VK51!K61!:+H1!OB8A>(+F9A3$3Y?*&K(
*K)
++G;,K7>(*5;$K6>(+JI
4JJ
3+KW1+L0&00000000P/0!*6H/IX?H+ITXTXTXTXTXTXTX0&0A% DQ0BK09<(+$?HK6IPX/K,XIK-\IP/+[K09?HIDK.K/X]/	RL3K3GI+I.DAWUE0&OXFV1PD3RV,GB B$2S$X1% L
PXLX/9KSAVFW,+S%: KOHUJZ%0+O%=HH%?H	TX[$GK6=$+[U$G86>F=V>6=&=6>KH3VCE[VV=J?3VCB&>KV3VF=[VQKNKUH$X$P[-^$G6=CN^=-^+R+VDS:LB?<Q/)/J,,CGU6+!AWET]APBP)3$GF=&=6><K9&>K63VC3&>K0&>K-&=[V/,(TT
N??[D$\?;[F,,T
N&TWSS?=\W8*W/H%?H3X[$G6]V
H%?H*Q$GF
^]6]: [2.S	ZS2.\$G6]F^V].\+B+R+N	NH%<(%6?H$)$G7.V
H%<(-^?*4$GF

.7.: X[HEX$8 O.X%X&X	8A
.$G/6]G.V
7.+K(	.K%	.K"	.K
	.K\	.KY	.KV	.N].\
??"?? !??UOCG?>!K:I?>U][A?=	&G9?<R^D?9%$O]	VVK$L$): /381I
E[LC7ZI
E[LB6:$G3RCNSRH%? *MH%?-^$)8 X[$G[F3V$+$G83RCVSRF3RSJH%?H*%$G3RH[8 X[$GCRSNH%?H*1$GCJSR3R$GCR[N3RR3VCZVK^VK"VK&VKNRP[-^$)-^CYH
-Z]BYH
-Z]AYH
-Z]?4TA8MH"?9,4-L1(?=TY+1	^+UDLY7% NJ$GO=$+8!HA8A=+:XBK>%)PB+6;/<JDCEB 
7[\H*%/ARXZHZ8!<(KV[]H*<(*!AR[[K]K[=H*X: HZ[[8 H[=:HZ=H*3KV=:KWX9OYH9[^H98!X9KUW^O^KX?H*5
^P9+QW^P[:H*>(+.K]H[= +-K[=:8!H[8!XZH[HZ>(+HZ8A?HIE^PZ+CIB%)+C8 K^[^**E?6K?61(1,	ZS]/^.8 H[X[S\++8 [\+KLL+K:	ZIB%)RLL^S\+28 [\+3H%X(H%?H$)/9X&X$X%X	[LX(H6J4<(*PII> *Q8 X(&6H6J5>(*P"W.H6J2>(.W%1.W*	H,[K"7SL> %6&6*XH6IJ?H.WH6J3? .WH6AR* <;<&=U= G.H	XH&X"H%X
[JMM[MKKXX"X![KJ.7H	9DX	H&8DX&H%8DX%KJ8D[J/M;H	HX	8DH&H"X&8DH%H!X%8DKJ[J/[;H!=H9P8HX!H"8HX"H8HXP /,/,%%2B/<K]%)H%?K\K^%)	+X[H$=H*W< K!?(*\$G	$8AH[*I$G	*8 *U
%
&K(XLH$9 [,KX$%WS,*%O&<(*8K"?H*48A\LP$K"P[8O&P[8<H		\LP$*8K(XLK	).K[%)H[=H8!X%H[?IIK^%)H%P$K
=+MK X%8 H$< ,H%	Z.T"CE?3B=B->\A$?<?6?52=/K/J.7<7,29-9IK%)/,2ALS2I/02ALX2I/5JZ!*E]HLGC*> 	FH6IL>(*B	BH6IM> *Q	F
E	COE8!X[KHX$	D	G$G4XH6KA> *&	F	B	DH	H[X[$GDXH[<(.?*1$G"=4X8A*6$G"94X8 H[X[*&DT?=Y&Y&Y(<;..W9;/LG.;]$G+(%3(%$ K&[(%WS(+R		%W		%$%$3(X	X$H%?-^P&>HP%$)-^?2/[$QX A2ALI2I/,2A\H2I/12A
:2I/;BDX3XN/>W
!$;<HXN<(.Z2J2AS>(*NIDBX IFB2H X J3B2>(*YL X R8 H XMJ29F8FAG<(*7J4Z2N2<(*5Z2KDXLIOX/LM\LP/*-.2D5;KC*;KCXM8 H XLIOX/LL\MP/*>*A
	5	8*A	:	9	;	7*AH%> +UX$X%X&X	*A%$% %$$$+=H+"8 Z28H%> %6%TE%$$%$<8+0%<8%$ 	6R2++*A	6*A9+8D;]6S/,7//[5F5E9G535M5K;H	8!X	H&8 <X9AX&H%8 <X9AX%.CH%<(H&>(+IH!<(H"<(H>(.SH 8!H$<(*;ZCJC=8![RKRK^?H*=JC?*5/SR*1*;8 H X 	SSR*8RS.SH ?+DH$?.S+FH$?JC? .SH X$H!X%H"X&HX	
S/,	)H$?(++8AXK(X "SP	+$P&<HP%X		*H&/TW-99;X$X%X&+$;H%=H8P8HX%H&8HX&H	8HX	P$////C
C?BJC=??8AH T?H+[A[Z?Z>H%
)H!	*BH"	*CH&
)H!	*CH"	*DZ=Z<H
)H%	*DH&	*EH	
)H!	*DH"	*EH	*FKAX%KX&J?X	A8.DB]KLE 3/B]P($)		8/AH!>(%6H 8!8AT?+	(A/S4AH$X$IT%H!?8 X(H%<(/&?H$)H!<(/&/T5P;]:1:.:;H8!XH"8 <X9AX"H!8 <X9AX!/+H(?H$)/;<(.Z,Z+J/Z-9J,8HZ,J+<P*P9J.8HZ+R-*HJ,8HZ-N8!J*Z,J-9N,^,R,8DJ+N,^,<P.R,V,.*&9B?4?]ZZ,J0Z-<H%W9HH	Z+8DH"H&Z.8D
%H!<P+JX%J+X	J.X&:J,8DZ,J8DZK]8D[]R-*7K]X%JX&J,X	.1	=6H%<(H	<(H&>(+3H%9D?H+0%W9 H$X$+		>6/]X$/]7/H%=H8!?H	5/6-99;!\$G2<H%?H%6H$=H8P8HZ8<XR88J7Z9Z:Z;J=<(J>>(*5$GB<Z8J8: H$X$H$8!J8> *1H%8!J9> *1H&8!J:=8!8A?-^$G28*WX$-^XM=C:K3Q;%0HN> +D0B2C/?K>KM[MFIA?M+FDX&
	H,%"%*H6X%%VX,HEX$-^$+IT%)-^%)2C/"%,2C/&K=
<HD
;/=O:>(-^%TE%$$O:?H$)-^PY3)D3I/N6<(.Z,Z+J/Z-9J,8HZ,J+<P*P9J.8HZ+R-*HJ,8HZ-N8!J*Z,J-9N,^,R,8DJ+N,^,<P.R,V,.*&9B?4?]ZZ,J0Z-<H%W9HH	Z+8DH"H&Z.8DH%H!<P+JX%J+X	J.X&:J,8DZ,J8DZK]8D[]R-*7K]X%JX&J,X	.1	=6H%<(H	<(H&>(+3H%9D?H+0%W9 H$X$+		>6/]X$/]7/H%=H8!?H	5/6-99;
\2K,CVC2$0A,8?%?0A2K,V=J6>G=./\.Z.0/G9
0*,/6<SYSA5V=$9V??/HBB B05C= BM>^^&A43	BGFC=MZ]>&BZ?UJ=F<;D/B=RWGA?:AGBZBL Y?:.M<72Y33V><>?<C0V6FIQ3%)4<3 3/L()0Z?BTC-PS/8 FOCAL, 1970?MBXBEE?MB>BJT !!"DO YOU WANT TO RETAIN ALL FEATURES OF PS/8 FOCAL, 1970 
  ";G 1.2?MCRBLT !!"RETRY OR TYPE HELP"!!;G 1.05?MC,BTS =510510;S A=1;S B=1;S C=1;S D=1;S E=1;S G=1?MDB^S W=FIN();I (FABS((W-149)*(W-141))),1.12;I ((W-217)*(W-206)*(W-195)*(W-200)*(W-141)*(W-149))1.5,1.4,1.5?MEDB(I (FABS(DU-141)),2.1;I (FABS(DU-149)),1.12
S DU=FIN();G 1.4?ME"B2I (FABS(W-149)),1.12;I (FABS(180.5-W)-4.6)1.6,1.7,1.7?MFCB<S Q(W)=1;S W=FIN();I (FABS(141-W)),4.02;I (172-W)1.5,1.6,1.5?MF\CFS DU=FIN();I ((DU-141)*(DU-149))1.7,1.12,1.7?MF=DJI (FABS(W-141)),1.12;I (FABS(W-200)),6.1;I (FABS(W-195)),9
6?MGUDTI (FABS(W-149)),1.12;I (W-206)9.9,2.3,9.9?MG!D^S M=8.14;S Q8=4.85?MG8D(T !!;I (8.14-M)2.45;T "DO YOU WANT TO "?MHJD-T "RETAIN ";D M;T " 
  ";G 7.1?MHVD/I (Q9)2.5,2.4;D Q8?MH.D2I (FABS(8.42-M)),4.9;I (FABS(M-8.26)),9.8?MH;D4I (FABS(M-8.14)),9.7?MIOD6S M=M+.04;D 9.81;S Q8=Q8-.1;G 2.4?MI\HBI (Q(176)),4.04,4.9?MI&HDI (Q(185)),4.1?MI6HES =210;S D=0;S E=0;S G=0?MI<HGG 4.4?MJFHJI (Q(184)),4.2?MJP
OS =/17;S G=0?MJZHTI (Q(183)),4.3?MJ$HYS =/13;S E=0?MJ.H^I (Q(182)),4.4?MJ8HS =/11;S D=0?MKBH(I (Q(181)),4.5?MKSH-S =/210;S A=0;S B=0;S C=0?MKYH/G 4.9?MKH2I (Q(180)),4.6?MK-H7S =/7;S A=0?MK7H<I (Q(179)),4.7?MLAIAS =/5;S B=0?MLUIFI (Q(177)),4.8;S =/6;S C=0
G 4.9?ML
IKS =/3;S C=-1?ML4IPI (Q(178)),4.9;S =/3;S C=-1;G 4.9?ML>IUS =/6;S C=0?MM"IZT !!!"11/5/70 EXPERIMENTAL VERSION; CTRL/P IS BREAK CHARACTER"!!!?MM1I
T % 6.04,"PROCEED."!!!;R?MNXLJT !!"YOU MAY COMPLETE THE INITIAL DIALOGUE BY ANSWERING 	YES	 OR 	NO	"!?MN>LTT "OR BY ANSWERING THE FIRST QUESTION WITH A CODE (OR SEVERAL CODES"!?MO
L^T "SEPARATED BY COMMAS) FOR FEATURES YOU WISH TO RETAIN."!!!?MO<L(F M=8.1,.04,8.46;D (M-.01);T "  ";D M;D (M+.02);T !?MPWL2T !!"OR YOU MAY TYPE:"!!"CODES  FOR A SUMMARY"!?MP6L<T "HELP   FOR THIS PRINTOUT"!"CTRL/U  TO DELETE LINE"!!!?MP:MFG?MQQNJS W=FIN(
;I (FABS((W-141)*(W-149))),7.6?MQ0NTS DU=FIN();I (FABS(DU-149)),7.6;I (FABS(DU-141)),7.3,7.2?MRPN^I (FABS(W-217)),7.4;I (FABS(W-206)),7.5;I (W-200)7.35,6.1?MRNT !!"TRY AGAIN"!!;S Q9=0;G 2.47?MR-N(S Q9=1;G 2.47?MR7N2S Q9=-1;G 2.47?MSAN<S Q9=0;G 2.47?MSDPI?
SSPJT !!"RETENTION CODES:"!!?MSVPL?MS\PMT "1"?MS)PNT "LOG, EXP AND ATN"?MS5PPD 9.4;T "50";D 9.5?MS;PQT "2"?MTFPRT "SIN AND COS"?MTRPTD 9.4;T "50";D 9.5?MTXPUT "3"?MT,PVT "EXTENDED PRECISION [10 DIGITS]"?MT8PXD 9.4;T "30";D 9.5?MT>PYT "4"?MUJPZT "FILE COMM
NDS"?MUWP\D 9.4;T "5500";D 9.2?MU]P]T "5"?MU(P^T "1 THROUGH 4"?MU?P T " (ALLOWS 96 VARIABLES AND 3500";D 9.2?MVEP!T "6"?MVTP"T "	:	 IN 	ASK	 COMMAND"?MVWP$?MV]P%T "7"?MV-P&T "	=	 IN 	TYPE	 COMMAND"?MV0P(?MV6P)T "8"?MWJP*T "	E	 IN POWERS-OF-TEN NOTATION"?M
]P,T " (WOULD BE REPLACED BY 	&	)"?MWP-T "9"?MXAP.T "6 THROUGH 8"!!"0  RETAINS NONE OF LISTED FEATURES"?MX[P0T !,:3;D 9.1;T "220 VARIABLES AND 5500";D 9.2?MX%RJT " (ALLOWS "?MX4RTT " CHARACTER PROGRAMS)"?MX>R^T " VARIABLES"?MYLR(T " (OMISSION ALLOWS "?MYZ
2T "% MORE VARIABLES)"?MY4R<D 8.1;F M=8.14,.04,8.46;D M-.01;T "  ";D M;T !?MY?R>T "H  	HELP	"!!?MZCSAG?MZPSFI (Q9)2.54,2.54,9.8?MZ]SPS Q8=Q8-.2;S M=M+.08?MZ,SQS M=(FITR(100.01*M))/100?MZ2SRG 2.4?MSZD 4.05;D 4.45;G 4.9?M9?L E?M?S:INITAL?M?M A?M?ML?M?(FABS(
-206)),7.5;I (W-200)7.35,6.1?!!"RETRY"!!;S Q9=0;G 2.47?MM?E 7.5;T !!"RETRY"!!;S Q9=0;G 2.47?Q]HZ%%P.J19!H.<X*J1K?>X*RK>X(;$G=
=H-X"H.8AX-;$H-X-%:P-H-8!H">(*	%*W:-$3%-*O<XPO;XQO:XRLHXZ%.P[G[H*8SH[GKGK9=*6K8I[GKHI9F8F8FKG	7.2<(/IK6=K5K4/I]):A[%H-=+YS%S%9D9D<XS%8!IJXIK%9F8DK1[%2I/QB2QLIXPLIXQLIXRLIXZ2A/		?;?U?%Z %?[BBBAB?&?4P	8	?X1XVXU]
XTK>XHX
X)%EH6$$$"$4>H*O; X(%0$I/<(-.I-> $5-,H)>(.^I+"9I*"9K8K?> *%IG0B2J$QD!,$5X)0A2II3]22A.^	>[+2AH
C=X
S:+Q;K7J0>X+-0B$2"&<B	<SKR00ASR+R+)+&H
9F8FA=O9
9H
9J8J8HA=O8
8K;[RS8++K8[9S8H

82C.9X)IG0B2J$QD!,:$5+R7/C?/%Z%>%=1C*%/?%?$%W$&!,H,
>H+
=	<; X)H3])
;KA2I
:2AH)>($52KP(KB
9K82K]20A-9I3*!L X62AK7XZ%EH6$$$"$4>H*/$$	93;;$5;S+/\0B$0B"?>H$50ASJ?[*I([+O*\O*A=[)S*O*\O*S*A=9J8JK)8J8J\+JA	<(*9K6<(*92KK5<(/4I*.8[*I-*1/<Y9?2?4FDZEZGZZ^07/
7
K=]P	8	?X1XVXU]
XTK>XHX
X)%EH6$$$"$4>H*O; X(%0$I/<(-.I-> $5-,H)>(.^I+"9I*"9K8K?> *%IG0B2J$QD!,$5X)0A2II3]22A.^	>[+2AH
C=X
S:+Q;K7J0>X+-0B$2"&<B	<SKR00ASR+R+)+&H
9F8FA=O9
9H
9J8J8HA=O8
8K;[RS8++K8[9S8H

82C.9X)IG0B2J$QD!,:$5+R7/C?/%ZB$BMCUCSCEBMCGCECTCCBMCEB CFCOCCCACLB.CTCMBMCOCCCKBMCTCYBMCEBMCSBMB CECXCICTBMCCCTCOCRCYBMCHBMAHTA<A0A;A:A3A:A8A:A5AHBBBBBBBBBBBBBBA<A4BBBBBBA;BA=A9A:A8A:A9B%>%=/B*X$5%?H,
?; X*; 
>H*>($5K=2K]<P(I;]:0A-9I8*Q%Z.2IO<X^8 O<
<O<9!M7>X$52A; H^XIH
\^2C.ZN0I6[GR0%Z:2AI5XP2COG2C"Z; KG[GPP*:J:[E.0; OGXJSGK;2L[SI5XP2A\2A\JPP+Q;VKS[Z/G%[2IW<2ALI2C/\X
J<2L/%H[> %42KI;]:I8]<I3]2/5W22K%1S6/62AKY)!+!/K?X\K>X]"OI&> .$"HWX\HX*EXWXXXYI%[\: [][^%E<H$"H6I$<(*:I>(+CO.O<XI"8A[OK^I-?*ZK^9HK\[
KO<X*69F8F8FO


S^*ZHW> S]$5XZS\$"I!*W$"%EH6I > .OX($"O.O;+JH6I
9I^<X+ZI]9PI\<PSO/O2IO=2A> +!/ 0B2J$QHI[XQ/	HQ?H//0B2J$QIJ*XQ//NKDSI5Z&NRXNH ZJC?>6[*YLLX3IZH3ZJ2INJ2A<(*Y\N.R&+HNZJNJZ(H\Z&H]Z	2J$QA$5J(\NNJC?ZJJJ9DJJ8F8F8FH XNH\\NH]\NJ	\NJ	X3.JJI6*GOCSCXPOCSCXLOCSCXMLL8!LM> /CPP+MSC/C2K	>/VK=<(+(A	<(+-SZK<=W;K:2J/ZK92J
Y
;+[
;+&. 77^LBMB A?-?3="F2IL 2AX6H6$$2I]X2AIWXZ>H$"$4<H*L$$	;!:3$56]8B8:<)97">%0" (R	?I%Z:2IM72A]VMVB\9H[!%U%T-K!ISB\9J8H[ K H32J$QCW$5K 9J8J[FH32J$QDW$5KF8![]J:YFH\[^H][
J:[Z9X8AK![X$.B$5. $2I\ 2A$&\$X+$X,%T-/>IR
=I(
<O;
://%Q2K-9
R
;
:
88P<78A8A8A2I]X2A%=-B*N$5%?	??$5%DH,Z1HIIPAP9D8F8FH+?H$52IMXK>> *&L 2A$$IO2I\ 2AH+8!9F8F8F9TZ/$.^B$5H\
=H]
<H,YFH+
;MV2I]72A(RIF< +P$%=*$&WO:X\O9X]	8IWXZ%?IF$$O;$$$%7^*AH6IN> /V$"+WTTY8!X
O
S
XKLK=H+1H
> +%HKO
X
L
X
,
S
;/
CICOCCCR6 =)=(7]7
7^?>;0%0%T-0?$5$!"H $5:AX[;AZS0B$.BHA/?K>XKHKXOHKZ/LK>(+
PKPKLKX
O>8!HKXKLK<(+ X+HW>(*3%M?<V+ XWH
K=< 8A> + ;&[9LO	<S9*;K;%CH
	<I5[9H+8!X]X\H]9F8DX]H]8DA&H\<(+\IL%C;XX\S9+IIO%C+ IK%C+VPKVR*WCSCCCRCLCDCGB CE%>MJ< *N	:(RIIH3[92IO92A/0<>B.=J9<HD=G; X(%0%M?>[9\*LRR.NZSRI%Z[%U%TNRZZH32J$QW*JJ\X+J[X,*I%?J2K
?/>%0%U%T-"72JH3$QDW$5YF(RH38!IG>(	=.7X[0B$!BH +G.>?<B$5Z7J78J8J8JTJ7T/JAH< K<=HISIK%C/TH)>($5	=K;Z*L2K	:/$DSKFOCALTM2K	9L 2AX6/.!0!0!0!0/<=& B? ^^WWWV%0%T-.?$5$!"H $5:AX[;AZS0B$.BHA/?K>XKHKXLLK>(+]PKPKLKX
O>8!HKXKLK<(+^X+HW>(*1%M?<[V+^XWH
K=< 8A> +^;&[9LL	<S9*9K;%CH
	<I5[9H+8![7[6K79F8D[7K78DA&K6<(+ZIL%C;X[6S9+GIO%C+^IK%C+TPKVR*WCSCCCRCLCDCGB CE%>MJ< *N	:(RIIH3[92IO92A/.<>B.=J9<HD=G

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