[comp.binaries.ibm.pc] Memory usage check

davidsen@crdos1.UUCP (Wm E. Davidsen) (07/28/88)

[ So far as I can tell, this program, version 3.00, was written by
Adrain C. Evans  and is dated 15 Dec 1986 -- R.D. ]

This program is a TSR or command callable program which shows memory
usage for programs and TSRs, and which ints are vectored to each program.

#!/bin/sh
# shar:	Shell Archiver  (v1.24)
#
#	Run the following text with /bin/sh to create:
#	  rmap.arc
#
echo "x - extracting rmap.arc (Binary)"
sed 's/^X//' << 'SHAR_EOF' > s2_temp_.tmp &&
Xbegin 600 rmap.arc
XM&@A234%0+D-/30`C(R,C40X``)(-LUL4%%X@```,Z3I,```"$H,@9.2$2>/F
XMQ!P0;<JT>2,G#\0P<$#8*2-G3IHW;D#,<`$#!@@4<LIX)%/&#9T4!1%`"7.F
XM#(@8`(@\F0+""D>/($&T(-ADB!`0(*!,@0+"2!HV*D$(R4,GZI,[;C@6)##D
XM39LV8=R0`<&$H4T02-Z\65-FK,\Q="C.`=`#$@$0=>_6+8`7$M^Z"/HVZ,L!
XM0`,%5>;0M*D#A!RP&;>\L-,%!(^65>7X.!SS"AJ.-JV`&!.FSAR;8=BP`5%4
XMB$,0<4&(L4DFS1PX;,+D:=OY<TH024"0>1/5S1LZPFWCU@U1(D6+D$'<^1S2
XM3)J.R.74<7/X<),@3*_(24.G:D@Q%H.`&`*BB)VP#V/4>!%#Q@L<-@X#0$(>
XM1%B+;%D4VQ@@T<%0'3:Y8)=A"DCQ'5,,S4%':E"-95=B-@U!AQRK%3''&+"]
XMD=QMN4'G7$479=2=`E2@81L(<,CQQAD*M2%=&`_=,5YY+8'`D']SG-:&&%#)
XM(5MZ":415GOON?%0&&9D!H*$=9!AT1MF>`=>$T4TX0(40?"$'@A+I&'C$FNM
XM`5)6(96!7&HN"`4"%77((<8;4+QQAU938$G''6&D=%B++\8X8XT7630;"&:D
XM5`8;%M4FX7ABU%$5&2S`**,=:;`TEG$0@52&16.@$59-#YDJUAPN'`9%B;!]
XM!L(9840TFJEP/!3"`8>1@%17<F@'!W)!J/8&:08&5>I"(1U`4!!WRF&@&V>`
XMH"`!^D%R`0R0+$`0)`U\BP``7;EA7;4@D.L56&*EZ\0+ZOD%0!5NF,9;ND8X
XMNA4`+@``2048`/"$O_\0;#`D!2-\<,(,+^RPPA#O@HL7(2R"#B[>5`R.`Q^@
XM,XX!+@#B@P($`%#'`BZ`@@`!+BAB0@($--,(%%+HDHH`M"303`A:8*&+-R/$
XM0L`TZ@B!"P`Q[,P)%"'[H`$%)G]!#A@\=%!'`BX88\`&%`2P3A20`,!#)U=G
XMO374ZQ`1-@\!U/%#TURW?8/93P<`2QCF@$!.&`P`8DX8)/SQ]Q112'&%%1X8
XML,\,P,A\P`=>?*%%%EM@T8D^9G/-K]9/`_",Y2[\XP('%+@@RLHN(/(RRXFX
XMD`;K)JS!,B,6M$&``Q=@7/'%0"^R\0<.'&`V$@'$@$XG".`2!P%0X)('\^B$
XMDL`@Q!"`CC4`,(+,*/P,H/4^`_`;2AD$.`*,"XMX<`8!)CARA#^,&$``^Z``
XM('83=+3`@Q9T#,$X*'!@'BC>P#Q<0&$_S3O&`*"`#GHH@'H(8%S*"%B``YJ.
XM@.OH0MC,1D``H`,1`3!!*,('!$8,8P##,)\_%#>`=;2"@R73VLH"T+0`8J`.
XM!D#'!0*`CBAXT`("^%\`H3#``J(`@;B0`O0J\4!B1/!\12S`$2_(LF,88!`=
XM`(`#T!$.`"BO@,]CX-6HQ[)%N*Z,L6.9(VI'@&>@`PP(<($5L:A%LP5P<P;H
XMH!`%2,#F'1`)S2-``!@8@R8^<8($J""_1$'`D!D@@`*`H0>E40!'0E*2>R1B
XM'PV(1"P,$AWPF)X3)1A%"S*298!XI"`Q"0P`\K&`?VP>)3[I"U$>LI2+;&0J
XM`TA#K750CE?,H@"&`4PZ.L".!,``#!^0R2(V[XB`Q`4C!,#`.-B2E!2<XBD9
XMUPP+%%.8+E@A\88ALI69;`(B#```=F```1"@#@-(1R4`,`IWHD,8J/2!#7&(
XMCDC\`QW+\`<ZP@:`9FXR`4@L`?0><$TH4A"A5,R%.M'1@@(8M(`.0.(%H#<.
XM!$`0FXG,:$0G&H`"I!,`B\!&.4M6AP,,P`#R6X<!PF:"EX9/*>A0AP#(&$Y5
XMB@QF`*"#`D0&/I,-`!W)(,`P=&&_7)1L%Q#('C#0@0T`2-2#M6!?*-3)5*L^
XM-:KW!(`!VF<`=<;/'R]%!P5V2@P!B)`%`#@``ZD0`.H)(!<"\*`@K`<&`.@B
XMKW@%P"X4X$&"!A8=MF/<2DUF@%#$M``T':%@HWJ/<>P"'0.XQSY&48\!U$R=
XMN0C?8#W8!0!@81`^Z&Q0#=#5=1`@;+H`K6@)BXXA6'6B(%!J%1;!#I`YP@!H
XMG<$V7(!:M`:5!$0=@`#LT(%<#,07`3.!(@C`@Z`V@&UT2``/!$"'`O#@'W0(
XMP!",((YT+&(8!^C",';+#A>,H@NL<T`86&>!,1#``!XX0#\&D0\%V"&>C```
XM?P$PAW@2`J7!*,`""+`(?,`"`*IP02C@VU7-0D$1PN@J#Q)@!W<>@``P4`46
XMQ,$.?A#7!_8-:@J.L(A[L((',*A#`6`!`E6LPQXGMJ\`ZE"Z4,P7"0IF,#Q,
XM``@>@*`.[#,&B"_*-!\3()H+9B`'#O!1A[+LI?.E(C[2.XQ\K$,?[,7O`9)K
XML@3D8ER^<`$!UA&"L"57`'\P,YIOL.8(A*VXX:O#!,X,`%\D8<T!"-LO%(J.
XM203@`.N80]@.,&@"\!D==PB`R.XQ@`$4>!U?")N8/>`(+Q#`%TT%P`!>;#($
XMD!J>ZT!`V,01#\:M@P=W5O*I6QB#L+W8!72@KLGNL5]W".#%7*`#`GB@@UQ7
XMMP[SX,<@C"&`1O/YUG0X0'7I,`!5B(,>'^`R>Q.7WU]L-!?A0D<_`/#F/[10
XM!V%;A!$(T`/[T2$&CL"&+P`!`&\[.ERL0(<)@AH`)[P8-OOP-P,#5@A@8$&H
XMTS:`M=\AT[#1V-K[>)QZ>8#K$QB9#B,@-AT^P(-@;P#&?*``#W+`APGP(`A\
XM8``/ML"'!?`@#'R@[A[X,`#&#0,7ZAR&OPBP;3+3H0Z,B[>Z638*.VA`W2`;
XM!1XT\`O[@;J@R3BQT8,ZA5:\D)U&E\,07,#.I=^!!X/XAP+D<,P5!E"230>`
XM4@IWN,19X`,6.,`B@M'5P$+5@ZSHQU71D8A#0TYRE,/"$8(0B'P`H&VM^(!Z
XMPYS?AXNC']KF[3Q(L7ATR(&&H@A"Z42Q"@KH0AD40(<.!("+!-1@9RZ(GP=*
XMEP@/D*[T?M5"Z$5`>@#`8&>BH+3J\#$`6D@!]?$CGPM:OSX/\%:&)=->O.<-
XM`%;,(!F*0`8@#&^'+"3AWW2H!P]:0`>7OR#:':?V.C9@ZR3PP`YT<`$/K$`'
XM%?"`#.GG`1':SP/R6(`'2:"#!#Y`LY\%(&<[TS.P\'],@'I:0S)>(PMF,T/K
XM$&%:`S->(PJ*MUZ\90!6)#_V\UOS8P+U<S]UL`$GQ4[N5`<1($+A$P`P10`O
XM-3]`8#[KT`V1QPY,A@L9%4U*\$DG0`!5AD@%(%*G%%M6E5>C]3^4A@Y7P`\S
XMJ$[1M`70`P\#L(-1I$Y45'="2%C_PWOH``+\H%[$5$0"$`Q4-`Q-D`164`2V
XM!0D#0&^<@`X%```%$"Z=,`R<0#A28`57X`$NX`@>`%>IYP&$P`'HD`$`(`=Q
XMU'J&P`$-QR_I<XCG]0%?X`63LP5Q^'2[X`>`F`6#F`'HL`&#2`&#@%Z!,`[X
XM(&#[@`2$&`C[``\$)@#X<'/VDP_#(%RLH`#`4`>L.`P7IWT]0`?Q`&-R(`(C
XM9P<B%P1RH`$\8`1VH``O)P<2P`-F<`<.D"DL<``L``-",PWC,`#8L`[+`(M2
XM(&97L`C3<#16]0]_L`C^\`K4]@3BH`^!$`SF>`_9L`CSZ`\>P#&+(`^LL`C+
XM(`^ND`_CL`!.!0#S8`IU\`[C(`#KL`XMYH@'H`7#H!3&APU!APT#L`T7J0^)
XM<`&,\`0"H`\?4#DZAX8/-BY^H4Y^@0D=D`0AD`(AL`4A<`,AH';^4@!6Q%SV
XM8T5XD$6P<(\?H`NTX#T&,`D=P`!6=`@=H`)X:$6)L)(A`$R-T`$P20L/T`P0
XMP`./@P@^H`<=X)-TL`,F@%I^D$5UP`'`U)0Z\)16M`A=J98&$)5,X):/T`$L
XM$`(?H)-9A`L^J0O4()1$"3+_X`#,E0@60`D=,`C"8`"$:0D=P'__PY6[<'B5
XMA8([B05$%`@=4`+JU%TN(`,&$`D=,`J8B07H8P&,R0\R0`XW!P)RA0YYA07#
XM\`\6@)1A%@H[:3Z+X`.%T%S0<`#H$`P!,'3SL`K1<VCJ)9NT68&VV0&XZ0<$
XM$`WG$#H6,)=<AIP=4)NW"0R+X`<&`)U#)YU-&8.+X`4&\`]W4)YW0`#F*0#_
XM<`/_8`?6PP`H50[J93:@"0`R99\=$`#6R7CYI6X,D)KV8`*2L)]&H`#18`8*
XM$`J8&0`'NIWJ:00(H(<[V33W20='YP0(L`C)*)USN0KB@`^!<*#U\P].8`!Y
XM@`[K\`&+H*$<J@#2R9:T:(L/1U[Q,*(*4*(GF@?A\`'&T(:+<`SB29[FB9[J
XM>0?LZ9[PB0[RN0CT24Q:<Y_Y&:7[V9\5^%L[":`"2J`&BJ`*RJ!=RJ$1NJ$N
XMZ@<P*C(7J@`O))M-&:+KD`"L()U1>03B<`\XJJ,H6@V+8`S5.9O7R5N)HZ7D
XMX`(#6J`.ZJ4*\`\22J%=*7<:F@).P&#)B(X>V@$U``!W`)X=P&IW"@`FBJ+<
XM(''$A%HX20</4#,6Z0$5"0KD\P'N`)%2ET5T``$UHPT#P`ZH@`!TL`^#H%,#
XM^*JQZ:=AAJ4=H&X*D)K"5:@&B@`)NJ'PN9T($`I8U*(&$`2S"`QTD`$\T`!T
XM4`'?10<AL&%TL`)#,`X5,`6:N@5)L`[B,`X)0&.:*@[YL*=<]F+_(&/2V@'K
XM@`R*``[K0`Q0<%[V8`-[T`'^``P#6K"CP`<=@`4T-@[8D`3HRJ92.00YX`$,
XM2P>@L`[MP%YB.IX&L`@/$`2+<`0&``51L!3F>:0"8`5&^`\0A`2+``\OI@!T
XM8`"TN''K4`];D`58``3BL`WC%S8HJ[+IN9ZX``@=P$`L`+-.U+,_*P[FH%ZX
XMVC;[H`]5NZNLL`_#4+5U<+59NP^MP+4IY;5@BPH!L*OGM0IDBPUFB[5HJ[;#
X&H`I<"QH`
X`
Xend
SHAR_EOF
echo "uudecoding file rmap.arc"
uudecode < s2_temp_.tmp && rm -f s2_temp_.tmp &&
chmod 0666 rmap.arc || echo "restore of rmap.arc fails"
exit 0

-- 
bill davidsen		(wedu@ge-crd.ARPA -or- davidsen@crdos1.uucp)
			{uunet | philabs}!steinmetz!crdos1!davidsen
"Stupidity, like virtue, is its own reward" -me