home *** CD-ROM | disk | FTP | other *** search
-
- emm_int equ 67h
-
- if1
- INCLUDE model.mac
- endif
-
- header
-
- begdataseg
- EXTRN _emserr :byte
- EXTRN _EMSAvail :word
- EXTRN _EMSPgNum :word
- enddataseg
-
- begcodeseg
- procstart _emspages
- push bp
- mov bp,sp
- mov ah,42h ; Get number of pages function
- int emm_int ; Call EMM
- cmp ah,0 ; check for error
- jnz failed
- mov _emserr,ah ; update emserr
- mov _EMSAvail,bx ; update EMSAvail
- mov _EMSPgNum,dx ; update EMSPgNum
- jmp fini
- failed: mov _emserr,ah ; update emserr
- mov al,ah ; return error code
- xor ah,ah
- fini: pop bp
- ret
- procend _emspages
- endcodeseg
- END
-
-