File TDCOPY.SV (save files (Executable program)

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

??2CBPKJH0HLJ4,H,XJL0<L.XCDXPLM(?D8/H)B4AD+8C=P.D(HO4,LYQH<& EH]A ?W<C?H<DJ\EL<G8DTP>P9KAB JW"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B>G??%)8 H^H99 H8H^H+?4JDJD>PPTD8E COPY 12-BIT WORDS PER BLOCKAC^C
BB44H!B*B2<C\B)KKPS3?*JB0BJ,=,J&0?.C6XTM?:D/N)BBAM+C^=.D(HPO,MYQ0HO& E]BA?HWCO?<BJEWG?8DT>D90&O%?7OX ->^T[=Q*XPHZXY<HUXXX %?T!%=*O?A*<Q=A8!HP>(*UPYPXHXI<?H*&O*-=Q\YH 8!HX?(*TX %?H %=+FH >(*9%?T5O*-?AX\^H*?AX]^H4?A<(+%X^+IX\X]X^^IA?AA;X&/?K>%:I9%:/O%?T5OI8
U[UX /UO^[S^%?%=UH > +%/^A;9H<Q8H=QK5[OOO=A/*TI7;+77>/6%-TOO BMF>QJ^ZJ"(K?< *LI9W8.K>=H* I<=*K=A;9=QC<8D8F=A<QJ
ZJ*D8R:%7.K;> * P *J0Y*)0^0&"/.(K:<(.8K9<(-6K8./>N9[TR9[UOT8BA5<(.9[VKVC7>(I4I3KVWSUKU8H>X+RST*>OT+0!+X0&:/WL!XH%<QLC6=A8!L>(/]L!XLC6=A\P!P +)/]K&/[HY8G BS?0==?=G?B8?]=3HZXYX"HX8 X[K?X K>X!LYX%%2X	H%A1K=7<:7>8F<X*Y%0*C<> *WH%A1I/7<++79*"7>A5K;> *"+P	8A5K:
 *)H%A17<:H"< *<K9H	8!X"+K9H	> +$PYP[*FH"].M.8!%-%?<%7H^> /8X M.8!K7X!K6X"K59H!P <H+$<XP"+V;H 8AX^/H:%?T&%,%+%7*7;+,7>/+X^K?%Q9F8FNP?LOH?7?W?*DPTS?8H&> *HK?^NK>^O*LK=^NK<^O.MJKIJ<%*I)> *Q%7.PX %7%(IR?AA;> -	-&FIRST INPUT BLOCK:FIRST OUTPUT BLOCK:NUMBER OF
BLOCKS TO COPY:VERIFY OUTPUT (YES=1,NO=0):DONEREPEAT (YES=1,NO=0):VERIFY ERROR BLOCK TAPE ERROR BLOCK SELECT ERROR UNIT XNLNL8HJ&8I%"=X)K9"=X*H\X4H]X5H^X/*PH->(+KHZXYHX8 X[H4X.H/X-H/X0HPX%X(I>X+X,%$H-X/H.X4PYP[*,H6X5*MH5X6H6X.H5X1H0X-LYX%;XX(%$H.X6.<LX!X 
!9M.<P+GP +A;H 8H.=HX8 X": HZXYHX8A8 X[0^%P[>H+NPYLY8F>X+ULYX%I"X I!X!%2LYA1I 7<%
%
79+,7>A5I^> +U;Z=A\YLYA]7<>P"+U%?IO-6,4H1X.H0X-X(H2X+K?X,J=Z9%$H!X8 I>XI9 H2XJH 8 H
X "-H)8!X$"6H >(-\"-H*8!X$J9K>Z99 XIK=XJ"6*]P .-H-> .-HR-.-M.X"<BLI8!LJ2A> +EP"*9P$*7.6%?I]H$8!O<Y%?T1%,%*[Y%7KYI[<(-ZIY> +N+]?I8]=M?8D]7M78D8F]7M7A;IX%:U=+ /YHZXYHX8 X[LYC;\YPYP[+0-W[2/.$>SA	8OM^?H
IVX IUX!%2H%?H9GITX3H(<Q8 H
X 9H)"/H)"6H+"?GP <H.H
9!H 8A8D8F<QKKA1=A<Q9H*"/H*"6H,"?G*X8!H-9P=X-./X!<PX-H!8B=A[K.6[LH.[MH!H.X..?0^%$3+X0^%:H-> /GP ..>(+%?I	O?%-%?T1,%7-S&SK+J%?I0,	>/&9H%8D<Q8D=Q8H8J8A8 A;=AIX%:/,8A9HHPPD;*HH;PJDZ8H[12LK,[*N7=9J>X8K0[.RN[/RNZDR2C7?9DCG[47?C<K,[?;&[7K17<7>C6> +&7?
2K.
57?9H+A7:> +!K4KG<(+%[4RDK.8!K/[/9P:ZJCK17<	-	->79+H7>9FB!K[<(+]K3> +H7?<XK=8 JD8 <(+8>8+H7>9F>X+AS7+A;+	R9PK17<:X<B.2CSKS+?0S1A?=>X+AK19D8CK/<B2B[08H[PK1[/79*F7>B!K,> *FK+?*,7>B69P> /)K>K-KP7<: D: [.O0DS0?S/*^K+9J>XD]DD/*KKKB!JN[.KP
0S0CS/*2K+9J>P*?KPKBNP]/*P7;+F7=:/D7;+L7?/K8 [2K2C.8!9DK2K.[.K28 /P:K.8 9F8F8FP;PK.BN/]Q	P3?&LPNP\P P	P(P,P0P3QDQHQJQSQ]Q(RFRHRPRYSFSHSLSNG8G0G(G K)K,K.K8C7C9F
F2F"F$G,G.FQFSFROM UNIT:TO UNITS:ILLEGAL FORMAT UNIT  UNIT ILLEGAL RESPONSE	?U$?AA;8!X
K>[NH
<(+]X!KNK=[NK<2A
=O=2A8!K<>(+[%?T5%7X *>P!+JK;9HI>X2K:
9/8HIGHEST FIELD AVAILABLE:BGBF8)B<BH2AC^%\:AX!%[+N2A%Z2I%ZX!2A%Y2I%Y2A]?2I]?%[*2%X*J%[*22A]?U?%XV2IM?8!2AM?> *Z2I:A]?M?8!2AM?>(*V%XV2IU?*	H\<(+N[K2AM?2I> M?>(+KKK8!IW[A8M?9 M<>P*VU?%XV+A8%Z*J2AM?2IM?> %V/UI^2AM?]U2IM?]UHZX
+&%[+$%X+&./VP
+ .%VIT%S.*J2A42I4/.M?X
MU]?H
]U/4Z]8H/?

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