File XPIP8.SV (save files (Executable program)

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

?>2KX0CPSH H8LL;<
LO$?FX88<FH?,&HR8T%LHHA<.,H:,ZDJ(2D*I/P:LZ<H%0E->H,$/ ;B"B"BBZLX$KRL0.L?H?LI K[0&HR <H/\]HDL0DBHLLC07L XKL9 ZJDZP0RHR,ZDP RDS4ST/D]6<L?X0DA(B=L&D?UHAD<>AR>DK()LR<KLZHMIDNLC0>H(T*	=A<8BLA4	L8CAD*,[L*0
D	H;,2.8LA(CH>((DNDC8>A<*H;(XLY0W*YD[2<IH<>+,FH* <S(ARL[LK$AFX88LF<: []PSK?XR2LJ&ZJ<B.A>2LJ&[[2ASBS]+BHS>(*Z]+AJA9K><PZA<XPS9:8J8JK=Z)2C2I	&P	<PJ+K>Z+J)BM9DJ)BM8 []JT[BJ*ZJ*QPS?*.;X+[<B+T+PJT[BNJB9J8JJ)8J8JRJ+UNJBZ)RJNJC;K:<(*XK9RL.L??2IK8[&LR<(/]	HA<BLRC
< K69Z8JZAPRLRZ+PRXSS]/]O?06ABZ=&C?UPHAD>O>K)ZRK?ZM2INAC><(*%	=A<BNA	=C>A*[[*
<	;R2K.NAC:>(*NAC>^A*O;X*YW<*Y[A2IO<> +FK*<(SAJR[CKA9F8F8FC>K*[*K*9PJS>0.	2C2I&M	9BR	.	2IO<> +,	8C7K:> K6	5+-	5+-	5+-	8?HK4K3G2> +VO2K1<(+&K0"	+-NA	=D>A<HSH2K/H9 HT:?ATIBZG8T<UP?0TT;BO:AK?8!Z:K>Z8J9ZT.C=Z62LK<Z4J;> *32ART<B*1*.J69F8FC;N7^7J69J8J8HC;N8^8J9
TR8R:*3K:	9*4"*3J8Z7R8J6^8RI<B.I*T2LK<[F2IO8C7K6Z6N6<B.<0\K5>(0Y/H2C/8[HHV> /4KH?HO3C2> /POPKP[PKH/PXWO8> /1[(	0J-T<BK(
8/1JC	1B  >.%==?/O>R	(<2CC?H	?	>",O=> /<O;ZLO!	:D>A/9/<	8K7	6FREEBLOCKS	5	5PS: 
4.OJ
Z,H\
3HT[SH[[EHX
;XS*4	3	4.,O2[SO1[EO39K0<P
3<XPS9:8J8JK3[C	/2B	S	.MKEK0[E;XKC	-/9HS> *.*4PS?H+!K,XQ2ALQ> +$; HQ<X+X>	+D2IHQ9XC!K:+M 11\3?R	UPUHHP+Q&PAQ]!
 (?:!BX?BS*XT;[!
;	?XVJ4
>O=C<> /;O:8F>X	9O8C7> 	6O8C5< /4O3>(*O:?H/2O88FC<> /1>X/0O=C/[YKY>(	.	-[J	,	+/*HQ\H\H	)K(XHLH<(*9		*?*3KJ>(/*	&*?*?+C	%B	%?H	%DSJ*/XP	$?H/KHQK>(8AK"\HPP+P/K?H+F*< S H(A)=0;C?=4T<1\SHTI6UHZPA]R[!
P$AV4>OU CA\D>\\>%* >$QW0K?XH\H[ 	>/=C<<(*DK;<(*DK:XQHQK99K8<P*]JWZV<B.XZ	X-Z7[G[O:HQ\HS HHK7?H*D	6AO5>(*2K4\HS K C3> ***!HQ\H: 	2*!O5> +HQ\HK1	2/0K1K/XPK.\HPP+B/0O5> *?HQ\HK-	2/0O,8F?+]HHXPLPK+> +]: HHXH+SHQ\H*!	*?/!	6E=0; P R= >?7BJ?;X/?<YKGB YY1\G)E=2C
>AA?YEPL5?K?ZR;&XQK>ZLNR<(.	=A<BNRRR	=D	<CJRJQZRPQ*E.	;9F<X+H8JC:9J8HK9XPLP<(.\XPK>Z0O?	=A<BJ0K8>(	7O6?HK5K4[ HPK [%O3<(8A8![2B&0"H]
A	<BXG.\0&0!+N:/L	;C:K2> /RK?XP	1/0PP+Z/R??2A2A2A2A2AX?TI?0>&G1>%
]A9^G8T<1\B:A>MP0 PA>A<A:A8A4
4
O?C>> /XQK=XPLP<(+TC>9!HQXQ>X/PPPP+HHQO?
?/0X>\?6??K<	;0Y+ 	:0^K9>(PVHV9DK8	;HV>(/7K6/]NOYES2A1X
0<	UH&/V>O?0>	?K>XQK=XPO=<(	<
=LP<(* C;\PLPK:Z(;VHPXRN(?	9FPPLP\Q:A\PPPPQ*IK>XQ
O8	7
	6/5<(8 Z7N(8J8J8J"8N("8R(R7*,.(C4< K3=HK2K1		/0.8Z(XPK/[
Z8O
<(/B9J(<P+RZ(R8+H:J8HP<(+]K."8;XXPS
+G"8+[K-		/0K,		/0/
TIK%AJZ	BJBMB0
XX?B A? ?"PA&">61\?/O&?>O6A[!	?/>:XVK=XH2ALHXXHX9K<>P	;ILHXULHXYPHLHXZ2ALH<(+UZ4LHZ5LHZ6LHZ=LHX[HZ8 HHXHLH<(+J8!XT2ILQ9!HU>P+I;&	:J=>(K9K8	7	:HWC<> +HHT	6HZ> H[	5	4HTHUXUPX*VHY>(+*HHC3K2*ELH8!XT2IHTHVXVHWC1>(+IK0	:<EMPTY>	7HT	6+HPQHV	/*D6VO?<BC?<!
&"!B 8.?2 (1\AO?YZPLC0	?	>	=	<"&	;+L<(*FKD> *F	;+LKD<(*MJUXQHQBK:<(*3K9C8> *F: "&PKD> *
: "&*F=	7?HK6K8XPJU	5/4PP*-.&K3
2: "&HQ8J8JC1K0XPLP= +[<(+HXPP>PP+C*7P	5/4*"&	//4/.HQ	5/4	;+YXQHQ/P	-G9H> 	-HP96HQ9T+J
GPAV	IJ
GOHG%J
1\XSH	IOQW<HX?TI8T<?A = PLPA]R[!
XPLP8J8J8J"KLP"KPP*BC?<(*]K><(*W=HK=K<	;.KK:	;HRK99H*UK8	;K7	;.<(."ZW6	5J9F8F8DC4	3K2	5J8J8HC1	3K2	5JC0K/	3: O6
6."[D	.J/S<BKD.??>?>B?8?>?>?>BB?>BBBBA((L	$(X("(,(8)H)W)%)2OUTPUT ERRORCI;LWBAFG
/!BO 8!VBJBMCQB]LB
A?!?NO ROOM FOR OUTPUT FILELINE TOO LONG IN FILE
ERROR DELETING FILEINPUT ERROR, FILE
CAN	T OPEN OUTPUT FILEDEVICE
 NOT A DIRECTORY DEVICEPREMATURE END OF FILE, FILE
ILLEGAL BINARY INPUT, FILE
BAD DIRECTORY ON DEVICE
DIRECTORY ERRORK=,/)QDH D!	?;
>
=
<
;	:	9/8K7ZPO6<(/8	5A<BO4C3K2XPLP?	1F	09J8HC/K.XPLPXYO-<(8A8!XWJPXUHU
,O+XTJ42A
6K*
)K(
	2K	;2B$TLA/&2B	%,W/&:A
$
;2B$UBXA/&2AO2IXXHT8!HU>(8AXZ: 
"
!/ C*BTICGK6RO-N.!:XA:B>G.V>B.(>A.BQ&RM>&^?T<1\?/O>OB>:AXQ]PA.;>QRRRS
]K?ZG	>2B	=BH:/<
>O;X[K:XILI<(+$\HHH[&;&HWXPLI\HPP*WO:8!HWHIXILI<(+ X\H\9!HXHY>X+^H\\H: O9
9H[8!HX>(HZ>(	8H\8!HXXXH\8!H[X[HH8!HWHWK7?+XW6O68A
5O5K4?/3	2K1XH
0\HHX\H\H\HHW\HVF*NO/<(/.*K-	,: K&XH+XLI*;
0HUK3I$[]&/].:BT;5?.Y.T?96B.!95V
6:D:A.U>G.;V\HHYHX<(*I\H: O?
?O?> *P;X"Y
><HR!"Y"2/=
>"Y"2	<JK;Z
";2B$U6*VZ;.YK:	9/80ZHZ>(*RK7	9J;> .;/6K52A
4K3
2
12I.2.;SORRY - NO INTERRUPTIONSI-O ERROR - CONTINUINGARE YOU SURE?NO ROOM - CONTINUING&ZA/0Z%?*? %?>B>A(>"G,5.=UZ&/J"H1\X6B6	?E*;K>G=>(*QK<[XK;[[
XSXS[*M	:	9K8[XK7[ZK6[[
ZSZS[*YK7[ZK5[[K4Z*OX[YKY<(+H	?A:<BZ6SXOX>(*=KXZ6KY	?B>E/3J78F8FC2KY
ZJ6SZ
ZSZK1KX[XS[*!K0[XK7[YK6[[OY
XSXSYS[+N
X
8	9.:2IO\K/XPLP	./-BYL66AE[BCOHQWE[X&	Y>OD?03G:?;?68>E2K2(?83%>$ABZE	?JLTA0+AJEK>.	?K;K=ZVK<ZW	?ALTA00<BK;Z>K:Z?K9[N?ZJ>^R>R?S*
.KK:Z>[O8C79FZ?J?<(.(9DZ?<P*;KK="^>SR>*0KK6[K5	4/3K2	4/3FILE DOES NOT EXISTUNIT DOES NOT EXIST FOR OPTION 0D)J8QEEPD)3JX&3T 0O<>%?83%"H0A0>&BO?C>K=
?	<<H*S>(/;O:> /9Z<K8[NO72C	6*^O?	5D>A2/4O38A[NO3Z<O7[$K2Z%O1	5A6A<BO0Z6J6<(K8[HO0< K/< <B2B&%B<B2B	$B<BK.[K-[LK,[F2B&%<B2B	$<BKNK+[NKHK+[HK<(/;K*[K?+D[K)
LK5+CJ9("CK"?8HP01?N>P>O6ARRYCB(.RMG[%>AXRL O>B6A0L<	H(E;K\>H= >*,QD< [DK,;D[ 
DSLX[4*H	\:L9 K[,XD7([DK,6D[(
DSLZD[$*DK,7LZTK[,[H4(ZDO,XDY$KH<,(LH<	L(AH<DZL6DX OH>((D= KZ,6LY<	L8BE/(37X88LFD2$K
(ZD6(SD
LZLZDKDK,XDX,S*,!D0 [DK,7LYXK[<[DY 
DSLXDY,SD+<NLX 
H	89L(T:P:C^NR/K?
>H	? *"/I9L<(*Z	=;(M	=;(N	=HO8!HW<(*"Z2K4$&J2	<I\$&.JC&00^H>&0.1!7A=I^$&.+,*,3$ZK;XJK:XKIQX I.\J\KP *9XL.2$*	9/I)ZHS8!N=+^[ HWA,N%+NH=ZM!%&]!NXY%3PWRS +ULH]!:/$*K [I.8!M)=+^[ M)K8ZM)%++R&WZ2J2%-8D"+J2"+//PO%&O=O]KI"1$ -,	 JHRDRDRDRDRDRDRDRDJD8!K?[BKBJFZWZ
;ZJWZ]K>;XFGKB[BNGC=K<[HNG9J8J8JC;8!ZNG?HK:K9ZA2LJ<[RGNGZDRGNG9D[D2CRGJD[I	8	7	6+&NC&A>> +CKIK5[ISDRCRB+CKH[YJD[Z	4;KZK5[ZR+XRG	32CZD.G: +"XPLIXQLIXRLIXZ2A/$??((.2B*($,2
2A8RDGO?ZMO>ZXJX
=O<ZLK;ZY	:2A^YRYJMK9ZMRX*KK;
8.Z8J88 Z8J8C7K6Z9N9Z:J89J8JC7K5Z9N9J:Z:J89F8F8DC7K4Z9N9J:.Z"<[AN<1!N0BR<.<[!K!C7K3Z9N9Z:K!9J8JC7K2Z9N9J:Z:K!9F8F8DC7K1Z9N9J:8 /EHW9P%R/]!CHWA>>(/&%*< S&/&& WJ&0		P&&P& O"CB.	 H"B""DAHIAAAAHAIHHAHHHIIIAIHIIBPRBBBBPBRPPBPPPRRRBRPRRD $DDDD D$  D   $$$D$ $$D
 DBBD""DHL H LBHBL"H"L B"PP PBP"AA ABA"QQ QBQ"DPDPADAQDQHLHPLPHALAHQLQKR	1&	1+F2ANC2I/&0!+,0&:/+"(K?1);WF8HZ=J=K>1!AB;AF8F8F8DK=1*;K<1*;1,8J<P*AC;8 F?H*AJ=1!AB;R.;X1*;.(Z-&-BA<BO:K9> *;2K..2K/8)0*LEYH-	<HP\IHQ\IHR\IHZ\I2A/!TX : HHXHHHK;?H/:H \H: HHXH/MZ&H
IB=H+K9? S\:/\B^%C/&%/&S&/&Z$H]K8=H+4K7? S-:/-?	["?HA ABF (N	?8![MN[NRK>1)1,C=> *	;K<1*;1!DL:SCBKM< *]QR.8!KM8!	;=H*N8!KN?*N;K:1*;KNK9?H*=1!DL:0CB	;K88!KN<(*N?H*	*N1!DL:>CB	;> *	K7[O[PSP+HSO+H*N1!D/;SB00K<1*;/Q1!D/;^CB[QK<1*;KQ/\1!D/;*B1,;00K61*;/(<(BW?8C
<CF$ZBVD(%E;NZQR	?	?NZ+RNZ,	?	>C=Z/	>2A^+N+2AR+"-R,*P	>"-	>C<"-J/	;Z/J/9J8J8J"-J/8 C:R.	9Z/.-Z/1)N2[J	?R2N2[[R2N2[ZR21!D/=D/=E=BBK81*;	72AO[2A	7S[SZ+J	7J/	7	?	?K61*;.2%<H]?+S%]-?H	?(-?*HD%6H]IF>(/&H]?S&/&S0/00X>\?6BV+(W$<?$Z3LL3+\+Q
?K>Z-NZ0RNZ."/N.2AZ,J,8 	=J,&+"/^.2AR.R-*IO?8J8J8J	=K<Z+O?8C;
?O?9F8F8FO?&+R.%E2A./K:Z+J2Z*ABZ$Z?%E,->,/

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