#NoEnv
#SingleInstance, force

Gui, 1:Show, w250 h40, program
Gui, 1:submit, nohide

Gui, 1:Font, s12 q5 c181818,Arial
Gui, 1:Add, Checkbox,x50 y10 vAC, AutoClick [End]
Gui, Show
return

~$*RButton::
Gui, 1:submit, nohide
{
    if(AC==1)
	while(GetKeyState("RButton", "p")) 
	{
		Gui, 1:submit, nohide
		Send, {RButton Down}
		Sleep, 1
		Send, {RButton Up}
		Sleep, 1
	}
}
return

*End::
state0 := true
    GuiControl,, AC, 1
    SoundPlay, *16
    return

    #If (state0 = true)
    {
        *End::
        state0 := false
            GuiControl,, AC, 0
            SoundPlay, *64
            return
    }
return

GuiClose:
ExitApp
return

SetKeyDelay, 0 ; устанавливает скорость нажатий, 0 самый быстрый.
SetBatchLines -1 

RButton::
While GetKeyState("RButton","P") { 
send {RButton} 
sleep -1 
}
return