home *** CD-ROM | disk | FTP | other *** search
- IFNDEF TP4
- PAGE 60,132
- ;----------------------------------------------------------------------------
- SUBTTL TesSeRact Revision Level 1
- ;-----------------------------------------------------------------------------
- ; TesSeRact(tm) -- A Library of Routines for Creating Ram-Resident (TSR)
- ; programs for the IBM PC and compatible Personal
- ; Computers.
- ;
- ;The software, documentation and source code are:
- ;
- ; Copyright (C) 1986, 1987, 1988 Tesseract Development Team
- ; All Rights Reserved
- ;
- ; c/o Chip Rabinowitz
- ; Innovative Data Concepts
- ; 2084 Woodlawn Avenue
- ; Glenside, PA 19038
- ; 1-215-884-3373
- ;
- ;-----------------------------------------------------------------------------
- ; This product supports the TesSeRact Standard for Ram-Resident Program
- ; Communication. For information about TesSeRact, contact the TesSeRact
- ; Development Team at:
- ; Compuserve: 70731,20
- ; MCIMAIL: 315-5415
- ; This MCIMAIL Account has been provided to the TesSeRact Development
- ; Team by Borland International, Inc. The TesSeRact Development Team
- ; is in no way associated with Borland International, Inc.
- ;-----------------------------------------------------------------------------
-
- INCLUDE TESS.INC
- INCLUDE mixed.inc
-
- .MODEL small
- .CODE
-
- ENDIF
-
- hProc <TSGETPARMS FAR> TsrIdNum:word
-
- ASSUMENODS
- mov cx,TsrIdNum
- mov bx,01h
- mov ax,5453h ;multiplex function 01h
- int 2fh
-
- or ax,ax
- jnz no_parms
-
- mov ax,es
- mov dx,ax ;return pointer in DX:AX
-
- mov ax,bx
- jmp short parms_out
-
- no_parms:
- xor ax,ax
- mov dx,ax ;return NULL if not available
-
- parms_out:
- hRet
- hEndp
-
- ENDIT
-
-