#NoEnv
#NoTrayIcon
#NoEnv
#SingleInstance, force
SendMode Input

isMouseShown()
	{
		StructSize := A_PtrSize + 16
		VarSetCapacity(InfoStruct, StructSize)
		NumPut(StructSize, InfoStruct)
		DllCall("GetCursorInfo", UInt, &InfoStruct)
		Result := NumGet(InfoStruct, 8)

	if Result > 1
      Return 1
	else
      Return 0
	}
	Loop
	{
		if isMouseShown() == 1
			Suspend On
		else
			Suspend Off
		Sleep 1
}
	
~*HOME::
Suspend Toggle
if (!A_IsSuspended)
{
SoundPlay, C:\vkl.wav
}
Else
{
SoundPlay, C:\vukl.wav
}
return
	
~*LButton::
loop
{
GetKeyState,updn, LButton, P
if updn = U
break
MouseClick, left,,, 1, 0, D
MouseClick, left,,, 1, 0, U
DllCall("mouse_event",uint,1,int,0,int,5,uint,0,int,0)
Sleep, 1
DllCall("mouse_event",uint,1,int,0,int,6,uint,0,int,0)
Sleep, 1
}

!Numpad2::
MouseClickDrag, Left, 259, 171, 1002, 484 , 0
return