BBS: Inland Empire Archive
Date: 06-13-92 (15:30) Number: 106
From: JAMES VAHN Refer#: NONE
To: FRANCOIS ROY Recvd: NO
Subj: Emm part 2 Conf: (2) Quik_Bas
Since it's raining out I thought I'd give that another go..
DIM Regs AS RegTypeX
Regs.ax = &H3567
CALL INTERRUPTX(&H21, Regs, Regs)
DEF SEG = Regs.es
FOR t = &HA TO &H11
ems$ = ems$ + CHR$(PEEK(t))
IF ems$ <> "EMMXXXX0" THEN PRINT "No ";
PRINT "EMS installed"
This one peeks right into wherever the driver is supposed to be. By making a
few changes you could check for other drivers too. The
funny name EMMXXXX0 is found by installing the driver and
with DOS 5.0's MEM/D command.
--- Maximus 2.00
* Origin: Inland Empire Archive (1:346/10)