' ===========================================================================
'   FILE: MOUSE.BI 
'
'   Microsoft (tm) Compatible Mouse Driver and Support routines
'   for QuickBASIC 4.5.
'
'           Copyright (c) 1991
'           Daniel R. Berry (Traveller Software)
'           All Rights Reserved
'
'   Portions Copyright <C> 1987 Microsoft Corporation (QB.BI)
'
'   This code is released to the Public Domain for distribution with the
'   QBNews.
'
'   Daniel R. Berry
'   3110-C S. Gen McMullen
'   San Antonio, TX  78226
'
'
' Purpose:
'      This include file defines the types and gives the DECLARE
'      statements for the assembly language routine INTERRUPT.
'      Also included are declaritions required to use the Mouse utilites.
'
'***************************************************************************
'
' Define the type needed for INTERRUPT
'
TYPE RegType
     ax    AS INTEGER
     bx    AS INTEGER
     cx    AS INTEGER
     dx    AS INTEGER
     bp    AS INTEGER
     si    AS INTEGER
     di    AS INTEGER
     flags AS INTEGER
END TYPE
'
'   Generate a software interrupt, loading all but the segment registers
'
DECLARE SUB INTERRUPT (intnum AS INTEGER, inreg AS RegType, outreg AS RegType)
'
'   Mouse utility requirements
'
Common Shared /Mouse/ MouseChk%, MouseStat%