Code archives/User Input/MouseHover()

This code has been declared by its author to be Public Domain code.

Download source code

MouseHover() by Adren Software
(Posted 22 years ago)
Commands for checking to see if the mouse is over an image 
Function MouseHover(image,x,y)

If RectsOverlap(x,y,ImageWidth(image),ImageHeight(image),MouseX(),MouseY(),12,21) Then
	Return True
Else
	Return False
EndIf

End Function

Function MouseClick(image,x,y,button=1)

If RectsOverlap(x,y,ImageWidth(image),ImageHeight(image),MouseX(),MouseY(),12,21) And MouseHit(button) Then
	Return True
Else
	Return False
EndIf

End Function