home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.wwiv.com
/
ftp.wwiv.com.zip
/
ftp.wwiv.com
/
pub
/
PPPBCKP
/
SRC
/
SRC15B80.ZIP
/
WATTSRC.ZIP
/
ELIB
/
KEEP.ASM
< prev
next >
Wrap
Assembly Source File
|
1994-11-28
|
876b
|
40 lines
;
;
; Usage :
; _keep( int status, int paragraphs )
;
; (c) 1990 University of Waterloo,
; Faculty of Engineering,
; Engineering Microcomputer Network Development Office
;
; version
;
; 0.1 7-Nov -1990 E. P. Engelke
;
;
include masmdefs.hsm
include model.hsm
codedef KEEP
datadef
cstart KEEP
cpublic _keep
mov AH, 62h ; get psp
int 21h
mov ES, BX ; using psp
mov BX, ES:[2ch] ; get environment
mov AH, 49h ; release environment
mov ES, BX
int 21h
mov AH, 31h ; make resident
mov AL, +@AB + 0 [BP]
mov DX, +@AB + 2 [BP]
int 21h
creturn _keep
cend KEEP
end