File INDEX.SV (save files (Executable program)

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

?=2K)SAH(KH
Q!/>YNI\Y"M!> *YQ!M!I[Y[Q!*P;&Y*M!	=]"Q!Q"Q**[M!8F8F8FC<Y*Q!M!8J8J8JC;I*	=]"Q!Q"I! [O]"Q";GI!Y!M!]"Q"I[]"M!I[Y[Q!Q"Q"QNI!IE> *P [FY5Y6I52A
S<HA5I5<(/:8!IK> +  [AB2I(?/9 [AH2IA5;GYZI\YC/8IBYCI\	7YZIN8! [P/61Y*,1]*$272,*]*Y??9F9/H3DJ 7YJ 7OSU3IWN2 ;I7DE2 ;I2 	F+LCE3ISN+E;X+S;B*M>J*M>J3ISN/EKX2.3R6 WM+SCT+BCE3LGO3DSE2 ;I+TCO3FWI+LCD20J 3EGC3UWS6 SI2 ?C3NGT7ION6 OP*/B87D[E3IWC*M>J3H;A3DWL3RJ 3U[
7EOR*.B 3SWE2 GP+GCE22> 3F& 3NWD7XN.3BZ +OCR3LGO3D;I3G& 7NSS3ROU3T?I+N;S*M>J2M>J3PWD3FFI$GPH^ <B,F>>G2IJG2J%LI,)X)2LIJYC2C-EB2I2B,
D02I2B,$D=P%2I,%P)2I,)2I2B,1DL2I2B,6DA2I2B,;D[GE!6AB$BJBM>E?AC^C
BB44H!
T;5B8
U2A2J:A&ZBCT?	>HK^2I
V/WLIB12RLGPUF-LAKLB0 B>">&F;"?M/G	<%E[DDGD)=?<!I?+TCE.1F62MFJ7B	S7MN 3AWV.1F "6622JKA3S7Y2 GS/VKE. N1"5*M7AOB+YCM7S[A+EB3.1Z32MFJ7B	S7MN 3AWV.4F "3672JKA3S7Y2 GS/VWE. R1"0*M7AOB+YCM3I3F+ACG.1B52MFJ7B	S3MN /NKT. F "5662JKA3S7Y2 ;C+TB3. V1"7*M7AOB+YCM7PSN*
B .1B62MFJ7B	S7MB /NKT. F "6612JKA3S7Y2 ;P+TB3. Z1INDEX OVERFLOWFILE       DATE     OCTAL LENGTHOCTAL FREE BLOCKS<EMPTY>DELETION ERRORNOT FIELD 1DEVICE NOT SPECIFIEDCANNOT PIP ONTO INPUT DEVICE$EBB	?R$8 [AYMYZYK2LK>>(+ [AB2I(. [C8A2I
=KP8AYKNYAKOYBKRY\O< [AD2IAFYJ+?KYYAKZYBK]Y\>6B?882AO>C=K<
> [AE2IAMJQZK<B-/*R0\2,9$.K [FYKYLIK> *" [AB2I(4 [GYMYZ*E:AY& [AH2IAKYMYNIYCYOIBY!Y)K;Y*8AYXI!8!2IO:?+I!8!IAK9?H+& [CI2I+82IAX2I$2IO7Y+O6Y,IAY: IX> +UO5Y[2IO4YXI!YYI!8!2IO:?/3I\K28!I!?(/3 [AB2I( [G/1]!Q!]!+?-(?4,E$B$A$D$B?;)Q?:H7??&8Q!Q)I!YY+/M> *^]!QQ!M8
IOYO;&I!Y%M%> +X;$I!Y!: I)Y)M!8!+X;&Y-M	>]!QQ!Q-* M<(*9	>8J8J8JC=K<]!Q!MC=9F8F8F	>*=K;]!Q!K;]!Q!QI![K;GI!Y!I,> M [AD2IBBI,8!IYM< +YQI!K:Y!+^M8!]!QQ!Q)Q+/9I!YYIX>(+(Q*/8/7;$IYY"M">(+//6IM> /58AYM+?.B+-+&*4+X?7  .?9V8I)YP	>IQY)IDY!K=Y"M!<(*]YSI!YEI!ZZ [DJ2I
<2IA"2I/;2IBBK;*	YS [CK2I/<2IA"2I("8AI!Y!I!Z2 [CL2I/:2IA"2IBBQ!I"K9Y"Q)*I [CK2I/<2I/82IAF [CL2I/72I/82IAO [CK2I/62I/82I(Y [CK2I/<2I/52I(H [AM2I$E<(*BK4<(/3K2<(/1K0<(//8A<(/.8A+?+?0T0\E0R(0<ACQB2BC1?0CHIB17-8<(/>K=<(/<K;<(/:K9<(/8K=<(*W8A>(*U/7I	*U;$8A*YI	
 I&Y&/7IM>(/<IN>(/7/6IE<(/7Y!K5ICYCICY";&Y)M!	4]"Q!Q"Q)*.M!C39F8F8FYQ!M!8J8J8JC3I	4]"QNIEK2Y"IE8AY!M"]!]EQ";$IEYM!IOYOM> +"IYEQM!M]IY!	1	0M"> //Q"M"M!]!Q"	0IS+?M!+?2B2]2WI?9F?<*(.B2,J*RD*EH9$8>("W;EIEYEIY8!I"Y)I)8!IEYYI)>(/>M"]EQ"QEQ)*P/>: I&Y&2I.W: IPYP:
I&? **IPI	?HQ&82I.]IM>(/=IN<(/>8!YNIB"7+IY!INY);GIZ8!Y*MC]!QCQ!Q**?Q)*;2I.7K<Y)8AYX8AY[IX[2IO;YXO;>(/:I[8A
;/:Y! [CI2I392IA!2I$2IO8Y*
7;&O68!YWIAY!Y%IAYYMY+?+?$D$D$C$B4J$B?:*E.B8> IWK>IYYYQ*/= 23[,GM!>(*	INY*IBY"I!YI"Y$K<Y+M8!M$> *!QQ$Q+*W/;;GIZI"Y"Q**QI!Y%M!> IWK>I!Y!I!8!IY? *J: I[>(/:I	> /:MA> /:IA8AY$M$Y$2IW9+U: I[	8IX> I[2I
7: IYY%M%I$]%/6IAY";EI"Y;$IY8!IAY*M%Y	M]"QQ"Q*+!I$8!2IO5
5I[Q[	4;$I[	8: +?6Y$A6L$B3[$6I6$?<32B8IYY%M%I$]%;$I["Y*OM%Y	Q[: I["YIX>(*UQ)/>+IZ>(/=/<Y! [CI2I7;2IA!2I$.YI!IW8AY"I!8AYM"]]!Q"I%>(+GM%> +GI%Y!Q%MM%]%I%Y2IW:+G [G [AB2I(&/9IY8!I"?+XM"> +XQ"M"M]Q"2IW:+X+;EI!YIY8!I"Y*I*8!IYYI*?/8M"]Q"QQ*+&/8 [AN2I77K6+?C6+??
4	*]$?>;)*(3O8=H:8J8JC>8AY	I	8!IP=:I	8!Y	I	8 I&=(:A8AI	Y&IP8!I&= :IPY&: I&=H:8AYRI&8!IRI	YQIP8 IRY)I)8!IQ=H:I)YQIR8!Y)IBYD+MD> K=K<IDYDQ)*:YE 27-,GYTITC;K:< K9YUITC89D< 8HIU2I/FYTITC;<(K9YUITC8<(9XIU2I/VIM>(/7IE<(/6K58!YEIBY!I!8!ID+?+?:JJ0\*E? ? ?BH
8>(*MM!> K?8AI!Y!M!I[Y[Q!/>YNI\Y"M!> *YQ!M!I[Y[Q!*P;&Y*M!	=]"Q!Q"Q**[M!8F8F8FC<Y*Q!M!8J8J8JC;I*	=]"Q!Q"I! [O]"Q";GI!Y!M!]"Q"I[]"M!I[Y[Q!Q"Q"QNI!IE> *P [FY5Y6I52A
S<HA5I5<(/:8!IK> +  [AB2I(?/9 [AH2IA5;GYZI\YC/8IBYCI\	7YZIN8! [P/61Y*,1]*$272,*]*Y??9F9/H;&JZVNVRVZP;VJPZ,NVZ$"N.:<BN$R$ZVN$R$ZVNV.N8 []J.9HS]*^[].Z"B7J.Z*1!<.B<B.$A"B<J;Z61!<;OB8A*,D G""Z1!MBC]< :A*,"1Z"N1["N1\:*,""Z"N> K][
1!MM0IPLB+P"> +*<D*,1!EOB*,"> +71Y*,1]*,1^[]1
[
K]1[:K
*,6 CU2 ?F7RF 3UOI7KJ 7EWTR7N2J&I+NCC7K	E+BOD"M&J3ION2 WK3YSB*> 3S	K3PR 3U7M3YF R7G2J.I+SCF6/OI2 3F+ACG/U?P"M&J7JCM2 SC3F	C+F> +N;O6 J 7EWT+RCN20& 3NF C*M6IKK+S> 7YOE2.^ +ECT3CGHR*M2IGT+D" .-^3"7*M2I;S3AN +LCA6/OI6 SI6 WR7BWOT6?2J*I+MCP3RKU7TCY6 &/E7S$GPH
 <B,F>>G2AJG2J%LI,)X)2LIJYC2C-EB2A2B,
D02A2B,$D=P%2A,%P)2I,)2A2B,1DL2A2B,6DA2A2B,;D[GE2J%LI,)X)2LIJYC2C-EBTOUVCWXF
T;5B8
U2A2J:A&ZBCT?	>HK^2I
V/WLIB12RLGPUF-LAKLB0 B>">&F;"?M/G	<%E[DDGD)=?<!N2I2A2A2A2A2A2A2A2A2A2A2A2A2A2I2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2I2I2I2I2I2I)S.[5)1[HJA*O3"	G)S7(;+;IIH< M\),C($(T)8
2 I&70K1"2]4M4X4&7B</<==H=R==.?X)N-X7L7XGLG

2LH]Z**)X)N.X7L7XG2LH\ZV2ILG8

2L2I*IX)N/X7L7X-L-Z(2LH]Z*P-L-

8P78H),72-7X)2LH\X-OIKH-\7P7H[8A\7*HX)OJKL7K9Z*P7L7X7**A?[ X[L[BKNZ(J(KGZ*2CN([[N*<(+]X7/K2J	HGAX%K!!E2J	HH2J	NA+<[:K,,%\OK&/[HY>(2J	NBP)K-YRK:ZN: YOK YP+7JF!EQO*X%RBJ?<H)CRN: JMYNJ[YOIP=H*&:QNMNC<9DIP8F8FYPMN+U]N9P*!ZFJ)!ER;QT*;%Q"J)CR3WS3S&*-)C*;+S+PJF8
8FZFJFC<MM]MJF8F8FC<MS]SJ/Z;QS+UISYMQSJF]SP))CK
YTJ2YSJ/Z;/W9?HH>2J&LCP)K%Z3W[%O.+5E-2J&LDP)YQ[32J&LK)<X -OM9Y.JZE<BNA[DRANAY2RAI.<(*<8F8F8DC?Y/I/K>?K=K<Y1I/K>=HK;I1CI.8J8HC:Y/K9Y1I/Q1K>=*(K;Y/I1CI/9G8F8FK9CI.C8K7C  DK6Y.K5CQ.*>*:<B]2Q2/C;EKH[XSISI0Y+X0\K4>(+Z;Z [Q<B/IK3 [Q0^+XPT%M: XTHMXPLP%M: HM*DPT+
IQ+IYPT+3IQ%MC\<A  ?<70G//
J 0Q?6O:JAZF<BNBZMRBNBY1RB<BM1Y(J?H*X2AO/ZK(Y0I08AY12AM18!M0Y.M0Y1I1Y2I.Y/M2Z1J18AZ3J38AZ5 [CK2AL"2AL"2AL"Q2Q/*& [AM2AL"<(*"ZMK Y/K!Y2Y3M2JM>(+NQ2Q3Q/+E*": I3<(+\=H+W8A  E:Q0R*X*SI(>(*"+T?:K"<3=3<<<.=F<0K)K0K9LLJLRL[L!L"L*L0L7MBMNM)NPNVN1OKOPHP"P;QFQ"RRWR
R3SASOS%P;TTYT*UEU[VV\P;V4XWOW&X\X+YGZP;Z\Y"Z1[F[Z\?:=CPP D P - 1 2<?BPP S / 8=QAPI N D E XB+ (6/23/72 VERSION)>+?PROGRAM EXPLANATIONX>TYPE H FOR HELP AT ANY TIME DURING INDEX DISPLAYX=0(THIS EXPLANATION DISPLAY WILL REAPPEAR)X=PTYPE M FOR MORE HELP DURIN
 EXPLANATIONCINDEX DISPLAYS THE FILE INDEX OF ANY PS/8 DEVICEATHE DEVICE IS SPECIFIED BY TYPING D AND WAITING0FOR THE COMMAND DECODER TO ECHO A STAR (*)?0WHEN * APPEARS, TYPE IN THE DEVICE NAME, FOLLOWEDG=HCH<PTYPE M NOW!? BY A COLON AND A CARRIAGE-RETURN
  (IF THE : IS?PNOT TYPED, DSK: WILL BE THE DEVICE SELECTED.)<0(TYPE M FOR MORE)CPWHEN THE DEVICE INDEX APPEARS ON THE SCOPE, YOU MAYCTYPE THE FOLLOWING CHARACTERS TO INCREMENT ORXZKSF0YX*B0DECREMENT THE FILE NAMES BEING DISPLAYED:(B1 INCREMENTS BY 1 FILE
A 2 INCREMENTS BY 1 FRAME(AQ DECREMENTS BY 1 FILE( W DECREMENTS BY 1 FRAME?ANALOG KNOB 7 DETERMINES THE FRAME SIZE>0(I.E., THE NUMBER OF FILES DISPLAYED)TADHX*TEXTCTYPE RUBOUT TO DELETE THE LAST FILE CURRENTLYB0BEING DISPLAYED ON THE SCOPEBTYPE : TO MAKE 
ERMANENT ALL FILE DELETIONS MADEA0SINCE THE LAST D, P, R, OR : WAS TYPEDATYPE R TO RESTORE ALL DELETIONS NOT YET PERMANENTA"$CMBSIZ2A$CLENTHW? IF CTRL/C, D, OR P IS TYPED BEFORE MAKING DELETIONS?PPERMANENT, THEY ARE AUTOMATICALLY RESTOREDCTYPE P (AND WAIT
FOR * TO APPEAR) TO PIP ONTO ANBPWHEN * APPEARS, SPECIFY THE OUTPUT DEVICEAFILES ARE TRANSFERRED IN IMAGE MODE DISPLAYEDB0OUTPUT DEVICE ALL FILES CURRENTLY BEING DISPLAYED.0(LIKE THE PIP /I OPTION)? ANY OUTPUT DEVICE FILE WITH THE SAME NAME AS ONE OF?PTHE
DISPLAYED FILES WILL BE REPLACED BY THAT FILEB CURRENT DEVICE INDEX DISPLAYVICE INDEX DISPLAYUFPC%>ALL OTHER OUTPUT DEVICE FILES WILL REMAIN UNCHANGEDCTYPE CARRIAGE-RETURN TO RETURN TO THEATYPE D (AND WAIT FOR * TO APPEAR) TO SPECIFY A NEW DEVICE INDEX DI
PLAY?TYPE CTRL/C TO EXIT TO THE KEYBOARD MONITORLAST FILE TRANSFERRED IS F^<0TYPE M TO REPEAT EXPLANATIONOUTPUT DEVICE FULL.  NO FILES TRANSFERRED$AKY7J	Y4J(Y=Y62AO>Z6 [AH2AAKI78!Y?I4Y>	=2J	BH<H?I>[V;GI>Y>2IM>
<Q>M>K;?HM>Y8 [CR2AA52I$2AA8=H+$Y]2IM>Y8I88!I9?/: [AB2A\QI7I?< +4Y7 [AB2A\\ [G/9Y7+?8!I8+?^\^Q>>6	^^+8 [AB2A[2I>K>ZO;GJOY>2I]> [AB2I$/=I]Q>Q>]>Q> [AS2AA8Q?/<2J& I<HB;Z	;I7<(+!8!Y?I4K:Y>2IM>Y9Q>M>Y;Q>M>Y<I9?(+ZI9K9=H*?Y9K8Y:+CK79DY:Y9 [CI2AA:2AA;2IBB [CT2A
:2AA<2IBBI;K7Y;I<K7Y<*4;WI>Y>Q?*+<HAFK  [OY?	;2J	*K<H?;Z	;I?2I
6  PY2+?>6HP?8E	^]C]1?38 )<H
?2I
>
=I2  U [CY>2IM>8J8J8J">9F< 8A8DY.M>">I.9H8J8JY.Q>M>">9DY/I/8FI/Y/Q>M>8J8J8J">I/9D8FI.Y.Q>M>">I.  O
?0B<<(.>J=.>Y/Q>M>8J8J8JXI/9D8FI.Y.Q>M>XI.  O
?0!SCV<(/XKW/X TO RETURN TO THE SAME BLOCK<0TYPE M TO REPEAT EXPRQP>6RQP88?$)Q? ?<<BOHZQSHOHXGSH2A.F<BLGPG2A.P;&JVZPNPRPZG;VJG[>NP[H"F2L? +A"P.VZ7J7BCJ$< JDZ8J7B9D< 8HJ8.("V=H+A[2J&F [AX2A	EFILE"V"([U"P"([V^JA[W2J&A+A;Z^+>?&=>Z8J8>(;QZ(8JZ7;$G\J(
\K][2IN8^7R8R7S+-2A/^: Z7JQ[;J88!<B\GJ7<B/H8?>& 
?<? 	5	V	A&8	6&(&V&P&F	>"("&Q&MZ
JRZ^J>2J	-D8.P&M&LZ=&N&LZ>&OJEZ?JR[4&N&L
4S4R?*1&OJQZ?2J	-A.GJR[J&N9F8FJ>2J	-C.GKK^JKJ.K&M=HJF=H8!Z=NHJB[82IO8<(.I[8J=9F8F8FZ=&O&N[5&ONSBJ=[3HG[4	8.I.P&MBDJCZ=J>+\	^*C*D??&>ERBBM^OB:&;&FHJN^HZDJJZE;[ZFND2I^E2AVBRERF*\2J&GE*JK0&0!*+2I: NLZCNIBM<(*8JCZCNC2A^A;&FH^HJJZDZE;[ZF2IND2A^ERDRERF+B;Z&JC  
JKJY[)*5*6;Z [IZY/S [F [AB2A+ *,REPEAT:K)S*8!  K&ZYJY8J8J8J6JY6&A+,+2BE<(+= [Z/6  BOIOERXGHG8F8F8DBJUZRJJ0\J5>(0Y8 [C.V/T,&.*.L,-,1,6.A.=/V/V/V/V/V/V/V0Q*FHG0V:  Q0Y*F;Z*F0I*F0N*+==K1>(*=S1+$K-*+6:*F69+IK18![2+$0Y*?0Z*=6Y+E6Z9HK02A	,[2K18!9HK.ZR2IK2<X+^8F
F8F<HNR^R: K1[1+IK1K29HK.2I	,K/*+1(BMAB /Z8FBT8F8DHD"^PE+%JQ  U?C?2ANW>(+V2B2A&X+VB  Q2ANY>(+V2BHGB2A&Z+V*JARFFAQF)K?0&660Z0V0L [U2A^W^Y  A61/>HGR<*6K=9A8A<P*89DK?66K<>(8 Z<*J??JI0\XG0ZHGK;> MHGK:> +K;&MHG*JHG0!+O0&:/MM*J [AX2A,AQRSTUVWXYZC G]BPO3456789:=
E?^
M*+,-./012ADJI[<F!"$%&	();N\HK>=3=6565N,FBJ0A???? ERROR AT LOC G>JKZP8NLZXRL:0NLXHRL8["LH8D<XS"9HZALHZBLHZPLHZXJ[2AO8J8J8JPOPS*(JP8J8JJK?[JX8F8DZXJXJS*8K>XG	=;&	=K">(+]  X8DBJJTP/JC<<(*2K;=HK:K9 [Q/P [Y2C/!>E0!+$  Y[O<X+08J8J8JC32A/(?Z&J&8J8J8JB A? ?/MBM?
;&J[OSZJOWWZJNJRJZTNJ[-"S.O-S-2A.S2% -BJ"["JYZJ]*F=**ZS8A*88!ZSJZ [[K"=*78!["J[ [[:Z8AJS?H*?;$ZSZT8 -: JTZTJJ< +AJT[K"ZJ:JJ-S+L< +ZJ> +Z9AJT>0+^KX [[RRT+H  Z;UJ\ [QJ\ [Q  GXGZJHG<HRJ9P<(/-JS=+2<P+2XGJS8!HG/-22SB A2A?JC? ?P=S=P<ABEJH=HJDJB [Q  [&8!<(*$ZMJB
[QRM*
  \&=(:AZX[): [*SJYJJ> *6[*SJYJL<(+YJC<(+$JG<(*5JF<(*5JI=H+Y8!JX?(+YK) [AV2A4XJKJY[)*5;Z [QZY/S [G [AB2A5 *,REPEAT:K)S*8!  ]&ZYJY8J8J8J6JY6&A+,BE<(+= [[/6  B+3Z[1!PAB[("&9P=H9!JL1! AHPBD*IDB;VJ[[&"&[B"&.OCSCZJ[1OCSCZ.Z"ZN.&LHZ0KB1!O0B:.*7?2AF49DJ4XH"*"*1!
QBQB.5;G8 [)KB"Z"&Z&J> + J&=H81Z&<P+ ;&+^J&8F8DZ&J&8DCDJ/"5S)+WK(1! AB<B/CK)[CK("8![)"ZNRZ&J&8J8J8J"5J&"5S)+1+"?)&^%$??$)?V)!^R!!?^!%?!%$? $!^V%H??H?!!!" >H?TA?CAX??XX??F!??!$?X$">C>$?Y&)Q&)   ?A??AA><BF??AL33LG88G%1)!?X AF?!
HH
\HH*=88>TT	Y"=L&1X)6EV8^!!^P((DDD
EFDDDDAFA X%^^)QAA?%SQ)!RV)TLD?):F)MF"U$0()VV))R^)R&ATH"JJJJ"HT PP-Z[;VJ[[(1!PAB[%"&9P=H9!JO1! AHPBD*IDB:"&Z5.OJSJZJ[3OJSJZ.Z"ZN2A.&O+Z1J51!O0B:.+<G?;?B9<(+9DJ6[+"+S+"+1!BQBQB.::KI""&=H81ZZJ8Z<P+!;&+
JZ8F8DZZJZ8DB7J0":R+X1!HP AB<B/J:Z:K,[JK+""ZNRZZ2AO*8J8J8J":JZ":+3)&^%$??$)?V)!^R!!?^!%?!%$? $!^V%H??H?!!!" >H?TA?CAX??XX??F!??!$?X$">C>$?Y&)Q&)   ?A??AA><BF??AL33LG88G%1)!?X AF?!
HH
\HH*=88>TT	Y"=L&1X)6EV8^!!^P((DDD
EFDDDDAFA X!^^!QAA?%SQ)!RV)TLD?):F)MF"U$0()VV))R^)R&ATH"JJJJ"HT PP-6 	T3PSE6/2JNI3P
A/EN "3*M3H3E/PB2.,BI.;B1"0*M2IWT+XCT6/	T+PCE7RR 7OJ 7ESS3OWR2 3A3LR 3EWL3T?I+NCS7NSO2 WY7TB 3E7R3AWN3NCT"/*M6ICC3AWG. R32M"J7ECL*221.I.0.-B4"M&J7TE+T^ +ICF7CKT3LN/2,R 2,> 7RB 6 OI6 	T3PSE2 WB7FKO3E6 3A	K+NCG3D3E3E	T7OON6	2JNI3P
A/EN 

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