File PCKOML.BA (BASIC source file)

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

65J +ECM*-6-2 OP* B-3UKE7EOR7E+T+ECR*-6-2 ?L3ET7EB H7E*JB63R7E* B 6 Z 7EOR3I;O2 	M3T. 7OSN7ESX2 ?V/MJ .7V...B8.MFJ60J +ECM.=6=2 OS7HWL7EOS7E
L7OKE7TKE. 6="=*M*2B07DSA+AJ 7AOU*"J,3B
E3I;N*"J,7BOI*"J,3B	E*"J,3D;A+N2"2";E+DKE2,Z"3UE+RKE2,Z"3UE+R2"6"WF+EKR.MNJ20R 3AGT2 Z"3A3L+S2"2"3G3EOI+H2"2"GM3CWH*"J,3MOA+H2"2"?S7NSS*"J,3S3O3A
N+E2"2"OS3H	R7T
T7ESIE6".JB42 GD+TCA2"OS3H	R+TKT6,Z"+OKN6,^"3E;N*"J,3WWI7DKE3H3O+E2"2"	W3EWD3R?HL6".JB52 GD+TCA2"	D+M2"6"KD3U/C+E2"6"KD3U/C*"J,7DSA+EKN2,V"+D2"6"WF7NSK3I;O*$2"6"WF7NSK3I;O""*M*6B07DSA+AJ 3LWI+S2"2"WO3F;F+E2"2"OS3HWR3IWB*"J,3SC3R	E+B2"2"OS3H	L7EOS+E2"2"OS3
	L7EOS""*M*7B07DSA+AJ 3D7I*"J,3P	R+NOT*4J:6,B"3R;I/TR*:2"2"GD+TKA2,V"+NKD*,J"*,J"2,&"7NWP+T2"2"	F+LKE.M"J20R 3AGT6 B"3R;I+T2"6"KP7ISN*"J,3C?L+SKE2,N"7LOOE6".JB9* SC2=V"3G3D3FB3H;K3O	I3C3J7LGK7M/M7A+A+ZB$3BGC7A+Z""*M.2B0* SM*(&0* B=*"B * B * B * B * B 3AGD
9B 2 F * B * B * B * J .MJJ*0B1+M"$*1B)*=J 3EV 3G
C3EWG+GB 3BJ1*2B 3BJ * B 3BJ4* B 2 J " 6".JB2226 .$J(.)6 2 J"3G
C3BKG3G
C* B * B * B * B * B * B * B * B ""*M.2N0* SM*(&3* B=2"
E3EWG3G
E+ECG. GB+BB2* CB+BB . SB+BB * B +BJ .MJJ*0B4+M"$*4B)*=J 3G^ * CG3G^ * B * B * B * B * B * B * B * B " 6".JB2256 .$V(.)6 2 J"3G
B3BKG3G
B* B * B * B * B * B * B * B * B ""*M.2Z0* SM*(&6* B=2"
E3EWG3G
E+ECG. GB+BB2* CB+BB . SB+BB * B +BJ .MJJ*0B7+M"$*7B)*=J 3EV +GB * B * B 3BJ1*2B 3BJ * B 3BJ4* B 2 J " 6".JB2286 .$"(.)6 2 V"* B * B 2 
E2 J .1KB2 J * CB2 J *4CB* B * CB""*M.2&0* SM*(&9* B=2"
E3EWG3G
E+ECG. GB* B * CB+BB . SB+BB * B +BJ .MJJ*1B0+M"$*1&0*=J * B * B * B * B . V * B8* B * B * B * B * B " 6".JF2216 .$F(.16)* B"* B . Z * B * B * B0* B * B * B * B * B * B ""*M.2J1* SM.(J1*)B=*"B * B * B * B * B 3F[D*9B * B * B * B * B * J .MJJ*1B3+M"$*1&3*=
 +EB * B +ECG* B +BB1* B 3BJ * B 3BJ4* B 2 J " 6".JF2246 .$F(.46)* B"* B * B * B * B * B * B * B * B * B *7B * B ""*M.2V1* SM.(V1*)B=*"B * B * B * B * B * B * B * B * B * B * CH* J .MJJ*1B6+M"$*1&6*=J 3COG+GB * B * B 3BJ1*2B 3BJ * B 3BJ4* B 2 J " 6".JF227
 .$F(.76)* B"* B * B * B *3B * B * B * B * B * B * B * B ""*M.3B02 	D7MJ .$R(*02)+B"7*226"16).JB361J *$J=3AGA3FGA3AKI3C[B3BKB3JKB3BKD3BKB3BKB3FKE3B/B3B[C3BGB6".JB660J +ECM.=6=2 WV3R	E3NGB3R;U3G;E. 6="=*M.6B12 	D7M" .$N(.4F,*22)+Y"$*123"86).JJ620R +ICM+Z"$
7&2*,SS.(J72)J,*8"$*7&2.,	B.(B2")*M.6J22 	D7MR .$J(6)V,.$F(6)J,*0"$*12)+PR1*(&1.MZJ*2B53D7I. CS.$^(*22)+KR3.(B1.,Z1")*M.6B32 	D3M2 *1"$*320*82)+L"2*3&0.,WL.$V(.0",2)2,.6V("06).JV620R +ICM+V"$.1B0.,J72):,.$J("06).JV625R +ICM+C"$*3&4.,CC.$F(")*M.6Z52 	D3MJ 
$F(6)B,*0"$"16).JZ620R +ICM+M"$*128*3&4.MZJ*7B03D7I* SP.(J7")*M.6B82 WR/M6 *=B=3I	N3TGI7LOI7IKE3U
N+ECN.=6=.MZJ*8B13F3I+EOV*4J:7SOY2:OP+W;S+BKA.MZJ*8B2/NJ=.MZJ*8B4/FB=.MZJ*8B53P	R+NOT64N:+TSR*(&12&R"3E[F+NZ7X&,6)"=*-+Y7ISN*(?X+YJ).MZJ*8B6+V6="1*M.6^82 WR/M6 *=B=3K;O7TE/T6 "=6=.J"668B 3R;I+TJ 3K;O7TE+TB:""6;.J&620& 7NWP3T: "$*M.6V92 [I* SN*<J>2"^ 3O?T.
B9"060.JB760J +ECM.=6=6 KP7OKG3A7M3N7A/E6 "=6=.JF760B 3R;I+TJ 3P?R3GGR/M+M. .".M^J*1B17ICN+UCTN6$.JJ720& 7FB +OS+N2$*"J:*,&1.<B>2 ?G+TCO.7B4.M^J*3B0/N6$6"	S+SJ:*&SN.M^J*4B0+ICF7POO*(SN*,:"."F,.):<20^ 3O?T. Z7"0*M.7B5* SN*=SN*&:"+PKC.M^J*6B03F3I/EJ*:SN.M"J
0B03R7E. 6=2=& 7NSI3I3A3I	S7EWR3NWG/N6 "=6=.JJ820Z +OCR/B6061R /ON "4*M.8F22 WR+ACD+X"$+B&0.M"J*2B27NE3TJ "0*M.8B32 ?F3RJ .0F=2 ?T. N1.M"J*3B13RGE7D& 2$J("06).JN822: 7ESX. CB.M"J*7B0/C6221K\.8B=.M"J*7B1/C61"1*M.8J7. CP*$J=A6".J^823N .06$*"KZ.M"J*7B4/K6020
\.3B=/\	B*(&0"=60.J"822F *06="1*M.8N8. OL.=F-.M"J*8B4/L67"-61.J"865B .3B=.M"J*8B6+ICF/D6720^ 3O?T. B9"0*M.8^82 ?F7RZ .0B=2 ?T" 7V.J"868B 3R;I7TZ 6$Z("06).J"829: 7ESX. CV7\KP7ISN7\KP7ISN.M&J*0B03R7E. 6=2=V 3I
N3AWB. 6="=*M.9B12 ;I7PSU.*2Z6$.JJ920& 3FV +NOD22^ 3O?T. B8.3B0.M&J*3B0+BR8*=SZ/\B.=B"+61.JB1*0B03R7E. 6=6=* 3EOI3H;E3W	E+SCE3AGN7LOY/E6 "=6=.JB1*1B0/ZB=.MFJ.0F1. CZ2=WL7N*("$6).JB1*1B2/D667POO*(SZ6,>"."F,")*M.1F023& 3FR .6B=2 ?G+TCO.1J0"0*M.1F064* 6$N=+E
G*(SZ*,21+D66*1Z)*"J,2&WS+G"$+Z2$+D.6212,+EN+Z&$")*M.1J020& 7FB .3F=2 ?G+TCO.3B0"0*M.1N060* *=/Z"1*M.1R020& 7F* .>CZ2 ?G+TCO.9B0.MFJ.0B5* SB2=WS+G"$+Z2$7Z*,")*M.1B160J +ECM*-6-2 	E3NWZ3LWZ3IC+ECN*-6-.MFJ.1B12 [I* SB6=."2"^ 3O?T. B3"060.JF1*2B0+ICF/B6$*"J"
"^ 3O?T. B2"060.JF1*3B0+ICF/B6$*"J 2 ?G+TCO.1N0"0*M.1R120& 3FJ *$J=*:B"7GSO/OF .8B0.MFJ.1V42 [I* SB.=6"2"^ 3O?T. &1"060.JF1*7B0+ICF/B6$*"J;2 ?G+TCO.1^5"0*M.LF1*7B5+ICF/B6$*"J,2 ?G+TCO.1R2"5*M.1B260J +ECM*-6-6 WF7NSK3I;O3SWD+FB.*-6-.MFJ.2B12 [I. CC*$J<* B"
GSO/OF .3B0.MFJ.2V12 [I. CP*$J>+AB"7GSO/O& .0B2"0*M.1J220& 3FJ .$:<* ""2"^ 3O?T. N1"060.JJ1*4B07GSO/OF .2B1"0*M.1R225& 3FN .1:<*1B57GSO/OF .2B0.MFJ.2"4. ON.=ON"+61.JJ1*5B0+B"9+N&32=WL7NN("$6).JJ1*5B57GSO/OF .0B3.MFJ.3B02 WR+M6 *-B-3SC3LWU3SWS3L?W7ESR+ECR*
6-.MFJ.3V02 [I* SB6>*"2"^ 3O?T. R1"660.JN1*1B0/B617POO2(F"+BB 3D[E* B +GCM+SB 6 
V* J *,SB*,&1.MFJ.3B22 [I. GB*=B07GSO/OF .4B0.MFJ.3B3. KB2=?P+SJ(+AB 3BWD* B +FCG+MB 6 [S6 ^ 2"J,.$F,")*M.1R320Z +OCR/B60+BB1+TCOB62.JN1*5B0+ICF7POO*(SZ*,SX.(CB6)*,6)*=2 ?G+TCO.1B6"0*M.1Z320: 7ESX. CB.MFJ.4B0. GB2=?P+SJ(+DB 2 [E2 ?L+SB * 2"+B2$*1.)"261.JR
*1B0+ICF/B6120^ 3O?T. V1"060.JR1*2B0/B627POO*(B"2 R 3EZ +LCO6 N 2"J,.$F,.)J+"1*M.1N420Z +OCR/B60+BB1+TCOB62.JR1*4B0+ICF7POO*(SZ*,SX.(CB6)*,6)*=2 ?G+TCO.1B7"0*M.1V420: 7ESX. CB.MFJ.4B62 [I. CC*$J=+AB"7GSO/OJ .6B0.MFJ.5B02 WR+M6 *-B-7EOR7E+T3U
N+ECN*-6-.MFJ.5B12 [I. ;V*=B07GSO/O& .5B0.MFJ.5B32 WR+M6 *-B-3UKE7ESR3R
A+ECN3E;I+ECS3Z	E3CWH+NCS*-6-.MFJ.5B5* SS*=SS*&SB.MFJ.5B62 ?G+TCO.1N0"0*M.1^520N .2F=.MFJ.5V7. 7Z/ZF+.MFJ.5B82 ?G+TCO.4B9"0*M.1B660J +ECM*-6-2 WV7RKA3B	E3T;E2 WD7RN 3C3H7UOE3S3E7WKO7TKE* 6-"-*M.1F620N 22F=+SC3S
E2$N(2$J,20J,*0&).MFJ.6B2. 7Z3Z2++EN+X"$+B&0")*M.1N620^ 3O?T. &4"060.J^1*0B0+CR02=WS+G"$+C2$+B20+B&0.MFJ.7B1. 7Z3Z2++EN+X"$+B&0")*M.1J760N 6$N=6$&&2$J(.0J-"16).J^1*3B07GSO/OF .0B4.MFJ.8B02 WR+M6 *-B-7DCO3P3E3P;U+KCT*-6-.MFJ.8B12 [I2 ?P7S*(*$J,*:J=*,	Z*=CZ
GSO/OF .8B4.MFJ.8B22 [I. CC*$J<+DB"7GSO/OF .5B3.MFJ.8B32 [I* K+K&0.<^>2 ?G+TCO.8F0"060.J"1*3B1/C62"166.J"1*3B27Z*="+61.J"1*3B37GSO/OR .9B0.MFJ.8B42 [I. GC.=B12 ?G+TCO.9B0"060.J"1*5B0+ICF/C61*4B 7GSO/O& .0B0"0*M.1Z820& 3FN .1F=27^ 3O?T. B9.0B0.MFJ.8B7* SS*
SS.&6"""*M.1"860* *=/Z"2*M.1&820^ 3O?T. B1"460.J&1*0B0+ICF/C61*1B07GSO/OF .5B3.MFJ.9B12 [I. GC*=B42 ?G+TCO.1N5"0*M.1J920& 3FN .1F=27^ 3O?T. V1"360.J&1*2B5+ICF+CR06>*"2"^ 3O?T. V1"360.J&1*3B07GSO/O& .0B0"0*M.2B060J +ECM*-6-2 WZ3IC3E/N7EST+ECN*-6-.MJJ.0B12 
I. CC*$J=+AB"7GSO/OJ .5B0.MJJ.0V12 [I. 7Z+ZB07GSO/O& .0B0"0*M.2J060* 61B=+OS+Z2$*"J"6"*,*+&1.MJJ.0B32 [I. GZ*=B07GSO/O& .0B0"0*M.2R060N 6$N=6$N&+ESG*(SZ*,3Z+Z&1.MJJ.0B5. 7Z+Z.1"1*M.2Z020^ 3O?T. B1"460.JV2*0B03R7E* 6-6-R 3R;E7NKE2 7I6 KP7ISN* 6-"-*M.2F520&
7FN *$J=3P	R+NKT2 ?G+TCO.2J0"0*M.2J520& 7FB +OS.".:*,J"*&2"3S
E6$N(2$2,+EN+S&$2,WL7NN(*$&)*,&1.<B>2 ?G+TCO.2J0"0*M.2N560N 6$N=*$J&";6".JV2*4B07GSO/OJ .0B2.MJJ.6B02 [I* SB*<J>*!B"7GSO/OJ .6B3.MJJ.6B1* SS*=SS.&."""*M.2J620^ 3O?T. B1"360.JZ2*3B0+ICF/B6$*"J,2 ?G+TCO.1B5"0*M.2R620& 7FN +ESG*(SS2,WL7NN(*$2)3L;E*(SS.)2)*>J
*"B"7GSO/OF .5B0.MJJ.6V42 [I* SB*=Z"2"^ 3O?T. V1"060.JZ2*5B0/S6$+SZ$*"J;.MJJ.6B62 ?G+TCO.1B5"0*M.3B060J +ECM*-6-2 ?K3MWM3NGT+R6 "-6-.JB3*1B0/P63"1*M.3J060* 61B=+OS+Z2$*"K]*,/Z"16).JB3*3B0+ICF/Z6120^ 3O?T. B9"0*M.3R060* .=GZ"+61.JB3*4B5/P63"0*M.3Z020^ 3O?T
 B1"460.J&4*0B03R7E. 6=2=V 7NOT3CWH7IWD3NWG3N: 3AC6 SS3R/U7TKU. 6="=*M.4F960R 6$N=+ESG*(SM.(GC.)J,.*KC*-2122N*"26).J&4*2B0+ICF/T6$*"B 2"^ 3O?T. B9.0B0.MVJ.0B02 WR+M6 *-B-3RWU7COK7PWR+NCG3FWU3RV 7NOT3CWH7IWD3NWG+N6 "-6-.JB5*1B0+ICF/T6$*"B"7GSO/OV .5B0.MVJ.
B2* SU2=WS+G"$+T2$.1F,")*M.5N020& 7FV *$J=* B"7GSO/OV .5B0.MVJ.0B4* ST2=WS+G"$+T2$.2J,")*M.5R025& 7FV .$6>*"J02 ?G+TCO.5B2"0*M.5V020& 7FV *$J=+AB"7GSO/OJ .3B1"0*M.5V021& 7FV *$J=+BB"7GSO/O^ .0B1" *M.5V022& 7FV *$J=+CB"7GSO/O^ .1B0"M2J.5Z020& 7FV *$J=+DB"7
SO/OJ .3B3"0*M.LB5*6B1+ICF/U6$*"KE2 ?G+TCO.1B0"060.JVL.0J62 [I* SU2=Z"2"^ 3O?T. N2.2B0.MVJ.0B72 [I* SU2=^"2"^ 3O?T. F6*0B0.MVJ.0F82 [I* SU2=""2"^ 3O?T. R2.1B0.MVJ.1B96 SSO7P.JJ5*0B03R7E* 6-2-F 3NGF7NOG2 3E3EWM3NWT.MVJ.2B1. CK.=CK"+61.JJ5*2B0+ICF/K:0*2B07G
O/O& .0B1"0*M.5N220. .(CK6)Z=+AL+U&$.MVJ.2B42 [I* SU.=B"2"^ 3O?T. V2.0B0.MVJ.2B52 [I* SU.<N"2"^ 3O?T. N1.0B0.MVJ.2V52 [I* SU.=N"2"^ 3O?T. B2.0B0.MVJ.2B62 [I* SU.=R"2"^ 3O?T. J2.0B0.MVJ.2B72 [I* SU.=^"2"^ 3O?T. R2.0B0.MVJ.2B82 [I* SU.=Z"2"^ 3O?T. N2.0B0.MV
.2B92 [I. GC.=B12 ?G+TCO.2B1"060.JN5*0B0/K60+K60"1*M.5F320. .(CK6)Z=+AL+U&$.MVJ.3B22 ?G+TCO.2N3"060.JV5*0B0/C61C62.JV5*1B07GSO/OF .0B4.MZJ.0B02 WR/M6 *=B=7ESN3SC3ESI3U
N+ECN3NOA3H. 3E3L+ECR.=6=.MZJ.0B1. CK.=CK"-61.JB6*1B5+ICF3K.(.0F+.)B=2 ?G+TCO.5B0"0*M.6J020& 3F. .(CK*+&1*=B57GSO/OV .0B0.MZJ.0B32 [I* K+K.0.16)26^ 3O?T. B5"060.JF6*0B0+ICF/K6020^ 3O?T. B5"060.JF6*0B2+ICF/K2020^ 3O?T. B9.1B2.MZJ.1B12 [I* K+K&0*=B87GSO/OJ 
1B1"0*M.6J120& 3F. .(CK.)&=2 ?G+TCO.2R3"060.JF6*3B0+ICF3K.(.06)*1B07GSO/OJ .0B1"0*M.6R120& 3F. .(CK.)F=21^ 3O?T. J2.2B0.MZJ.2B0. CR6$N=+ESG*(SR2,N(.2F-.)"**+K+K&0*+21.(KC*-&1**.83K.(*0.)"16).JN6*0B0+ICF+RR02=F"2"^ 3O?T. B5"060.JN6*0B1+ICF+RR02=J"2"^ 3O?T.
B9.0B0.MZJ.3J02 [I. CR*$J=+CB"7GSO/OF .3B5"0*M.6B325& 7FJ .06$*"KF2 ?G+TCO.2F0"060.JN6*0B6+ICF+RR02=^"2"^ 3O?T. F2.1B0.MZJ.3^02 [I. CR*$J=+HB"7GSO/OJ .3B4"0*M.6B328& 7FJ .06$*"KI2 ?G+TCO.2N4"060.JN6*0B9+ICF+RR02=*"2"^ 3O?T. R2.4B0.MZJ.3V32 [I. CR*$J=+KB"7
SO/OJ .5B2"0*M.6N326. .(CK2).=.(CK.)^+.MZJ.3^32 [I. CR*$J=+DB"7GSO/OJ .0B2"0*M.6N328& 7FJ .06$*"KE2 ?G+TCO.5B0"0*M.6R360N 7TCO.M^J.0B02 WR/M6 *=B=3KWL3IWN2 /A3T?I3N;E. 6="=*M.7F060J +ECM*-6-2 WF3HWL3RZ,3A3L7SN 2$: 3IC3T2 7EKE.M^J.0B22 [I* SS*<J>2"^ 3O?T. 
9.0B0.M^J.0B32 ?G+TCO.5B0"0*M.7B160J +ECM*-6-2 WU7BKE7LOE+E3N2 GF7LOL* SS2 WL+ECR*-6-.M^J.1B12 [I* SS*=J"2 ?G+TCO.5B0"0*M.7J120^ 3O?T. B1.0B0.M&J.0B02 WR/M6 *=B=3K;O7TE/T6 *=B=.M&J.0F0. 
D2=?P3S:(*$J,*/2""16).JB9*0B2+ICF/D6720^ 3O?T. B9"065.JB9*0B3/N6$3S
E2$:(.$F,.,
D*-&1.M&J.0V02 [I2 ?P3S:(*$J,*:2".12)*>B07GSO/O& .0^0.M&J.0Z0* SN6=N"/Y+S2":&"$*M.9B027& 7FB +OS+N2$*"J.*,&1.<B>2 ?G+TCO.9F0"0*M.9B028: 2$:=*$J&2.?K""*M.9F020Z 3IWL.*2N6$.J&L.0V12 ?F3R& *=B1+TCO"266.JB9*1B6+B"7/IB,*)6="1*M.9F027J 27&(*,&1.=F-.M&J.0"12 WN+
CTI*M.9J020& 7NWP/TJ*:SZ.M&J.0B32 [I2 ;E/DJ2 ?G+TCO.9B4"0*M.9R060B 60B=+OS+Z2$."6=."F,")*M.9V020& 7FB .0B=2 ?G+TCO.9B1"0*M.9Z060Z *=/V"1*M.9^020& 7FZ .>B120^ 3O?T. B9.1B0.M&J.0F7* SB2=WS+G"$+Z2$.1F,")*M.9^022J 26F=+SC+B&$.M&J.0N72 [I. 
B.([B*,&1*<6>21^ 3O?T. B9"765.JB9*7B4+B"7+B26.06)V*M.9^025J 27J(.6F,6)Z=.M&J.0B8* SV*(	V*=SZ.M&J.0B92 ?G+TCO.9J0"0*M.9B120& 7FB +OS+Z2$6"WF7NSK3I;O*$2".16)21^ 3O?T. J9"060.JF9*1B0+ICF7POO*(SZ2,Z"3U/N3T?I+N2".16)21^ 3O?T. J9"260.JF9*2B03P	R+NOT64N:+TSR*(	N
&SZ.M&J.1B3. 7N/NF+.M&J.1B42 ?G+TCO.9J0"0*M.9B260B .16$*"J$.M&J.2F0. 	Z2=?P7S*(*$J,+
2""16).JJ9*0B2+ICF/Z6920^ 3O?T. J9"360.JJ9*0B3/Z6$3S
E6$*(.$F,.,	Z*-&1*&2"6"N&+ESG*(SZ.,	Z*+213L;E*(SZ")6).JJ9*1B07GSO/O& .2B3.M&J.2B2. GP*$J=""*M.9N260* 6$N=+ESG*(SZ2,?P7S*(*$J,* 2"*1.)212,+EN+Z&$")*M.9R220Z *=/F"1*M.9V220& 3FZ .>V22 ?G+TCO.9F0"060.JJ9*6B0/P6$2"WD3F;F2"N&+HSR*(	F.&GP6$N&+ESG*(SZ2,?P7S*(*$J
*(2"*12)3L;E*(SZ")6).JJ9*6B13P	R+NOT64N:+TSR*(	N*&SP.M&J.2V6. 7N/NF+.M&J.2B7* SZ2=WS+G"$+Z2$61B,+OS+Z2$*"J(*,&1*)J&*=J=2&Z"+NZ"7CKH2$Z(6)B&*1Z$*"J(.M&J.2B82 ?G+TCO.9Z0"0*M.9B420N 7LOO/EJ.M&J.4F02 [I. 
D*=B07GSO/O^ "060.JR9*0B57FKO. 7I61R /OJ "6*M.9B466B 3R;I3TN +HSR*(	I.,
B*(3I*02)+B"7/IF,")*M.9B427: 7ESX" 7I.JR9*1B07GSO/O^ "060.JV9*0B03R7E. 6=2=V 3RWS7TWZ3NWG/N6 "=6=.JV9*0B1/B663AOS*(SB")*M.9B522& 3FJ .6J>26^ 3O?T. V1"360.JV9*0B3+ICF+B"7+B26.06)*-B17GSO/OF .5B3.M&J.5B12 ?F7RZ 20J=27J(.6B,6)R 3OJ 27J(.6F,")*M.9F565B 60B=+O
+V"$+V&0.,6"*=2""16).JV9*2B0+ICF7POO*(SZ2,WS+G"$+V"$+V&0*,21+P60*12)/Z2)*>CZ7GSO/O& .5B7.M&J.5B3* SS*=SS2&WS+G"$+V"$+V&0.,CP*+223L;E*(SV.(CV*)&).M&J.5B4. 7Z7ZB+.0F-.M&J.5B52 ?G+TCO.1R0"0*M.9^520: 7ESX. CV.M&J.5B82 ?G+TCO.1N5"0*M.1B0*0B03R7E. 6=2=V 3I[N3AC
EF 3NWW7IWS+NCG.=6=.MFJ.0F020& 7FN *$J=2"^ 3O?T. B9.0B0.MFJ.0F022& 7FB .02$2>F"2"^ 3O?T. B1.0"1.MFJ.0F024& 3FN .0:$*"KZ2 ?G+TCO.1&0"060.JB1.0Z12 ?G+TCO.9J0"060.JB1.0"12 [I. CC*$J>+ZB"7GSO/O& .0B2"0*M.1B0*2B0+ICF3S
E6$N(.$F,*,&12=B"2"?G+TCO.8J0"060.JB1.0B32 [I. CC*$J=+BB"7GSO/OF .0B3"0*M.1B0*7B0+ICF7POO*(SS2,^"3E;H3AC."F,.)B=2 ?G+TCO.1B0"860.JB1.0F7* SS2=WS+G"$+S2$.8F,"56).JB1.0J72 ?G+TCO.8J0"760.JB1.0B82 [I2 ?P7SN(*$J,3GE3EGN+CKH*,&1*=B07GSO/OF .0B9"0*M.1B0*8B1/S6$
S
E6$N(.$&,.,Z1")*M.1B0*8B27GSO/O" .0^2"0*M.1N0*0B03R7E* 6-2-2 7IOE* 6-"-*M.1N0*2B0+ICF7POO*(SS2,F"3NGF+NOG*:2".66)26^ 3O?T. B1.5B0.MFJ.0N320& 7FB +OS+S2$2";A3F;A+GJ*,&6*=B67GSO/OF .0B4"0*M.1N0*4B0+ICF7POO*(SS*,N"*:2".66)26^ 3O?T. B1.6B0.MFJ.0V320^ 3O?T. B1
9B0.MFJ.0B460B *$J=7ROE7TKO+EZ"3S
E6$N(.$F,62B,+OS+S2$*"J:.,N1.)F-")*M.1R0*0B53P	R+NOT64N:+TSR*(	N*&SP.MFJ.0F420: *=/N"1*M.1R0*2B0/S6$3S
E6$N(.$F,*,&52&WS+G"$+S2$*1223L;E*(SS")6).JB1.4B32 ?G+TCO.1&0"060.JB1.5B06 KP7ISN.*47SKT2$:(*)J&7ROE7TKOE6".JB1.5V0. 7N/NF+.MFJ.0F560N *$J=3RGE+DZ"3S
E6$N(.$F,242,+EN+S&$")*M.1V0*2B07GSO/OF .0B9"0*M.1Z0*0B0/S6$2"WR+AKD2&WS+G"$+S2$282,+EN+S&$")*M.1Z0*1B07GSO/OF .0B9"0*M.1^0*0B03R7E* 6-2-6 +O3D7D[I* 6-"-*M.1^0*0B5+SR02=WS+G"$+S2$+P.4212,+EN+S&$")*M.1^0*1B0/P657POO.(CS*$J,3MSO."F,")*M.1^0*2B0+ICF/P25*>B07
SO/OF .0^7"0*M.1^0*3B0/P657POO.(CS*$J,7D[I."F,")*M.1^0*4B0+ICF/P6520^ 3O?T. B1.9R0.MFJ.0V760N 6$N=+ESG*(SS*,21+P&42&&"+NT""*M.1^0*5B5/S6$+SZ$3S
E6$N(*02$61B,.5F-*)J&*/Z"3S
E6$N(*02$+P.5232,+EN+SR0*)Z)*"J).MFJ.0Z720^ 3O?T. B1.9R0.MFJ.0^760N 6$N=+ESG*(SS*,21+P&42&Z"+NZ""*M.1^0*7B5/S6$+SZ$3S
E6$N(*02$61B,.5F-*)J&*,Z"3S
E6$N(*02$+P.5232,+EN+SR0*)Z)*"J).MFJ.0"720^ 3O?T. B1.9R0.MFJ.0B960J +ECM*-6-2 ;A3W	E3S;U+G6 "-6-.JB1.9F0. SP2=?P7SN(*$J,*=2""16).JB1.9J02 [I. SP.<B>2 ?G+TCO.1^0"060.JB1.9R06 KP7ISN.*47SKT2$:(6)N&"$*M.1&0*0B5+CR06=*"""*M.1&0*1B0/S6$""6".JB1.9B2. 7N/NF+.MFJ
0N920^ 3O?T. B5"060.JF1.0B02 WR/M6 *=B=3L
O3IOS+HCE7AOU7DWR3E/C/E6 "=6=.JF1.0B12 [I* SS*=J"2 ?G+TCO.9B0"060.JF1.1B02 WR+M6 *-B-3NOI+HCT7AOU7DWR+CCK*-6-.MFJ.1F160B 65B=+OS+S2$2"	N7CSH."F,")*M.1F1*1B1+ICF/P6520^ 3O?T. F1.2B0.MFJ.1J160B *$J=+IKF2&WS+G"$+S2$+P.5252,+EN+S&$*)J&7GSO+OZ"7SKT2$:(*+&2.MFJ
1J165B 3R;I/TR6:SS+R"$+NZ)P6$.JF1.1B3* SP2=^"3O?T6"N&+TSR*(/N"36).JF1.1V36 KP7ISN.*47SKT2$:(*+&1*&SP.MFJ.1R120: *=/N"2*M.1F1*4B5/S6$""6".JF1.1B52 WR7TKUN*M.1J1*0B03R7E* 6-6-V +NCD7AOU7DWR+CCK*-6-.MFJ.1F260B 65B=+OS+S2$2";U+D2""16).JF1.2F12 [I. WP*=B07GSO/
F .1B3"0*M.1J1*2B0/P6$2"[I6"N&+ESG*(SS*,21+P65*1Z)2"?G+TKO6&SS+R"$/NJ+")*M.1J1*2B53P	R+NOT64N:+TSR*(	N*&SP.MFJ.1N260B *$J=7GSO+OZ"7SKT2$:(*+&3.MFJ.1N265B 3R;I/TR6:SS+R"$/NF+6)B&"$*M.1J1*4B0/P6$2"[I6"N&+ESG*(SS.,WP*+233L;E*(SS*)Z)2"?G+TKO6&SS+R"$/NR+")*M.1
1*4B53P	R+NOT64N:+TSR*(/N*2Z)P6$.JF1.2B5. 7N/NN+.MFJ.1V265N *$J=""*M.1J1*6B07RSE3U;R.MFJ.1B360J +ECM*-6-2 SO+ECR7AOU7DWR+CCK*-6-.MFJ.1F360B 65B=+OS+S2$2"SO+EKR*,&1.MFJ.1F321& 7FB .5B=2 ?G+TCO.1V1"060.JF1.3B2* SP2=&"+FZ"3S
E6$N(.$F,.,WP*-&12&^"3O?T6"N&+TSR*(/N"36).JF1.3V26 KP7ISN.*47SKT2$:(6)B&"$*M.1N1*3B0/P6$2"[I6"N&+ESG*(SS.,WP*+243L;E*(SS*)Z)2"?G+TKO6&SS+R"$/NN+")*M.1N1*3B53P	R+NOT64N:+TSR*(/N*1Z)P6$.JF1.3B4. 7N/NJ+.MFJ.1R365N *$J=""*M.1N1*5B07RSE3U;R.MFJ.1B460J +ECM*-6-
 WV3R3G3EOI3HGS3USS3ROU+K6 "-6-.JF1.4B16 KP7ISN.*47SKT2$:(*)J&+IKF*&SS2&^"3O?T6"N&+TSR*(/N"26).JF1.4B2. 7N/NF+.MFJ.1N460N *$J=""*M.1R1*4B07RSE3U;R.MFJ.1B560J +ECM*-6-2 WT7ISL* 6-"-*M.1V1*1B0/P657POO*(SS6,R"3E3I+T2""16).JF1.5F12 [I. WP*=B07GSO/OF .1B4"0*M.
V1*2B0/S6$2";F+ZJ(2&WS+G"$+S2$+P.5252,+EN+S&$*)J&*,Z"3S
E6$N(.$F,.,WP*-&1*&&"*=J0.MFJ.1N520^ 3O?T. F1.4B0.MFJ.2B060J +ECM.=6=6 WF7NSK3I;O+ECN.=6=.MFJ.2B160J +ECM*-6-2 WD3FZ 3U/N3T?I+N6 "-6-.JJ1.1B1. 7F/FF+.MFJ.2J120& 3FZ .>V22 ?G+TCO.9F0"060.JJ1.1B3. 7V/VF+.MFJ.2R120& 7FZ .>B52 ?G+TCO.9F0"060.JJ1.1B5* SV*(	V*=
S*&""2=Z=+NZ"7CKH2$Z(2)N&*0Z$*"J(.MFJ.2Z160N *$J=3D[E+FKN2&C+R"$+FZ)+CR0*&""""*M.1F2*7B0+CR06=."""*M.1F2*8B07GSO/OF .0B3.MFJ.3B060J +ECM.=6=2 WB3G;I/N6 "=6=.JN1.0B12 [I. CP.$:<*"KA2 ?G+TCO.5B0"0*M.1B3*4B03P	R+NOT64N:+TSR*(	N6&J"+ECM3F3I+EOV*4J:6"CL+TJ:""6
.JFL.3V060B .06$*"KB.MFJ.3Z020: *=/N"1*M.1B3*7B07GSO/OV .0B0.MFJ.3B560J +ECM*-6-2 ;E+DCE*-6-.MFJ.3F520. 20.=.0F-.MFJ.3B620& 3F. .0B>2 ?G+TCO.5B0"0*M.1Z3*1B0+ICF+PR02=J"2"^ 3O?T. N1.6B4.MFJ.3J660B 3R;I/TR6:SS+R"$+NZ)2"WR7TKUN6".JN1.6V2. 7N/NF+.MFJ.3N620^ 3
?T. B5"060.JN1.6B46 KP7ISN.*47SKT2$:(*)J&3R7E2 3C3OWS*J42&C+R"$*2&86&N"7TCO""*M.1Z3*5B03N:="+61.JN1.6B6. CP*$J=C6".JN1.6B72 ?G+TCO.5B0"0*M.2B0*0B03R7E. 6=2=& 3FF 3NGF+NCG.=6=.MJJ.0N020^ 7OWS/BF .1B0"0*M.2B0*4B0+K"1+K&0"=7N.JB2.0F4. 7N/NF+.MJJ.0V020^ 3O?T.
B5"060.JB2.1B02 WR+M6 *-B-+I7F3TWH3NV 3NWD* 6-"-*M.2F0*2B03P	R+NOT64N:+TSR.(GK.(CK*)Z)2"?G+TKO6&SS+R"$N6).JB2.1B32 ?G+TCO.6B0"0*M.2J0*0B03R7E* 6-2-V 3LWS2 ;A3F;A+G6 "-6-.JB2.2B16 KP7ISN.*47SKT2$.(21.(*0&)2&^"3O?T6"N&+TSR*(/N"16).JB2.2B3. GK.(CK2):=.MJJ.0N
21: *=/N"1*M.2J0*4B07GSO/OV .0B0.MJJ.1B060J +ECM.=6=2 W3IWL2 ;A3F;A/G6 "=6=.JF2.0B3. KK.(CK2):=.MJJ.1R020^ 7OWS/BF .1B0"0*M.2B1*5B0+K"1+K&0"=7N.JF2.0F5. 7N/NF+.MJJ.1Z020^ 3O?T. B5"060.JF2.1B02 WR+M6 *-B-3W	H+LCE3ESN+E6 "-6-.JF2.1B26 KP7ISN.*47SKT2$:(*)J&7
SO+OZ"7SKT2$.(22.(*0&).MJJ.1N120: *=/N"1*M.2F1*5B03P	R+NOT64N:+TSR.(GK.(CK*)Z)2"?G+TKO6&SS+R"$N6).JF2.1B62 ?G+TCO.6B0"0*M.2B2*0B03R7E* 6-6-J 3EWP+ACT3A[N3A
N. 6="=*M.2B2*3B0+K"1+K&0"=7N.JJ2.0B42 ?G+TCO.5B0"0*M.2J2*0B03R7E* 6-6-J 3EWP+ACT3ESN+E6 "-6-.JJ2.2B12 ?G3SKU. F1.0B0.MJJ.2N260B 3R;I/TR6:SS+R"$+NZ)2"?G+TKO6&SS+R"$+K"1+K&0")*M.2J2*4B03N:="+61.JJ2.2B52 ?G+TCO.6B0"0*M.2B3*0B03R7E. 6=2=Z +OCR3A[N3A
N. 6="=*M.2B3*3B0/P657POO*(SS.,6"."F,")*M.2B3*4B0+ICF/P25*=B17GSO/O& .0B0"0*M.2B3*5B0+KR3.(CK6)N=+ESG*(SS*,21+P65"16).JN2.0B6* SP2=Z"+OKR*&SS.MJJ.3^060N *$J=""*M.2B3*8B0/C61"0*M.2B3*9B07GSO/OF .0B4.MJJ.3B160J +ECM*-6-2 ?F7RR-+O6 "-6-.JN2.1B1* SP*=SP6&R"+O
"S6$.JN2.1B2* SS*=J".MJJ.3N120^ 3O?T. B5"060.JN2.2B02 WR+M6 *-B-7FKO2-?T6-SS+ECP*-6-.MJJ.3F260B 6$B=*$J&3SWT+PZ"S6$.JN2.2V1* SS*=J".MJJ.3J220^ 3O?T. B5"060.JN2.3B02 WR+M6 *-B-7FKO2-?D* 6-"-*M.2N3*1B03P	R+NOT64N:+TSR*(	N*&SP.MJJ.3J320: *=/N"1*M.2N3*3B07GSO
OV .0B0.MJJ.3B460J +ECM*-6-2 WN+XCT*-6-.MJJ.3J460B 3R;I/TR6:SS+R"$+NZ)2"WN+XKT.&OK2$.("06).JN2.4V2. 7N/NF+.MJJ.3N420. *3"$+K&0*=J".MJJ.3R420^ 3O?T. B6"060.JR2.0B02 WR/M6 *=B=7COA3EF 3NGF+NCG.=6=.MJJ.4N060B 3R;I/TR6:SS+R"$+NZ)2"?G+TKO6&SS+R"$/NJ+")*M.2B4*4
0+K"1+K&0*=/N"1*M.2B4*5B03N:="+62.JR2.0B6. OK2$.(.06)+SZ$*"J=.MJJ.4^060N *$J=""*M.2B4*9B07GSO/OV .0B0.MJJ.4B160J +ECM*-6-2 GC+SCE3LKA+ECL*-6-.MJJ.4B121: 23:=.3F+.MJJ.4B123J 29:(.36)3L;E*(SS")*M.2F4*0B4/N64"0*M.2F4*0B7/N60+N.3/NF+.MJJ.4B128. 22.(.06)+N60"1
M.2F4*2B0+ICF/N64+NB37GSO/OJ .4"1"0*M.2F4*3B0/P6$7SKT2$:(*)J&+IKF.&OK2$.(*0Z)3S
E6$N(2$J,29:(*4.)21J,29:(.4F+")6).JR2.1J36 KP7ISN.*4+PZ$2"?G+TKO6&SS+R"$+N&0.MJJ.4N125: 24:=.4F+.MJJ.4V120: *=/N"1*M.2F4*7B07GSO/OJ .4J1"0*M.2F4*8B0/N63"0*M.2J4*0B03N:="+61.JR2.2V0* SS*=J".MJJ.4F220^ 3O?T. B5"060.JR2.3B02 WR+M6 *-B-7COA3EZ 3A3L2 ;E+DCE*-6
.MJJ.4F360B 3R;I/TR6:SS+R"$+NZ)2"?G+TKO6&SS+R"$+K"1+K&0")*M.2N4*2B03N:="+61.JR2.3V26 KP7ISN.*47SKT2$.(22.(*0&)2&^"3O?T6"N&+TSR*(	N.MJJ.4N320N .1F="5*M.2N4*4B07GSO/OF .0B4.MJJ.4B460J +ECM*-6-2 GC+SCE3ESN+E6 "-6-.JR2.4B16 KP7ISN.*47SKT2$.(21.(*0&)2&^"3O?T6"
&+TSR*(	N.MJJ.4J460B 3R;I/TR6:SS+R"$+K"2+K&0*)J&7GSO+OZ"7SKT2$:(")*M.2R4*2B5/K60+K60"1*M.2R4*3B07GSO/OV .0B0.MJJ.5B060J +ECM.=6=2 GD3T	E2 ;A3F;A/G6 "=6=.JV2.1B02 WR+M6 *-B-7DSA+ECI3A[N3A
N.MJJ.5N160B 3R;I/TR6:SS+R"$+NZ)2"	D+MSZ.(J7")6".JV2.1B46 KP7ISN.*47SKT2$:(*+&12&Z"3IWL.*36"N&+ESG*(SS*,263L;E*(SS")6).JV2.1B56 KP7ISN.*47SKT2$:(*+&22&&"7NWP/TN*:SZ""*M.2F5*6B0+K"2+K&0*=/N"2*M.2F5*7B0+K"1+K&0*=/N"3*M.2F5*8B03N:="+64.JV2.1V8* SS*=J".MJJ.5&
20^ 3O?T. B5"060.JV2.2B02 WR+M6 *-B-7DSA+ECI3ESN+E6 "-6-.JV2.2B16 KP7ISN.*47SKT2$:(*)J&7GSO+OZ"7SKT2$.(22.(*0&).MJJ.5J220: *=/N"1*M.2J5*3B03P	R+NOT64N:+TSR.(GK.(CK*)Z)2"[I3ESN2^33O?T6"N&+TSR*(	N.MJJ.5R260B 3R;I/TR6:SS+R"$+NZ)2"3C3OWS*J3.MJJ.5V220: *=/N"1*
.2J5*7B07GSO/OZ .0B0.M"J.0B060J +ECM.=6=2 GM3RWK7NN,7PWR3E
N/E6 "=6=.JB8.1B02 WR+M6 *-B-7MKA+KCE3E;I3TGR3G;E* 6-"-*M.8F0*1B1/S6$3S
E6$N(.$F,*,&8.M"J.0V120& 3F2 .36>*3B07GSO/O& .0B1"0*M.8F0*6B0/L63+L.3"1*M.8F0*6B1+LR1.(OL6)N="$*M.8F0*6B2+L"2+L&3"=7N.JB8.1B7* SS*=J".M"J.0^121^ 3O?T. B1"360.JB8.2B02 WR+M6 *-B-7SKP3U
N2 	E7NKT3AWG+N6 "-6-.JB8.2F1* SS2=WS+G"$+S2$.1",")*M.8J0*7B03R7E.M"J.0"2202 272=.7F+.M"J.0"2212 *5"$+L&7*=SS.M"J.0"2222 262(.76)N*M.8J0*9B0/S6$""6".JB8.2F9. 7N/NF+.M"J.0&222^ 3O?T. B5"060.JB8.3B02 WR+M6 *-B-7MKA3K;E6-CS3R;U7G*-7UKO7DWN+NCG*-6-.M"J.0B322&
7FN *$J=2"^ 3O?T. B8.3B1.M"J.0B364B 3R;I/TR6:SS+R"$+NZ)S6$.JB8.3B12 ?F3R2 .8B=2 ?T. 
L.M"J.0J320Z +OCR/L6460R 3O2 "3*M.8N0*3B0+ICF+LR1.(SL.):<+LR5.(L2)^ 3O?T. B8.3B6.M"J.0N322& 7FN +ESG.(GL2$2(*42).1F,.):<*"K2 ?G+TCO.8N0"460.JB8.3R36 KP7ISN.*47SKT2$2(262(*8&)2&^"7OWS+BZ"7SKT2$2(222(*4&).M"J.0N326^ 3O?T. B8.3B8.M"J.0R360B 3R;I/TR6:SS+R"$+L
6+L&8*)J&7GSO+OZ"7SKT2$2(222(*4&).M"J.0V320^ 3O?T. B8.3B8.M"J.0Z320: 7ESX. SL.M"J.0Z322& 7FN +ESG.(WL2$2(*82).1F,.):<*"K2 ?G+TCO.8N0"760.JB8.3R66 KP7ISN.*47SKT2$2(262(*8&)6&B"3R;I+TJ"7VKE3F	E7NKE3U
N* J"*;J"2"2&*5"$+L&8*&J"""6".JB8.3Z62 ?G+TCO.8N0"860.JB8.3B76 KP7ISN* *"2*Z*3E3H/E+R7MKA+KCE2"2;*5"$+L&8*;B"3FE+LKT.M"J.0^321^ 3O?T. B9.2F0.M"J.0"320: 7ESX. L.M"J.0B460B 3R;I/TR6:SS+R"$+NZ)2";ED6".JB8.4B12 ?G+TCO.9B1"060.JB9.0B06 KP7ISN* *"2*Z*3E3H+ECR3Z
W3SC+ECN3D;E2 OS7HWL7EOS7E
L7OKE7TKEN6".JB9.0F06 KP7ISN* B"2 6 +ICT3CSO3EN *1J=.;GC6;V"+NCD/C622"N;"2*M.9B0*0B27GSO/O& .0B2"1*M.9F0*0B03P	R+NCT*"6-6-	S3SWT7MKG7E+N3EN:*1J=.;GC2;N"*2J=.;KC2;.".(CK*)J=*;K+K&0.M&J.0B161B 3R;I+TJ * B /L632"2;*3J;/L672"2;*7J;+FJ=";7F.JB9.1J02 ?G+TCO.9J0
061.JB9.1B26 KP7ISN* *"2*Z*3E3H+ECR+ICN7DKE2 OS3HOA3HWT3L;U3G.:.(CK*)J=*;K+K&02;N"*2J=.;KC.M&J.0J121^ 3O?T. B9.2F0.M&J.0B260B 3R;I+TJ ****3FE7LKE2 7I6 KP7OKG3A7M3A[U7BWA""*M.9J0*0B13P	R+NCT2"WF3HWL3R& 7N* 3E3I3E: +RB.2"J;*8J;2 WG3F;U3D;E""*M.9J0*0B23P	R+N
T+BR8.M&J.0B263N 7TCO.M&J.1B020N 7LOO/EJ.M&J.1R020N 7LOO/ER.M&J.9&969B 3R;I3T."3E;I7EN 7YSN3A[X3E3H+E3R. ."/B.86"B 3R
O2.WZ3IWL7N2"3ESN"M2JBZ

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