Rapid Fire

#SingleInstance
SoundBeep, 1600, 1000
gActivateScript = 0

; Insert to activate the macro
~#::
KeyWait, #
GetKeyState, HomeState, #, T
If HomeState = D
{
    SoundBeep, 2000, 500
    SoundBeep, 2000, 500
    SoundBeep, 2000, 500
    gActivateScript = 1

}
else
{
    SoundBeep, 1600, 500
    gActivateScript = 0

}
return


~LButton::
Goto, DoFiringLoop
Return


DoFiringLoop:
if gActivateScript = 1
{
	Loop
  	{
  	SetMouseDelay 10
  	Click
  	If (GetKeyState("LButton","P")=0)
  	Break
  	}   
 }
exit
return