Trailing-Edge
-
PDP-10 Archives
-
BB-FI04A-DD_1986
-
6,10/subrtn.sav
There are 3 other files named subrtn.sav in the archive. Click here to see a list.
p ' 1@x -x1x / `+ 0 + + + `+ +
+ + *ZgV- + + + + + + + + + @ 0
@ 0O@ 01- 0+ 0@@ 0@@ 0@@ 0+ 0 + 0
DECSYSTEM DIAGNOSTIC SUBROUTINE'S
@ NO@ 0- a` @@ 07@ 0@@ 06@ 0+ p p @@ A@@ B[ ( @ (6@ 0 ` + 0 @ h@@ 0@@ i @ 0 @ 0! 0a 0!,> ,> , <6@ 0, 3, :, , K,
A, , #6@ 0, h6@ 0, {O@ 0@@ 0'@@ 0+ N- +`` + 1O@ 0
@@ 0O@ 06@ 0+ / 0 @ 06@ 0
+ 0 + 6@ 0
&
' 0
+ 06@ 0,~ 7@ 1#l 0 ,@ @!"H, 7@ 1#n . )@@*b 8,~ Z `@ [ ,@ 0 @@ o,~ 6@ 1&+@ 1&a~~ + a`^N + a,> Z 1` 0a+ a0 1"+ a[ 1`?+ a0 + a (@r1@ + W0` + W0`
+ + n,^ @ X,^
@
X+ g,^ ,> d ,^ v ` ,^ / v ` 0Q+@ 0z 6@ o+ O@ o ^ b 0a2^ + 0!,> h bv z 6@ 1'+@ 1' 2@ +
@ 0"p
0$p 0#d
v @@ + GZ 4@ \1@ + X`@@+ 0 + ,> (BtA" (@ G )@. o+ P?H xF
#^(8 p t @;pN0(
Q2P 20 *`
B) > +8[@
B
zxh |hd Kh# Mi +8g Cc O0o +8q `` + t + `` @+ `` + !`` + "~ ,^ ,~ @@ s (@tA 1@ + 1@ + 1@ + ,^ + [O@ s3Z u2\ u+ Z / 2@ 0+ , ta` @@ 0'6 0'+ ,^ / #+ ,^ ,~ >` 0&+ + @ p B q D q F r,~ p q q r,~ @ tO@ 0'6@ 06@ 0+ $6@ 0p #,^ 6@ 1%+@ 1%, @@ 0'@@ 0(: 0, tZx /& 2F 0+ -7@ s+ ,3Z u2\ u+ -a` + n Z u \ u F 0`` @ + nb @@ r7 0+ s7@ 0+ 4d $ 0z d & l d ' 0v , 6@ 1&+@ 1&Z 0 0`` @+ C ([ 4B ?x x )+ ? *Z 3B &+ Cx Z x O@ 0) t( A 5@ F 0` z (@ . * @ D +[ 5D K@@ 0)+ RO@ 0'0d + P1D q1D q1D r+ P x - C B 0( ,Z 5D U@@ 0)+ \O@ 0(0d + Z1D q1D q1D r+ Z x - C B 0) -7@ 0)+ a 0(F 0)x - C B 0) 0`` @+ f[ 3B &+ f` 0Q[ x ` 0QZ , @ t4@ k 0`` @+ k p, t @ p p+@ 0 , , N, t,
V+ p p @ ,+ 0 0af + u, + o7@ sh O@ s+ 2af @@ 0': rQ 07@ 06@ 0+ yp `f b , 6 0+ } 00 + 0 p6@ 1%+@ 1%6@ 06@ 0+ 6@ 0p 0,~ 6@ 06@ 0,~ @@ U@@ 0@@ .* ? .* G@ G@ G@ " / @ 1 @ 5 @ 9 @ =,~ t 7@ + @@ O@ 06@ +@ + @,> h /,^ + @6@ 06@ 0,~ 6@ : U@@ @ @@ : t 7@ + @@ ,~ 1@ + !@@ 4@ 3@ 1+ a`+ @ + " + B @ + " + t + 1@ + /pX pH @@ A@@ B4@ .3@ 1+ )a`+ 0 @ A 2 @ &@@ B7@ 1"pHfA6@ 1"pHghpX ,~ pX ,~ B,~ B A @ B+ )T(1pX 7@ 1"pH fA6@ 1"pH ghpX : B6@ B+ 8O@ 06@ A+@ A+ 1 @ C B2 B+ ; C+ 1 C+ 6@@ 1"@@ 0@@ 0 #*" 3B #+ OO@ 06@ 0,~ 7@ 0+ Tp ?p `@ O@ 1"a@ O@ 1# `` O@ 06@ 0,~ F @ !p* d _p) p* d 0@ + p& 2p" d O`0@ + ,~ O@ 0+> P+ Q+" SO@ 0" *` S6@ @@ 0+ @7@ 0+ Zp
`` O@ 1"6@ 0,~ p& 3p" 0@ + + ]p `` O@ 1"6@ 0,~ @ p ,~ ,> @@ V 3* L,^ 7@ /}+ f, /}+ dO@ V: x ,> ! 3* ,^ ,~ @@ + d + jO + j@ ,> 7@ Vz 7@ /}z 3* L,^ , /}+ d+ ch h 4,^ V,> V> l b 0Q6 0+ w, t`` + w,^ + 0O@ M , ,^ 7@ 0+ V b + Vh h 5 x > l b 0Q6 0+ , ta` + 0O@ M , ,> 2@ 7+ 0,^ + /~6 0+ a 0
d 8[ /| ` Z /| d 9[ | ` Z | 6@ 0+ 6@ 0+ 7@ 0+ p* W W(@s1` . , + p X XA , d 9 X!` A | d : X(@rA | d ; X(@zA | 7@ 1"d <6@ 1"d =` 0Q,~ ,> d >,^ z ,~ h ?z 6@ 0+ , A @ @ @ @ @ @ @ A @ 0" B @ 0 6@ 0+ ?7@ 0+ u+ / @ * 8 ` ,~ @ 0# + @ 0" + @ 0$@@ 0#`@ + >`@ + 7`@ + <`@ + = 0#+@ 0 + A ^ b 0a 0!,> d B bv @ + G E+ B F+ B 0#+@ 0 H+ B 0#+@ 0 p I7@ 07@ 0+ G,> d K >v d M ?v ,^ 6@ x d N 0$v ` 0#v ` 0"v ` Z x l ` 0Q 0#+@ 0 z @ 0#p
0$p 0# 2@ + 0#6@ 0+ *7@ 0+ f+ x7@ g+ d6@ 0+ L7@ 0+ o+ ZB 0#ZF 0$! 3* h S@@ g E+@ 0 6@ 0+ ap p + _p p 0$p 0#! 3* E+@ 0 + g- 0h U+ 0 p + k 3* L 0# @ E 0" @ gO@ g+ 0 p + >p
+ 7p
+ <p
+ =+ @p{4p 0$d{4 0#d 0#`D l @ l + Zp{4p @@ gp p D,~ p" 0$p + 3* L 0# @ E 0" @ g W @ p p O@ g+ 0 p + + >p
+ =+ @ @ 0"p
0$p 0#+ 76@ 0 @ 0"p
0$p 0#d X 6@ 0 v 6@ 0+ J@@ + G @ 0"p
0$p 0# [+ Gp*`p3 p( p # 0$l l p& 0#d l 0$`D l @ d!``D @ l@ @@ i+ Z ] @ , "p3 6 0p*`7 0p
p( 6 0p #7@ 0+ 07@ 1$a` p& ]p p D,~ ! Z @ ^ @ ^ @ g @
@
@ @ @ @ ,~ p" 0$p* 0%p + 1 3* L 0# @ E 0" @ g W @ , dO@ g+ 0 p >p >p ? 0$a@ `+ @`@ + =`@ + >`@ + ;`@ + <`@ @+ =`@ + >+ @ + B `+ B a+ B c+ B F @ !, "p 3 p/p7@ 0+ D 07@ 1$a` , p p ,~ + [ A p 0@` + p + : + 0$a@ `+ H+ 1 L, @, {+ Z7@ 0,~ B bd dv 0a@ + ^d e[ 0(B~A" t d f[ 0A" f` =" W . t d M 0A /
$
" . Dz d g 0`B d h` 0Q b,~ C
I3Q*]K7aK @ : 0> 0
@@ 0'@@ 0, t`` + i7@ 0, l7@ 0
+ k,~ h i 0z b b 0Q: x ,~ 6@ 0+ np 0
,~ 7 0,~ f , ,~ 7@ 07@ 0+ w@ v , fp( 6@ 0+ 0 , + 7@ 0+ y6@ 0+ 0 ` 6@ 0+ 0+ 0 6@ 0,~ 6@ 1#,~ 0`` ,~ p, ,~ [ M(FyA& 7@ ,~ \ ~ " @@@ 1F +
N H
IH
CH
"PH
>H
8H
(H
3H
-H
H
N.v)"OJr+k^npiL
9;| y[IQK2%| p)K^-y3H
; B.Y:N.p J.)"HJ(kJn!KX
i8 [IRMR& @*KR- 0H
; B.Y:Z.@ 2Lnv)"OJr+k^n~itMJ5;?}[u[%IK2%~)\ms'RJJ ;kZn[:bNnp Nvi&OZvke]piL:8| y[IQ{?}| qiA^ x
H2a B&I
N&p n)v-2oKr/>ip}l9#| x HK2%| p=J -y34
I2 HMR& @2J- 04
Je (K2mKeI!KX"h [IR$I A
AR
H2a B&I
Z&@ n?vm6o[vop}l?8| x H{?}| q}@ x $A $I $p RHn)"HJ(kJn#K[
e;m[6e[%JMR&[6mZ*Tm#%RJJ ;kZn[:bZn` 2liv-2oKr/>i~}mO???}[}K2%~=|ms'S6M6[6k[.S.mp 6OVvi&OZvke]~itMz5{?}[u[%I{?}i_<Irl{g[6m[lO6p 7@ 07@ 0+ Vp, ,~ / #,~ 7@ 07@ 0,~ ,> l,> ,> ,> ,> p
A( l @p l m m (+ 7@ + ,^ ,^ ,^ ,^ ,^ ,~ , T,> n+ Z, T,> n+ Z7@ 0+ l@@ 03Z @ 03O@ 04@@ 01+ /@@ 03 o* 0G6@ 0+ p7@ 0+ 7@ 0+ ? 07@ 1$ab + t+ !"x o7@ 1#n . @ *b v! Z @ 7@ 01+ } ( < , ; p, =< z+ !"@ p7@ 1#n . @ @*b 6@ 0, 7@ 0p& q (@@ 01, + @@ /" 0@ z @03.$ /" 1c (+ .( 3F = @030$ + .$ F03= @03O@03+ /O@03h q+ / D O F P H PZ [ p \p p
\3d z ( 6@ 0 ( 6@ 0 ( $ + ,> p* l p) ,^ ,~ p 2 2 2 2 ~p + 5p /$ 0$ + 6@ 0+ )Z \7@ 0d{46@ 0d!`p + +p/pZ \A& p \`F @p @ O P P,~ 2 2 2 2 ~7@ 0+ 2 ( p
9 6/$ 0$ + .9 8, 99 ., 9." , f= , 99 $ , z @ ,~ 6@ 0,~ B Q5 B@@ @ s* 6@ 0, 6@ 0p& q Q,~ 0 z $ l @ 7@ 1#l Q . !"@ @ @. *b F+ ? B Q D R F R H S J S@j Z``xz 6@ 0+ 7@ 01+ { t0 + k+ P 02, ; p, 1c 02+ d@@ @ s* /" 5F W 02/" 3h z / .( `H z (H{.
(F{l@ 7@ 1#l <( `F .& + ^1C 02+ bO@ Z+ U$* .*6@ Zl* Q R R S
S7@ 01,~ 6@ 0, 7@ 0p& q: x ,~ d @ 034 d3" + d 03.( 2" + l7@ 01+ / . (@{0` @ @ @@ @ s* (@{l @ 7@ 1#l <& b@ . + y0 + 0 + d (B 034 d 034D d5@ 023d z
Q
+ d0`~ + d+ k
Q
+ d4@ {0 + + d B ] D ]7@ 01+ O .$ 0d + , Hz 4@ d @@ t*# + @ 022 03+ + 034 @A Q` . *!03.$ + ] ],~ B OZ 1b + # 07@ 1$a` + + &6@ 0+ *7@ 0+ &+` `@ + $d ` (@ A" G : x O,~ `@ + #+ ! 7@ 0+ #\ ` @ Z . + #7@ 0+ , + #+` `` + #d ~ + #O` 3@ 04 $ @ 6 0+ 46@ 0+ 5[ 00@+ 57@ 0O 4H 8d u0D d x` 0Q@f 7 03+ D4H < 03p 03p ` 03. / 03& .
4H Cz 1D + C` 03& z ` 0Q.& + 8 J 02Z (. d @ 024H K1D + Jd z 02z ` 0Q` 0Q,~ , ta` ,~ B Z D [ F [h {, + mh }-& _+ P @ Yh -& _+ R @ Yh Y-& eh Y-& eb 0Qh , + N, Z+ N 0 / 0
S X 0 Y 3@ Yb *d \,~ , + `@ + l1` ~1 + l1@ (+ ll (@: + (B d 3@ + j*d g f + d b + jh + P, d [ [ Z,~ (@G [@ YZ@ Y B Z D [ F [, Z+ m6@ 1(+ ~7@ i+ }6@ p+ }6@ 0+ |6@ 0,
!7@ 0p 7 0X 0 @ 0,~ ` @ 0 0+ z 0,~ @@ p@@ i,
#O@ iO@ i,
, t`` , 0`` ,~ 7 0,~ 6@ 1(+
h '" 0v b 0Q7@ 07@ 0,~ d b M(BA" ` d
0`` +
[ M(ByA" 7@ +
d `B d `B d `B d `B d ` 0Q,~ , @ , @ M@@ M,~ 6@ M,
,~ ,> 6@ 1(+
=7@ 0+
:7 0+
>7@ i+
?h ' 0v h ,
Q+
)1@ +
2(@ @ h,
Q+
)G h1@ +
41@ )F+
<1@ ,F+
51@ '+
;6@ 0
2 +
)@@ +
9h , +
5S@ hh , +
7P h @ 0O@ p,^ ,~ @@ p+
:6@ i+
: h+
9 +
9 h4@
) @ 0+
( Z @ 0J,~ @ 6@ 0+
E6@ 0,~ +
f7 0,~
$ 0L,~ +
r6@ 0+
O7@ 0+
M , A ?4@
J,
gz ,~ ,
d+
M,~
0L,
r+
O,~ H j 0J$(O <h
T,
d+
R: x H 0J j,~ 7@ 07@ 0+
X+
`,
B,~ 0@ >1@ ?+
[0@
\+ 00@ ,~ 6@ 1)+@ 1),
#6@ 1)+@ 1),~ A ?0 00` =+
c/ @@ +
Y6@ 0+
q6@ 0+
mrN ,~ rB +@ 0L, +
r@@ T ,
r , A @ 0L@@ 5@
r ( ,~
( 0L+
r 0LA ?0 00` =+
u/ @ 0M0@ +
|@@ T6@ 0
0a` +
z` 0Q 0M: x ,~ 1@ + 0a` +
z 0Mt +
z
d @ ,+ 0 + B j D k h ,
Q+ 1@ '+ + (B ,
Q+ 3B + k j,~ b 0Q6@ 0
2 + ,F ' ,F + + B k D l F l @b @@ 0M@@ ^@@ T@@ 1$,
Q+ )1@ + 01@ + 21@ + #1@ + #0 +@ ,+ )O@ 1$: +@ -/ . + +@ /+ )1F + 4 l l 6@ ^" k: x ,~ B 0M l l k,~ 0` 0` 0` (B $" (B 0d 0d 0d 6@ + )O@ ^+ 0F + )O@ T+ $ @@ 6@ T+ :bB + )(B )@ =D 7 + %@@ @@ $& )@ . =D : + % B m D m " ,
Q+ I1@ + I1@ + I0~ 0` -+ I0` 0@ + F+ Ih `B + I@ + @: x m m,~ @@ W@@ 0K@@ 0H@@ f@@ 0I@@ N@@ 0GO@ 0I" D @ 0H@@ 0K@@ 0N@@ 0N@@ 0O@@ 0O7@ 06@ 0+ U+
6 + @@ f+ `O@ 0G@@ d6 0H+ g, ta` @ + `,^ + f 6@ d: , + m@@ d ^ _ _ `
`@@ 0G,~ ,^ 6@ 0H+ fO@ 0H B ^ D _ F _ H ` J `O@ d +
A B ^ D _ F _ H ` J `,^ @@ c ($ A$ 1D +
A4D
B1D +
H1D +
H1D +
<1D +
?+
3,> )@ . t 5B y,^ ,~ ,> )@ . t 5B },^ ,~ ,> O
+
,> @
,> ,> ,> ,> Z & @ )" 1D +
1D +
1D $ 4 5J "t =F
9
5J #` 0Q+
,^ ,^ ,^ ,^ ,^ ,~ ,> O
+
,> @
,> ,> ,> ,> 5$
5J $t " @ @f 4D
& @ )B 4B
"O 5J %t =f
,^ ,^ ,^ ,^ ,^ ,~ 4H
+
B e " D f 7@ 01+
,(@ud 5B &j d x5B 'p f e,~ [ 5B (l 5B )t Z 5B *l +
* B e
1 B
# " +
$ ( ~=F
4 " ) -&
T=D
5 B c7@ 0I+
9 " -&
T7@ c+ c c $ @@ c+
5 & $ O@ cO@ 0I+
4+ cA ? -&
T+ cO@ c @ e $ e@ ) 4B c-&
T=D
C: e7@ c+ c+
BO@ c5
J " -&
T" ,
K+ c 0Z)@n(B' 0YQBx > 4@
Q,
L[x ." -&
T,~ 7@ c+
O<$
O 0Y-&
T+
R @ a B d6@ 0+
c6@ 0+
c6@ 0I+
crN +
crB A ?1@ + 1@ +
|,
Y+
^+
~0@ +
bL@ /,
c0@ +
cO@ N 0: T1B @@ f0B +
i6@ N,
p7@ f: 0H@@ T1B @@ T6@ d+
l`` @ + 7@ 0+
-( 0P+
w6@ 0P+
u+ +
prB A ?1@ +
|0@ +
p@@ N@@ f,~ 0B +
0P+
y0B +
0P<* -(
y @ ,+ 0-
{+
c @ ,+ 0-
}+
c`` + $+ 06@ 0N+
1@ + 1B + +r^ =b ?, ,^ ,~ rF rN + 0L B + U 4"
" + a6 0+
& 0W+ a+ + 0\> I0 ( +
& ,O@ W> INX ( +
~@
& 0> @@ 0K,~
& 26@ 1(+@ 1( b + 0
& 5+
& 7+ J C
C
I2 I2 I2 8I2 :G2X G2Z YC *YC" NG $I' ,I' .a3 0a3" 2GH 4GI 6INX <INZ >I3 PI3 RIB TIB VIB0XIB@Ze" \e" ^IR hIR lIS jIS ni6 pi6 ti7 ri7 vIOIO! INHINJ! e! 0e!2e!4e!6e! 8e!(:e!0<e!8>+ + "
EXEC ONLY
X @ , =+ [}&eI3C0]7}W->M2
|~ ?_wx0a|(Q"E}W-pY' @eH?}+y7.[`:x t + z + x + ~ + @ }R.= a 0_Vv@| }BP ~ }O= Q ~ }+y&p` 4p }| ` }~,RGQP } M0Xh }N8yKAP 0 - @}O\T_W JMm ~ - 10 @ EKK|@Qf@hx M$ aJ||PZ.,Wd@ DDT m:7\x g?l=N~ l;n~ Ew?2
~ *
~ "E}Be zV5K{}| - 0"+ P+ V|(Q"E}Be z?4\SY?8
~ }6-[yr+z~ }:}c2pl[7egx }6-[yr Tigx }Vu;Wo8ZKK\~ }+y$LRgL)3 tp I6 ~ } xO
sPdy 0
wp }B~y9B~y9&vI9eW@C&dY ~ + 0}B
y MM@e 9e?lOh4X=|Rx }S &.,We| - @ - - }Ll-9~ }$}pC ( PS3x }
:& CJNN?}Ll-9& CJNN?}6=`| EH`J~p H a75{g| 2I| K:
gLp
GO<Y8RMY7kSwp p2 p
=H + `p4 p6 003X YvK;&? @HH @@ }6-[yrl ;z6+v ^
tu}?`{O$ Z&#u~ i?$ [m|\ ,P }DSJ$]TG;rKLgp 2 m& P( ~ ]8 m& P( ~ G"
wkJ P| ]?X6M @ Kc$\Wk;.92 J`e$P| MVe@ "= "= "=@
0Y,p tJkx Cx Gx Kx Ox }S'o'$: G>vLWXx 3N _H`GIp ~ }2@
{SR 9 4p e =tiD\`x d|@\d<O 4p D"DH
******
EXCEEDED ALLOWED PRINTOUTS
t +
b 0Q+
t +
t +
j +
(p +
*l +
-t +
/l +
0 \
****
USING 'DSK' PRINT FILE
****
%PRINT CLOSE ERROR
%PRINT OUTPUT ERROR
DSK INIT ERROR
NODIRROOM x> x? x@+ xD+ C/~ + /+ + /~+ /~+ 0 + 0 + 0 + /~+ + /@0 0 0 0 0 0 gV-i7 rq'H0 =x0
, . - + * @ ( ) ? / $ p0[aJMm a; p0_aJMm a; x0awx0a+