ID: Q31429
The information in this article applies to:
You can access the mouse driver by calling an interrupt in QuickBASIC rather than by creating a QuickBASIC library with the MOUSE.LIB. Follow the guidelines for programming in assembler language and call the interrupt 33 hexadecimal or 51 decimal.
The following is a QuickBASIC, version 4.00, example for showing the mouse cursor:
' declare type registers
TYPE REGTYPE
ax AS INTEGER
bx AS INTEGER
cx AS INTEGER
dx AS INTEGER
bp AS INTEGER
si AS INTEGER
di AS INTEGER
ds AS INTEGER
es AS INTEGER
END TYPE
DIM INREGS AS REGTYPE, OUTREGS AS REGTYPE
' initialize mouse
INREGS.ax = 0
CALL INTERRUPT(51, INREGS, OUTREGS)
'show mouse cursor
INREGS.ax = 1
CALL INTERRUPT(51, INREGS, OUTREGS)
If you have the MOUSE.LIB utility, you can make a Quick library and
call the mouse using the "CALL MOUSE(m1%,m2%,m3%,m4%)" command.
Mouse functions are described in the Microsoft Mouse "Programmer's Reference Guide."
KBCategory: kbhw KBSubcategory: Additional reference words: 9.00 BASIC
Last Reviewed: September 16, 1996