[comp.binaries.ibm.pc.d] Mark and Release PD TSR's.

bud@cimage.com (Bud Howard/1000000) (07/31/90)

Here are two PD programs that are used to mark and release 
TSR's.  Before loading a TSR, execute MARK (which is a TSR
in itself), load your TSR's do what you have to do and then
execute RELEASE which releases up to the MARK specified.

----------cut here-------------
begin 775 mark.com
MZU2033(N-2!005)!345415(@0DQ/0TL@1D],3$]74PT*34%22R R+C4@+2!-
M87)K960@8W5R<F5N="!M96UO<GD@<&]S:71I;VX-"B1%34U86%A8, "_.@97
MOF4!N6X D/SSI,.Z'P&T"<TANDT!N  ]S2%S!#/;ZQ"+V+0^S2&T3;\Z!3/;
M_,UGOS@%B1TSP([8,_:_( &Y  +SI;A  ([8OJ@ OR %N00 \Z6^\ "_* 6Y
?" #SI;HZ!;\X!2Z+'='CT>,#TX/"#[$$T^JX #'-(2 %
 
end
----------cut here--------------

----------cut here--------------
begin 775 release.com
MZ5T5D)#-JT-O<'ER:6=H=" H0RD@,3DX-2!"3U),04Y$($EN8U 9 ?__#P<'
M< \'!W .!P=/PXH^" " /@D _W0",O_#4*   *(( %C#M ,R_\T0P^AW "Z@
M* $\_W4&5;0/S1!=Q@8$  #&!@4  ,8&"0#_/ >W4+, OBH!=""^,@$\ G06
M/ 1R K #L_\\ W0-MR@\ 70',L"S +XN :(& (@>!P NB#XE 2Z+!*,  "Z+
M1 *C @!5M _-$#H&!@!T!Z & #+DS1!=Z7;_Y&$D_.9APY%;7^LH4%&Q!-/H
M ]A96"4/ ,,[VG4".\'# \$#VNOE)HM%!":+7090"\-8PP=3B3XH (P&*@"+
MP04' +L $'(",]LD^.B]_XO(B]/'!C  ) ",'C( Q#XD .C#_W0EZ+'_<PV)
M/C  C 8R ";$/>OIZ', = DKP1O:)0\ ZS8FQ#WK5.A@ (O'C,/HC/^CB@&)
M'HP!45*+R(O3B\2,TX/K#NA@_S/ Z&G_6EEW ^FE!3/ ,]M34";_=0(F_S6+
MQXS#Z%7_B_B.PR:/!2:/10(FCT4$)H]%!@8&Q#8P ":)/":/1 ('PP8&Q#8H
M ":)/":/1 ('PX ^E $ L/]U"K0!S1:P '0"_L@E 0#" 0"@E '&!I0!  K 
M=2(RY,T6"L!U#(@FE &P&PKD=1"P X ^E@$!=0<\ W4#Z3L%,N3" 0!86E!2
M55+H+?Y8/ UU!HH6! #K9SP*=0O^QBXZ-B8!<EKK/SP(=0HZ%@0 =$[^RNM*
M/ =U"+0.,O_-$.M$4K0),O^Y 0"*'@@ S1!:_L(N.A8E 7(FBA8$ /[&+CHV
M)@%R&?[.4K@!!NBT_8L.!  NBQ8E ?[._LK-$%JT C+_S1!=@#Z6 0%U$DSH
M)_]T#$SH.O\\$W4$3.@R_UC#6%I0M 7K$5A:4+0$ZPJT ^@% #+DP@$ @/P]
M=!6 _#QT$(#\/G0S@/R =$A5_,TA7<-648LV>@&+#GP!@SP = M&1N+W65ZX
M! #YPUD>!A_HV?\?<@*)!%[#45:+-GH!BPY\ 3D<=03'!   1D;B]%Y9Z[B+
M-GH!BPY\ 8L<"]MT";0^Z*7_QP0  $9&XNW#HW0!OT("B3YZ 8D.? $SP!X'
M_/.KL".ZW03H-0#HT?S&!I8! +D> .L OJ$$OS@!'@<.'_SSI08?,\"CE &B
M@ &C@@&CA '&!H$!?L8&.  -PQX.'[0EZ"[_'\/, N4"& .U [P#PP,8 ^4"
M___! /__@@#__T, ___$ /__Q0#__\$           #__\$           #/
M4U%25U8RY%#_%CP!7E]:65O#4U%25U9,_Q8Z >ON58OLAUX"+HH'0PK = 7H
MT?_K\X=> EW#Z.7_#0H PSQA<@8\>G<"+"##4(K$Z $ 6%#0R-#(T,C0R.@!
M %@D#P20)Q1 )^N:"N1T"/FX  !X O[(P^A" 5Z,R"X#1 8N T0(+@-$"BX[
M!@( =@/I. &,RRX#7 :.VRX#7 @NBQ8" "O3+CM4#'($+HM4#(OZN/[_@>H 
M$',+B\(% !"Q!-/@,](#TX[2B^"CC@$SP*.* 8D>C &C) ")'B8 5\0^) "Y
M! #\\ZM?+O<$ 0!U#8S(CL #WRO8M$KH]/TNBT0"HW8!+HM$!*-X 2Z+!"Z+
M3 Y15NA2_EY9OT(" _D#^8D^8 $NBT00HV(! _@+P'0+QP9< 0  Q@9> 0")
M/FP!+HM$$J-N 0O = O'!F@! 0#&!FH! (/&%%:X #7HD?V)'I !C :2 ;  
MNFH(Z$O^]P9T 0@ = BP [HP".@[_O<&= $$ '0%Q@:6 0''!GX!" DSP*.(
M :*8 8L.8@$>OUP!Z#,*BPYN 1Z_: 'H+ K&!OP! .C ^L.T,.@R_0K = '#
MNLX&ZP.ZO 8.'[0)Z![]NN0&M GH%OVT .@1_4YO="!E;F]U9V@@;65M;W)Y
M)$EN8V]R<F5C="!$3U,@=F5R<VEO;B0-"E!R;V=R86T@86)O<G1E9 T*)% >
MOUP!Z*,*'K]H >B<"AZX "7%%I !Z+O\'UCW!G0! 0!U!;1,Z*S\B] +TG0$
MZ!8 DULKX$R+_!X.'Q8'_*J1\Z0?_^,STK^  "Z*#3+M1S/;XP\NB@4\('0$
M/ EU!$=)Z^^+]^,/+HH%/"!T"#P)= 1'2>OOB\<KQG0$0TIUTI/#N4  ZP"_
MN !8B_0VBA0R]CO*=@*+RD)&O[@ '@<6'_SSI 8?Q@4  ^+_X)&,VEM?!UX?
M_#OW<P<#\0/Y3D_]\Z2.VO_C6UA5'E!74XOWCMC\K5"MB]BMB\BMB]"MB^BM
M4*V+^*U0K8[ 'UY8PYP&5U6+[,1^"ORKB\.KB\&KB\*K6*N+QJM8JXS8JUBK
M6*M;@\0$'UW_XXO$*\%R%#T  G(/L033Z(S1 \$[!HP!<@'#LO_K0%M8G5. 
M#I8! DSH7_AT!$SH<OB )I8! 3P#= '#C[H! .LC,\"&!H !PX ^@ $ =0'#
MBA:  ;8!ZPQ;6)U3L@*/!H8!M@)2Z.O[6J&& 2T# (<&B $+P'4+4E+_-H@!
M_Q9^ 5J _@%S%.A@_%Y##0I5<V5R($)R96%K .LPQ@;\ ?]W"^A%_ T*22]/
M .L.Z#K\#0I2=6XM=&EM90#H+/P@97)R;W(@ (K"Z%#\Z!S\+"!00ST H8@!
MZ#K\Z W\#0I0<F]G<F%M(&%B;W)T960-"@"P >GP_<($  O >0;WV,8'+4,R
M[;H0)^@5 +KH ^@/ +ID .@) +(*Z 0 BLCK%#+)_L$KPG/Z \+^Q?[)=03^
MS70&@,$PB ]#PUL'B_<FB@PR[4$KX8O\'@8?%@?\\Z0?_^->+HH,,NU!*^&+
M_!X.'Q8'_/.D'__F6HK!B]PVB@\R[0/90S;$/XOT.LAV!8K(-H@$01X6'_SS
MI!^-9P3_XELR[8OT-HH$,N0KP8O^ _@+P'0G>1&+YS:*#$$>%A\6!_SSI!_K
M%#:(# /Y _%!'A8?%@?]\Z0?1XOG_^/H%0"X 0!T 4@+P,/H"0"X 0!U 4@+
MP,.+_(/'!#:*#3+M1XOW _$VBA0R]D:+W@/:BL&*XCO*=@*'R@O)= L>%@<6
M'_SSIA]U CK@6EF+XU'_XH\&A@'_-H8!6XO\-HH5,O:+]T8#\C:*# +1<B0V
MB!0R[2OYB^=!'E86!Q8?_/.DB_Y>3D^+RD']\Z0?1XOG_^.R$.G[_5OHQ_I9
MXS61"N1U,$B+]#:*%#+VB_P#^BO0=A4#\#O1=A,#\8O1'A8'%A_]\Z0?ZP(S
MTH?W-H@4B^;_X[(1Z;K]6XO\-HH%,N0#X$3_XZ,& EN/!@0"CP8( H\&"@)3
MQ#X( @97!NAK_K@! %"A! )(Z(S_H00" P8& @KD=1+$/@@"!NA-_E"X_P#H
M<O_H,O^Q_^AM_L.+]#:*7 (R_S:+0 .*X+ !-HE  \-; ^*+]#:*!#K!=!@R
MY /PB_PR[0/YD4$>%A\6!_WSI!]'B^?_X\<&(@(   K)= XS/B(""L!U!XO!
MB]Z+U\,ZP78%D8?>A]>(#B8"*LB ^2AR!HH.)@+KWXD^(@* )B,"@(D^) (P
M-B4"@<\ @(#.@(#Y$'(+BN>+VC/2@.D0Z_" ^0AR#8KCBM^*^HK6,O: Z0@*
MR70*T>K1V]#<_LEU]J F O8&)0* =10"Y1/>$]=S7M':T=O0W/[ =53YPX;E
MA]Z'URKE&]X;UW,4@#8C H#VU/?3]]* Q &#TP"#T@"Q!0KV=12*\HK7BON*
MW#+D+ AV%?[)=>KK#_;&@'41T.31T]'2_LAU\3/ ,]LSTL. YG\R-B,"PPK)
M=&\*P'1Q L'H! &C$ *)'A("B184 C+D,]LSTK\6 K$%1XHM"NUU#(KCBM^*
M^HK6,O;K'+X( -#=<PP")A$"$QX2 A,6% +1VM';T-Q.=>?^R77-D9_VQH!U
M#9[0U='3T=(*R70"_LF1,C8C @K =08SP#/;,]+#"L!T^RK!]>B- *(0 K\5
M K$%O@@ .Q8: G4*.QX8 G4$.B87 G(,*B87 AL>& (;%AH"]=#53G4*B"W^
MR70;3[X( -#DT=/1TG/**B87 AL>& (;%AH"^.O9T.31T]'2<A$[%AH"=0H[
M'A@"=00Z)A<"]8L.$ *+'A("BQ84 I_VQH!U"9[0U='3T=+K!O[!=0+YP^E9
M_W(,!(!R#ULSP#/;,]+#!(!S UOYPXD.%@*+RC//]M6 Y8"(+B,"@,Z @<\ 
M@(DV& *)/AH"PPO =04SVS/2PXK\B] +TGD"]]JXD  *]G4$L(B&U@O2> ;^
MR-'B>?H*_W@#@.9_,]O#6P<F_W4$)O]U B;_-?_C6R[_=P0N_W<"+O\W@\,&
M_^-;6%E:7P<FB04FB4T")HE5!/_CCP:& 5E>7UA;6NA4_7('4E-0_R:& ;(!
MZ6_ZCP:& 5E>7UA;6N@L_NOCZ&[_65)34/_A4X/Z&7(AB\'H'/>R!_9%!8!T
M O["*L)S C+ / ER K )_L"*T(KP4NB9 %J*PO[ "O9U$0+!>0?&!B@" .L)
M/ QR K +Z!8!6[XH O;%@'0%L"WH:@"*Z0KV= *U  KM>07H60#K!^A+ /[-
M>?D*TG09L"[H20#^Q70'Z$  _LIU]?[*> 7H+ #K]PKV=0'#L$7H*P"P*PK)
M>03VV; MZ!X L"_^P(#I"G/YZ!( @,$ZBL'K"XH$"L!T T;K K PB =#PXL%
MBUT"BU4$"L!U$[XH L<$,#!&1H'^- )U]+D  ,.*[H#F?U!2+("8NDT ]^H%
M!0"*S%I8@/G9=0+^P5'VV>B" %D\@7,%Z $!_LE1@,Z L80JR+  = K1ZM';
MT=C^R77VOB@"BNZQ!-+M@,4PB"R Y@]24U#1X-'3T=+1X-'3T=)9 \%9$]E9
M$]'1X-'3T=)&@?XT G7-6<,RY+LH @/8@#\UQ@< <AK^R'@-2_X'@#\Z<@[&
M!P#K[\8',<9' 0#^P<-24U"(#B8""LEY O;9BMF X_R*^]#K M\R_XV_\ \N
MBP4NBUT"+HM5!(#A W0'Z%8 _LEU^8O(B_.+^EA;6O8&)@* =0/I4?SIR/R!
M      ".    0!R;   @O#ZH !"EU&BV!+_)&P[#K,7K>"W0S<X;PE/>^7@Y
M/P'K*ZBMQ1WXR7O.ET *P'4!PX#.@%%24U#1ZM';T-S1ZM';T-Q9 N59$]E9
M$]%9<PS1VM';T-S^P'4"^<. YG\$ \.B.@);Z!+W7P=3C,",VCO"=0:!_V@!
M=C57OK@ C7T,N2  _/.E7^A0 7,%L "[__\FB1V /CH" '0,)HA% HU%3":)
M103#)L=% @  P\8&@ $BPS+ ZP2P >L HCH"CP:& 0?_-H8!)HI% B0/= 8F
M@&4"W\,FB4T&Z,X @#Z  0!U\>A= 8 ^@ $ =>?W!G0! @!T%;@ 1":+'>C-
M\O?"@ !T!B;'108! ( ^.@(!<Q(FQD4"@":+700FB5T()HE="L-T6[@"0B:+
M'3/),]+HF?(FBTT&@?F  '(#N8  *\&#V@!S"@/!=#:+R#/ ,])1B\J+T+@ 
M0B:+'>AM\NAW EKWVB:+=0@F@#P:= 9&0G7VZPRX D(FBQVY___H2_(FQD4"
M0":+100FB44()@-%!B:)10K#)H!] D!U ^G$ L./!H8!!_\VA@$FBD4") ]U
M)NCA_R;&10( )HL=@_L"=A:#^_]T$2;'!?__M#[H^O%S!<8&@ '_P[D) +L/
M$E%3OK@ N0, B@3H+?,N.@=T"5M9@\,&XN?YPT9#XNE968 \.G7S+HH'+HM?
M <-#3T[!__]44DW!__]+0D2"__],4U1#__]!55C$__]54U+%__])3E    !/
M550  0!%4E(  @ F@SW_=2VX CVR ?8&.@(!= :T/#/)LO%2C54,Z&GQ6G($
M)HD%PX@6@ $\!'4%Q@:  ?/#CP:& 0>)/C0"C 8V B;V10* =07&!H ! O\F
MA@&/!H8!QP8T F@!C!XV O\FA@&*+H$!@/U^<@*U?L8&@0%^NS@ B1Z" 3+)
MZ"SRL@$\"'0Y/']T-3P$=$/^RCP8="L\&W0G/!)T-3P:=$,\#71%/"!RU3K-
M=-&*)X@'_L%#@/P@<P*()^A# .N^_LEXN.CR\0@@" !+_LIU\.NLB@<\('*F
MZ"8 _L%#_LIU\.N:"O9TENL$"O9U!<8'&NL(Z-OQQP<-"D-#B1Z$ <.*)I8!
MQ@:6 0!0Z(WQ6(@FE@'#Q#XT H ^@ $ =74FBD4"J"!U:"0/=1LFBUT()CM=
M"G('Z%\ )HM="":*!T,FB5T(ZS\&5SP!=1R+'H(!.QZ$ 7()BO#H"O^+'H(!
MB@=#B1Z" >L;/ )U!TS_%CH!ZQ \!'4'3/\60@'K!4S_%D8!7P<FB$4#)H!-
M B##)HI% \.P&L.T/R:+'2:+308FBU4$'@8?Z.#O'W,",\ FBUT$"\!U!2;&
M!QI )HE=" /8)HE="L-7Z$G_)H!E M]?6P<FB 7_X\0^- * /H ! '4_)HI-
M H#A#W43)HM="":(!T,FB5T()CM="G0EPU" ^0%T#X#Y W0/@/D$= __%D0!
MP_\6/ '#_Q8^ </_%D !PR:+30@F*TT$=!^T0":+'2:+500FB54('@8?Z$KO
M'W($.\%T!<8&@ 'PPPO =!+HK? \ 78+D4FP(%'H>/]9XO=;6%/I;_^16UA3
M4;NX .A4]%CHB?"!Z[@ *\-V#)%3L"!1Z%#_6>+W6XO+N[@ B@=34>A _UE;
M0^+TPY);6;\\ H\%CT4"CT4$4U&[N #H)OGKOEM94[\.%0O)=0._$Q4.Z$/T
MZ P PP144E5%!49!3%-%Z"CPB]Q#0S8J!W8/BL@R[5.P(%'HZ_Y9XO=;-HH/
M,NU#"\ET#3:*!U-1Z-7^65M#XO-:B^/_XELNB@\R[4/C#2Z*!U-1Z+K^65M#
MXO/_X[ -Z*[^L KIJ?XRP.GK^C+ ZP"B.@*/!H8!!_\VA@%1Z"( 68 ^@ $ 
M=1!1Z*[\68 ^@ $ =00FB4T"PX\&A@$'_S:& 2;'10(  .D&_)%;7U/INO_'
M!CH"/YGK (\&A@%:7E\'4.@6 %F /H ! '4*.\%T!J [ J*  ?\FA@$F@WT"
M '1/)H-] @%T!E(F]V4"6I&*)CH")HL='H[>Z,3M'W,(H#L"HH !,\ FBTT"
M@_D!=!^+^@/X,]+W\0O2=!. /CH"/W4,4"O*CL8SP/SSJEA P\8&@ $$PX\&
MA@$'_S:& ;1!C54,'@8?Z';M'W,%Q@:  0'#Z.[N @#X1+Q./ .L   $ * 0
M    @ "+[.G#&E6+[$Q,Z!+\C7X$%NC"\C/ Z(G^Z-7^Z,3QN $ Z5SP58OL
M3$R_: $>Z/OZZ*_QN$P HFL&BT8$,N2B:@:_:@8>Z #QS2'H(_&+Y5W" @!5
MB^Q5Z?< 58O$_W;^B^A5N%( HFL&OVH&'NC8\,TAZ/OPH7H&4*%L!DA(EP<F
MBP6)1@2+1@2+Y5W" @!5B\3_=OZ+Z%6#[ 7$?A FBP50N , EP<FBP6)1O?$
M?@P&5\1^$":+!0-&]T!?!R:)!<1^$":+!5"X 0"7!R:+!8E&^<1^#":+!5 S
MP)<')HH%,N2(1OO$?@0FB@50BD;[/5H N $ = %(60O!4(I&^S+D/4T N $ 
M= %(60O!"\!T.?X&:07$?@BX 0 FB 6@:06Y!0#WX9>!Q^("'E?$?O,&5\1^
M$":+!5\')HD%Q'[SBT;Y)HE% H/$!(OE7<(0 (/L![D* .A \$Q,Z/O^HX(&
MB4;\,\"(1OF(1OBB:07_=OPSP)<')HH%,N2(1O<]30!U-KD= .@0\(U^_!97
MC7[Z%E>-?OD65XU^^!97Z.[^BD;Y,N0+P'0&BT;ZZ00 BT;\0(E&_.F  (I&
M^3+D4(I&]SU: +@! '0!2%DCP0O =":X 0"(1OBY'0#HN^^-?OP65XU^^A97
MC7[Y%E>-?O@65^B9_NE! +D& >B;[^CL\"]#;W)R=7!T960@86QL;V-A=&EO
M;B!C:&%I;B!O<B!P<F]G<F%M(&5R<F]R+BXN+K'_Z/7PZ,K]BD;X,N0+P'4#
MZ2K_B^5=PU6+[(/L [@! %"-?@06Z'KPZ.3Q69$KR'PF08A&_5&*1OTRY)=7
MBD;],N27BD,$Z"?L7XA#!%E)= ;^1OWIWO^-O@0!%E>-?@06Z#[PL?_H:/"Z
M  &Q_XOE7>D&\E6+[%7IMP-5B\3_=OZ+Z%6![ $!C7X&%N@3\.A]\8B&^_XR
MY(B&_/Z+A@8!4(M&!)<'!E>-OOW^%E>*AOO^,N3H1.Z-OOS^%NCC[XU^!A;H
MW._H;?"(A@@!BH8( 3+D"\"+Y5W"!0%5B\3_=OZ+Z%6![  !_W8$N(  EP<&
M5XV^_/X65[B  .C][8J&_/XRY G N $ ?P%(4(J&_?XRY#T@ +@! '0!2%"*
MAOW^,N0]"0"X 0!T 4A9"\%9(\$+P'00C;[\_A97N $ 4.C9\.FX_XJ&_/XR
MY G N $ ?P%(4(J&_/XRY)>*@_S^,N0]( "X 0!T 4A0BH;\_C+DEXJ#_/XR
MY#T) +@! '0!2%D+P5DCP0O = Z*AOS^,N1(B(;\_NFL_XU^!A97N0<"Z,+M
M@>P  8V^_/X6Z/'NL?_H0^_H7OZQ_^@3[[H" +'_B^5=Z;'P58O$_W;^B^A5
M@>P! 8V^_/X65[D* NB%[8'L  &+A@@!4.CM_K'_Z-[NC7X(%NBH[NB^[@#H
M0>]T8(V^_/X6Z)?NN0<"Z%;M@>P  8U^"!;HANZQ_^C8[NCS_>@/[XB&^_XR
MY#0!="^-OOS^%NAI[NA_[@#H N]0BH;]_C+D/2$ N $ = %(62/!"\!T"<1^
M!+@! ":(!>D] (V^_/X6Z#?NZ$WN .C0[E"*AOW^,N0](0"X 0!T 4A9(\$+
MP'00,\"(AOO^Q'X$0":(!>D' +@! (B&^_Z*AOO^,N0T 703Q'X$!E?$?@0F
MB@4RY$A?!R:(!8J&^_XRY(B&"@&*A@H!"\"+Y5W"!P%5B\3_=OZ+Z%7I4 !5
MB\3_=O[_=OR+Z%6#[$R-?JX65XU^!!;HJ.WHROF-?JX65[B  .@#^NB=[ G 
MN $ = %(B(8$ 8U^KA;HV_GHCNR*A@0!,N0+P(OE7<(! 8'L 0&-OOS^%E>Y
M"@+H*.R![  !BX8( 5#HD/VQ_^B![8U^"!;H2^WH8>T Z.3M=0/IE@"-?@@6
M5[D' NCYZX'L  &-?@@6Z"GML?_H>^WHEORQ_^A+[8V^_/X6Z!3MC7X(%N@-
M[>B>[8B&^_XRY O =%3H1O;H_?@21FEN9&EN9R!M87)K(&9I;&4@C7X(%NC@
M[#/ Z*?XZ//XZ.+KN5<!Z)3K3(U^"!;HQ^RQ_^@9[>C\_HB&^_XRY#0!= G$
M?@2X 0 FB 7I!@ SP(B&^_Z*AOO^,N0T 703Q'X$!E?$?@0FB@4RY$A?!R:(
M!8J&^_XRY(B&"@&*A@H!"\"+Y5W"!P'$?@0&5Z!I!3+D7P<FB 7$?@PSP":(
M!<1^"":(!<1^!":*!3+DN04 ]^&7BX7D E",R%F1.\%U%L1^! 97Q'X$)HH%
M,N1(7P<FB 7I[@"Y#@+HX>I,Q'X$)HH%,N2Y!0#WX9>+A>0"4(U^$A;H >RQ
M_^A3[/]V$.C/^W0\Q'X,!E>Y$ +HKNI,Q'X$)HH%,N2Y!0#WX9>+A>0"4(V^
M$@$6Z,WKL?_H'^S$?@0&5^CG_%\')H@%Z80 N0X"Z'?J3,1^!":*!3+DN04 
M]^&7BX7D E#HM.L)1DTR+C4@5%-2L?_HX^NX8 !0Z%[[=#S$?@@&5[D0 N@]
MZDS$?@0FB@4RY+D% /?AEXN%Y )0C;X2 1;H7.NQ_^BNZ\1^! 97Z(#]7P<F
MB 7I$P#$?@0&5\1^!":*!3+D2%\')H@%Q'X$)HH%,N0] 0"X 0!\ 4A0Q'X,
M)HH%,N19"\%0Q'X()HH%,N19"\$+P'4#Z;'^Q'X,)HH%,N10Q'X()HH%60O!
MB(82 HJ&$@(RY O B^5=P@\"58OL5>D0 # Q,C,T-38W.#E!0D-$149,3(M&
M!#+DB$;]BT8$BL0RY(A&_(U^!A97BD;\N00 T^B7+HJ%=!XRY%"*1OPE#P"7
M+HJ%=!XRY(K@L %0Z$SLZ&WKBD;],N2Y! #3Z)<NBH5T'C+DBN"P 5#H4^N*
M1OTRY"4/ )<NBH5T'C+DBN"P 5#H.^NQ!.A^ZKH" +$$B^5=Z1SL58OL@^Q.
MC7ZR%E>-?@06Z#+JZ%3VC7ZR%E>X 0#HC?;H+NF-?K(65[^B!AY7N  $Z('V
MZ!OIC7ZR%E>_H@H>5[@( .AN]N@(Z8U^LA97OZH*'E>X$ #H6_;H]>B-?K(6
M5[]^!AY7N ( Z$CVZ.+HOY &'E>X! #W+GX&Z$_BC7ZR%E?$/I &!E>X! #W
M+GX&Z"'VZ+OHC7ZR%NC^]>BQZ*",!C+D- %T"HU^LA;HBO;HGNB+Y5W"  %5
MB^Q5Z<\ 58O$_W;^B^A5Z9X 58O$_W;^_W;\B^A5Z00 #@#__R[$/N0?)HH%
M,N0]_ "X 0!T 4B(1@2*1@0RY O B^5=P@$ 58O$_W;^_W;\B^A5Y"&(Q+ 3
MYB"P".8AL GF(8C@YB&+Y5W#58O$_W;^_W;\B^A5,L#F\>0ABN"P$>8@L CF
M(; $YB&P >8ABL3F(>2ABN"P$>:@L'#FH; "YJ&P >:ABL3FH8OE7<.Y"P#H
MF>=,Z%C_= RY"@#HC>?HI__I"0"Y"@#H@>?H=_^+Y5W#3$SZH(H&,N0+P'0)
MN0@ Z&CGZ!S_H(X&,N0+P'0_OZ(&'E<SP%"7!P97N  $Z-[FOZ(*'E>X0 !0
ML*B7!P97N @ Z,GFOZH*'E>X0 !0L/"7!P97N!  Z+3FZ5T BD8$,N2Y!0#W
MX9>+A>0"B4;\_W;\N" !EP<&5S/ 4)<'!E>X  3HB.;_=ORX( 67!P97N$  
M4+"HEP<&5[@( .ANYO]V_+@H!9<'!E>X0 !0L/"7!P97N!  Z%3F^S/ 4+"(
MEP<&5PZX"@"7!P97N P Z#SF#K@, )<'!E<.N!8 EP<&5[@" .@FYHOE7<("
M %6+[%7I5 %5B\3_=OZ+Z%7I1 !5B\3_=O[_=OR+Z%6+1@0)P'T=C7X&%E?H
M$NR1      "+1@3H5.SH)^SH$>SI#@"-?@865XM&!.A [.@ [(OE7<(" $SH
MM?#H;/,S365M;W)Y('-P86-E(&9O<B!44U)S(&EN<W1A;&QE9"!P<FEO<B!T
M;R!B871C:"!F:6QEZ$WSZ#SFZ'7PZ"SS,'=I;&P@;F]T(&)E(')E;&5A<V5D
M('5N=&EL(&)A=&-H(&9I;&4@8V]M<&QE=&5S+N@0\^C_Y>@X\.@'\^CVY;@!
M *. !E"*1@19D2O(?&=!B$;[48I&^S+DN04 ]^&7BH7F C+D"\!T0[^<!AY7
MOYP&'N@=Z^@IZX4      +D2 .AIY8/L!HI&^S+DN04 ]^&7BX7B E"X P"7
M!R:+!5#HT?[H.NOH'.OH!NM9270&_D;[Z9W_B^5=P@( @^P&H>X"B4;[BD8$
M,N2Y!0#WX9>+A>0"B4;YN $ 4*!I!5F1*\A] ^D] 4&(1OU1BD;],N2Y!0#W
MX9>!Q^("'E>*1OTRY%"*1@19D3O!? /IAP"@C 8RY O =$'$?O(&5\1^\B:+
M10)0C,A9D3O!N $ =0%(4,1^\B:+10(U (!0BT;Y-0" 69$[P;@! '\!2%DC
MP5\')HA%!.F^ ,1^\@97Q'[R)HM% E",R%F1.\&X 0!U 4A0Q'[R)HM% C4 
M@%"+1ODU (!9D3O!N $ ?0%(62/!7P?I?0#$?O(FBT4".T;[=1O$?O(SP":(
M102Y"P#H/.2*1OTRY%#HKOWI6@"@C 8RY O =#+$?O(&5\1^\B:+10)0C,A9
MD3O!N $ =0%(4,1^\B:+10([1OFX 0!U 4A9(\%?!^D; ,1^\@97Q'[R)HM%
M E",R%F1.\&X 0!U 4A?!R:(102#Q 19270&_D;]Z<?^H(D&,N0+P'4#Z;0 
MN $ 4*!I!5F1*\A] ^F3 $&(1OU1BD;],N2Y!0#WX9>!Q^("'E?H&.Z*1OTR
MY%"X P#H(O"X( !0L #H_>^Y#P#H>>.#[ 7$?O(FBT4"4.C&^3/ Z&WPN"  
M4+  Z-OON0\ Z%?C@^P%Q'[R)HL%4.BE^3/ Z$SPN"  4+  Z+KOQ'[R)HI%
M!#+D4#/ Z!3PZ(#PZ&_C@\0$64ET!OY&_>EQ_[], 1[H>NV-?O@6Z 3OZ%'C
MB^5=P@( 58OL@^P#N $ 4*!I!5F1*\A] ^G3 $&(1OU1BD;],N2Y!0#WX9>!
MQ^("'E?$?O<FBD4$,N0+P'4#Z:  N$D HFL&Q'[W)HL%0*-Z!K]J!A[H7N+-
M(>B!XJ%\!B4! '1\Z"3MZ-OO(T-O=6QD(&YO="!R96QE87-E(&)L;V-K(&%T
M('-E9VUE;G0@N0\ Z'/B@^P%H7H&4.C$^#/ Z&OOZ+?OZ*;BN08!Z%CBZ*GC
M)4UE;6]R>2!M87D@8F4@82!M97-S+BXN(%!L96%S92!R96)O;W2Q_^B\X^B1
M\(/$!%E)= ;^1OWI,?^+Y5W#58OL5>EJ %6+Q/]V_HOH54RX 0!0H&D%69$K
MR'Q 08A&^U&*1OLRY+D% /?AEX''X@(>5\1^]2:+10([1@1U$<1^]2:*100R
MY#0!B$8&Z1  @\0$64ET!OY&^^G$_^D# %A86(I&!C+D"\"+Y5W" P"![!<$
MBD8$,N2Y!0#WX9>+A>0"B8;P^U"X! &7!R:+!8F&Z/LSP(F&ZON)ANS[BX;J
M^SN&Z/M]2(N&\/M0N" " X;J^UJ)AO+[B9;T^\2^\OL&5XN&[/NY" #WX9>-
MN_;[%E>X" #HT."+ANK[4+@( %D#P8F&ZON+ANS[0.FJ_[@! (B&Y_M(B8;J
M^U"+ANS[2%F1*\A] ^F1 $&)AN[[48N&[ONY" #WX9>-N_;[%E?$ON'[)HL%
M/?__=1>Y# #HXN!,Q+[A^R:+10)0Z,;^B(;G^X/$!(J&Y_LRY O =$"+AO#[
M4+@@ @.&ZOM:B8;R^XF6]/N+AN[[N0@ ]^&7C;OV^Q97Q+[R^P97N @ Z"?@
MBX;J^U"X" !9 \&)ANK[64ET!_^&[OOI=/^+AO#[4+@$ 9<'BX;J^R:)!3/ 
M4)<'!E>+AO#[4+@@"I<'!E>X  3HX]^+Y5W" @!5B^R#[$Z-?K(65^B/X0A%
M34U86%A8,.B/[8U^LA97N(  Z,CMZ&+@"<"X 0!T 4B(1@2-?K(6Z*'MZ%3@
MBD8$,N0+P(OE7<(! %6+[%7I1@)5B\3_=OZ+Z%6@C@8RY O = :A?@;I& "*
M1@8RY+D% /?AEXN%Y )0BT8$EP<FBP6)1@B+1@B+Y5W"!@!5B\3_=OZ+Z%6@
MC@8RY O = S$!I &C,*)1@CI%P"*1@8RY+D% /?AEXN%Y )0BT8$6HE&"(E6
M"L1&"(S"B^5=P@@ 58O$_W;^B^A5N$T HFL&Q'X(C 9Z!L1^")>C=@8SP*-L
M!K]J!A[H_M[-9^@AWZ!K!C+D"<!T,>C#Z>AZ[!E%35,@9&5V:6-E(&YO="!R
M97-P;VYD:6YGZ'7LZ&3?Q'X$,\ FB07I"0#$?@2A; 8FB06+Y5W"" !5B\3_
M=OZ+Z%7II0!5B\3_=O[_=OR+Z%6X10"B:P:+1@2C< :_:@8>Z(7>S6?HJ-Z@
M:P8RY G ='+H2NGH >PJ4')O9W)A;2!E<G)O<B!O<B!%35,@9&5V:6-E(&YO
M="!R97-P;VYD:6YGZ.OKZ-K>N08!Z(S>Z-W?*45-4R!M96UO<GD@;6%Y(&)E
M(&$@;65S<RXN+B!0;&5A<V4@<F5B;V]TL?_H[-_HP>R+Y5W" @"#[ :Y 0"A
MA@:1*\A] ^F( $&)1OA1Q'X$BT;XT>#1X /X)HM%_(E&]J&$!@G ?E.X 0")
M1OK$?@B+1OK1X-'@ _@FBT7\.T;VN $ =0%(4(M&^CL&A :X 0!^ 4A9(\$+
MP'0'BT;Z0.G(_XM&^CL&A 9^#+D, .C7W?]V]NC;_ND, +D, .C(W?]V]NC,
M_EE)= ;_1OCI?/^+Y5W"" "_E 8>5[@ ".AKU[D0 .BAW<0^E 8&5[^&!AY7
MZ!K^H88&/2  ?D_H#.CHP^H_14U3('!R;V-E<W,@8V]U;G0@97AC965D<R!C
M87!A8VET>2!O9B!214Q%05-%("T@;F\@86-T:6]N('1A:V5NZ)CJZ(?=Z5$ 
MH88&"<!T2KD. .@OW4Q,H&@%,N10N#@%4.@H_:.$!KD0 .@7W8/L!*!H!3+D
M4+@Z!5#H2_VCF :)%IH&N18 Z/K<Q#Z8!@97Q#Z4!@97Z.G]B^5=PU6+[%7I
M-015B\3_=OZ+Z%7H6.?H#^H(4D5,14%312#H&=X#,BXU,\#HP^GH]^D8+"!B
M>2!4=7)B;U!O=V5R(%-O9G1W87)EZ//IZ.+<Z!OGZ-+I-#T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3WHLNGH
MH=SHVN;HD>DT4D5,14%312!R96UO=F5S(&UE;6]R>2UR97-I9&5N="!P<F]G
M<F%M<R!F<F]M(&UE;6]R>>AQZ>A@W.B9YNA0Z31A;F0@<F5S=&]R97,@=&AE
M(&EN=&5R<G5P="!V96-T;W)S('1O('1H96ER('-T871E(&%SZ##IZ!_<Z%CF
MZ _I*F9O=6YD('!R:6]R('1O('1H92!I;G-T86QL871I;VX@;V8@82!-05)+
M+NCYZ.CHV^@AYNC8Z"]214Q%05-%(&UA;F%G97,@8F]T:"!N;W)M86P@1$]3
M(&UE;6]R>2!A;F0@86QS;^B]Z.BLV^CEY>B<Z#E,;W1U<R]);G1E;"!%>'!A
M;F1E9"!-96UO<GDN($EF(%=!5$-((&AA<R!B965N(&EN<W1A;&QE9"SH=^CH
M9MOHG^7H5N@T4D5,14%312!W:6QL('5P9&%T92!T:&4@5T%40T@@9&%T82!A
M<F5A(&9O<B!T:&4@5%-2<^@VZ.@EV^A>Y>@5Z ER96QE87-E9"[H(.CH#]OH
M2.7H%^CH!MOH/^7H]N<R4D5,14%312!A8V-E<'1S('1H92!F;VQL;W=I;F<@
M8V]M;6%N9"!L:6YE('-Y;G1A>#KHV.?HQ]KH .7HS^?HOMKH]^3HKN<>("!2
M14Q%05-%(%M-87)K3F%M95T@6T]P=&EO;G-=Z*3GZ)/:Z,SDZ)OGZ(K:Z,/D
MZ'KG-T]P=&EO;G,@;6%Y(&)E('!R96-E9&5D(&)Y(&5I=&AE<B O(&]R("TN
M(%9A;&ED(&]P=&EO;G/H5^?H1MKH?^3H-N</87)E(&%S(&9O;&QO=W,ZZ#OG
MZ"K:Z&/DZ#+GZ"':Z%KDZ!'G-R @(" @+TL@(" @(')E;&5A<V4@;65M;W)Y
M+"!B=70@2V5E<"!T:&4@;6%R:R!I;B!P;&%C92[H[N;HW=GH%N3HS>8O(" @
M(" O3B @(" @9&\@3F]T('1O=6-H($5-4R!M96UO<GD@:6X@86YY('=A>2[H
MLN;HH=GHVN/HD>8Y(" @(" O4B @(" @4F5V96-T;W(@=&AE(#@R-3D@:6YT
M97)R=7!T(&-O;G1R;VQL97(@=&\@:71SZ&SFZ%O9Z)3CZ$OF&B @(" @(" @
M(" @('!O=V5R=7 @<W1A=&4NZ$7FZ#39Z&WCZ"3F(R @(" @+S\@(" @('=R
M:71E('1H:7,@:&5L<"!S8W)E96XNZ!7FZ 39N0@ Z+;8N $ 4.@YYXOE7<.!
M[ (!Z"CCZ/?EZ.;8OVH%'E?HZMD L?_H^MDSP***!J*,!D"BBP9(HX &OYP&
M'E?H+-X       #H--XSP**)!D")AOS^4.B-UUF1.\%^ ^F! 8V^_OX65XN&
M_/[H6M>Q_^BPV8J&__XRY#T_ '4,N0@ Z#78Z%+[Z5 !BH;__C+D/2T N $ 
M= %(4(J&__XRY#TO +@! '0!2%D+P0O =0/I%0&*AO[^,N0] 0!U0;D& >CU
MU^A&V2%-:7-S:6YG(&-O;6UA;F0@;W!T:6]N(&9O;&QO=VEN9R"-OO[^%N@#
MV>CGV;'_Z%+9Z"?FZ=L /0( = /IB0"*A@#_,N3HLM0]/P!U#+D( .B>U^B[
M^NFY #U2 '4)N $ HHH&Z:L /4L =0FX 0"BC ;IG0 ]3@!U"#/ HHL&Z9  
M/40 =0FX 0"BB0;I@@"Y!@'H6]?HK-@856YK;F]W;B!C;VUM86YD(&]P=&EO
M;CH@C;[^_A;H<MCH5MFQ_^C!V.B6Y>E* +D& >@CU^ATV!A5;FMN;W=N(&-O
M;6UA;F0@;W!T:6]N.B"-OO[^%N@ZV.@>V;'_Z(G8Z%[EZ1( OVH%'E>-OO[^
M%N@?V+'_Z$G8BX;\_D#I;OZ+Y5W#N0@!Z,W6Z./YN0T Z,36Z'KEN14"Z+O6
M3+]J!1[H[M>Q_^A V.C_UQQ-,BXU(%!!4D%-151%4B!"3$]#2R!&3TQ,3U=3
ML?_H&]BX P%0OXT&'E>_C@8>5[]H!1Y7Z(#G- %T3+D& >AIUNBZUSI.;R!M
M871C:&EN9R!M87)K97(@9F]U;F0L(&]R('!R;W1E8W1E9"!M87)K97(@96YC
M;W5N=&5R960NL?_HN-?HC>2Y%0+H'=9,Z&W7 +'_Z*77Z&37"U134B!7051#
M2$52L?_HD=>X@0!0OX\&'E>_CP8>5[]G!1Y7Z/;FHH@&N0X Z.#5H&@%,N10
MZ$OOH(X&,N0+P'05N5(!Z,C5OVH%'NC\UK'_Z$[7Z+#LN0H Z+/5H&@%,N10
MZ%KMH(@&,N0+P'0DH&<%,N2Y!0#WX9>*A>8",N0T 70/N1\$Z(;5H&<%,N10
MZ&?SN0< Z'?5Z''RH(L&,N0+P'05N5, Z&753.@8]70)N08 Z%G5Z%?UZ-??
MZ([B"%)%3$5!4T4@Z)C6 S(N-3/ Z$+BZ';B(R M($UE;6]R>2!R96QE87-E
M9"!A8F]V92!L87-T($U!4DL@Z%G5OVH%'NA%UNA;U@#HWM9T-NB"W[@H %"P
M .ASX;D' NCOU('L  &_:@4>Z!_6L?_H<=;HC.4SP.C>X;@I %"P .A,X>@3
MU>A,W^@;XN@*U:& !@G =$_H/-^_G 8>Z%;:,\!0Z'KAZ.;A-2!B>71E<R!T
M96UP;W)A<FEL>2!T<F%P<&5D('5N=&EL(&)A=&-H(&9I;&4@8V]M<&QE=&5S
:Z,7AZ+34N0@ Z&;4H8 &4.CIXC/ Z$#3  !A
 
end
------------cut here-------------


I live by them!

sonny@charybdis.harris-atd.com (Bob Davis) (08/02/90)

In article <1990Jul31.125324.5706@cimage.com> bud@dgsi.UUCP (Bud Howard/1000000) writes:
>Here are two PD programs that are used to mark and release 
>TSR's.  Before loading a TSR, execute MARK (which is a TSR
>in itself), load your TSR's do what you have to do and then
>execute RELEASE which releases up to the MARK specified.
>
	Is it true that these posted programs are the Mark
and Release programs out of Kim Kokkonen's excellent Mark/Release
package, Version 2.5? They appear to be. 
	If so, some might wish to obtain the freshest version (v. 2.9)
from Simtel. Other useful programs are also included. I particularly
recommend FMARK to conserve RAM. Fetch from Simtel via anonymous ftp:

	PD1:<MSDOS.SYSUTL>TSRCOM29.ARC        (for executables)
and
	PD1:<MSDOS.SYSUTL>TSRSRC29.ARC        (for source)

In my unhumble opinion, this is an Excellent and Totally Indispensable
Public Domain package. From Day-1 of my PC usage, this software has
done yeoman, flawless duty. Highly recommended for handling TSR's.

______________________________________________________________________________
Bob Davis              \\ INTERNET : sonny@trantor.harris-atd.com  |  _   _  |
Harris Corporation, ESS \\    UUCP : ...!uunet!x102a!trantor!sonny |_| |_| | |
Advanced Technology Dept.\\ AETHER : K4VNO          |==============|_/\/\/\|_|
PO Box 37, MS 3A/1912     \\ VOICE : (407) 727-5886 | I SPEAK ONLY | |_| |_| |
Melbourne, FL 32902        \\  FAX : (407) 729-2537 | FOR MYSELF.  |_________|