File PIP10.SV (save files (Executable program)

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

?>2CBPPCH[!H[DK,;LAHJHZ8A[LZHLL(KLZH>LA$OH?( 0JDC(8$2HR(AAD2LOH9HI?+,OA[S(AD
LRH$HCP.<L7XCDK(5D[,N/CS(AD*MU<5/<>LH?PH2 CHHR WH<AVX RB"B"BBZ	?D>ARH2C.HR=S^*=K]> +[JE9K><PZE<XS]9:8J8JK=Z%2B&FX*8J	K>Z	J%C<9DJ%C<8 [^JSZ=J&ZG*QS]?*);X+[<B+
+KJSZ=NGC;9J8JJ%8J8JRG+U2AO:2I? +	NGC;Z%RGNGC9K8<(+[K7RP2C.PA??2AO:2I?(+TNGRG+ZJSZ=S^+$IX$	/S?:-4I\$	I%$	/0BZ=&C?$<>HIDBK?ZFO>	=C*N[U	<R2C.O>C;>(*LO>C:
>*AZ,KU<(R,JFZ.J,9F8F8FC:KU[UKU9PJG>0.W2B&V(.WRW.W2AO92I? +C	8C7K;> K6	5+X	5+X	5+X	8?HK4K3G2> +AO2K1<(+QK0"W+XO>	=D>A<HR22C.2H)<(+9?H+7H:IX$(HWHHX> K?%WH\HM >(+2H7%W HHUB?AT$BZG8UC$O?0T[B>>A<B*;*3J9F8FC?O
J9J8J8HC?OA
AJ2ZASASB*=K>	=*>"[*=K<8![BK;[AJ2ZA.[Z2LK:Z>2AO9? *0JC8Z2IRA*A2AO92I? +OKA[SAJ
AR$2C.$O7C6K5Z[N[/CSAJ*PHKXMI[Z
LJZ2LK[%J2\MK%\LR
+W2A/EX/	;LI9!HP> +7LI9!HQ> +7LI9!HR?/O>C?$2C(HRW(H<$Z>6%SYSTEMDSK ?;<>EC?KZPBI$G]DB0?XL(?<BMHZBI=3=?B >XXAXB<(A((BC?6>??0GA?OC
B$BJBMAC^B<H"!?CDB*DB?/?"UQ"U "U&"U-"U$	"U6"U?"U$J"U$R"U$
:2ANUXHK>X "^/=LHXSHS8J8J8J")HS")*
A?<(.^XTHTC<>(K;I>HTK:<(K9K8":.)XTHT$ HTK7> .:K6*;0&0!+F:/DX(X,K5X);&X+X*+UX(P*H(L)=+S:P)H*< +"H,< $ +%K4$ ;XP++QH(K4$ /JH I8> /*%<++;XX I7B0XBJ=3C
>.<!A \HCD\B2AJA9P	?NAZ<J	>K=YJ7<K<^98F8D:PI><PI=74	;=H*O718F8F>XJJ;8 NA8 > *S>X*T: J<^9K:7<IJ74K^:79*/7:?H/9I>74	>RA.A?-?,2AJ=9	?N=Z<J=ZAJ8K8*KRA	7NAZ;>XK:KXZ\J\Z$>PJIZ6>PK6K)Z]>XSJ8A<P8!NA=H:]JJ;9= 91J:J8JK:76HP74/J;(QLHXQ%!1$G$XBCH07D;(FHGAO?Z!K>O?Z"K=
2IN!"	Z$N""	^!J$^"R!: J"Z"R*Q2A.HZ%J%8F8FC<Z&J%8J8HC;J&Z&J%C;9F8DJ&Z&J%C<9J8JJ&8 .	[8H[]	:K9> /AO[^S$O:DK8K][]	7II?HK6K5[AO]JMJ[
	A/4S/HP9F8FK3YJMJ9!/$-, 4HWA,%6/.FBC2D$1AH?>0G8G=E?D<I<%;X-I:XO0Y*FI>0\XS0ZI9XHLH<(*VHS>(,HPH*N(HS\OHOK?> *FI/>I\O\O.=+*==3*
<A+T<C+P<B+P=%+P>*F=1*F<!*:=6+1==*=(I8*XI7%;HSI6%;ILH> *A0!+F/=I5XS(I4%;/II3XS(* HOK<>(+$K;P-%;: X-HOXTLT%;: HO*EP-+BK;+AP-+-K;%;X-HS%;/(I\OI:XOI<%;LO<(+!+6C\^A>EBS]: NR=H*K"TK?ZJ2I<B: .J J	J*J6J:KCKHZJK>XQJJK==H.TPQPQPQ*YLQ8F8F8FA22A.LQ8J*$LQA19F8DZJPQLQ
F8FA0JJ*$PQLQ8J*(PQLQA09DZJPQ;XDQ*2PQPQLQ8D*!PQPQLQ8H*$	</MSM[0:A[WK;[1"8!K0> +!KW[
	:SWS1+V2I\H\H\HHHI?XH\H\H\H2A/MH7< %WI\$(X7/ZH\L6?!?98.T: NR	?K>ZKNRA22I<BLTL^LL6L=MNMW9J8J8JZKLQA/JK\Q2A.9FZKLQC=*ZZKJK9H9H9HZSLQC<JS\QPQJKA.9J8JZKLQC;*Z9F8FZKPQLQC:*ZZKJK9HZSPQLQA-JS\QPQ:ABK9JZK;(DQ*Z9F8F8FZKPQPQLQC9*Z9DZKPQPQLQA,*Z2AO89DO8K7[+2I;$G+IM
+/^X/^W"5IR$(I\$(H09!H/7?NQ ?8OG??<>C.SJTJ>=H*YI+=*YK?ZJ	>> *!JJZP	=J>?K<K;Z>JP.:J>?K:ZJJ>8!*"J>?;$8 Z>I+Z=JJZ+	>>(*;R=<H/9J+J>=H*YI+=*YK?Z+**J+*NIG9J8JA.L"\"P"IGA09J8J8H/8CJCACNCFCECBCMCACRCACPCRCMCACYCJCUCNCJCUCLCACUCGCSCECPCOCCCTCNCOCVCDCECCBBBBBBBBQWB
IA?<HLJIBYGH$< *MIGA/YGHZK?ZL2I?*HIGA**GPWQZQ(N?Q0M)A/K>> +A2AH^	=ZL2IJLA,9J8J8J](JLA?9F8F8FM	]	H[XPH^Z4	<(2I](M	A?]	JLX^M)A&])K;X"U)H$<(+S?+Q\"P"\"P"IG\"P"2A.P"IG+WIG9F8F8D\"PZ+NH$> +PIG9H9HL"\"P"IGA19J8H+WH$> +7IG9F8DL"+WIG9DL"\"P"XZ+NP"IG+3(A(CDAN>A.RH
K?ZE2IRKSQS
S&S2H%> *+H]<(*9ZVH\XP	>X2IM%A/X%M$8J8J8JA?X]MA?9F8F8FH]X]K=X!*K: H%X%H$<(*;?+9P!P!L!P!A*R2A.H> +I;VH!ZENE9H>P+IP!P!P!*KL!8J8J8HPYA/I>*8H$> +9L!A29FZEP!L!9F8DA1JE+MH$> +7L!8H8J+ML!A.9F8FZEP!L!8F8F8DA0+]XYL!P!8H+NXY<HPYL!P!*8XCD=.FH$?H*IHZ>(*I	?*DH[XPH^ZO	
(K=	<8H	XHI"XI2ILI\HLI\HLI\HHHI?XHLI\HLI\HH&\H	;	>8A$.K:	9/8
7HHX	: 
6K5	4X^2IM"X[H^A09J8J8H])H^9J8JA?]	](XZK3X"2A.,	9/L[$K2[UK1[Z	08!K$>(+(: KU=H+%I+=/LK/[U+T:K.+SKU2ASL/L+0: :AIBJ: A(CNA$N>NQBE!O?M^KM>DAP<(.XSHS8J8HA2K?Z+HSA.K>Z*J*9DJ*9FZ*HS8F8F8DA0K?J*Z*J*9DJ*XTHT9FHT9DJ*J+Z*8DYMJ*.<XK=Z*8DYKK<[-J*?*<S-J*K;Z**4[.J*K:=H+
S.Z**=:R*K.K9=H+MS-[.+F:J*K8?+TK7$ J*	6K5$ K.K.K.K4[/O/$ S/O/$ S/O/$ K5$ IK> K3K-	6.,/XK<-HKOLB-CJB0?6?4?!:LADF??0X>\?6X(JC
?K>/=M"A0> /<M"XPK;XHK:XR\HPR*TK9
8K7
6K5
4: 
3	28A$2I.IM"A0< *3M"XPI"2A	1/0	28A$.$2K	/.$/0*=%3HYXXH[/:HYXXH[%+XL-(%%X2HR?H,]H K9<(+QK8>(/7;X*V%<P2+ HWX]%HPXLHQXMHRXNH]XO*IHW8!H]>(+W%")$*I^^.,]^$^5^5^	PHBMKMDA;8;7G?8*A88=8:7?BKCLB CJXYX%2I: 
?
>K=ZWLO<(*>X\LOX]2AH\A0<(*	2J%>A/<2IJW
;H]
:H\A-< I09Z8J
9K8*<H\XPH]Z-	7X2IM%8F8F8DA0X]M$A?9F8FH]X]K6X
R2A.2K	5<HS/2J	4/3/FHTH%9DH K2X%<%E+AHX]H[K1XLX,%&+S%<HW+VP
L
I
>(++L
X]%<+W%"): X /9+PY(=PBCT$PPRD=[PEP	PFBG6AQ]Q^2IYMO?2A	>X&K=
<2A	;2IO:C99DX$O8C7XO:C6> /5M"> *]O4>(*H/3;ZG2> 	1K0[TM"A0< +PM"XP	/8A$2IKT
.O:C7> 	-2IK,XOLO>(*HK,XOM"A02A> +K	+K*X > /)	(+W$
+C$ +G2K		/3K&+B2A2J%>A/%*,2IM"A02A> +
	$*H2K	/)*HR2TBG[FRZBCPT,>NX$RVD=:AXI>%BQ>O^AAD>$PH>*?&\AV>6K?ZOK?Z\K>ZNM"< *U2A2J%>ATTY/=2IJN]"M"A0<(/<2A2J%>A/;2KJ\
:	9/=K8X 2IO7XP2AHP<(/6A0> /5	48A$K3XHK2XR\HPR*6K1[
:AZ>	0K/[ W R>S
*=	.O/	-K,XH	+	.K*[
K)XNK(YL2ILN<(/		&LN	&LN	&2AK%$ /$+([-P" B. / %8B;8?*B^DXC ("J6?? !?D=BK\H>O[FRRVBGBOBQY:A2IHNI?XMLM"/LMA,"/:AG?>(*["/2AO>K=Z.N.	<"/ML8H:LM2A	;2A"(2AILK:YLW>/9"(/8PNPN*]I5$ I4$ .(2AXSHS8J8J8J";HS";2I./A?I!$ .;[3K7XHK6XR2IK3XJLH8!LJ> +.LH8!LJ> +/LH8!LJ> +0
HI?XILI8!LJ> +0LIA,8!LJ> +0;&HHXHHRK5S2A/PHPHPR+G+,+EW?*;8]

RCV,XC"W

> FREE BLOCKS   PIP10  3A

PIP10 CANNOT BE CHAINED TO

I/O ERROR

DEVICE FULL

NO SUCH DEVICE

NOT PDP-10 FILE

ERROR DELETING FILE

NOT OS8 FILE

OUTPUT FILE OPEN ERROR

SYNTAX ERROR

FILE NOT FOUND
HP9F8DC?K>[H8HYIK=[FOF<(.1[GOGC?OH
GSF*<78707(7 2N2\2 2	2(2,20233D3H3J3S3]3	4H4J4R4[5I5K5O5Q1G1I1O1R1T1!1*1,XZ/!/*& S^S^SSW/>GIS?&>NV;H7IKJJ\%M%IGLOK?<(*AK><(*MK=<(*PK<.LO"W*ALOK;<(*AK:"W*P<(/9XXK8XW"3/9<XK7K6PW=*!XV9P8DPV*	XV2IHV8 DWHV\W2A.WHXK59K4<X*>K39PK7<PR3.3K2XWK1XV;XLWA,9D< 8HXULWK
A?K/< K0HU\WPWPV+E/+!: L>(+U: L\LK+X%K6\%K+8!H%K7.*QS[6K+Z*?  ?;0?UJ=F?4Z>"BSB)=WB(G?1= X8X9: X7X0X1X2X3X4: X6K?XQXR	>XXHX<(+FK=<(*:K<<(*2K;XX	:+E:HXA?PR*	LQ\QPQ*O9F8F8F\Q: XRHQK9> *O*NH0> P6/8X3X4K7*MP7/8P6/8H0<(/8X8H1X9*E:X5H4A,X4P6.X3X4.: HHXHHHK:?H+\H
H: HHXH/MK9-H))H K89K7>PS^/^B
%E/&%	/&S&/&)+H K69K5>PS-/-Z<%3BS?K&3B.L=F&0I XHK?XR2I\HPR*F2A2J%>KX:X;X<X=X>X?YYAYBYC	>I:XOLO<(++K=> *[I:XOIEX.IFX/	<HXK;> +A	:K9<(*?K8=H/7XSH59FH58DHSX5HSK6? /7*,	:<HHXK=> /7	5K4XNIEX.IFX/HOYD	:>(.IDXO	<P7+ZH.X8H/X9H8X.H9X/QCICK3?/7	2HX<(.K1>(+S/7I:XO+F
83I\=T.?6>N,?7BS-<&<%(=DH?YP7*JH0>(.H.X8H/X9K?ZWI XNH8ZUH9ZV2J%>J/>JV	=> *,K?ZJV2J%>A/>JC	<*,	;HP*5X4H5K:?HH59F8FA-JV2I\NH0\NH1\NH2\NH3\NH4\N2A.9PK9< K8C89Z8JXPIHC7>(/C9HPC6HP<XK5XP	4/C[	+]H \J: X^%<H ?+V%]-?H)*ED!%4H IG>(/	H ?S	/	E
S1/1$1H8HGA9<	0/RBG:AK?ZLH8ZJH9ZK2J%>A/>JKR> *6JL	=	<*6	;H:8!HP>(*$H0>(*3	:8A$HPX:K9XRK8XHK7XILH2I\I2APR**K7	6/5Z?HP+JK4Z?H0>(+PJK2J%>B0/5KK3=H:9F8FA-JK2I\NJ?\N2A.Z?+IK2XS2ILS2AYHIHC1K0< K//RX RB"B"BBZX=8G8?/D0BIULUI/?;D=	0-CBG:A"G<(*O?R.HP9F8FK?XWLW.G: \
IHC>> +EK=
<K>7<8F8D>XK;HPK:76"7=H*Y:K=
<K9
8K7747;**?H*OI>74O8> .:A\WR.7;>H.70Y*8I>0\K6> *8I>74-";ZII7<:7>C5> +EIIK47<))79+R7>A?K3> +R[.)S.A?K2> +ZO17<:K.K0> .9V*47;+*7>/)9730?W?*HA==X?,:BH<?-	?H;;*HH;PJDZ8H[02LK+[)N7=9J>X8AK/[-RN[.RNZDR2C7?9DCG[37?C<K+[?;&[6K07<7>C5> +%7?
1K-
47?9H+A7:> + K3KG<(+$[3RDK-8!K.[.9P:ZJCK07<	,	,>79+H7>9FB!K[<(+]K2> +H7?<XK=8 JD8 <(+8>8+H7>9F+A;S6+A+&R9PK07<:X<B.2C5N:5.?054A?=>>X+AK09D8CK.<B2B[38H[67>7<K4[279*H7>BK/> *HK.?*/7>B99P> /,: GK0K67<: G: [1O3GS3?S2* K.9J>XG GGG/-NNNBJP[1NS
3S3CS2*5K.9J>P+BNSNBPS /-S7;+I7=:/G7;+O7?/N8 [5K5C18!9DK5K1[1K58 /S:K18 9F8F8FS;PK1BP/ 3&23?&L*M6IOI3Z> 3U7JP*M

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