How to UNLOAD my TSR? 
Author Message
 How to UNLOAD my TSR?

Hi!

I have a TSR (found on a BBS few years ago) and I want to unload it from
memory. Does anybody know how to do that. Or does anybody has a better
source for a TSR (not with hot-keys but with a timer)..?

(Please reply via E-mail after removing "nospam.")

This is my simple TSR:

----8<----------------------

{$A-,B-,D-,E-,F+,I-,L-,N-,O-,R-,S-,V+}
{$M 1100, 100, 100}

PROGRAM MyTSR;

Uses Dos;

VAR
 KbdIntVec: PROCEDURE;
 TsrBezig: Boolean;
 I: LongInt;
 R: LongInt;

{$F+}
PROCEDURE User_Routine;
 Begin;
 { This is my routine }
 End;

PROCEDURE  NewKbdInt; INTERRUPT;

 Begin
 If not TsrBezig Then Begin
  INLINE($FB);
  TsrBezig:=True;
  INLINE($FA);
  User_Routine;
  INLINE($FB);
  TsrBezig:=False;
  INLINE($9C);
  KbdIntVec;
  Exit;
 End Else Begin
  INLINE($9C);
  KbdIntVec;
  Exit;
 End;
End;

{$F-}

Begin
 I:=0;
 R:=3;

If ParamStr(1)='/u' Then
    { unload, but *how* ? }
Else Begin
   { init TSR }
   Write('Initialized');

   SetIntVec($08, Addr(NewKbdInt));
   TsrBezig:=False;
   Keep(0);
End;

 End.

----8<----------------------



Wed, 18 Jun 1902 08:00:00 GMT  
 
 [ 1 post ] 

 Relevant Pages 

1. how to unload a TSR (used keep)?

2. Help! Unloading a TSR

3. : Unloading your TSR

4. Unloading Tsr's

5. Unloading TSR's

6. Load & unload tsr from within program?

7. UNLOAD for paradox-sql

8. How to unload paradox db(to .txt file) ?

9. Need Help: Unloading Forms/Databases from Memory

10. Unloading pascal TSRs

11. Load/Unload in Delphi

12. Unloading an ISR program

 

 
Powered by phpBB® Forum Software