Trailing-Edge
-
PDP-10 Archives
-
red405a2
-
unsupported/monrd.exe
There are 13 other files named monrd.exe in the archive. Click here to see a list.
@ "
<+p :,@h-2 ``&R0*5T(j-"x+2x-T f/3Ol (@`(
@@(
@@(z4(@B ",(*4,!$,4,+4,,(@@@@#@@("@g4(0D'+(,j,W(,6B(n 6(Z@Pu,#6@(
(.,A<+A $(4,,#@@5,~,#4(:,~m@d@ $(;, $(>,Z,#a@@gG,~H $(E, $(G,ZD(
@@( $(K,,#7B(
,~ 4+ 4m@@(
d,~4$(N,\$(O DP!$ DM $(O,ZD(
@@(C D(
C4,,~ "6D(
4}6B(
4@@(
,~D $, D* ,#, +A
`H(QH(Q @@*O@):)6(Q@#46B*3B',+
,N7"'+!!"G"4,A"1B7(R (S ",N7@' (S7D'+A\"4, +A $(V, $(Z, (\ D#d ,,7@7@+(_ D( $(c, $(h,,K D",# (S'U4D5"2Bm*d44$70$t+(m Bm:'U " B#a,~ $(q, $(r, D'W,# 'W\$ , q0"+(z@ " ({ 'W,(+) B'X " ),(+) B'q.&3&q+@ "2 B(
@r(
,AZH'X,Y (
$".",NZH'X,D,A")
3"q?`(
+X4BR :(
+I")3"q?`(
+X4BU +I? (
+A2)32q+R )
,~ ",(+\ [A$0d $ `,A`h ),~))))))))) $), $) ,7 +)% D'W,# )',+)+ D"*
'W,+)1
" )2 ,D \$ ,7D )54Ht )7\"@@ )8 (,~ $)9, $(h,,K D" $)=, $)>, D'V $)B,,#m@ )C,+B,,A "` B'V,*`@+A " B(6B'V;@@(,+B "3B'V++ $)I, $(h,,K ,# )J ,D#1"+ )K ,D )L,~,# ,~
This program is able to type words from the running monitor, whether
or not that data is in the resident monitor, swappable monitor, or
is in some fork's PSB or a job's JSB. Commands are:
CLEAR Zero the internal symbol table. This should only be
done if you have reason to think that the program's
symbol table is incorrect. Symbols are added to this
table whenever they are found.
CLOSE Close log file if one was in progress.
DEFINE s e1 Define the symbol s to have the value of the expression
e1. This is used only for ease in typing in of other
expressions. Typeout will never print the symbol.
FORK n Set which system-wide fork handle we are interested in.
This must be specified if locations in a PSB or JSB
are to be typed. A list of the forks for a job is
obtained by using the LIST command.
LIST n List all the system-wide fork handles of a job. The
output is ordered so that you can tell the fork
structure of the job.
LOG file Make a log file showing all valid commands and output.
MDDT Enter MDDT. MRETN$G will return.
SUPPRESS arg Specify that certain output is to be suppressed. Arg
can be one of the following:
COMMAND-ECHOING Don't show the command line in the
log file or to the terminal.
TTY-OUTPUT Don't type anything to the terminal.
An error will clear this.
ZERO-WORDS Don't type locations which are zero.
SYSTAT arg Do a systat of the indicated jobs. Arg can be any of
a job number, a user name, or "*".
TAKE file Take commands from the specified file.
TYPE e1 e2 Type out words from location e1 to location e2, where
e1 and e2 are expressions containing symbol names and
integers using the normal arithmetic operators. Typing
a ^E will abort the typeout.
UNSUPPRESS arg Undoes effects of the SUPPRESS command.
WATCH e1 n Continuously watch the contents of location e1,
typing it whenever it changes, sleeping n milliseconds
between checks. Typing a ^E will abort the watching.
VALUE e1 Find the value of the expression e1.
EXIT Leave the program.
HELP Type this message.
---------
Examples: 1. To type the JSYS stack for fork 0:
FORK 0
TYPE UPDL UPDL+NUPDL-1
2. To type the schedular tests for all forks:
TYPE FKSTAT FKSTAT+NFKS-1
3. To type the JFN block of JFN 3 for `the current fork:
TYPE JFN0+3*MLJFN JFN0+4*MLJFN-1
4. To watch the process PC of the current fork:
WATCH PPC
Notes: There are some quantities which can be used in
expressions which are useful. These are the following:
'J The currently selected job number.
'F The currently selected fork number.
'E The value of the latest expression typed in.
Numbers in expressions are in octal, unless they contain
the digits 8 or 9 or are followed by a period, in which
case they are decimal.
$)O, $(h,,K D! )P*$w\$c DJ $)R, $I,,K D!,# ! B",+B,,A+C,+)W`@6@",* "3B!+A3b!;">"`@+A+Ba0H(dxc(f (\ D#d )Y,P,6@+)] D(,~,2( ,1N+T1N+YG ,Z.DH,1N+T1N+YG ,R,~,Z"+T,2)^,b$DH,1N+[1N+`G ,R,~,b*H&DH+\,q4(*,5Dp,1N+i0N+O,P,0N+O,~, (1N",~1N#+n0N%+)c7$+)i,~7$+)i,~,+)n,~ # $7) ($ D#aF d@ l @,0.0. +{lh$$ .$?h+w0N1N+s0N+aH{+s,0. 0n-1N+0.0n1N+1N+G ,~$ D#aF d@ l @d,~@,0. 0n-+
$$.$?e+ 0.0n+$$.$?h+ 1N\.1N\.1N\.5.$$.$8+ e@ `#.#1N+0.00n=,~/.,~ "2"o2bp+ " )o "/o7(+)s,(,~ B"+*2"n2bo+' " )t "/n7(+)s,(,~ B"+*`b,~Q" $"d4,+* ",3 .,: ",N )u[",P )vZ",P7@"+A )u ",3+A B [4B7,7 .,:,:Z 0"1B+D B ,p+?0&+? F ,T7@ ,~ .,: +D7 ")Q"A`4N*,:+B7(s &5"G .,:"&"4BIQDx,G[x .,:,~4B*@)" .,:+K3b#,~ .,:+N )v & .8,:=fQ,~d"@&"4BWQDx,T[x@0$0d7 .0$0d7 .1D .1D .1D .,:,~\"4,!(D !" G"4,2B %G B %*hba@,~@@5\")w:40D,~!(}4H* " k,(+n B n*hk,~ )~! q (+8S54Hv"2$ 2d *hr5(v / 5:x,~ D%@,> "'4~d$@S5"2D 5*h{5( %2b B :,^,~0(hv+~ %/ B D 5 F :5+~S'U4H"2D m*h5( #a+*S54H
"2D 5*h 5(
7+*D%@,>`"'4~0(h+~`%,B57DD:5+~@@(dl@,~ */4,,~a@,~"04,d,~,>6B( B(@@(l,^/4,6@(
(,z+?,z *
+?3<+94N*N0N;#@@#0N6@7,~,>,>,>@F\"wa@\$w6B(
`@74+,^,^,^ (@@,~E*9::aNdMH `Ql,O^9xV(xW~i+0+0"UO4@UO4]aO4@aO4]ggj`]V5<`*)*
******2H2T2C,)* 8* 8*2_2_2_2_p*]y 9y`tEXIT
ESS
JOBS-1
TAT
BELL.SWSKIT>MONRD.INI.1
XNEXITUTPUTS-1ONRD.INI.1XbJOBDIR+NJOBS-1ONRD.INI.1 w
RD>EXIT
ESS
000,,000000
BLKF6+143,,0
`OPERATORile typeX]y']y]y]y#OO@]y2102 Development System, TOPS-20 Monitor 4(3004)fH4M
Kxl
zY"=
j=jco
>#oC[BI"z!c["]Z!T:
TO"ka5BN
W
5UJL!/,<* =dY"MPtMPOi* K7m
8}h,AC;5ktpZ
Naal.8.
o"jYhpRs8-sJ6eHYg-*o
KxLyg
WNx=`& nW>
VP]Y{R
VJ
VL
VN
UZB
^
TI\gj
r^O
+"~$JSrS "D?uFD@(.d%nnv\.d%Dd$ yAny>DxC}*2V`2H4z ?Xx%Iai[ai]m}II}Vl%v}o0Q
D}L.Rp&O}2K}2M}E:
SlM-{d1oTY]J$+#s#[FGJ%q+\B:t:h3^n
b!3]+6qz
bKoP4OD%D: DR}'WS 00-
a, bK~
J'}
)BeHmra
a/
Skc
a/
SkbT+@4|
Sj
Sknk>n
Sj+HXi
d +QW*(
a2(=~(j`B.5*=
a2S3\BRo2\
a[M oPz(@LR^!0)VdL0YDqu
a8AT
bj"a`%f(lw
Nu6t6rK-NQO",NvSt*+#s"%HB+*G.SJ\S_nmX")mX%mX%ic&Q8RfeC 2&(8(L
qh+h fHM/
tLik{SEES
WS&N%$"]c2eCBmuK&_]C
du.jo}Q>R^}&|]`m<
b!u
/a '_K K
0
?"ImYr#ew]Ew]DVuMt/3w]55BM'o`w]YIr6
v!P
SkU[Zgi.L;
b!
qi~BIMP6az!3UK\5fNM-TcSMcz]Lteq_!%Nv#h$X}j.
al+/>(H.B1h?HYhp%S=+,RRl^X(lpeNZHH@%H@%Hv:HD8H+HdH9+HJlH|HfH~H7NHH7xGrsHR,6w^KzKSz6xz7Uc^
SeFosfL=@}=@0Bov63zz[Fz?Dz7az7a@Q.VE!7MGDiHXhfky(T`2]%f>E97zp7
2M"UAcog}Nw^}#lc;k8acLr5{N|?g.Of>&Am)
TK[,
Mes/MO.8fO.*uO.*sYBYBYBof/Yofgo}N?p]OMU O`M:COzro&Lo
Wdj.yeJls~U#5.^~)
Pt#SB)5jz-8G;8,r_+/W22dTl'
>#d_z9Smov2dO]LttdT\ 7bL42dS(9;mov1EP.
Kyakn[gabTl/Y/K,\tCJM-h
'"l"s '7:79y$0l9y!|( 8a9"kykz{&w]n+w]"J86Y'o;Q c\B:
<ADEv@o]g80y
a8|fumLx2dS8m dTKmu])k[dvjlM:g
bY]7Ir'IdzY19
e )9%yVc\tP<CJ"
'"l"s '7:79y$0l8a9"kykz
Ky{&w]n+w]"JcX&()&) QVchi61+s5('a'a'`~'`'''^*.'W e'U'U4'T'T'S'S'Rs('R'Q'Q'P'P'O'O?~'N'NrI'M'MD'LK'L'K'K'J'I'H'H'G'G;p'F/'F'D}'D'C&60'C'B'@8'@'0'!-<'!#' ' '
{
`
4
f
' ''
/'
x'C|''''''''&z+9Y&t&lM>N8L`W}&k&k&j&j&i&i&h&h)1&g&g&f&f=s&e&e&d&d&c&c&J61'0{000t>WBLr27
$1@$&I&I&H&H&@6&8&7&7&6&5-&5&4&4&3&3&2&2&1@&1&+&*&*&)&)Y&(u@+O*,q_
@
@e~[< B`C)+mp&H
y
qi rM1u uc;+X"\J+Q+P+P+O+N+N+M+M+L+L+K+K+J+J+I+I+H+H+G+G+F+F+E+E+D+D+$/82:u%#0|,t3IH+*~O*~*}*}*|*|*{d*{*z*v$|}R4*q*p2*p*o*k*k*g*f*f*e*e*d*d*c*c%l*b*b*a*a*`*`***^*^*:*R*F Zop@*(** aXxa~8PX8aQ*6Lk8c^rh7,C8!;tlU:5``bPi
HHSH(8(:]RM=oZ/d(gs^g[z(UX"R_1PF.d")
(PtfeUv8.QHf|Fhl
sOsY^X`H(g
FH&6\r(:[R}&()&')~Ql6J5)/@(
p@ )|)6B\$`?h)'xX *9']('Vx&
x6'Ex8&6P:'A'?'/x>#P?'
`
4
f
XD1'
' J-''& +9Y&y&sxTxV@\&bXa G$he&G&?xixj&4Xm&0}quI+O*-NA`e"@ [D`D+#
+jl+C7LSG+*H(*y$}}RA*u*ph-*n*jx2~h8*E*]*Q'%*-*'*bOx~8_(B8_aQ*6Xk_xI }`LaWcGj
IGH]G(?(:']yM=PF.npu0`b[GdxefOa?h
GGH&=](:([yx'VxH(
]yy`t,@jhXHw
? MONRD JSYS not installed, run SYSDPY to install it
d (+8+(
? MONRD JSYS gave wrong answer for test function
d (+8ICLEARCLOSEDEFINEEXITFORKHELPLISTLOGMDDTSUPPRESSSYSTATTAKETYPEUNSUPPRESSVALUEWATCH
% Log file is not yet closed.
CURRENT IN-CORE SYMBOL TABLE@x(1
? Unable to enter MDDT
d (5+?+(8OUTPUT OF@x(:TTY-OUTPUT_H(<COMMAND-ECHOINGZERO-WORDSOUTPUT TO FILE@x(CMONRD.LOG. i(HH(FLOG FILE@x(JCOMMANDS FROM FILE@x(LCMD@*P&DetRUNTINot logged inSYMBOL@x(Usymbolxy~ x@x@xa H(W(XHN
? Bad symbol typed
d (]+?TO HAVE THE VALUE@x(asymbolic expressionxyx@x@xa H(d(f
? Symbol table is full
d (j+?FORK STRUCTURE OF JOB@x(o
? Fork tables are too small, reassemble with larger MAXFRK
d (s+?ggj`
? MONRD JSYS failed to get word of SYSFK table
d (|+?M/LY
? MONRD JSYS failed to get word of FKPTRS table
d )+?0H'q0H'q00H'q
% Structure of tree is bad, try command again
(^C)unknownrunningIO waithalterror haltfork waitsleepJSYS trapaddr breakTO READ PSB AND JSB OF IS@x)
? Negative fork numbers are illegal
d )!+?
Kxl
? Failed to get value of JOBNO
d )'+?
? Fork is not in use
d )-+?
'W+)0
Fork belongs to job , not logged in, user ???LOCATION@x)8WITH SLEEP INTERVAL OF@x):1000 H)>MILLISECONDS@x)@
[Type ^E to return to command level]
OF EXPRESSION@x)G
Value = = .
WORDS FROM LOCATION@x)MyhcTO LOCATION@x)Q
? Failed to read specified word
d )S+?~*
? Illegal expression typed
d )Y+?
? Illegal quote quantity typed
d )_+?
? No fork number has been specified yet
d )d+?
? Unknown symbol typed
d )k+?aO4@
? No fork was specified
d )p+?UO4@ ,,$
% Symbols do not match current monitor, clearing symbol table
? MONRD JSYS faile}0)d to find value of ( MONRD>
? Aborting log file because of error:
? - command file aborted
Command file completed
JSVARJSVARZPSVARPSVARZSYSFKNUFKSfX*56*6*O
q+'OvA+OH8'O2gO2d#WQ,WQ&gWQ&WQ
WPmJOOrcOOqhO9RHOjLOjXO{O/L`OO
2OO> ONdiON`wONN}ONK]ON@^ON@ION-?ON-ONtONkPJYPy}Py|6}Go"]twnv'noJ mXH7ImX$N(jnSL(
ZZYYYiH2pYhPBYhP%YhP%YhK*YhJ%
YhJ Y]xW Y]ogY]c"5Y]`+nY]` qY]~kY]
UY]UY]^.hY]Ww7Y]G3Y]DhY]D3?Y]@;Y]ekY][jY\{5Y\tBIY\sKnW+"UW*xVbo"`UVbCMV`~X@V`YAV`YB: UVS.e0bn*
7;L M5{P?xM5z~B@*[355'CG 4v >C4vB/$3/#{T/#{T/#TK /#AW/#4#
{i6"k8,:4)O>
zY"p);jo)3DdUT.2$ctuBgKKu&+{u"wqu!WwtarstTcOb-gT8aL:+#)A@+"(,k,(Q)L(
"%@V'W%
FB#"am"V+E3!T
1ib@xT
1iN@xT
1i:kX+~`xT
1i&x{TNz<Y"o
T[jnz
@B&r5>BM
<g&/JHS^}!S^} ^{g$|G&#E%wE!PE!Q>TQ\7l <1Td
V1Td
csLCK+lu_(UW
NtY#
Nsz(Ts?(T,
Ns"J\'W"'X|Yi&'qS%4\S%,:S%!S%~S%S%)S%[@S%/S%P S$\`S$\OS$H:J
AS!H9B+/89T/7JY/7T~VP L KHY4}*2j`j+\!0e/Rj(e!U3wk#l&z;l!Sd-!(
_Yg#a_M"mR_H.t_A97_
N5_e'U__tc_CDcU:/d@AMR/Q*+T2*)MG2KRsKRKRl-uKRegKRaNZKR] 6KRY&nKRY"IKRVjKRVYKR*9KR)<aRKR'xKRKR:dKQut(KQugWKQpfhKQpfUKQjBHJL JLzU JLmf`JLaUJLU:K!?<jK2O#ll Hg:H_M"XH_4E(HYl:_HY\ghX z#,R8H.R61f*O+twX%tNIA/Gb,6t7W00\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\ &\ )\+,\6.\.,[rO.O[mNO[mO[m O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[Qgr%0[Ms/[M"-[M +[L,[FG[@v*r#eOD^w'`w]!+{ 0j