File TMREL7.SV (save files (Executable program)

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

??2CBP
>K TRDCHOHDSL8EG TL %L.XOH6L7\ 8L8$ H9 Y)"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BB(ABCY\9 H8H^,AH+?4JDJD>PCDGHOPX 0AA?BB CD<
^?)?8?9?=
ABA
TL+P	&$6"%UZT$YD(\2HJHQI,ICJ^H3H	,I,)&%A,--,[, -4-RKKLKWK]K$OJ<H9P%?%43AXR%+8!K0>(*UH.C5K6>(*YK3%5K1%5*FHR<(*C*.K1%5H.AHXSHS8 X)9P8HP)*"X)H)R8!9DH)HRXR*F%43MX >H9?J2XN%8%+8!K0>(+KH.C5K6>(+QH.8!K2<(+Q8A>(+QK3%5*5:H <(+H/PFA;H.AJ8H8J8JXQ%7%+C5K6> +HH.AHXP%7
+C4K6> +HH.8D8FAIHPXP%7//DBMB,B8B?C>C8=PX JA2I/\%-TOO MANY%+8!K">(*QH.8!K>(*YH.8!K%> /^K <H:HQXQK!%5K!%5* K
HQXQK%5K$%5IR%5%+C&K	> /^H.8F8FANHPXP%7%+C&K	> /^H.AFIZ>(/^H.8F8F8FASHPXP%7%+C&K	> /^H.AFIZ>(/^H.8D8FALHQXQ%+8!IR< +\HP\NHQ\NP %43(/]B5CHABB0B2B5B6B8C<=P:HK/[-	0/(	0LLLL
L2MFM]NN%PRPY(2%!%- NOTE(>H:JBX!X"L!XPP!L!XQHQ8F8F8DAJX<HJ&RX$%43.HIRIK%5%7H"%1%7H$%1: X%&P$>D8H>P*8IZH?H*8IIHYXYHY8!IL> *UHQALXY>D8J>P+GHXIOXXHX8!IS> *UHPASXX>D8J8H>P+WHWIKXWHW8!IO> *UHPANXW>DAI>(+%PVHVAF8!IF> *UHQAFXV>DAM>(+1PTHTAI>(*UHPAHXT>DAK>(+?HU8 
IXUHPAI8!HU< *UP!P"H"8!H > .I<B.HFAFF"XLH\IPJ*L.J"XLI\HPJ*S.Q>H.JZXHIWXJ>H4%J HSXOLOXI.X%.% %!"J%,*): X&^2.	S
:XSKU[BKBR> +PSKB9H*7W.3:KB9HPSCV< +N"3SC/C[BKBR<(+DW/C ?0:HVAFXV2THVXVHS98J8JHVISXVHU> ITHVX]/W0Y+-0^0&0!+1X.H./,/.K\MI?XNLN<(+	$6+;:HPAHXTHPAIXUHPB]XVHQAFHVISXV2THVXVHPANXWHPASXXHQALXY.8:HZ< *,%.%*H<<(*5%,*$R^.^%.%*IE<(*5%,*-R^.^>D8D>P.^H&< .^R^&?.^S$7N
J> +H7LCK> S/

7:H-CJ> +UH,CK> SL/L7LX,7NX-/W7Q<H/]7S<B/]7Q<H/$7S+%/$%9MAINDEC-08-DHTME-A%8/++80&:H:[7/6,4:X[XZ%/%!%	%%% %,*E.:IOX[XZ%/%.%*H<< *Z%	%%%)%,*S%-*R.L:IQX[XZ%/%.%*H<< *-%	%%%)%,*&%-*%.
:X[ITXZ%/%	%*%%% %,*9%*:X8X9%$%,*>.2:IOX[ITXZ%/%.%*%	:H<< +X%%%%$%)%,+N%-+M/F:IQX[ITXZ%/%.%	%*:H<< +/%%%%$%)%,+%%-+$/]K0$YK2[2/.$>SAVE ERROR:IOX[ITXZ%/%.%	%*:H<< *P%%%)%,*I%*:IE<(%%)%,*R%*:IE<(%$%)%,*Z%-*G.:IQX[ITXZ%/%.%	%*:H<< *5%%%)%,*.%*:IE<(%%)%,*7%*:
E<(%$%)%,*?%-*,.%2AK 
]K!
^8A

2TKK[U2AK"XA<X/J%4O/JABC2$,C,B%8%9TM8E DATA RELIABILITY 7 TRK%8%8	?/9J8J8JC?8A9H/7K+:HX> *GIO<HIQX[ITXZ%/%	%.%*H8X>H9X?%)%,*N: X&%.%*:H<> *)H>X	H?X(%%:H	X>H(X?%)%,*Y:H&<(*5%*H<<(*X%,*/%.%*IE<(%%)%,*5%.%*IE> +!H:8!H8> +LH;8!H9>(+!H:X	H;X(HY>(+ZH8X:H9X;P:<H
;%$:H	X:H(X;%)%,*>%*:H:8!H8< +/H;8!H9>(*=%,+%-*L.%*IRXZIOX[: [
% :H$<%/ITXZIQX[: [
%%:H&< %&:H8[]H9[^X8HT8!IH< %	: X&%.%*IE< *&H8K]X:H9K^X;%)%,*[%.%*IE< +BH:X	H;X(HY>(*;H8X:H9X;P:<HP;%$:H	X:H(X;%)%,*)%-<H.%.%*:H88!H:> +TH98!H;>(X&%,+H:H&< *)%-*X.%)$<B+"%.%*K
<(+6%435%44O>H"J	/HZ<(+;%44F%44O>H"<	9%,+&/$DXP>9P%?>DBISXV2THVXV% >DXP>DAJXTXU<B>DXQ%!X%<B%	%%HZ>(*]%%$7LAI>(*V<B*A8*$:H8> +TH9> +TH%> *8<HJ&0HPATXZHQASX[HWAK> I]<(I^8!X\X^HWAM>(+RHVAFK	[IK(X^H\I]>(+RH^8!X^H\X=HU9F8F8DHVX]H8X>H9X?W-<H.$8A
-IXX
/&VK(HDBB.$S
CCAIX7CJZXBK47FHTIV>(K0A:.Y8(V[%67H]7R*A7U7E7T*E7UH]7EH=7AI[7CJZXBK47FHTIY>(K0A:.Y4V[%=7L?H+TH
II>(*+H
<HP7J%Z(P0IXX
HX< *3H
II>(%&*GAQ> ";H
II>(%&**;%
AP8 X*IGH*?*.IUX)P)+FP*+D.;+KHZ> /KH
II>(%	/K%:-"H
II>(P/>D8F?+%%4.%3%7H=8!%1>DAT> /3HZ< 	5IXX
7LAI> -"*+&=!XXF0A:.
8(X!%6%5H*?*I]ZS: NRXHMG8!XIK=[:K?[<K>XJ: IIXK2ALH8!%.LK> HPI<H*!PJ*S*N]\K:8!K=>(.J)\X<H *H > -P& $P!U,]K?[<8 %%$PK,]8 K:[:K:8!K=> *3KD\X,]!EYV/GS*+HS:+N8 [:/HHK
<S<HH
<S</H??$!4!%22/2??$!4!!$23???+%[9JS[,O<[$S92AO$%.$Q,]K$$Q,]$PK,]S</%?;?9$P8<HP9%4.Q"J: X<.IU,;HX8J8J	S%40H/%1IYXH<H/JWXIXJPJLIXKHK<(*)%8%40KHJ%6%7HK%1PJPH*\H7<(*3%40UH7%1.J%(%41O%4.Q"<.;Z<HY9H	S%41XID%1%42IC%1%42MIB%1%42XIA%1: YE.<$?*0ISX	P	+XP(+V/MY%4/3>
AO>(/?H*9J>P++%-5+-%-40%,%0H>8!%+/?&4I0A,K
[:2A/7$9JX)HV8F8F%6%7HT%6%7HU8J8H%6HVAFJ "H)J!"H8%29HW8J8JAFJ"".J.J*J2Z%Z(%4..3.:/A/A.^.%.,.,/H/P/Y/&>H.J8XHIWXI\HPI*=.67M%0%77N%0%77L%0%77I%0%77K%0%7H8%29/A:H8X:H9X;H>X8H?X9H8> +$H9> +	% /U7R+	7UH:8!H87AH]7E7T+0K67F%>/U9<I1$?S5/5Z,NZ1N1Z+J	Z*J(Z2RN2R2Z-N
R2Z.9J.J,Z08DJ-J+<P*
R/Z+J0Z,*Q:J/J)%5Z/R**K.?;&3B0?=0??0X??>\???6????P
+AP7/IJ7LC">(Z:/HV+W)+J7R+K7UK7AH]7E7T+RKY7F%>:/J9+Z7U: 7AK$7F%>/ZH?>1<7R+	:HV7U7E7T+-7L8F?H/&K97F7S+57U/&I)J.+	:=3$U*	=HTJFZE.G.G(W)
(Z(	(-+H*P(?(*)	(]*H(1*( )CJY*!AAJ\*!UUJ
*!**8 XJHJ\HPI*".J)*!?>J,*!AJ/*2<(<HJ0[ZXLV9F8F8FXMVHM\HPI*4.KA+D<H8KB[G%
XM<H+QHMC?>(+EHMC>>(+EHM\HPI+E.+VHL8AC><(8AXLHL/V/?
/7;=>?
/7;=>/ PHDBA PHDBA+/: K/XJIYXKLJ\HPI<H.PK+5+0*\??"%  PPHHDDBBAA"%GG00MM""YYFF88J$XJHJ\HHJ9P=98DPI*Q/G:JXII[XH.\?A?>*%9: J%XJIYXKLJ8P<P*9XLHL\HPI<H/GPK*,*	XMHLC5XLHMC4HL\HPI<H/GHM\H*3)9"%??

//77;;==>>+P:K2K	> +]K)[	K(9D<X8A[(K(O	
	K38HO	S	[3K3/P+25+*5ZHG5,ZQG>,QH>TN??7U/%I*ERFE??)1?:NZE<H&ER.[HKH8F8F"[KH8J8J8J"[KH8J8H"[KH"[.IAHKN%5.[:IR%5IR%5IR%5. [H[IKQ[JKCZ4<H[H9KHKD<XSI<X*1:KIKN%5:[IR4SJ*3.)KD0X>\?6???BJBMB0C ? ?<: KRXOLO[ K 8J8J8J!K !+VCK<(,OKP=+*KO<HIR%5/!0&;0!+00"/-:KM%5KL%5
4+ZH6?+3?%8%9WRITE STATUS ERROR<H2$&N.%8%9END OF TAPE<H4O&[.Q%9   200.^%9   556.%%9   800.,%9 NSTP .3%9 SSTP .:%9 RNDM /A%9   12 MIN/H%9   2004 MAX/P%9   1008 MIN TO MAX/Y%9   1008 MAX TO MIN/&1Z1[1\1] *]!]+ V+4PJL[Y.F%8%9WRITE ERRORS=.%9RECOVERED AT .K%8
9PERMANENT BADSPT .U%9 XIRG WRITTEN 4 TIMES."%8%9READ STATUS ERROR<H2$&=.0%8%9READ DATA ERROR<H2$	L/%8%9READ PASS/O%8%9READ ERRORS=/X<(,OKP=+*KO<HIP%./!0&;0!+00"/-:KM%.KL%./4K?$7$7/7BJ%8%9NON RECOVERABLE=.%8%9DATA ERRORS=.M%8%9DATA NO STATUS=.X%8%9COMD FU
CTN STATUS WRDCNT CURADR RECORDS LENGTH%8.$%8%9SELECT DRIVES /A%8%9SELECT TESTS%8%9TST PAT PAR DEN RLS WMO RMO/M%9O.K./(%8%9TEST /.%8%9WRITE DUMP/5$07K?*I[7C*%8%9READ DUMP.F%8%9DRV PAT PAR DEN MODE RECORDS LENGTH%8.O66 77 88 99 S."%1%2READ STATUS ERROR<H6
&=.0%1%2READ DATA ERROR<H6$	L/%1%2READ PASS/O%1%2READ ERRORS=/XDAM>DBM>DCM>EAM>EBM>ECM>FAL\FB,\FCL\FDL\FEL\FFL\FGM\FHM\FI%1%2NON RECOVERABLE=.%1%2DATA ERRORS=.M%1%2DATA NO STATUS=.X%1%2COMD FUNCTN STATUS WRDCNT CURADR RECORDS LENGTH%1.$%1%2SELECT DRIVES /
%1%2SELECT TESTS%1%2TST PAT PAR DEN RLS WMO RMO/M%2O.K./(%1%2TEST /.%1%2WRITE DUMP/5M8QE;P"\OIC[JSI?OIC9J8JKJ8J8JCSI80Y*;0\C2K>> *;2C.[>9O2LJY[ANBQK;Z08HNR=H+9BG8 [=NR[INB">(<X*TK10&0Y*60Z*TS=.\J0> RR2K.0V0Q+EC /C ;KJZ"\
I[C8F8FC OI
IKJ8J8J8HC KCSI<
I*P9TJ0>(+,0LZ0R0+.K0[J+6K<[JBZC^A?0I+)0J[<KJ/;X*?2A?=33NO VACUUM.T30C-E: REMOVE WRITE PERMISS, PUT ON LINE WITH VACUUM.T30F: AS SOON AS DRIVE STARTS TO MOVE, MANUALLY PUT IT OFF LINE.T30G: WHEN PDP HALTS, DEPRESS START OR CLEAR/CONTINUE.2KP0CPHHH ?H+XKBI
M(/J%4OVERFLOW-*I&%)4	;PQK:	9	8/7;M9F8F8F/):X9J8J8J/..:JHU5T(,!B1?N.? D<?0",G[1K1	?[0	>.<(*EK=> /<	>.<(*BK=<(*L=+SK;[-	>W*+UK]
+0!+Q/T?/O)[\S)O)[[	-AL+%K[7K][]S)+M2J	,G<D<?2?>G?:O0L\L!LRLLLALXPC9J8J8JC?8A9H/7

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