52 lines
1.2 KiB
NASM
52 lines
1.2 KiB
NASM
|
page 60,132
|
|||
|
|
title MEMTYPE - MEMORY TYPE CHECKER
|
|||
|
|
.286c ;; Utilize the expanded 80286 instruction set
|
|||
|
|
|
|||
|
|
CODE segment byte public
|
|||
|
|
assume CS:CODE
|
|||
|
|
org 100h
|
|||
|
|
begin:
|
|||
|
|
jmp start
|
|||
|
|
|
|||
|
|
EmmName db "EMMXXXX0"
|
|||
|
|
|
|||
|
|
start:
|
|||
|
|
push CS
|
|||
|
|
pop DS ;; Set up data segment
|
|||
|
|
mov DX,0 ;; Default to conventional memory
|
|||
|
|
|
|||
|
|
;; See if this is a 286 machine
|
|||
|
|
|
|||
|
|
mov BX,SP ;; Set up BX with current stack pointer
|
|||
|
|
pusha ;; 286 instruction, ignored on 808x
|
|||
|
|
nop ;; Must be after pusha
|
|||
|
|
cmp BX,SP ;; Were regs pushed?
|
|||
|
|
je CHECKEXP ;; No...return
|
|||
|
|
popa ;; Restore regs
|
|||
|
|
|
|||
|
|
mov AH,88h ;; Get number of contiguous 1k
|
|||
|
|
int 15h ;; blocks starting at 1MByte
|
|||
|
|
cmp AX,0 ;; If none available
|
|||
|
|
je CHECKEXP ;; then jump
|
|||
|
|
inc DX ;; else note extended memory available
|
|||
|
|
|
|||
|
|
;; Check to see if expanded memory available
|
|||
|
|
|
|||
|
|
CHECKEXP:
|
|||
|
|
mov AH,35H ;; Get Interrupt Vector
|
|||
|
|
mov AL,67H ;; "Vector"
|
|||
|
|
int 21H
|
|||
|
|
mov DI,000AH ;; ES:DI points to device name field
|
|||
|
|
lea SI,EmmName ;; DS:SI points to device name
|
|||
|
|
mov CX,8
|
|||
|
|
cld
|
|||
|
|
repe CMPSB ;; Compare the two strings
|
|||
|
|
jne MEMRET ;; If not equal jump
|
|||
|
|
or DX,0002h ;; Note EMM Present
|
|||
|
|
MEMRET:
|
|||
|
|
mov AX,DX
|
|||
|
|
mov AH,4ch
|
|||
|
|
int 21h
|
|||
|
|
CODE ENDS
|
|||
|
|
END begin
|
|||
|
|
|