File AJRLBB.DG (diagnostic Executable)

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

?>2CBHQH
&<4L&4?DOI8 HOTDSPE 8O TGDTL DTPAHUS(PADTRHSSDPTLG< HU$TH0\LP<WH?L<D$RHVES0EDEPCD HEDRHO <NDTL HELTLHL	LW<?<PDRXIDEL ETLHCTDEHRHORDWTOHLDDNPO TRDSPEH0\L: TH?L;D$RHVEDEHRHORDNPOD LADSHETPED $BD HDITVAJRLBB0 RL8-A/RL01 DR PT1CLOSE COVER AND RESET WRITE LOCK
ON DRIVE TYPE <CR> IF PROCEDURE WAS FOLLOWED:PLEASE LOAD DRIVE ? ERROR LIMIT EXCEEDED - TEST DRIVE  ? DROPPING DRIVE IS 8/A OPTION 1 AVAILABLE? DO YOU WISH TO SELECT NON-DEFAULT PARAMETERS? USE DEVICE CODES 62,63? READ ALL HEADERS? EXECUTE HEAD ALIGNMENT 
UPPORT TEST? EXECUTE DRIVE SELECT TEST? EXECUTE DRIVE SELECT ERROR TEST? EXECUTE MANUAL INTERVENTION TESTS? USE LOWER SEEK LIMIT? ENTER VALUE IN OCTAL: USE UPPER SEEK LIMIT? LOW LIMIT MUST BE LESS THAN HI LIMITUSE ONLY ONE SURFACE? SPECIFY SURFACE (0 OR 1
: ENTER ERROR LIMIT IN OCTAL (DEFAULT=24): ?END PASS ^C^G^FFILL = SR =    READYPLEASE MAKE DRIVE UNLOAD DRIVE HEAD ALIGNMENT SUPPORT TEST, DRIVE WRLK RESET SELECTS HD 0; SET FOR HD 1CYL ADDR IN MQTYPE <CR> TO EXITEXITPLEASE WRITE LOCK DRIVE PLEASE WRITE E
ABLE DRIVE  PC    DRV NO.   CA PC    DRV NO.   CA    CALLPC PC    DRV NO.   ER PC    DRV NO.  CYLSPINDLE ROTATION TIME REPORT, DRIVE :    . MSREMOVE ALL DRIVE ADDRESS PLUGS EXCEPT FOR DRIVE TYPE <CR> WHEN DONE REPLACE ALL ADDRESS PLUGSDRIVE SELECT ERROR T
STTO EXIT, RESTORE DRIVE ADDRESS PLUGS AND TYPE "<CR>" IN RESPONSETO "TYPE DRIVE NUMBER" PROMPTINSERT IDENTICAL ADDRESS PLUGS IN 2 DRIVES AND TYPE DRIVE NUMBER (0-3): ADDRESS PLUGS NOT RESTORED? FATAL ERROR - ? CAN	T RESET ERROR - ? DRIVE IN LOAD STATE - 
 CAN	T MAKE READY -  PC PC    DRV NO. WD1-ACTUAL-WD2  WD1-EXPCTD-WD2 PC    DRV NO. CYL(B4) CALLPC    CA PC    DRV NO. WD1-ACTUAL-WD2  WD1-EXPCTD-WD2  CALLPC PC    DRV NO. PC    DRV NO. WD1-STATUS-WD2    ER PC    DRV NO. BEFOR-CYL-AFTER   CA PC    DRV NO. 
EFOR-CYL-AFTER   CA    CALLPC PC    DRV NO. CALLPC  WD1-HEADER-WD2 PC    DRV NO. CALLPC  WD1-CURRENT-WD2 WD1-PREVIOUS-WD2 PC    DRV NO. WD1-STATUS-WD2    ER      CB    CALLPC PC    DRV NO. WD1-STATUS-WD2    ER      CB      CA    CALLPC PC    DRV NO. CALLP
  WD1-HEADER-WD2  WD3-HEADER-WD4 PC    DRV NO. WD1-STATUS-WD2 PC    DRV NO. WD1-STATUS-WD2  CALLPC PC    DRV NO.  INTPC PC    DRV NO. HD0-CYLNDR-HD1 PC    DRV NO.   ER      CB    CALLPCPOWER FAIL  PC = NO DRIVES AVAILABLE FOR TESTING0Y2S)?:BAD STATUS RECE
VED FROM DRIVE0Y2TT?9ZKT0?>DRIVE READY BIT SET0ZZW??<STATE 1 REMAINED FOR MORE THAN 30 SEC.Z3X?=? SOFTWARE ERROR (JMP TO 0 OR INTERRUPT WHEN INTERRUPT SYSTEM S/B OFF)0[\X??;ERROR FLAG SET0[)W??<STATE 2 DID NOT FOLLOW STATE 10[>W??<BRUSH HOME NOT RESET0\NT
?>ERROR FLAG NOT SET BY VOLUME CHECK0\%T0?>DRIVE READY BIT NOT SET0\6T0?>HEAD 0 NOT SELECTED ON CYCLE UP0]KW??<STATE 5 REMAINED AFTER UNLOADING DRIVE0]$W??<STATE 6 DID NOT FOLLOW STATE 5]9T0?>OPI NOT SET ON GET STATUS WITH MAINT BIT 0 SET0^VOK?=HEADER WOR
 INDICATES WRONG HEAD SELECTED0^0O1?=HEADS NOT OVER CYLINDER 0 AFTER CYCLE UP0
