home *** CD-ROM | disk | FTP | other *** search
-
- emm_int equ 67h
-
- if1
- INCLUDE model.mac
- endif
-
- header
-
- begdataseg
- EXTRN _emserr :byte
- enddataseg
-
- begcodeseg
- procstart _emsgetpgfrm
- push bp
- mov bp,sp
- mov ah,41h ; Get page frame segment function
- int emm_int ; Call EMM
- cmp ah,0 ; check for error
- jnz failed
- mov _emserr,0 ; update emserr
- mov ax,bx ; return page frame segment adress
- jmp fini
- failed: mov _emserr,ah ; update emserr
- mov al,ah ; return error code
- xor ah,ah
- fini: pop bp
- ret
- procend _emsgetpgfrm
- endcodeseg
- END
-
-