home *** CD-ROM | disk | FTP | other *** search
-
- emm_int equ 67h
-
- if1
- INCLUDE model.mac
- endif
-
- header
-
- begdataseg
- EXTRN _emserr :byte
- enddataseg
-
- begcodeseg
- procstart _emsgetstat
- push bp
- mov bp,sp
- mov ah,40h ; EMS function 01h
- int emm_int ; EMS interrupt
- mov _emserr,ah ; save error code in _emserr
- mov cl,8 ; prepare AX for return
- shr ax,cl ; to calling program.
- pop bp
- ret
- procend _emsgetstat
- endcodeseg
- END
-
-