JX/?<HEADS MISALIGNED0
XT0?>ERROR FLAG NOT SET AFTER WRITE TO WRITE LOCKED DRIVE0
8OV?<READY SET TOO SOON AFTER SEEK0!AOV?<0 PXO?;STATE NOT 5 AFTER SEEK WITH 0 DIFFERENCE0 *T0?>DRIVE READY STAYED SET AFTER ISSUING A SEEKREADY NOT SET IN TIME AFTER SEEK0[\X??90![XO?;INCORRECT HEAD SELECTED0!,T0?>DRIVE ERROR BIT NOT SET BY WRITE GATE ERR
R0"GT8?;DRIVE READY NOT SET AFTER WRITE TO WRITE LOCKED DRIVES&??0"+T8?;DRIVE ERROR NOT SET BY VOLUME CHECK0BS)?:RESET DID NOT RESET DRIVE0TUK?;SEEK FAILURE0TU^?:0$OK?=GUARD BAND NOT DETECTED (READY NOT SET IN TIME)0$AUK?<CYLINDER NOT CORRECT AFTER SEEK I
TO GUARD BAND0$^U6?;SECTOR OUT OF RANGE0$-U6?;CYLINDER OUT OF RANGE0$=VJ?9SEQUENTIAL HEADERS NOT AS EXPECTED0[\V	?90%XV	?9ER NOT AS EXPECTED BUT ERROR FLAG NOT SET0%2W?9HEADER WORDS 3 & 4 NOT ZERO0&EO&?=NO CLOCK (OPI SET ON GET STATUS)0&[WC?8READY NOT SET
WITHIN 3 SECONDS0!ATA?;0&4O&?=OPI NOT SET ON GET STATUS (ADDRESS PLUG OUT)0	PW??<DRIVE SELECT ERROR NOT SET0	W??<DRIVE SELECT ERROR WOULD NOT RESET0	:T8?;DRIVE ERROR NOT ASSERTED BY DRIVE SELECT ERROR"WHP"W.MC<<(.WK;C<K;"/.WHS"MHT"MHU"MHV>(. K:"WHV"M. [)	
*?Z4<BK)	8K)K7> ./J48AZK./K)K7>(./KP0\K6<(*FK5>(./K)+O0!+M0&>K=[L./[*OTST[(2AO(2I"M2AO(2IS(C<> +YK*>(*/TK4"/JP"//*"6X<!>EBM?4A==]<Q]B.B ?8>EQMCB,B,,L%SYSTEMHB?;OSHIA*:*=+B+E+H+K+N+Q+T+W+Z+]+ +-80)*$$Y&&<	D&.0.		,1,<+(61Q1"2 21/0/1.7-M- ,!+48.:7J8(<*S*M(	1
T(J(-??TC?BDC?GM?<??A A0APA?6?>=RB = \80GYS0]Y^$/?%DHY*Y+$	$"A5> />HQ?$)$"A5> />I3Y!YLK=XIK<XH\H%DIOIL%E%DIU$+*^\IQLQ!*]%DI
$+**Y $"A5> />%DI.$+*/>(/;%DJF$+*99F9FY"%DKO$++Y	%DJ0$++EY)%DJ>$++JY,%DJ]$++OY(%DJS$++TY-%DK!$++Y> $,Y%%DK9$++ > +(I0<H$,Y&I&8!I%?H+2%DLE+Y%DLY$++2/:LLK<(DD:<+<	ERD[> *E: Y*Q%DL%%C=PDO=ODNC28AY%J%DL3$-*Y*YK1Y$+G$.*Q;URYLHRC.<(*-A.>(*	$&"K?ILXH:A\H*6IL8 YX
?XH:A\HQX*2HQ8F:DY Y-Y(Y)Y,Y"Y	Y%I0Y&: YK1Y$K-XHLH<(+RYXMXC0I"]X+I:YLI3Y!K?XHLH> +&QLQ!+X$+"%DY]$&"$)+ YT$TK/YS:AYU//</CF?/TBUCVE2ZERO <	I^> *YI	>(*Y$/$0$=*YK?YOK>YP$1*S$&Y.*Y$[8H<P*Y$&ZG$%I^> *>I	>(*>%DHNIL%E%J$;QH>\K=YOYP$0$1*>$<*+%DH$%C=3F9F7$.*Z$0$1*>
&Y.$%I^> /<I	>(/<$/%DH7IL%E%J$;QH>\K;YOYP$0$1+%$<+Q%DH$%C=3G
G]$.*?$0$1+%$&Y./<$;QH>\$0IMA1I4< +3$<+($&ZV/<I4>(/:$&[%/<>GHIIRH ($;8L>H$0IMC?<(*M$<*C$&[:+R$;QH>\K>YOK=YP$0$1*\$<*T$&Y.+R$[8J<X*%8FYO$&"	+R$;?">\K<YO$0$1*2$<**$&Y.+R$;?8>\K;YO$0$1*?$<*7$&Y.+R$;??<$[8H<X+K$<+B$&\!+R$0$ C:<(+R$&\2$%I^> /9I	>(/9$/$8%DM.IL%
%J$;QH>\$0IMA1O8< /7$<+%DH$%C=3JI2$.+S\!+1J+JC."J)A]\B[H$&]G*I4<(*I$&] *$;?">\K?YOYP$0$1*W$<*O$&Y.*$;QH>\K>YO$0$1*$<*\$&Y.$8$!<H*)$&\J$%I^> /=I)>(/=IU<(*=?H+[I*> /=:AY*ILYZ+LQL;UALYLIL8!IZ>(+5ILK<YXMX>(*=: YU%DPVIL%E%DP/%C=3K[KY$.+N$/$0$=/=ILY[QL;UALYLIL8
I[>(/=$0$[YMIM8D?H+!$&&0I[/=;XYU%DP:/;%2L<(LHHO%DP/%C=3LHLG$.$%I^> +,I,>(+,IU<(*
?H*0I+> +,8AY+ILYZ%DQH%DQU%DRF%CAL*=3MYL($.*
I3=*
K8YL%J$/: YUK9Y[	?$0IN8H<X*>$&	L+,$[8J<X+G8FYO$&	6+,	>	>;&Y!$/$0IN8H>P+VQ!+K$&	
+,Q[*5+,IZYL$/	?$0IN8H<P+(%DR+%DQU: ++%DN-;XYU$%$/$0$=/=$[8H>X/<$&\!/=D< ERRNNI0"0XIMC?K>YOYP$1*I$&Y.$%IL8BK9$X$U$>$[8D=H*V$&]5$%$28$%;X$W$2*!$W$28$%$/;Z$W$2**$W$28$%I^> +*I(>(+*%DM6IL%E%DNI: YZ0Y+A%C=3O	O$.IL8BK:$X$U+E$7<QIL8BK7$X$U+MIL8BK8$X$U+S$ $ YXIX
Z>(*9IX8!YZIX8B?H;Z$W$3$W*9$9%DN-$%$/$3$?%8$4$=/=$ 8B8J/<HAHB(BHDK?PP7]A?*FYM$&^R*7$ A08DYMI^> *YI	>(*YI(> *YIM>(*Y$&^,*7;Z$W$3$?%8$4$=*7$ 8B8J?H*,$]YM$&^R*7$ A08DYNIM8!IN<(*7$&
F$%I^> /?$/?I >(/?$"8B?H/?$31^1
+F1^K:YZYM	>$41
+R1^QMQZ+M%DO<IL%E%DPOYNI3YZK=Y[+"QNYM9IMM[<X+ ;GIZ> +/IN>(+8+5:AIZ> +5%DPRINO<%IYN/;A R*R<W0"RFQ[QZ/?%DPS$%$3$?%$	$5$%;Z$W$3$?%$	$5$%I^> +I	>(+$3$?%8K>YOK=YP$/$0$1*3%DN0IL%E$;QH>\$0$1*3$<*-*&%J$4$7$W: $ZIL8BI2$X$U$>$!+
$0K<YP$1+I$&Y.+!$[8J=+Z<X+R$&!(+!$/K=YP$0$1+!$&">8FYO$&"C+!$&
T$/$9$%I? +7$4$78AA/>(;X8AYZIZ$:+7IZ9D8X$:8$%/;4H4IT$ ]Q"I>(*S$4$78AA/>(;XK?YZIZ$:*SIZ9D8X$:8$%I? +R$4$7YMIM8AA/>(;X8AYOIO$W$3$?%*5$4$7YNIO?;$8AIM8!IN>(*5$&P$%$4$7YMIM>(;X8AYOIO$W$3$?%+R$4$7YNIO?;$8AIM8!IN>(+R$&P$%I>(/>$4$7YMIM8AA/>(;XK?YOIO$W$3$?%+4$4$7Y
IO?;$8AIM8!IN>(+4$&P$%$4$7YMIM>(;X/=BQVVVPAK?YOIO$W$3$?%*V$4$7YNIO?;$8AIM8!IN>(*V$&P$%I? +C$4$7>(*%8A%A%+CIN> *^$;?=908A$W$3$[8H<X*:$<*+8AYM$& $	$?%8+C$4$7<(+CYM8AYN$&=$%I>(+0$4$7>(+RI8%A%+0IN> +K$;?=90I8$W$3$[8H<X+	$<+XI8YM$& $	$?%8+0$4$7<(+0YM8AYN$&=$%/
+<H!X&;$HOX*MMX,H"X%H!8!XPAI? *5IU<(*Y?*L$6%*%*Y$4$7YVIV8!I%?*Y8A%A%*%*L$4$7YVI6%B*!*%*%$	$?%*%$4$78!I&? *-;T<H: YUIT> *5I-> $5$%I? +%IU<(+O?+B$6%+[+O$4$7YVIV8!I&?(+OI6%A%+[+B$4$7YV:A%B+W+[+[$	$?%+[$4$78!I%?H+;T<H: YU$%/?<8=<JH<,(H<PD:(P0*LJ8^ P+DJ("L! JZ
"L8 RDFZI>(*5IU<(*Y?*L$6%*%*Y$4$7YVIV8!I%?*YI8%A%*%*L$4$7YVI7%B*!*%*%$	$?%*%$4$78!I&? *-;T<H: YUIT> *5I-> $5$%I? +&$4$78AA/> +EI6%A%+&IN*;$;?=90I6$W$3$[8H<X+Z$<+KI6YM$& $	$?%8+&$4$7YMIM8AA/< +&I6YN$&=$%/?DN(NDR ZO<L[0&HO4K[,DHN <*,57X980DOP
HS\I>(*0$4$78AA/> *OI7%A%*0IN*E$;?=90I7$W$3$[8H<X*$$<*UI7YM$& $	$?%8*0$4$7YMIM8AA/< *0I7YN$&=$%I>(+ IU<(+J?*=$6%+V+J$4$7YVIV8!I&?(+JI7%A%+V*=$4$7YVI8%B+R+V+V$	$?%+V$4$78!I%?H+^;T<H: YU$%/?PBPAHQ(CADLSL/!EBH8DL8BBHQH>8DCL+8SHLA(DB"AH<L<0BB^$4$7YWIU=H*$9HIW
V8 YU<P**K?YZI? 9T9TY[I%YVIW8!I%<(**?9T8A%A%+$INYW*V$6%+$$4$7YWI[?H+HIW8!I%?H+QI[8D?H*<I<(QZ> 9X+I? 9XQZ9XY[MZ> +Y;XYU+$IW8!I&? +YI[9D9HY[I%MZ8!IW=:MZ+ IWMZ8!I&=:MZI[%A%8$%/> <\$4$7YWIU<(*"?H*OI%Y\I? ;ZYZ*6$6%+W$4$7YWIW8!I%> *:$"G?> *:: I\Y\*:I\8!I&> *6IW
!I%> *6IZ> +UI>(+U;ZYZI%Y\: YUIWYVI%8!IW<(+C=+P8!+O$"G?>(+KIW8!I&+OQ\IW8!I\O>IZ%A%+W+W;XYU$%/=J\??COPY NULL:<TDA0:"2
(,$4$7YWIU<(*\?H*OI&Y\I? ;ZYZ*0$6%+L$4$7YWIW8!I&> *4Q\*4I\8!I%> *0IW8!I&> *0IZ> +JI>(+J;ZYZI&Y\: YUIWYVI&8!IW<(*==+E8!+D: I\Y\I\8!IW+EO?IZ%A%+L+L;XYU$%:QL;GAL> +ZILK>YXMX>(+M/=Q^+^: Y^$/<$"8B=H+)%DMJI^%G%J$"A/> $)/<ERE&<(2
$$0Y>H$	$"8F?H*OIT8P>0*OQU*RISZ*WJYSYT:AYU$T.: JYYKNY[^2IO^2A[-$+U$"A.> *8S^""2IO^2A[
K XHLH%G%HS
*2%JK->(+NILK.[-W-+B: 
-$"C/>(+NI$9!O->P+N%DIA+0$"?$)8AYTRY.YK-<(+[IL29<HIK2:/!AJ5P2IO^2A<(++[*%DS^/"<,H%DIWIL%E%JILK?YX]X/>M<(0Y*"$*"I]>(*M%C=/&!&"%C=9&]=-&
=/&"=:&[&X%DMH*"$**"$(*"Q]*"Y].%DMTHS%G$-*-*-*;*:: %C=:&$=9&8&5%DMH*$$(*$XS.%DMR$).<%DMR<H%DMZ$"%G$-+N+R+$+: [&[%+T[%[&: %C=9	A=6	
	\%DMH+EI.[DK%S&XP/D;I
JN<($(8A>($*/	[:K:8B%FK:%F%H/1ZIJI8J8H%EJI%E.Z*I]>(*Q$	*L0Y*
0\J+< *Z0XQ]*LJ,> *
0X+5J*0&:0!<H*(1B*" 0".J=-P:J9%IHS8 Z;J:%IR;*5.-BMBJ> +W0Y*?0^C0I.Y
K3I
>(+5I]> +WI
K1<(+SK2> +U%J+WI
%IN<R<<(++=+I
>(++:R<+W:I
K)=+ K4=H+ YYN<Z<IY.<A?=6?===H:Y]%DMP/:>$<H*HRK*H2:&L1B. 5A1JR%I.MB0;$Z6NSZ7RS2IN72AR6*$R7YY;$Z6IY<H8BB3<(.SJ4<(*1J8=HJ9J5%I<H%J*Y??]B CA6.:6A<HR=.=6B/B6C/E6D/H6E/K6G/N6H/Q6I/T6J/W6K/Z6L/]6M/ 6O<HS/IM8!IO> +2IN8!IP> S(/($	;$K4[41B/4 :HYM1B*HJKX<B$&Z/-.,C0
X$*U%DYSIM%G%J$;A 90$<$>$/IS>(-.:AYU-S$!*.$[YM$^YN: J!YO$&[X*0:R!.!:$W$YIL8B8A$X$U$>.1:$Y$WIL8BK?$X$U$>$ A0YM$ A0YN.<:OM[5SMI >(+Z1^1
$>1^+^OM[6K6[7SM/M:I >(++1
+21^S5+2+1S7+2K6[7S5<HS 1B/  :HQ?H>LHP/8HB:J"Z Z
%C=3.WA.L.YR *P:*\YXJ
9D8FIXZ
*ERRJ!J > RJ
.E?;:%C<	.0<2.1=3.4..$.*58AZ6%JJ6R.[7K7C?9J8J[6: J7YQ$;??90K7$W$3K>K6YOYP$0$1+S$<+K$&ZC+5QO$0$1+\$<+T$&ZC+5IQYNK7YM	=$[8H>P+($&
4+5: O<
<$[8H>X+4$<++$& H+5R7.7-50X\P%DK-$-*O*O8YXIXBS>(*Q%DMH*A$.*AIX.<%DM^.T:J!YXQX*\1B.X ;<"X"X"X"X"X.":HR?R).)$[8H>X*?%DM$IL%E%DM $	$[8H>P*:./$0IN8B?+P%DN=IL%E$0IN8B?H+J%J/;$YIL8BK!$XO?K <X: 
?$U$>/QA$C:IL8BK>$XW?+,: 
?$U$>/"$ 8B8J$ A08D//BAD MONITORHD*K$4$ 8B8JB
YX$ A08D8!IV<(*\=*R8!<HJ
YYIX9DIY$W$3$?*^<HRR. : J YMK,[-: XH$4$!: 2I\H$[\HI3YX$ A0\HQX*12AS-*(: XH2ITH/?: LH< />LHYNLH2AYOING=[.K.K/?(+Q$&$Z++IOA.>(+X$&$)++ING<8![02ILHYPLH2AYQIP> /;IQ> /;K/[-/:. ?X?Y4
4)44:H8?G???845ME.*35B47INYPIOYQ2ITH*7: LH< +BLHYNLH2AYOING?O>> *4IO8!IQ> *4W=O=O<>(
=ING;8!O=> *42ILHYPLH2AYQIP> +MIQ> +MW:*/9$&$9/9LH2AYO$^YPIMYQ$0$&%P/92A8AYO$^YPIMYQ$0$&%T/9$&%./9ANNOT CHANGE MEMORY LIMIT WHILE RUNNING BATCHCDBECFADF%SUPERSEDING3+3-*33,3.30E.$][I: JYO$;??:"$3$=+H$0IMA1O?>(*U$& L+H$[8H>P*^IOYN$& &+H$[8H<X*)$<*^KIYM$& H
H$!*5IOYQ$[YO$^YP$0$&!S+H$0IMC>YXKI8D?H+AIX<(+G+DIX> +G$&!W<HR.YO$4$7YMIO$W$3IO=8!IMC-[,$?++8$4$7YNIN8!K,>(+): KJYP$&\<HSJSJ/JG?E OVERFLOWBAD NUMBERILLEGALA."YO$4$7YM$;?>90IO$W$3IO=8!IMG?
>$[8H<X*]$<*Q: JYN$&&,*-$4$7YNIN8!O>>(*+: JYP$&\<HRR.$;;T90$[8H>X*9$<*2*;R.R...HIC >(+HK
HI\HK^HI\H.<HIK]\H.<2TK>K=[P<BK[	ZR>HP2I
<2A<B.>\RLRJAD/1C^.	$%.&$(HR*FHY=3HX$ .HWX5CISO,O*\QHVH%2K38	?37361H357,7-$[YO$^YP$]YQ: JYR$0$[8D=*T8HYM$&&A/?$&&WINC>>(*"$/	=$0INC>> /<+%INC;>(+D$/IMA1>(*1	:$[8J>X+%/<	=$0IMA1>(/9$;A 8L$	$[8H>X+B$<*:/8$/+%INC7> /?INC6>(+[	=$/$;A 8L$	$[8H>X+Y$<+Q/8$/+%INC
>(/4$/$0INC5> /<$[8J=/8>X/<.02?OUTPUT VIA <DBA<L<I0XH<F<OP<C$/	?/>%DR9/=%DSB/=%DSN/=%DS[/=$;?":X$	$<*S.O0X>\?6??BFILQV[")BC?*;*>+C+F+I+L+O+R+U+X+[+^+!+$+!RD<H*$0&0!+E0":/0Y+K0^BEJF/JJJJK/QQK![Z<BRC.AJ
7.AQ<B;RC.BJ
7.BZVYEYJ:IDHLPTX\ $$ZP::)?2:D?>%0;%0X

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