Global mCl
...
mCl = MouseHit(1)
...
Function IsClick(img,x,y)
If mCl
If MouseX() >= x
If MouseX() <= x+ImageWidth(img)
If MouseY() >= y
If MouseY() <= y+ImageHeight(img)
Return 1
EndIf
EndIf
EndIf
EndIf
EndIf
EndFunction
(сей метод отличается от #3 большей скоростью)