File DRIVE1.SV (save files (Executable program)

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

??2CHP
>
: O;A?I\XZO:XX\X%[/92J%\I-X:H9)2)CBAH;IZZ/K?Z[%7HT>(.RO>> /=HQIY> /<HTZYHUZZ	;2J%\ADS,I/:HQ> %7JZ	9HT>(//HWXRHW<(K8XWJZ2J%\B^?>+*2J%\IJ[]W	7."-V;$	6-ULX=-UK5?H-TLXZZHXIS[)HZ%RXRHR
)K)I[)RZ+LK4K)[)K)8!O3>(/2O)9I\>P-UO)8!>G:H.X[$>SYSTEM ERRG??;OL=L?C+JB>G+:2CO7N DBBM%0FHK>H(&\%(A??2C,(HA\H()B7HJ>E 
PP8FCFB$BJBMC^C\8A68H?CODCE4O%EWCN9<D><C<B<ANP<EVBG?/?4?2[?1?0?.?=?%N5H?$IJC8HAF-M\SVF	N<HG5NHF]N-F<G1JB=K$C4G?KE>G8A? B.D??:?&<??6?>=RB = \.=X\X]X^X
I?X$: X%XLKI><(*JI=<HLKX+H+I<<(*4I;9I:>P*!I9H+9PI8>P*9HI7?*PH9HH$X H+A6<X*08F8F8FL \ P*PP%*9P$I5*IH> R. H\WH]WH^WH
>(.=I4!H
W.=WSO<H:OO< +L0!+T,[X+H+8J8J8J!H+!/WA6<(/!I3=HI2I=$S/!JC80!+-0&:I1[,/+O?LLK<(/7%0BAD,(A.AHA%/$TI.XK$U--%,>-D^,?E%-+EJ8;EI.D-,,F0<E;;;I0;?K:%+--I*"5I3X!$U*,H]<(*+H\8D:XH]H\-)](HX%	P&I0[E:A+P[B%&$U-%H\[CH][DK4[E2J$RA-$KD.5I](HX%	X&:A"5Z%&H(2J$RB\>V-"-!X(KE
V$U-%H
<(I X
/ZI
X[M8%	2J	WHKI^XKI][4:A"5Z-\8A%0&2](A/4$Z%0HA0X XQ%[MZ]7M8AY> -XM8%	MW]V0!*M$ZM8?H-7I0]UIY]T]SIR]QHW]P-O2J$RH2I]N2AIMXR.]MLZ,$VAA<(AMK%JMI]7MH]VMI]ZMH]WMG%	HW]P<H+BHX]7IF]VMK9$IEX!L!]SP!HVIM:DL!A6> -DMS9XL!IC=H+NIF=UBIC[ MB8 J,["$V2-A%[$P&]PK 8!L!=(UK<H-P\
+B2I\!2A,?%+$> NOT AVAILABLEDA2IT=*FIMXR2ALK\LPQ*G2IKJ^=RLR=R<*L2AJ.JVZV8>>(*3N>8D?*"M8B6>((](&IM0\J+>(0Y,[0Z.*J:=="GC8]<B2C0"Z/%0?HDBJ8XH()>"??N
^ R
R R!*W2C.VHN->6LK<(/J<HLKK?9H<<P+^X"P	(((HQH"XQ+O:H C>9F8DK=]7HQ/	FLHQ9DXQH 8DX /(I3XLISX!2I\LP!+52A,?"&GX2CG=HDDI4$SXPI.XK0Y*FIM0\X\0Z$=+J:=3J)<AKP<CKL<BKL=%KL=6K1>JF=1JF==J:"1H\\KHKH;?H*FEHKH:>(*A\K\K.KIPP*6H9$SXPH\$S.1H8$SH\I2$SES$O$> *C*ADCH7X\"1H6$S/
H5X\"1**HKH:>(+ H9PP$S: XPHKX L $S: HK*EPP*?H9*>J O$S$<(/$H\>(+.S$+%O$X , E\KI.XOLO<(+]$S+5%0BAD-(A,4%0BAD
(AH3XOL4X!H!%JPOLO$Y<(J\JZP!*KJ9F8FH(2J$RC\P+9H(2J$RD\A+9H3XO$ZM88D8 ?P%J[[2.LO[1;XLO[0K18D?X+YK02> +Y%: K09DK18D?X+HK0H<+XK0X!K18!H19X[0.;Z[1K008!H!=H/[0.T4*0%0FHK(A: 2I\=,.S*/%%0HH??[(A/%$V!AF+9K0$YK2[2/.$>SAVE ERROR%+$> NOT FOUND$>TOO FEW ARGS8 A3>(.PH
X[$>BAD CORE IMAGEM88H:HR?X. 2J$RIH=XR. ]8%&2J$RK2A.-$>NO!!L!]TH&>(%OK8A[]HV]UHV[-LM\NSL+E/J=MF,?MW*+UK]
+0!+Q/T?/O)[\S)O)[[	-+%K[7K][]S)+M2J	,G<D<?2?+\+9+]>08.4?3A=>]9J8J8JC?8A9H/7
O-+;$YITY
INY+IQ$UP%*$+I:Z%I+$(H7$)I
AQ$*Y $$IE>(*
Q *V$	*\*;Q
*N$
$ PB+$YITY
HOY+IQ$UQH+F$+I:[HI+$(H7$)I
AQ$*Y $$IE>(+CQ *:$	++FQ
*2$
$ P&+IIY
;A$+$YINY+H7$)I
AP$UQ/+-HOY+H7$)I
AP$UQ/+-I;[/;A$+Y%Y&$,$>H+-Q
+K$
$ QK3D/1RD7?SPSLSKBSNR
RZ?R ?:R?5IIY
;A$+IL$XINY+H7$)I
APII$UR+*)HOY+H7$)I
APII$UR+*)I;Z+;A$+I4Y%I5Y&$,$>H*)Q
*B$
$ RB3DIIY
IM$X;AH8\4;I
APH5\3;AINY+L3$USD+BQ
*3$
$ R,+;IIY
IM$X;I
AP\3H8\4INY+L3$USZ+XQ
+I$
$ SE+;IIY
IL$X;AH8\4;I
APH6\3;AINY+L3$US3+1Q
+"$
$ S[+;/5T?;P BCTP+H?;DAIIY
IL$X;I
APHJ\3H8\4INY+L3$UTV*TQ
*D$
$ T+;$YIIY
;AHOY+I
APH5$UT,**IM$W>H**Q
*Z$
$ TW+;$YIIY
HOY+I
AP$UU*>IM$W>H*>Q
*0$
$ T-+;$YIIY
;AHOY+I
APH6$UUV+TIL$W>H+TQ
+D$
$ UA+;$YIIY
HOY+I
APHJ$UU++)IL$W>H+)Q
+Z$
$ UW+;IIY
IL$X;I
AP\3H8\4IEY+L3$UVA+?Q
+0$
$ U,+;IIY
IL$X;AH8\4;I
APH5\3;AIEY+L3$UVZ*XQ
*I$
$ VB+;IIY
IM$X;I
APHJ\3H8\4IEY+L3$UV1*/Q
*
$
$ V[+;IIY
IM$X;AH8\4;I
APH6\3;AIEY+L3$UWJ+HQ
*9$
$ V2+$YIIY
;Y+I
AP$UW^+\IL$W>H+\Q
+N$
$ WK+;IIY
$Y;AY+I
APH5$UW3+1IL$W>H+1Q
+"$
$ W
+;/5XVWXYZC G]B$YIIY
;Y+I
APHJ$UXT*RIM$W>H*RQ
*C$
$ X+;$YIIY
;AY+I
APH6$UX)*	IM$W>H*	Q
*X$
$ XU+;IL$X\3H8\4H8I1INY+H7Y-;XY&L3Y,H77$I+7&L377!*?7%Y)I)IE> +V;A7"T3+MQ+T4L49H>P*5L3I<> *5$
$ X*+/ZZK/?H*8*!W=*8	9K.O=7&O6O577!+(	4*+!12R[ HD7?[P[L[KB[NZ
?8?;[O[M[.[-Y
HOI1H8Y+JG<HZ?Y>H7Y-; Y=$YI
Y,H77$I+7&I
77!*V7%Y)I)IE>(*);XY&I)I> *	I:Z?*=Y=*+;A7"I9Z?IL$W>H*=Q
>HQ+I+:>(*KI
I<> *K$
$ Z+; Y=Y
Y HOH8I1Y+H7$)I+$(I
$*$	+N$$IE> + Q
+XQ+Q I >(+HI
I<> +H+(IL$W+%I9<HI:[+>H$
$ [+/-\?0SE
?X\X]P 8?;X ? X
<6X^ZPXB; Y=Y
Y H8I1Y+H7$)I+$(I
$*$	*M$$IE> *
Q
*WQ+Q I >(*GI
I<> *G*	IL$W*$I9<HI:Z*>H$
$ \+IGY$RY!8DY"I"Y+I!$U]*>IL$W>H*>Q*-$
$ \1IJY$RAPIIY2$RY
8DY $RY!8DY"IL$XI"H8\4I!\3I Y+I
$S]:+8I"IEY+I!$U]:+8I Y+I
$S]:+8I"Y+I!$U]:+8IL$W>H+8Q2+OQ+C$
$ ]O+;/<^IJY$RY
8DY IL$XI H8\4I
\3$T^)*	I IEY+I
$U^)*	$T^)*	I Y+I
$U^)*	IL$W>H*	Q*B$
$ ^F+;; Y=Y
Y H8I1Y+H7$)I+$(I
$*$	*7$$IE> +IQ
+AQ+Q I >(*1I
I<> *1+QIL$W+NI9<HI:[T>H$
$ ^*+/V HJY
K(Y;&Y"I
Y!IL*RI"9H>XITHJI
Y!IM$XIIY Y$I$AP\3I!9DAIL3\3>X8AH8\4L4IEY+L3$U!%+I$H<Y$Q *VQ"*J; Y	;&Y"I
Y!*>I"9H>XITHJI
Y!IIY Y$I!9DAIY(>X8AY+I$API($U!%+I	>(ILIL$W>H+I$H>Y$Q +AY	Q"*7I
HIY
Q*D$
$  /	"9.D,D&2ABH?!?N>DN> *TH9<(*T9D8!H8>(*P;VH8X8*W	Q	P	RX8$2$/9,;A$+Y\Y].\B^>D9D?X8IJY]Y\IL$XH8\4\3INY+$UM+K<B$YH8\4INY+$UM8;VHJY&I:[MI)$">H+K;A$+$YHOY+$UM+KIL$W$
$ "/<B*]$5$&DD&,2ABEH?!IEYH98 Y"Y!I!9DX8I!$R$P$+Q!Q"*GY!H98 Y"I!$Q*Z* *1Q!I!I"> *U*Q; Y"Q*GY!H98 Y"I!$Q*(>H*1Q!Q"*($
$ $A+.IFYH98 Y"Y!I!9DX8I!O?Y M >(;0] <X+LLHC6K7<HH5$P$+Q!Q"*<Y!H98 Y"I!$Q+[+!+2Q!I"I!> +V+R; Y"Q*<Y!H98 Y"I!$Q+)>H+2Q!Q"+)$
$ $6+.5
? 	];XYH98 Y"Y!I!9DX8I!$R$P$+Q!Q"*GY!H98 Y"I!$Q*\*"I:[Z+XQ!I!I"> *U*QK]I![\O\Y K\H=[\I!9DX8IM$XO\H8\4I \3L4IEY+L3$U	Z+X$YO\Y+I $U	Z+XIM$W>H+XI!$R$PQ*\Y!H98 Y"I!$Q+O>H*YQ!Q"+O$
$ &A+.539D$(I+HM$(;ZY&$$$	+1;XY&$$IE> S^S^/^IF> +./^Z0. Z0.MFJ.0B2. Z .2F0>DAHY
; Y\2TI
Y
I
?X8<B>DY <B>DY!<BI!$X;I
AGIF>X; Y"I
AGIN> *	I
Y+I $S)E+C+BI
A\4I
Y+I \3I">($YI $U)E+CI"> +BI+L>(+I!$V+B+CI!$W$
$ (T+;*T>D9D?X8;$Y]Y\IL$XH8\4\3INY+$U)<+:ICH8$($*$$> +)$YH8\4INY+$U)<8;VHJY&I:[<I)$">H+:;A$+HOY+$U)<+:IL$W$
$ )X<B+GN4>D?*L>D8F?H*JIA$^N/)N[*R;AJ[+$2$2NAK1ZX<BZ[$/<B$2$/8D; J$0N9D<P*1Z$/8FJ?*.I%$1I&$0>HZJ9D<P*>Z$/8HI	$1I($0>HZK-[0K.XHIO[/J=+9DZK0S0S0[O$/<BLH$0S/+E>D8FN>(+
>X+]K+/)K*/)<B	,/**19DZS0S0PH+R.8/W8JA(K28X88/8=9E9O9Y9!AA4<(ITZQ: ZY0ARY*GRQ*G0B.R$	<B.Y0I08!I&> RQ.Q;I%AP8!I	> *%I(8!I&> RY.Y;ITZQZYRY*,RQ*,.	;ITZQZY$	>H*>RY*6RQ*6>HR1.17%<H<BY)I)/Y.I.Y-I.7$/G<BY,I,7/O<BY+I+7&/U<B7!<HS[/[7"/ <B7	/$<B;IZY^;X$-8H$-;HM$-Q^
2;HJ$-Y,I,/(A<GQA<A?A<;X$-HJ$-Y*I*Y/I/.;IZY^;X$-8H$-;HN$-Q^*T;HJ$-Y+I+.J; H7XHIUY6\HQ6*.]Y7; H7XHIVY6I7\HI78 \HQ6*.IB\H.	[V>DJ> $[>DK>(+R;A$+I+CU$(;V$+$Z8I+HM$($Z8I+CUY+;A$+/V=?>DI>(/WSW$$$.;$);Z$-$,$&$%$2;A$+IV/W[W8DH8$(I+IDI1$(KW$*$	+6/+A<A:A<CUCYCPGWZ,
 Y=NY>RI+B-I1H8$(H7$)J,$*$Z*\;XY&$$IE> *^I9R]>.I8*ZI)I>(**;I+AGIF>X**Y=*XI:*Z=AY&H7Y.I+A8!M.>(*;I+A+Q.M.8!I,>(+CI,+;VIUY6Q.M.8!I&> +$I&8 Y&Q6+FQ.IB8!M.>(+YIB+;XY&I=> ..; Y=I:]>;XY&M.Y/R...GQG$A?C&GQGWA?GXC%A<CUA<CBGWGQE CUGXE\GWGQG$A?A<;IZY^;X$-8H$-8H$-Q^
I;HJ$-Y(IZY^;Z$-8H$-Q^*U;HJ$-APY	.Y^I^8H8JAJ4$^I^AJ4$^.^;J2$^J3$^.+BMBJB0B 8F8FZ+I[Z^J+AJ4$^J+8F8DZ+R^*<J5$^.6;OISIZ6N6AJ<(+%=8P8A8J8J8J$^N6AK<(+%K(=K	J5$^R6;+N;/I!
 0&0!++0":/)GQA<A?A<CYA<E=C4GRA[CBA<CUGXEKC;N[ARJZMH8I1$(;V$+*Z[BNM[ARMI+:I1H8ID$(KB$*$Z*=;XY&$$?*?I)IC<(*(IC> *?$+HMI+$($Z*=$$IE> *?I+CC$(Y&$$> *?RM>H
A.MI8*;I:*;=?[-K/K0K1[/LHK/K0K1[0LHK/K0K1[1K1<P+^I<>P+\K1+^K180[2K.K-[-K2
-K-H=[-8D
-O-9HK2/D53J\S%>DM> <BR>D8D?*LN.YNZXI\> *SQ].X;A$+RR..8Y&H7Y.I+A8!M.>(*	I+A+XQ.M.8!I,>(*/I,+XQ.;VIVY6M.8!I&> +YQ.I&8 Y&Q6*3IVY6Y&M.> +XQ.Q6+AM.8!IB>(+NIB+X;XY&I=> .Z; Y=I:]>;XY&M.Y/RZ.Z>DAXZZK/ZK0ZXNXXLAYJZ\RXR+$<B+-?-71-\-!-R-L-A-X-%X?YHX>X:YAX<ZVZ*ZUZQZ
ZSPC:GD:CR:ST:DB:CM:DA:CA:AD:DT:STATUS REGISTER ERRORCOMMAND REGISTER ERRORDISK ADDRESS REGISTER ERRORDISK DATA ERRORCRC REGISTER ERRORDATA REGISTER ERRORDISK SKIP ERRORDISK INTERRUPT ERRORRK8E DRIVE CONTROL TEST PASS COMPLETE

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