File MCPIP.SV (save files (Executable program)

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

?>2KP0CPKH(KDIP.D(5D2DJ<5L+TJ
(*H5$
DJ<5L(TJL
H	HIX.D(&D2DJ<&H&XJ
(%H&P
DJ<&HXJL
H"LIT.M4"H[47L3D/HEX/L=\ZH.L5H1<FL%L^H^8;H0 L=4\D
05L5"50CL0DOHGP/HB8,D[ ..YX,X*PD<( LY<OZ8L8KDZHRNDZHSL4OD8(!T$2H2XBYH<L<0BB <LRHC.*F*I;XG?> +U	>E*K=ZZ: 
<	;2A
:: 
92IO8
7O6<(+P	>APA/5O4C3> /2;ZG1O0>(*,K6	//.O6	-/,/+K0[JZ
*K)[OK(
	O&8F>P*=O%> *=K$
%O6	>C>A/
"K
!	 2C	
	N2C	
	O+GVZ;ZG1>(/^/22C/][6+[XS6O0<(>E \9XZ
T2W^BN>D>V&T-ZZ(R:RV A
G^%>A>%RSH>$YP>YI>69\-F
X]DPAB>"ZO?C><(.ARA8F8D<X*OR8D*J>JK=.A"A/<*XO;	:2A
92I	8O7C6> +];ZG?> +
NO8J8JC5[W	4K3
2K1
0O78F>X:A2C
/: 
.: 
-
,/+O;2A
92I	*O;B*\BO[!O)C(> 8AK	[$2AK"9H<XK<PO!C6K$
!2I/B8A8A[W/X2C/&2C/%B<+DBH>$"T;G6.3-3,3+V&]"QO! TZC?D>"9\^LPZ \0O<>%O?C>K=>("PO<
;O:
<O9
:K8
92B.O7>(.P: 
6K5
?2B/4;(G3[MO29K1>X/0O2<(K/2A
.O.8!
-2I.Z	,O+	/D>A*5/*	)?CLOSE ERROR	)?OUTPUT DEVICE FULL	)?OUT=IND INPUTOL[F/FOM	OON/F0"-.N**********?=?>4
<M\PB>Z3!3
B^7?>&>")XZ6)YB. F G I H?VA? K?Z%K>ZVO=C<K;XPLPC:> *7LP?*TO9K?? "	2B&4PH&*5JXJ%ZXO9J%
9J%K8> *-.HT-O98!Z%J%<(.&9J8J8JK7ZV.	?+H	6?INPUT ERROR	6?TOO MANY FILESK5[]: K][]O]>(+JK]K4<(+[K39F8F8DC<Z%*-:A+Y	6?ENTER ERRORC?ZA>\H?:YHH?/O>ELHF[IO?>(+KO>> /=K?	</;K:Z*K9ZRO?	8ATA+PO7C6> /5O:>(*
O?	4/3/2:AG7> *[K1
0JR
/O?	8B*=J*
.J+[HO-<(*;HO[JOJ<(*;[I.O,*9:O+> +XO78F>P+XK*
+*A:AG7>(/)/5	(?FETCH ERROR	(?FILE NOT FOUND FOUND161718\!WBN>I>6LDVXV4QNV[SZ- AZ*H>BTA>F
G^%V?>J>EO?<(.Z)O>C=K<XP;ZDP> /;J)9J8J8JK:Z]O9>(*[O8J)O9? /72B&(0H&/;J
J)Z
O8J)
8.	6/5*/O4	32A
22I	12AO08!O2>(//: 
.
-:A
,2IK+
*O)8F:D2A
(2I		O)C&2A
%2I:AG)2C> /$/O42A
22I	"O4	!*32A
02I	"*?JKSB"T9C5V)YATZ6/>QN!$616.6UH9\"9]^LXR!WRAT=T2QA H]Z?/O>V%:2I[XRN8J8J8J"NN"NR*EC?<(*)K>C?K>[Y0Y*&K=0\K<<(+EK;> *&K:GK9GRSXKYG.NRO8>(*0
8R.2AO72I?H/6KD> /62AO52I>(/62CO7XP: 
7HP/4??2C/P[YKX> /GKY0&0!+N>/GK3GK2G/R"?OUTPUT ERROR2C	12C/0[1O1K
1S$S2+$K
ZC<B4C2BJBM4I-FPB9\ COC^?4==BB ?	??RECORD SIZE TOO BIG8AXP;VP8HZ$HPC>XP2APPLPC=K<> *WLP2IC;9JJ$K:.LXHLHK9<(+PK8"5LH"5LH"5LH"5R%.%[WKW9J8J8J"?KW"?.5C7K6<(+GK5> .?	??ILLEGAL * OR ?PHPHLHK9> +G.%O4C3> 	2O4C1< +	O0C/> +	8/X
.:A
-+%C^CCS"SB>D OD>$?+?V?*V0XI?>\C?K>XPLPC=K<<(*NK;> RARA.A: Z	:OS/8 MCPIP V2 .OO9>(/8:AG7> +A	:?NO OUTPUT FILE	:?CANNOT HANDLE VARIABLE-LENGTH RECORDSK6[F	5JTTY+LKF
4/3	:?TTY DOES NOT EXIST	:?NO INPUT FILE2C	2/ 2C	1/$K=IU]GK;H7LY=JK;4M2PU>BY>PB>E\8=HG8?/OK?"&K>"52AK=
<O;
:K9
8O7
6K5
4O3
22I.K1"&K0"52AK/
<O.
:K-
8
6K,
4
22I.TZ52AJ5
+J5
*J5
)J5
(J5
	2I.&Z&2AJ&
&J&
%J&
$J&
J&
"2I.5K)G!
W+	C^0"K	8 A+%"TH+YF<<X+Y%< +VIP=Q+SF<=[7-3/1E/&=Z7.51F/%^3^;.0(=\=
5\5"05CL0O1G/$B,.[.X.YX,*< ZYO?ZNK>ZRRNZSRO=8!ZT2I2B&Y<B<B<B<HR2C.< ZYO<ZZNZRZ2IK;<(*3K:<(*2K;<(*4K;<(*5K:> <B;XK9K8K7K6Z92B&Y<B<B??<HRZ2C.Z*AEAMAPATAY   L      KDK(9X9KDK	8"KDGKH;<;KBHZ08J1BAA/-GJ1 F
??< A?0?8=
-EC=\Z%2LK?2AZ$NZ1RJ$^1J%<(*	8HC>Z%<XK=
<J%9F8DZ%K;Z&N&<(*	Z$N$C:J%^$R&*Z	9K8	7	6C5K4> .1W3.2J	2K1XHKY> +RK0\HO/\HO/C.< K-> K,K0[ZO+\HKZ\HPHPHKZ\HO*\HO)\HK(\HK	\HK&\H.2B//MK9-H[UH K89K7>PS^/^ZJM S R QBO? A? P  IT+A???]*)/
B*.?G+\/	AC2CZ&Z(NK?<(R(RK>Z	J&	=*TK<[VJ		;"2+WR<B.")C:<(* K9> *
J(>(: ".KA?*SKB*T7G[BKB.)[A7..7F:.2	8C77A<H.6K6>(/5KB.6	4>A[CO3	2/1+NSC	0//KC>(/."H:2K/-2A	,7E+X/V*0*9/!+Y*3,:**9Z8JZ?SAOAZVSAZ=5BPB9X=X093	09\8-U?0C<*)? (/
*V(BH?8[NC%J3Z/N8D:DZ\RN[/RK	?,ZJ/[J/[;&Z]"^/>R<B.?=J\K=
<K/[-KE8 J\[,J\[FJ\9F8FK;	:<BJ\> O-2A	9.^	8CC< +Q7F[.S,<H+GK.<B
-S-C</>BK7	:	9	<	8	9	<	6C5K4>(+VR]/3: 	2O1?*YO0*Z*6	8< +QS,<H+)<BS-8O-	9/>K7	:+L+B+A*.1H???=*)B0*6*2/
B+V-\+W(	?*P*G	>*P"W*P	& :*PO=
<RA.AC;K:> .W.Q	%X.W	%(*+O=
<	&H&"Q	% .WK9
<RW.WC8K7> .W*$*		% *?K9
<	& 1D*?	%H*?R1.1O6
<O5	& +NK4
3O68!
2/C$> /1:O5	%H:O02KK/9F8F8DC.
-/,K	7D:/
B,*,NDZHSV-V%O]?4?3	66A 9]9^?

= >C<-E3
090Z62IO?2AC>> *+J6	FH*-K=
<
;*S	F8*-W;	E: *-K:Z6N6>(*,K9Z7K8Z8N68!N7C7> *PR6R7R8*!RR:O6
<.B5> *-*,CL	5.9	E H%.9;$JZ*P,**S	4	3K2	1	0	/	.C-> /,	+/*LY%D <FL?0?L <AL0 ?H=4
EL+W,^-UC<*)+V*2/
B(5B*..W3
A??8:: .-E H>$K?Z(2IO><(*&2A9J8J8H8AC=9H8!Z)2IN("*2IN(C<XQR(N("*2IN(C<9J8JHQ8J8J"*R(R)*P2K.C;2A[.K+> 	:2IO98F2A>P*;K.KK>(/8K-BK,[-K.[,.*=H+K2A
 S S!/BM>/BK!K
>(/MK

7O6	/ X+"KW[ K
8![!/MX82KC5> /4/32K/22K/1????,"T5V7]ZT= 9\-E4>;C?<?>V%&K?	>*GO=	>O<	>	;O:	9/82K/7K6Z?K5[2I^?:AG4> K3K22A[AR?S*RK6Z?K1[	A2I^?	AXR	AXS2IHS8F8FC0N?^?R?HS8J8J8HC0HR^?R?S*"2KK/
..M6B0Y/BK-0\K,> /B	+O:?H*KO:ZM: 
:JM	9/8/-O*	H/):A
(+ 	8/)2K/	+ *"B"QG /N9]*.A=>V%F<46BQ>(&PB3).19\3M3.3,3BB?? 2AJ/> *!J1>(+NR<H	?NA"$"7NARA.B2AR<HSNAK><(*TK=<(K<RA.SZ/K;.BZ-J-C;>(J-J.Z..$A62BZ??2IO:2A8F>P.7NAK9> .7Z1K8Z0J.8J8J8JC7Z2J.C7Z3N0=H/6R0.BK5
4O\>(/6O3	- /2K\ZANA> K1K0Z	/NA>(/S	.8/2/S,*(2?>?-/N9]-E /Q?62>>BBZZ?&/: N[RK?[AK>[B2ISO2A8J8J8J"9
ASA2IO2A"9
ASASB*IK=
A2IO<2A8F>P.2IO<8D:O2A> .<X.;$KA[AK;
ASAK:
ASAK9
A.C8< K=C8K=.9">FK]	7/6+XO59J8J8HO4[^K^<(+
9K3>X+!2K/22K/12K/0B2K//2K/.	-2K/ CHECK DRIVE5B^ ,W^YXQG7?:+:*3	0?CNCICB> ?<:      O?K>>(/=
</K;
:	9>A	8O79F8F8DC6
5O7C4
32IO22A
1
0
/2IO.2A
-O,	+/*2K
)/(/(*QF]D9Z.A9\:TUM:M:L:ISW:KC?:JO3
<^83 X3+3A>3.O?	ZH+X2IO>2A>(*]	=>A	</;/:	Z8/:K9
8	[: +X	7+X	[ 1D+X/62IO52A<(*7[BK4[AKB8J8HC3EKB8F8F8DC2EKBC1K0E.^K/[BK4[AK9
ASASB*;.^[CK.[DKCK-=H+OSD+JK,[CKD
ASAKC
ASA/E2K/+*,2J/*2J/)? COMPUASVI?;$[$A]Z:?60?:AFGO
:NYI4I.W-E 9X3	08>A9\



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