Custom fire macro made in autoit3
Possible bugs, edit to your likings.
Code:
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include<misc.au3>
Opt("MouseClickDownDelay", 2)
Opt("MouseClickDelay", 2)
Opt("SendKeyDelay", 2)
Opt("SendKeyDownDelay", 2)
HotKeySet("{End}", "Click")
HotKeySet("{Del}", "EndApp")
HotKeySet("{Ins}", "Gui")
Global $Alive
GLOBAL $Macro = 50
While 1
Sleep(100)
WEnd
func Gui()
$Title = GUICreate("Serges Fail Macro", 150, 150, 400, 400)
$Macro = GUICtrlCreateInput($Macro, 40, 50, 75, 0)
$SetMacro = GUICtrlCreateButton("Set", 40, 75, 75, 21, $WS_GROUP)
GUISetState(@SW_SHOW)
Sleep(10)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $SetMacro
$Macro = GUICtrlRead($Macro)
GUIDelete($Title)
EndSwitch
WEnd
EndFunc
Func Click()
$Alive = Not $Alive
While $Alive
If _IsPressed("01") Then
Sleep(1)
MouseDown("Middle")
Sleep(1)
MouseUp("Middle")
Sleep($Macro)
EndIf
WEnd
EndFunc
func EndApp()
Exit 0
EndFunc