Jump to content
HankHell

MacroMakerGUI

Recommended Posts

HankHell

I know this is a common thing people seem to ask for on the forums. And I was bored so I made this for those that wish to make their own macros on the fly.

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.14.2
 Author:         HankHell

 Script Function:
    Macro Maker 1.10

#ce ----------------------------------------------------------------------------

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <AutoItConstants.au3>
#include <Misc.au3>
#include <GUIListBox.au3>
#include <GuiComboBox.au3>

Global $Form1

Global $CoordFinderButton1
Global $CoordFinderButton2
Global $CoordFinderButton3
Global $CoordFinderButton4

Global $Create

Global $State = 1

Global $FindCoords = 0

Global $SwapState = 0
;---------------------
Global $GetStartStop
Global $GetStartStopNew = "{F1}" ;F1 to toggle the macro on/off
Global $GUIOpen
Global $GUIOpenNew = "{HOME}" ;HOME opens the GUI back up
Global $GetEnd
Global $End_Program_New = "{END}" ;END (near Home, PageUp) to close the program
;---------------------
Global $LeftClickA = ""
Global $LeftClickB = ""
Global $LeftClickC = ""
Global $LeftClickD = ""
Global $RightClickA = ""
Global $RightClickB = ""
Global $RightClickC = ""
Global $RightClickD = ""
;---------------------
Global $PressKeyA = ""
Global $PressKeyB = ""
Global $PressKeyC = ""
Global $PressKeyD = ""
;---------------------
Global $KeysToSendA = ""
Global $KeysToSendB = ""
Global $KeysToSendC = ""
Global $KeysToSendD = ""
Global $SendKeysToSendA = ""
Global $SendKeysToSendB = ""
Global $SendKeysToSendC = ""
Global $SendKeysToSendD = ""
;---------------------
Global $SleepTimeA = ""
Global $SleepTimeB = ""
Global $SleepTimeC = ""
Global $SleepTimeD = ""
Global $SleepySleepTimeA = 0
Global $SleepySleepTimeB = 0
Global $SleepySleepTimeC = 0
Global $SleepySleepTimeD = 0
;---------------------
Global $LogKeysToSendA
Global $LogKeysToSendB
Global $LogKeysToSendC
Global $LogKeysToSendD
;---------------------
Global $LogSleepTimeA
Global $LogSleepTimeB
Global $LogSleepTimeC
Global $LogSleepTimeD
;---------------------
Global $LeftClickCheckA
Global $LeftClickCheckB
Global $LeftClickCheckC
Global $LeftClickCheckD
Global $RightClickCheckA
Global $RightClickCheckB
Global $RightClickCheckC
Global $RightClickCheckD
;---------------------
Global $Hotkeys = 0
Global $ToggleButton
Global $GUIButton
Global $GetEndButton
Global $LogGetStartStop
Global $LogGUIOpen
Global $LogGetEnd
;---------------------
Global $X_Y_Send1 = ""
Global $X_Y_Send2 = ""
Global $X_Y_Send3 = ""
Global $X_Y_Send4 = ""
Global $L1X = ""
Global $L1Y = ""
Global $L2X = ""
Global $L2Y = ""
Global $L3X = ""
Global $L3Y = ""
Global $L4X = ""
Global $L4Y = ""
Global $L1_X = ""
Global $L1_Y = ""
Global $L2_X = ""
Global $L2_Y = ""
Global $L3_X = ""
Global $L3_Y = ""
Global $L4_X = ""
Global $L4_Y = ""
Global $LogL1X = ""
Global $LogL1Y = ""
Global $LogL2X = ""
Global $LogL2Y = ""
Global $LogL3X = ""
Global $LogL3Y = ""
Global $LogL4X = ""
Global $LogL4Y = ""
;---------------------
Global $Replace1
Global $Replace2
Global $Replace3
Global $Replace4
Global $Replace5
Global $Replace6
Global $Replace7
Global $Replace8
Global $Replace9
Global $Replace10
Global $With1
Global $With2
Global $With3
Global $With4
Global $With5
Global $With6
Global $With7
Global $With8
Global $With9
Global $With10
Global $GetWith1
Global $GetWith2
Global $GetWith3
Global $GetWith4
Global $GetWith5
Global $GetWith6
Global $GetWith7
Global $GetWith8
Global $GetWith9
Global $GetWith10
Global $LogReplace1
Global $LogReplace2
Global $LogReplace3
Global $LogReplace4
Global $LogReplace5
Global $LogReplace6
Global $LogReplace7
Global $LogReplace8
Global $LogReplace9
Global $LogReplace10
Global $LogWith1
Global $LogWith2
Global $LogWith3
Global $LogWith4
Global $LogWith5
Global $LogWith6
Global $LogWith7
Global $LogWith8
Global $LogWith9
Global $LogWith10
Global $ReplaceWithCLEAR1
Global $ReplaceWithCLEAR2
Global $ReplaceWithCLEAR3
Global $ReplaceWithCLEAR4
Global $ReplaceWithCLEAR5
Global $ReplaceWithCLEAR6
Global $ReplaceWithCLEAR7
Global $ReplaceWithCLEAR8
Global $ReplaceWithCLEAR9
Global $ReplaceWithCLEAR10
Global $GetReplace1
Global $GetReplace2
Global $GetReplace3
Global $GetReplace4
Global $GetReplace5
Global $GetReplace6
Global $GetReplace7
Global $GetReplace8
Global $GetReplace9
Global $GetReplace10
;---------------------
Global $KeyToClick1
Global $KeyToClick2
Global $KeyToClick3
Global $Combo1
Global $Combo2
Global $Combo3
Global $ComboBoxLeftClick1
Global $ComboBoxLeftClick2
Global $ComboBoxLeftClick3
Global $ComboBoxLeftClick4
Global $ComboBoxLeftClick5
Global $ComboBoxRightClick1
Global $ComboBoxRightClick2
Global $ComboBoxRightClick3
Global $ComboBoxClick1
Global $ComboBoxClick2
Global $ComboBoxClick3
Global $ComboBoxClick4
Global $ComboBoxClick5
Global $LogKeyToClick1
Global $LogKeyToClick2
Global $LogKeyToClick3
Global $LogCombo1
Global $LogCombo2
Global $LogCombo3
Global $KeyClick1
Global $KeyClick2
Global $KeyClick3
Global $ComboBoxMiddleButton1
Global $ComboBoxMiddleButton2
Global $ComboBoxMiddleButton3
;---------------------
Global $DisableKeys1
Global $DisableKeys2
Global $DisableKeys3
Global $DisableKeys4
Global $DisableKeys5
Global $DisableKeys6
Global $DisableKeys7
Global $DisableKeys8
Global $DisableKeys9
Global $DisableKeys10
Global $LogDisableKeys1
Global $LogDisableKeys2
Global $LogDisableKeys3
Global $LogDisableKeys4
Global $LogDisableKeys5
Global $LogDisableKeys6
Global $LogDisableKeys7
Global $LogDisableKeys8
Global $LogDisableKeys9
Global $LogDisableKeys10
Global $KeysDisable1
Global $KeysDisable2
Global $KeysDisable3
Global $KeysDisable4
Global $KeysDisable5
Global $KeysDisable6
Global $KeysDisable7
Global $KeysDisable8
Global $KeysDisable9
Global $KeysDisable10
;---------------------
Global $ButtonSwap
;---------------------
Global $HelpTab1

MacroMakerGUI()

Func MacroMakerGUI();------------------------------------------------------------------------------- MACRO MAKER MAIN GUI

$Form1 = GUICreate("MacroMaker", 410, 688, 198, 124)
GUICtrlCreateInput("", -1, -1, 1, 1)

;-------------------------------------------------------- Change Hotkeys
GUICtrlCreateGroup("Change_Hotkeys", 0, 5, 185, 97)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateLabel("Start/Stop", 8, 25, 68, 17)
$GetStartStop = GUICtrlCreateInput("", 80, 25, 95, 21)
GUICtrlSetData($GetStartStop, "{F1}")
$Change_Hotkeys_Help = GUICtrlCreateButton("?", 95, 5, 11, 15)

GUICtrlCreateLabel("Open GUI", 8, 46, 68, 17)
$GUIOpen = GUICtrlCreateInput("", 80, 46, 95, 21)
GUICtrlSetData($GUIOpen, "{HOME}")

GUICtrlCreateLabel("End Program", 8, 67, 68, 17)
$GetEnd = GUICtrlCreateInput("", 80, 67, 95, 21)
GUICtrlSetData($GetEnd, "{END}")
;-------------------------------------------------------- Change Hotkeys {END}

;-------------------------------------------------------- Create Macro
GUICtrlCreateGroup("Create_Macro", 0, 105, 185, 580)
GUICtrlCreateGroup("", -99, -90, 1, 1)
$Create_Macro_Help = GUICtrlCreateButton("?", 80, 105, 11, 15)

GUICtrlCreateLabel("X=", 5, 128, 17, 17)
$L1X = GUICtrlCreateInput("", 23, 128, 40, 21)
GUICtrlCreateLabel("Y=", 69, 128, 17, 17)
$L1Y = GUICtrlCreateInput("", 87, 128, 40, 21)
$LeftClickA = GUICtrlCreateCheckbox("Leftclick", 5, 152, 73, 17)
$RightClickA = GUICtrlCreateCheckbox("Rightclick", 5, 176, 73, 17)
GUICtrlCreateLabel("Keys", 5, 200, 30, 17)
$KeysToSendA = GUICtrlCreateInput("", 35, 200, 100, 21)
GUICtrlCreateLabel("Delay", 5, 221, 30, 17)
$SleepTimeA = GUICtrlCreateInput("", 35, 221, 65, 21)
GUICtrlCreateLabel("ms", 105, 221, 17, 17)

$CoordFinderButton1 = GUICtrlCreateButton("Get" & @CRLF & "Coords", 141, 111, 45, 30, $BS_MULTILINE)

GUICtrlCreateLabel("X=", 5, 255, 17, 17)
GUICtrlCreateLabel("Y=", 69, 255, 17, 17)
$L2X = GUICtrlCreateInput("", 23, 255, 40, 21)
$L2Y = GUICtrlCreateInput("", 87, 255, 40, 21)
$LeftClickB = GUICtrlCreateCheckbox("Leftclick", 5, 280, 73, 17)
$RightClickB = GUICtrlCreateCheckbox("Rightclick", 5, 304, 73, 17)
GUICtrlCreateLabel("Keys", 5, 328, 30, 17)
$KeysToSendB = GUICtrlCreateInput("", 35, 328, 100, 21)
GUICtrlCreateLabel("Delay", 5, 349, 30, 17)
$SleepTimeB = GUICtrlCreateInput("", 35, 349, 65, 21)
GUICtrlCreateLabel("ms", 105, 349, 17, 17)

$CoordFinderButton2 = GUICtrlCreateButton("Get" & @CRLF & "Coords", 141, 237, 45, 30, $BS_MULTILINE)

GUICtrlCreateLabel("X=", 5, 382, 17, 17)
GUICtrlCreateLabel("Y=", 69, 382, 17, 17)
$L3X = GUICtrlCreateInput("", 23, 382, 40, 21)
$L3Y = GUICtrlCreateInput("", 87, 382, 40, 21)
$LeftClickC = GUICtrlCreateCheckbox("Leftclick", 5, 408, 73, 17)
$RightClickC = GUICtrlCreateCheckbox("Rightclick", 5, 432, 73, 17)
GUICtrlCreateLabel("Keys", 5, 455, 30, 17)
$KeysToSendC = GUICtrlCreateInput("", 35, 455, 100, 21)
GUICtrlCreateLabel("Delay", 5, 476, 30, 17)
$SleepTimeC = GUICtrlCreateInput("", 35, 476, 65, 21)
GUICtrlCreateLabel("ms", 105, 476, 17, 17)

$CoordFinderButton3 = GUICtrlCreateButton("Get" & @CRLF & "Coords", 141, 364, 45, 30, $BS_MULTILINE)

GUICtrlCreateLabel("X=", 5, 509, 17, 17)
GUICtrlCreateLabel("Y=", 69, 509, 17, 17)
$L4X = GUICtrlCreateInput("", 23, 509, 40, 21)
$L4Y = GUICtrlCreateInput("", 87, 509, 40, 21)
$LeftClickD = GUICtrlCreateCheckbox("Leftclick", 5, 537, 73, 17)
$RightClickD = GUICtrlCreateCheckbox("Rightclick", 5, 561, 73, 17)
GUICtrlCreateLabel("Keys", 5, 585, 30, 17)
$KeysToSendD = GUICtrlCreateInput("", 35, 585, 100, 21)
GUICtrlCreateLabel("Delay", 5, 606, 30, 17)
$SleepTimeD = GUICtrlCreateInput("", 35, 606, 65, 21)
GUICtrlCreateLabel("ms", 105, 606, 17, 17)

$CoordFinderButton4 = GUICtrlCreateButton("Get" & @CRLF & "Coords", 141, 490, 45, 30, $BS_MULTILINE)

$Create = GUICtrlCreateButton("Create", 48, 650, 75, 25)

$CreateMacroCLEARALL = GUICtrlCreateButton("Clear" & @CRLF & "All", 138, 650, 30, 25, $BS_MULTILINE)
;-------------------------------------------------------- Create Macro {END}

;-------------------------------------------------------- Reassign Keys
GUICtrlCreateGroup("Reassign_Keys", 200, 392, 220, 293)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Reassign_Keys_Help = GUICtrlCreateButton("?", 287, 392, 11, 15)

GUICtrlCreateLabel("Replace", 216, 417, 44, 17)
$Replace1 = GUICtrlCreateInput("", 264, 417, 42, 21)
GUICtrlCreateLabel("with", 312, 417, 23, 17)
$With1 = GUICtrlCreateInput("", 338, 417, 42, 21)
$ReplaceWithCLEAR1 = GUICtrlCreateButton("-", 385, 417, 15, 15)

GUICtrlCreateLabel("Replace", 216, 438, 44, 17)
$Replace2 = GUICtrlCreateInput("", 264, 438, 42, 21)
GUICtrlCreateLabel("with", 312, 438, 23, 17)
$With2 = GUICtrlCreateInput("", 338, 438, 42, 21)
$ReplaceWithCLEAR2 = GUICtrlCreateButton("-", 385, 438, 15, 15)

GUICtrlCreateLabel("Replace", 216, 459, 44, 17)
$Replace3 = GUICtrlCreateInput("", 264, 459, 42, 21)
GUICtrlCreateLabel("with", 312, 459, 23, 17)
$With3 = GUICtrlCreateInput("", 338, 459, 42, 21)
$ReplaceWithCLEAR3 = GUICtrlCreateButton("-", 385, 459, 15, 15)

GUICtrlCreateLabel("Replace", 216, 480, 44, 17)
$Replace4 = GUICtrlCreateInput("", 264, 480, 42, 21)
GUICtrlCreateLabel("with", 312, 480, 23, 17)
$With4 = GUICtrlCreateInput("", 338, 480, 42, 21)
$ReplaceWithCLEAR4 = GUICtrlCreateButton("-", 385, 480, 15, 15)

GUICtrlCreateLabel("Replace", 216, 501, 44, 17)
$Replace5 = GUICtrlCreateInput("", 264, 501, 42, 21)
GUICtrlCreateLabel("with", 312, 501, 23, 17)
$With5 = GUICtrlCreateInput("", 338, 501, 42, 21)
$ReplaceWithCLEAR5 = GUICtrlCreateButton("-", 385, 501, 15, 15)

GUICtrlCreateLabel("Replace", 216, 522, 44, 17)
$Replace6 = GUICtrlCreateInput("", 264, 522, 42, 21)
GUICtrlCreateLabel("with", 312, 522, 23, 17)
$With6 = GUICtrlCreateInput("", 338, 522, 42, 21)
$ReplaceWithCLEAR6 = GUICtrlCreateButton("-", 385, 522, 15, 15)

GUICtrlCreateLabel("Replace", 216, 543, 44, 17)
$Replace7 = GUICtrlCreateInput("", 264, 543, 42, 21)
GUICtrlCreateLabel("with", 312, 543, 23, 17)
$With7 = GUICtrlCreateInput("", 338, 543, 42, 21)
$ReplaceWithCLEAR7 = GUICtrlCreateButton("-", 385, 543, 15, 15)

GUICtrlCreateLabel("Replace", 216, 564, 44, 17)
$Replace8 = GUICtrlCreateInput("", 264, 564, 42, 21)
GUICtrlCreateLabel("with", 312, 564, 23, 17)
$With8 = GUICtrlCreateInput("", 338, 564, 42, 21)
$ReplaceWithCLEAR8 = GUICtrlCreateButton("-", 385, 564, 15, 15)

GUICtrlCreateLabel("Replace", 216, 585, 44, 17)
$Replace9 = GUICtrlCreateInput("", 264, 585, 42, 21)
GUICtrlCreateLabel("with", 312, 585, 23, 17)
$With9 = GUICtrlCreateInput("", 338, 585, 42, 21)
$ReplaceWithCLEAR9 = GUICtrlCreateButton("-", 385, 585, 15, 15)

GUICtrlCreateLabel("Replace", 216, 606, 44, 17)
$Replace10 = GUICtrlCreateInput("", 264, 606, 42, 21)
GUICtrlCreateLabel("with", 312, 606, 23, 17)
$With10 = GUICtrlCreateInput("", 338, 606, 42, 21)
$ReplaceWithCLEAR10 = GUICtrlCreateButton("-", 385, 606, 15, 15)

$ReplaceWithCLEARALL = GUICtrlCreateButton("Clear All", 350, 645, 50, 15)
$HideMainGUI1 = GUICtrlCreateButton("Hide GUI", 350, 660, 50, 15)

$ReplaceKeys = GUICtrlCreateButton("Replace Keys", 260, 650, 75, 25)
;-------------------------------------------------------- Reassign Keys {END}

;-------------------------------------------------------- Key Into Click
GUICtrlCreateGroup("Key_Into_Click", 200, 245, 217, 143)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Key_Into_Click_Help = GUICtrlCreateButton("?", 285, 245, 11, 15)

GUICtrlCreateLabel("Turn", 207, 268, 29, 17)
$KeyToClick1 = GUICtrlCreateInput("", 236, 268, 42, 21)
GUICtrlCreateLabel("into", 284, 268, 21, 17)
$Combo1 = GUICtrlCreateCombo("", 305, 268, 76, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData($Combo1, "Left Click|Right Click|Middle Button", "")
$KeyComboCLEAR1 = GUICtrlCreateButton("-", 385, 268, 15, 15)

GUICtrlCreateLabel("Turn", 207, 289, 29, 17)
$KeyToClick2 = GUICtrlCreateInput("", 236, 289, 42, 21)
GUICtrlCreateLabel("into", 284, 289, 21, 17)
$Combo2 = GUICtrlCreateCombo("", 305, 289, 76, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData($Combo2, "Left Click|Right Click|Middle Button", "")
$KeyComboCLEAR2 = GUICtrlCreateButton("-", 385, 289, 15, 15)

GUICtrlCreateLabel("Turn", 207, 310, 29, 17)
$KeyToClick3 = GUICtrlCreateInput("", 236, 310, 42, 21)
GUICtrlCreateLabel("into", 284, 310, 21, 17)
$Combo3 = GUICtrlCreateCombo("", 305, 310, 76, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData($Combo3, "Left Click|Right Click|Middle Button", "")
$KeyComboCLEAR3 = GUICtrlCreateButton("-", 385, 310, 15, 15)

$ReplaceKeys2 = GUICtrlCreateButton("Replace Keys", 260, 347, 75, 25)

$KeyClickCLEARALL = GUICtrlCreateButton("Clear All", 350, 342, 50, 15)
$HideMainGUI2 = GUICtrlCreateButton("Hide GUI", 350, 357, 50, 15)
;-------------------------------------------------------- Key Into Click {END}

;-------------------------------------------------------- Disable Keys
GUICtrlCreateGroup("Disable_Keys", 200, 62, 217, 180)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Disable_Keys_Help = GUICtrlCreateButton("?", 285, 62, 11, 15)

$DisableKeys1 = GUICtrlCreateInput("", 236, 84, 42, 21)
$DisableKeysCLEAR1 = GUICtrlCreateButton("-", 282, 84, 15, 15)

$DisableKeys2 = GUICtrlCreateInput("", 330, 84, 42, 21)
$DisableKeysCLEAR2 = GUICtrlCreateButton("-", 376, 84, 15, 15)

$DisableKeys3 = GUICtrlCreateInput("", 236, 105, 42, 21)
$DisableKeysCLEAR3 = GUICtrlCreateButton("-", 282, 105, 15, 15)

$DisableKeys4 = GUICtrlCreateInput("", 330, 105, 42, 21)
$DisableKeysCLEAR4 = GUICtrlCreateButton("-", 376, 105, 15, 15)

$DisableKeys5 = GUICtrlCreateInput("", 236, 126, 42, 21)
$DisableKeysCLEAR5 = GUICtrlCreateButton("-", 282, 126, 15, 15)

$DisableKeys6 = GUICtrlCreateInput("", 330, 126, 42, 21)
$DisableKeysCLEAR6 = GUICtrlCreateButton("-", 376, 126, 15, 15)

$DisableKeys7 = GUICtrlCreateInput("", 236, 147, 42, 21)
$DisableKeysCLEAR7 = GUICtrlCreateButton("-", 282, 147, 15, 15)

$DisableKeys8 = GUICtrlCreateInput("", 330, 147, 42, 21)
$DisableKeysCLEAR8 = GUICtrlCreateButton("-", 376, 147, 15, 15)

$DisableKeys9 = GUICtrlCreateInput("", 236, 168, 42, 21)
$DisableKeysCLEAR9 = GUICtrlCreateButton("-", 282, 168, 15, 15)

$DisableKeys10 = GUICtrlCreateInput("", 330, 168, 42, 21)
$DisableKeysCLEAR10 = GUICtrlCreateButton("-", 376, 168, 15, 15)

$DisableKeys = GUICtrlCreateButton("Disable Keys", 260, 205, 75, 25)

$DisableKeysCLEARALL = GUICtrlCreateButton("Clear All", 350, 200, 50, 15)
$HideMainGUI3 = GUICtrlCreateButton("Hide GUI", 350, 215, 50, 15)
;-------------------------------------------------------- Disable Keys {END}

;-------------------------------------------------------- Swap Mouse Button
GUICtrlCreateGroup("Swap_Mouse_Buttons", 200, 5, 217, 55)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$ButtonSwap = GUICtrlCreateCheckbox("Swap Left and Right Buttons", 220, 25, 152, 21)
;-------------------------------------------------------- Swap Mouse Button {END}

LogKeys()

GUISetState(@SW_SHOW, $Form1)

While $State = 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            End()
            Case $GetStartStop
                $GetStartStopNew = ControlGetText("", "", $GetStartStop)
                $LogGetStartStop = ControlGetText("", "", $GetStartStop);LOG
                $ToggleButton = 1
            Case $GUIOpen
                $GUIOpenNew = ControlGetText("", "", $GUIOpen)
                $LogGUIOpen = ControlGetText("", "", $GUIOpen);LOG
                $GUIButton = 1
            Case $GetEnd
                $End_Program_New = ControlGetText("", "", $GetEnd)
                $LogGetEnd = ControlGetText("", "", $GetEnd);LOG
                $GetEndButton = 1
                ;-----------------------------------------------------------
            Case $Change_Hotkeys_Help
                    HelpTabs1()
            Case $Create_Macro_Help
                    HelpTabs2()
            Case $Reassign_Keys_Help
                    HelpTabs3()
            Case $Key_Into_Click_Help
                    HelpTabs4()
            Case $Disable_Keys_Help
                    HelpTabs5()
                ;-----------------------------------------------------------
            Case $L1X
                $X_Y_Send1 = 1
                $L1_X = ControlGetText("", "", $L1X)
                $LogL1X = ControlGetText("", "", $L1X);LOG
            Case $L1Y
                $X_Y_Send1 = 1
                $L1_Y = ControlGetText("", "", $L1Y)
                $LogL1Y = ControlGetText("", "", $L1Y);LOG
            Case $L2X
                $X_Y_Send2 = 1
                $L2_X = ControlGetText("", "", $L2X)
                $LogL2X = ControlGetText("", "", $L2X);LOG
            Case $L2Y
                $X_Y_Send2 = 1
                $L2_Y = ControlGetText("", "", $L2Y)
                $LogL2Y = ControlGetText("", "", $L2Y);LOG
            Case $L3X
                $X_Y_Send3 = 1
                $L3_X = ControlGetText("", "", $L3X)
                $LogL3X = ControlGetText("", "", $L3X);LOG
            Case $L3Y
                $X_Y_Send3 = 1
                $L3_Y = ControlGetText("", "", $L3Y)
                $LogL3Y = ControlGetText("", "", $L3Y);LOG
            Case $L4X
                $X_Y_Send4 = 1
                $L4_X = ControlGetText("", "", $L4X)
                $LogL4X = ControlGetText("", "", $L4X);LOG
            Case $L4Y
                $X_Y_Send4 = 1
                $L4_Y = ControlGetText("", "", $L4Y)
                $LogL4Y = ControlGetText("", "", $L4Y);LOG
                ;-----------------------------------------------------------
            Case $LeftClickA
                If GUICtrlRead($LeftClickA) = $GUI_CHECKED Then
                    $LeftClickCheckA = 1
                EndIf
                If GUICtrlRead($LeftClickA) = $GUI_UNCHECKED Then
                    $LeftClickCheckA = 0
                EndIf
            Case $LeftClickB
                If GUICtrlRead($LeftClickB) = $GUI_CHECKED Then
                    $LeftClickCheckB = 1
                EndIf
                If GUICtrlRead($LeftClickB) = $GUI_UNCHECKED Then
                    $LeftClickCheckB = 0
                EndIf
            Case $LeftClickC
                If GUICtrlRead($LeftClickC) = $GUI_CHECKED Then
                    $LeftClickCheckC = 1
                EndIf
                If GUICtrlRead($LeftClickC) = $GUI_UNCHECKED Then
                    $LeftClickCheckC = 0
                EndIf
            Case $LeftClickD
                If GUICtrlRead($LeftClickD) = $GUI_CHECKED Then
                    $LeftClickCheckD = 1
                EndIf
                If GUICtrlRead($LeftClickD) = $GUI_UNCHECKED Then
                    $LeftClickCheckD = 0
                EndIf
                ;-----------------------------------------------------------
            Case $RightClickA
                If GUICtrlRead($RightClickA) = $GUI_CHECKED Then
                    $RightClickCheckA = 1
                EndIf
                If GUICtrlRead($RightClickA) = $GUI_UNCHECKED Then
                    $RightClickCheckA = 0
                EndIf
            Case $RightClickB
                If GUICtrlRead($RightClickB) = $GUI_CHECKED Then
                    $RightClickCheckB = 1
                EndIf
                If GUICtrlRead($RightClickB) = $GUI_UNCHECKED Then
                    $RightClickCheckB = 0
                EndIf
            Case $RightClickC
                If GUICtrlRead($RightClickC) = $GUI_CHECKED Then
                    $RightClickCheckC = 1
                EndIf
                If GUICtrlRead($RightClickC) = $GUI_UNCHECKED Then
                    $RightClickCheckC = 0
                EndIf
            Case $RightClickD
                If GUICtrlRead($RightClickD) = $GUI_CHECKED Then
                    $RightClickCheckD = 1
                EndIf
                If GUICtrlRead($RightClickD) = $GUI_UNCHECKED Then
                    $RightClickCheckD = 0
                EndIf
                ;-----------------------------------------------------------
            Case $KeysToSendA
                $PressKeyA = 1
                $SendKeysToSendA = ControlGetText("", "", $KeysToSendA)
                $LogKeysToSendA = ControlGetText("", "", $KeysToSendA);LOG
            Case $KeysToSendB
                $PressKeyB = 1
                $SendKeysToSendB = ControlGetText("", "", $KeysToSendB)
                $LogKeysToSendB = ControlGetText("", "", $KeysToSendB);LOG
            Case $KeysToSendC
                $PressKeyC = 1
                $SendKeysToSendC = ControlGetText("", "", $KeysToSendC)
                $LogKeysToSendC = ControlGetText("", "", $KeysToSendC);LOG
            Case $KeysToSendD
                $PressKeyD = 1
                $SendKeysToSendD = ControlGetText("", "", $KeysToSendD)
                $LogKeysToSendD = ControlGetText("", "", $KeysToSendD);LOG
                ;-----------------------------------------------------------
            Case $SleepTimeA
                $SleepySleepTimeA = ControlGetText("", "", $SleepTimeA)
                $LogSleepTimeA = ControlGetText("", "", $SleepTimeA);LOG
            Case $SleepTimeB
                $SleepySleepTimeB = ControlGetText("", "", $SleepTimeB)
                $LogSleepTimeB = ControlGetText("", "", $SleepTimeB);LOG
            Case $SleepTimeC
                $SleepySleepTimeC = ControlGetText("", "", $SleepTimeC)
                $LogSleepTimeC = ControlGetText("", "", $SleepTimeC);LOG
            Case $SleepTimeD
                $SleepySleepTimeD = ControlGetText("", "", $SleepTimeD)
                $LogSleepTimeD = ControlGetText("", "", $SleepTimeD);LOG
                ;-----------------------------------------------------------
            Case $CoordFinderButton1
                $X_Y_Send1 = 1
                $FindCoords = 1
                CoordFinder()
            Case $CoordFinderButton2
                $X_Y_Send2 = 1
                $FindCoords = 2
                CoordFinder()
            Case $CoordFinderButton3
                $X_Y_Send3 = 1
                $FindCoords = 3
                CoordFinder()
            Case $CoordFinderButton4
                $X_Y_Send4 = 1
                $FindCoords = 4
                CoordFinder()
            Case $Create
                Sleep(100)
                GUISetState(@SW_HIDE, $Form1)
                Macro()
            Case $CreateMacroCLEARALL
                ClearAllMacroKeys()
                ;-----------------------------------------------------------
            Case $ReplaceWithCLEAR1
                ClearKeys1()
            Case $ReplaceWithCLEAR2
                ClearKeys2()
            Case $ReplaceWithCLEAR3
                ClearKeys3()
            Case $ReplaceWithCLEAR4
                ClearKeys4()
            Case $ReplaceWithCLEAR5
                ClearKeys5()
            Case $ReplaceWithCLEAR6
                ClearKeys6()
            Case $ReplaceWithCLEAR7
                ClearKeys7()
            Case $ReplaceWithCLEAR8
                ClearKeys8()
            Case $ReplaceWithCLEAR9
                ClearKeys9()
            Case $ReplaceWithCLEAR10
                ClearKeys10()
            Case $ReplaceWithCLEARALL
                ClearKeysALL()
                ;-----------------------------------------------------------
            Case $KeyComboCLEAR1
                KeyClickCLEAR1()
            Case $KeyComboCLEAR2
                KeyClickCLEAR2()
            Case $KeyComboCLEAR3
                KeyClickCLEAR3()
            Case $KeyClickCLEARALL
                KeyClickCLEARALL()
                ;-----------------------------------------------------------
            Case $DisableKeysCLEAR1
                DisableKeysCLEAR1()
            Case $DisableKeysCLEAR2
                DisableKeysCLEAR2()
            Case $DisableKeysCLEAR3
                DisableKeysCLEAR3()
            Case $DisableKeysCLEAR4
                DisableKeysCLEAR4()
            Case $DisableKeysCLEAR5
                DisableKeysCLEAR5()
            Case $DisableKeysCLEAR6
                DisableKeysCLEAR6()
            Case $DisableKeysCLEAR7
                DisableKeysCLEAR7()
            Case $DisableKeysCLEAR8
                DisableKeysCLEAR8()
            Case $DisableKeysCLEAR9
                DisableKeysCLEAR9()
            Case $DisableKeysCLEAR10
                DisableKeysCLEAR10()
            Case $DisableKeysCLEARALL
                DisableKeysCLEARALL()
            ;-----------------------------------------------------------
            Case $ReplaceKeys
                ReplaceKeys()
                ReassignKeysNotification()
            Case $ReplaceKeys2
                KeyIntoClick()
                ReassignKeysNotification()
            Case $DisableKeys
                DisableKeys()
                DisableKeysNotification()
            Case $HideMainGUI1
                HideMacroMakerGUI()
            Case $HideMainGUI2
                HideMacroMakerGUI()
            Case $HideMainGUI3
                HideMacroMakerGUI()
        Case $ButtonSwap
            MouseClickSwap()
            If GUICtrlRead($ButtonSwap) = $GUI_CHECKED Then
                $SwapState = 1
            EndIf
            If GUICtrlRead($ButtonSwap) = $GUI_UNCHECKED Then
                $SwapState = 0
            EndIf
            MouseClickSwap()
    EndSwitch
WEnd
EndFunc
;------------------------------------------------------------------------------- MACRO MAKER MAIN GUI {END}

Func Macro();------------------------------------------------------------------------------- CREATE MACRO
    $Hotkeys = 1

    Hotkeys()

Global $ToggleState
Global $Toggle = True

If $Toggle = False Then
   $ToggleState = True
Else
   $ToggleState = False
EndIf
EndFunc

Func Toggle()
   $ToggleState = NOT $ToggleState
    While $ToggleState


        If $LogL1X = "" Then
            $X_Y_Send1 = 0
        EndIf
        If $LogL1Y = "" Then
            $X_Y_Send1 = 0
        EndIf
        If $X_Y_Send1 = 1 Then
            MouseMove($L1_X, $L1_Y, 10)
        EndIf

        If $LeftClickCheckA = 1 Then
            MouseClick($MOUSE_CLICK_PRIMARY)
        EndIf

        If $RightClickCheckA = 1 Then
            MouseClick($MOUSE_CLICK_SECONDARY)
        EndIf

        If $PressKeyA = 1 Then
            Send($SendKeysToSendA)
        EndIf

        Sleep($SleepySleepTimeA)
        ;------------------------------
        If $LogL2X = "" Then
            $X_Y_Send2 = 0
        EndIf
        If $LogL2Y = "" Then
            $X_Y_Send2 = 0
        EndIf
        If $X_Y_Send2 = 1 Then
            MouseMove($L2_X, $L2_Y, 10)
        EndIf

        If $LeftClickCheckB = 1 Then
            MouseClick($MOUSE_CLICK_PRIMARY)
        EndIf

        If $RightClickCheckB = 1 Then
            MouseClick($MOUSE_CLICK_SECONDARY)
        EndIf

        If $PressKeyB = 1 Then
            Send($SendKeysToSendB)
        EndIf

        Sleep($SleepySleepTimeB)
        ;------------------------------
        If $LogL3X = "" Then
            $X_Y_Send3 = 0
        EndIf
        If $LogL3Y = "" Then
            $X_Y_Send3 = 0
        EndIf
        If $X_Y_Send3 = 1 Then
            MouseMove($L3_X, $L3_Y, 10)
        EndIf

        If $LeftClickCheckC = 1 Then
            MouseClick($MOUSE_CLICK_PRIMARY)
        EndIf

        If $RightClickCheckC = 1 Then
            MouseClick($MOUSE_CLICK_SECONDARY)
        EndIf

        If $PressKeyC = 1 Then
            Send($SendKeysToSendC)
        EndIf

        Sleep($SleepySleepTimeC)
        ;------------------------------
        If $LogL4X = "" Then
            $X_Y_Send4 = 0
        EndIf
        If $LogL4Y = "" Then
            $X_Y_Send4 = 0
        EndIf
        If $X_Y_Send4 = 1 Then
            MouseMove($L4_X, $L4_Y, 10)
        EndIf

        If $LeftClickCheckD = 1 Then
            MouseClick($MOUSE_CLICK_PRIMARY)
        EndIf

        If $RightClickCheckD = 1 Then
            MouseClick($MOUSE_CLICK_SECONDARY)
        EndIf

        If $PressKeyD = 1 Then
            Send($SendKeysToSendD)
        EndIf

        Sleep($SleepySleepTimeD)
        ;------------------------------
        If Not $ToggleState Then
            Sleep(100)
        EndIf
    WEnd
EndFunc

Func ClearAllMacroKeys()
    $SleepySleepTimeA = 0
    $SendKeysToSendA = ""
    $PressKeyA = ""
    $LogL1X = ""
    $LogL1Y = ""
    $LeftClickCheckA = 0
    $RightClickCheckA = 0
    $LogKeysToSendA = ""
    $LogSleepTimeA = ""
    GUICtrlSetData($L1X, "")
    GUICtrlSetData($L1Y, "")
    GUICtrlSetState($LeftClickA, $GUI_UNCHECKED)
    GUICtrlSetState($RightClickA, $GUI_UNCHECKED)
    GUICtrlSetData($KeysToSendA, "")
    GUICtrlSetData($SleepTimeA, "")
    ;--------------------------------
    $SleepySleepTimeB = 0
    $SendKeysToSendB = ""
    $PressKeyB = ""
    $LogL2X = ""
    $LogL2Y = ""
    $LeftClickCheckB = 0
    $RightClickCheckB = 0
    $LogKeysToSendB = ""
    $LogSleepTimeB = ""
    GUICtrlSetData($L2X, "")
    GUICtrlSetData($L2Y, "")
    GUICtrlSetState($LeftClickB, $GUI_UNCHECKED)
    GUICtrlSetState($RightClickB, $GUI_UNCHECKED)
    GUICtrlSetData($KeysToSendB, "")
    GUICtrlSetData($SleepTimeB, "")
    ;--------------------------------
    $SleepySleepTimeC = 0
    $SendKeysToSendC = ""
    $PressKeyC = ""
    $LogL3X = ""
    $LogL3Y = ""
    $LeftClickCheckC = 0
    $RightClickCheckC = 0
    $LogKeysToSendC = ""
    $LogSleepTimeC = ""
    GUICtrlSetData($L3X, "")
    GUICtrlSetData($L3Y, "")
    GUICtrlSetState($LeftClickC, $GUI_UNCHECKED)
    GUICtrlSetState($RightClickC, $GUI_UNCHECKED)
    GUICtrlSetData($KeysToSendC, "")
    GUICtrlSetData($SleepTimeC, "")
    ;--------------------------------
    $SleepySleepTimeD = 0
    $SendKeysToSendD = ""
    $PressKeyD = ""
    $LogL4X = ""
    $LogL4Y = ""
    $LeftClickCheckD = 0
    $RightClickCheckD = 0
    $LogKeysToSendD = ""
    $LogSleepTimeD = ""
    GUICtrlSetData($L4X, "")
    GUICtrlSetData($L4Y, "")
    GUICtrlSetState($LeftClickD, $GUI_UNCHECKED)
    GUICtrlSetState($RightClickD, $GUI_UNCHECKED)
    GUICtrlSetData($KeysToSendD, "")
    GUICtrlSetData($SleepTimeD, "")
EndFunc

Func OpenGUI()
    $Hotkeys = 0
    Hotkeys()
    MacroMakerGUI()
EndFunc
;------------------------------------------------------------------------------- CREATE MACRO {END}

Func CoordFinder();------------------------------------------------------------------------------- COORD FINDER
    HotKeySet($GetStartStopNew, "EndCoordFinder")
    Global $FindCoordsState

$FindCoordsState = 1

While $FindCoordsState = 1
        Sleep(50)
        Get_Mouse_Pos()
WEnd
EndFunc

Func Get_Mouse_Pos()

    $Mpos = MouseGetPos()
    $Mpos_x = $Mpos[0]
    $Mpos_y = $Mpos[1]

    If $FindCoords = 1 Then
        GUICtrlSetData($L1X, $Mpos_x)
        GUICtrlSetData($L1Y, $Mpos_y)
        $LogL1X = ControlGetText("", "", $L1X);LOG
        $LogL1Y = ControlGetText("", "", $L1Y);LOG
        $L1_X = ControlGetText("", "", $L1X)
        $L1_Y = ControlGetText("", "", $L1Y)
    EndIf
    If $FindCoords = 2 Then
        GUICtrlSetData($L2X, $Mpos_x)
        GUICtrlSetData($L2Y, $Mpos_y)
        $LogL2X = ControlGetText("", "", $L2X);LOG
        $LogL2Y = ControlGetText("", "", $L2Y);LOG
        $L2_X = ControlGetText("", "", $L2X)
        $L2_Y = ControlGetText("", "", $L2Y)
    EndIf
    If $FindCoords = 3 Then
        GUICtrlSetData($L3X, $Mpos_x)
        GUICtrlSetData($L3Y, $Mpos_y)
        $LogL3X = ControlGetText("", "", $L3X);LOG
        $LogL3Y = ControlGetText("", "", $L3Y);LOG
        $L3_X = ControlGetText("", "", $L3X)
        $L3_Y = ControlGetText("", "", $L3Y)
    EndIf
    If $FindCoords = 4 Then
        GUICtrlSetData($L4X, $Mpos_x)
        GUICtrlSetData($L4Y, $Mpos_y)
        $LogL4X = ControlGetText("", "", $L4X);LOG
        $LogL4Y = ControlGetText("", "", $L4Y);LOG
        $L4_X = ControlGetText("", "", $L4X)
        $L4_Y = ControlGetText("", "", $L4Y)
    EndIf
EndFunc

Func EndCoordFinder()
    $FindCoordsState = 0
    $FindCoords = 0
    Hotkeys()
    LogKeys()
EndFunc
;------------------------------------------------------------------------------- COORD FINDER {END}

Func MouseClickSwap();---------------------------------------------------- MOUSE CLICK SWAP
    DllCall("user32.dll", "int", "SwapMouseButton", "int", $SwapState)
EndFunc
;---------------------------------------------------- MOUSE CLICK SWAP {END}

Func DisableKeys();------------------------------------------------------------------------------- DISABLE KEYS
    $KeysDisable1 = ControlGetText("", "", $DisableKeys1)
    $LogDisableKeys1 = ControlGetText("", "", $DisableKeys1);LOG
        HotKeySet($KeysDisable1, "BlankKey")
    $KeysDisable2 = ControlGetText("", "", $DisableKeys2)
    $LogDisableKeys2 = ControlGetText("", "", $DisableKeys2);LOG
        HotKeySet($KeysDisable2, "BlankKey")
    $KeysDisable3 = ControlGetText("", "", $DisableKeys3)
    $LogDisableKeys3 = ControlGetText("", "", $DisableKeys3);LOG
        HotKeySet($KeysDisable3, "BlankKey")
    $KeysDisable4 = ControlGetText("", "", $DisableKeys4)
    $LogDisableKeys4 = ControlGetText("", "", $DisableKeys4);LOG
        HotKeySet($KeysDisable4, "BlankKey")
    $KeysDisable5 = ControlGetText("", "", $DisableKeys5)
    $LogDisableKeys5 = ControlGetText("", "", $DisableKeys5);LOG
        HotKeySet($KeysDisable5, "BlankKey")
    $KeysDisable6 = ControlGetText("", "", $DisableKeys6)
    $LogDisableKeys6 = ControlGetText("", "", $DisableKeys6);LOG
        HotKeySet($KeysDisable6, "BlankKey")
    $KeysDisable7 = ControlGetText("", "", $DisableKeys7)
    $LogDisableKeys7 = ControlGetText("", "", $DisableKeys7);LOG
        HotKeySet($KeysDisable7, "BlankKey")
    $KeysDisable8 = ControlGetText("", "", $DisableKeys8)
    $LogDisableKeys8 = ControlGetText("", "", $DisableKeys8);LOG
        HotKeySet($KeysDisable8, "BlankKey")
    $KeysDisable9 = ControlGetText("", "", $DisableKeys9)
    $LogDisableKeys9 = ControlGetText("", "", $DisableKeys9);LOG
        HotKeySet($KeysDisable9, "BlankKey")
    $KeysDisable10 = ControlGetText("", "", $DisableKeys10)
    $LogDisableKeys10 = ControlGetText("", "", $DisableKeys10);LOG
        HotKeySet($KeysDisable10, "BlankKey")
EndFunc
Func BlankKey()
    Send("")
EndFunc
Func DisableKeysCLEAR1()
    $LogDisableKeys1 = ""
    GUICtrlSetData($DisableKeys1, "")
    HotKeySet($KeysDisable1)
EndFunc
Func DisableKeysCLEAR2()
    $LogDisableKeys2 = ""
    GUICtrlSetData($DisableKeys2, "")
    HotKeySet($KeysDisable2)
EndFunc
Func DisableKeysCLEAR3()
    $LogDisableKeys3 = ""
    GUICtrlSetData($DisableKeys3, "")
    HotKeySet($KeysDisable3)
EndFunc
Func DisableKeysCLEAR4()
    $LogDisableKeys4 = ""
    GUICtrlSetData($DisableKeys4, "")
    HotKeySet($KeysDisable4)
EndFunc
Func DisableKeysCLEAR5()
    $LogDisableKeys5 = ""
    GUICtrlSetData($DisableKeys5, "")
    HotKeySet($KeysDisable5)
EndFunc
Func DisableKeysCLEAR6()
    $LogDisableKeys6 = ""
    GUICtrlSetData($DisableKeys6, "")
    HotKeySet($KeysDisable6)
EndFunc
Func DisableKeysCLEAR7()
    $LogDisableKeys7 = ""
    GUICtrlSetData($DisableKeys7, "")
    HotKeySet($KeysDisable7)
EndFunc
Func DisableKeysCLEAR8()
    $LogDisableKeys8 = ""
    GUICtrlSetData($DisableKeys8, "")
    HotKeySet($KeysDisable8)
EndFunc
Func DisableKeysCLEAR9()
    $LogDisableKeys9 = ""
    GUICtrlSetData($DisableKeys9, "")
    HotKeySet($KeysDisable9)
EndFunc
Func DisableKeysCLEAR10()
    $LogDisableKeys10 = ""
    GUICtrlSetData($DisableKeys10, "")
    HotKeySet($KeysDisable10)
EndFunc
Func DisableKeysCLEARALL()
DisableKeysCLEAR1()
DisableKeysCLEAR2()
DisableKeysCLEAR3()
DisableKeysCLEAR4()
DisableKeysCLEAR5()
DisableKeysCLEAR6()
DisableKeysCLEAR7()
DisableKeysCLEAR8()
DisableKeysCLEAR9()
DisableKeysCLEAR10()
EndFunc
Func DisableKeysNotification()
    MsgBox($MB_SYSTEMMODAL, "Info", "Keys Disabled")
EndFunc
;------------------------------------------------------------------------------- DISABLE KEYS {END}

Func KeyIntoClick();------------------------------------------------------------------------------- KEY INTO CLICK

        $KeyClick1 = ControlGetText("", "", $KeyToClick1)
        HotKeySet($KeyClick1, "ReplaceKeyClick1")

        $KeyClick2 = ControlGetText("", "", $KeyToClick2)
        HotKeySet($KeyClick2, "ReplaceKeyClick2")

        $KeyClick3 = ControlGetText("", "", $KeyToClick3)
        HotKeySet($KeyClick3, "ReplaceKeyClick3")

                $ComboBoxClick1 = ControlGetText("", "", $Combo1)
                $LogCombo1 = ControlGetText("", "", $Combo1);LOG
                $LogKeyToClick1 = ControlGetText("", "", $KeyToClick1);LOG
            If $ComboBoxClick1 = "Left Click" Then
                $ComboBoxLeftClick1 = 1
            Else
                $ComboBoxLeftClick1 = 0
            EndIf
            If $ComboBoxClick1 = "Right Click" Then
                $ComboBoxRightClick1 = 1
            Else
                $ComboBoxRightClick1 = 0
            EndIf
            If $ComboBoxClick1 = "Middle Button" Then
                $ComboBoxMiddleButton1 = 1
            Else
                $ComboBoxMiddleButton1 = 0
            EndIf

                $ComboBoxClick2 = ControlGetText("", "", $Combo2)
                $LogCombo2 = ControlGetText("", "", $Combo2);LOG
                $LogKeyToClick2 = ControlGetText("", "", $KeyToClick2);LOG
            If $ComboBoxClick2 = "Left Click" Then
                $ComboBoxLeftClick2 = 1
            Else
                $ComboBoxLeftClick2 = 0
            EndIf
            If $ComboBoxClick2 = "Right Click" Then
                $ComboBoxRightClick2 = 1
            Else
                $ComboBoxRightClick2 = 0
            EndIf
            If $ComboBoxClick2 = "Middle Button" Then
                $ComboBoxMiddleButton2 = 1
            Else
                $ComboBoxMiddleButton2 = 0
            EndIf

                $ComboBoxClick3 = ControlGetText("", "", $Combo3)
                $LogCombo3 = ControlGetText("", "", $Combo3);LOG
                $LogKeyToClick3 = ControlGetText("", "", $KeyToClick3);LOG
            If $ComboBoxClick3 = "Left Click" Then
                $ComboBoxLeftClick3 = 1
            Else
                $ComboBoxLeftClick3 = 0
            EndIf
            If $ComboBoxClick5 = "Right Click" Then
                $ComboBoxRightClick3 = 1
            Else
                $ComboBoxRightClick3 = 0
            EndIf
            If $ComboBoxClick3 = "Middle Button" Then
                $ComboBoxMiddleButton3 = 1
            Else
                $ComboBoxMiddleButton3 = 0
            EndIf
EndFunc

Func ReplaceKeyClick1()
    If $ComboBoxLeftClick1 = 1 Then
        MouseClick($MOUSE_CLICK_PRIMARY)
    EndIf
    If $ComboBoxRightClick1 = 1 Then
        MouseClick($MOUSE_CLICK_SECONDARY)
    EndIf
    If $ComboBoxMiddleButton1 = 1 Then
        MouseClick($MOUSE_CLICK_MIDDLE)
    EndIf
EndFunc
Func ReplaceKeyClick2()
    If $ComboBoxLeftClick2 = 1 Then
        MouseClick($MOUSE_CLICK_PRIMARY)
    EndIf
    If $ComboBoxRightClick2 = 1 Then
        MouseClick($MOUSE_CLICK_SECONDARY)
    EndIf
    If $ComboBoxMiddleButton2 = 1 Then
        MouseClick($MOUSE_CLICK_MIDDLE)
    EndIf
EndFunc
Func ReplaceKeyClick3()
    If $ComboBoxLeftClick3 = 1 Then
        MouseClick($MOUSE_CLICK_PRIMARY)
    EndIf
    If $ComboBoxRightClick3 = 1 Then
        MouseClick($MOUSE_CLICK_SECONDARY)
    EndIf
    If $ComboBoxMiddleButton3 = 1 Then
        MouseClick($MOUSE_CLICK_MIDDLE)
    EndIf
EndFunc

Func KeyClickCLEAR1()
    $LogCombo1 = ""
    $LogKeyToClick1 = ""
    GUICtrlSetData($Combo1, "")
    GUICtrlSetData($KeyToClick1, "")
    GUICtrlSetData($Combo1, "Left Click|Right Click|Middle Button", "")
    HotKeySet($KeyClick1)
EndFunc
Func KeyClickCLEAR2()
    $LogCombo2 = ""
    $LogKeyToClick2 = ""
    GUICtrlSetData($Combo2, "")
    GUICtrlSetData($KeyToClick2, "")
    GUICtrlSetData($Combo2, "Left Click|Right Click|Middle Button", "")
    HotKeySet($KeyClick2)
EndFunc
Func KeyClickCLEAR3()
    $LogCombo3 = ""
    $LogKeyToClick3 = ""
    GUICtrlSetData($Combo3, "")
    GUICtrlSetData($KeyToClick3, "")
    GUICtrlSetData($Combo3, "Left Click|Right Click|Middle Button", "")
    HotKeySet($KeyClick3)
EndFunc
Func KeyClickCLEARALL()
    KeyClickCLEAR1()
    KeyClickCLEAR2()
    KeyClickCLEAR3()
EndFunc
;------------------------------------------------------------------------------- KEY INTO CLICK {END}

Func ReplaceKeys();------------------------------------------------------------------------------- REASSIGN KEYS

            $GetReplace1 = ControlGetText("", "", $Replace1)
            $LogReplace1 = ControlGetText("", "", $Replace1);LOG
            $GetWith1 = ControlGetText("", "", $With1)
            $LogWith1 = ControlGetText("", "", $With1);LOG
            HotKeySet($GetReplace1, "ReplaceWith1")

            $GetReplace2 = ControlGetText("", "", $Replace2)
            $LogReplace2 = ControlGetText("", "", $Replace2);LOG
            $GetWith2 = ControlGetText("", "", $With2)
            $LogWith2 = ControlGetText("", "", $With2);LOG
            HotKeySet($GetReplace2, "ReplaceWith2")

            $GetReplace3 = ControlGetText("", "", $Replace3)
            $LogReplace3 = ControlGetText("", "", $Replace3);LOG
            $GetWith3 = ControlGetText("", "", $With3)
            $LogWith3 = ControlGetText("", "", $With3);LOG
            HotKeySet($GetReplace3, "ReplaceWith3")

            $GetReplace4 = ControlGetText("", "", $Replace4)
            $LogReplace4 = ControlGetText("", "", $Replace4);LOG
            $GetWith4 = ControlGetText("", "", $With4)
            $LogWith4 = ControlGetText("", "", $With4);LOG
            HotKeySet($GetReplace4, "ReplaceWith4")

            $GetReplace5 = ControlGetText("", "", $Replace5)
            $LogReplace5 = ControlGetText("", "", $Replace5);LOG
            $GetWith5 = ControlGetText("", "", $With5)
            $LogWith5 = ControlGetText("", "", $With5);LOG
            HotKeySet($GetReplace5, "ReplaceWith5")

            $GetReplace6 = ControlGetText("", "", $Replace6)
            $LogReplace6 = ControlGetText("", "", $Replace6);LOG
            $GetWith6 = ControlGetText("", "", $With6)
            $LogWith6 = ControlGetText("", "", $With6);LOG
            HotKeySet($GetReplace6, "ReplaceWith6")

            $GetReplace7 = ControlGetText("", "", $Replace7)
            $LogReplace7 = ControlGetText("", "", $Replace7);LOG
            $GetWith7 = ControlGetText("", "", $With7)
            $LogWith7 = ControlGetText("", "", $With7);LOG
            HotKeySet($GetReplace7, "ReplaceWith7")

            $GetReplace8 = ControlGetText("", "", $Replace8)
            $LogReplace8 = ControlGetText("", "", $Replace8);LOG
            $GetWith8 = ControlGetText("", "", $With8)
            $LogWith8 = ControlGetText("", "", $With8);LOG
            HotKeySet($GetReplace8, "ReplaceWith8")

            $GetReplace9 = ControlGetText("", "", $Replace9)
            $LogReplace9 = ControlGetText("", "", $Replace9);LOG
            $GetWith9 = ControlGetText("", "", $With9)
            $LogWith9 = ControlGetText("", "", $With9);LOG-
            HotKeySet($GetReplace9, "ReplaceWith9")

            $GetReplace10 = ControlGetText("", "", $Replace10)
            $LogReplace10 = ControlGetText("", "", $Replace10);LOG
            $GetWith10 = ControlGetText("", "", $With10)
            $LogWith10 = ControlGetText("", "", $With10);LOG
            HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc

Func ReplaceWith1()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith1)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith2()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith2)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith3()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith3)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith4()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith4)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith5()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith5)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith6()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith6)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith7()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith7)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith8()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith8)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith9()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith9)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc
Func ReplaceWith10()
    HotKeySet($GetReplace1)
    HotKeySet($GetReplace2)
    HotKeySet($GetReplace3)
    HotKeySet($GetReplace4)
    HotKeySet($GetReplace5)
    HotKeySet($GetReplace6)
    HotKeySet($GetReplace7)
    HotKeySet($GetReplace8)
    HotKeySet($GetReplace9)
    HotKeySet($GetReplace10)
    Send($GetWith10)
    HotKeySet($GetReplace1, "ReplaceWith1")
    HotKeySet($GetReplace2, "ReplaceWith2")
    HotKeySet($GetReplace3, "ReplaceWith3")
    HotKeySet($GetReplace4, "ReplaceWith4")
    HotKeySet($GetReplace5, "ReplaceWith5")
    HotKeySet($GetReplace6, "ReplaceWith6")
    HotKeySet($GetReplace7, "ReplaceWith7")
    HotKeySet($GetReplace8, "ReplaceWith8")
    HotKeySet($GetReplace9, "ReplaceWith9")
    HotKeySet($GetReplace10, "ReplaceWith10")
EndFunc

Func ClearKeys1()
    $GetReplace1 = $LogReplace1
    $GetWith1 = ""
    $LogWith1 = ""
    GUICtrlSetData($Replace1, "")
    GUICtrlSetData($With1, "")
    HotKeySet($GetReplace1)
    ReplaceKeys()
EndFunc
Func ClearKeys2()
    $GetReplace2 = $LogReplace2
    $GetWith2 = ""
    $LogWith2 = ""
    GUICtrlSetData($Replace2, "")
    GUICtrlSetData($With2, "")
    HotKeySet($GetReplace2)
    ReplaceKeys()
EndFunc
Func ClearKeys3()
    $GetReplace3 = $LogReplace3
    $GetWith3 = ""
    $LogWith3 = ""
    GUICtrlSetData($Replace3, "")
    GUICtrlSetData($With3, "")
    HotKeySet($GetReplace3)
    ReplaceKeys()
EndFunc
Func ClearKeys4()
    $GetReplace4 = $LogReplace4
    $GetWith4 = ""
    $LogWith4 = ""
    GUICtrlSetData($Replace4, "")
    GUICtrlSetData($With4, "")
    HotKeySet($GetReplace4)
    ReplaceKeys()
EndFunc
Func ClearKeys5()
    $GetReplace5 = $LogReplace5
    $GetWith5 = ""
    $LogWith5 = ""
    GUICtrlSetData($Replace5, "")
    GUICtrlSetData($With5, "")
    HotKeySet($GetReplace5)
    ReplaceKeys()
EndFunc
Func ClearKeys6()
    $GetReplace6 = $LogReplace6
    $GetWith6 = ""
    $LogWith6 = ""
    GUICtrlSetData($Replace6, "")
    GUICtrlSetData($With6, "")
    HotKeySet($GetReplace6)
    ReplaceKeys()
EndFunc
Func ClearKeys7()
    $GetReplace7 = $LogReplace7
    $GetWith7 = ""
    $LogWith7 = ""
    GUICtrlSetData($Replace7, "")
    GUICtrlSetData($With7, "")
    HotKeySet($GetReplace7)
    ReplaceKeys()
EndFunc
Func ClearKeys8()
    $GetReplace8 = $LogReplace8
    $GetWith8 = ""
    $LogWith8 = ""
    GUICtrlSetData($Replace8, "")
    GUICtrlSetData($With8, "")
    HotKeySet($GetReplace8)
    ReplaceKeys()
EndFunc
Func ClearKeys9()
    $GetReplace9 = $LogReplace9
    $GetWith9 = ""
    $LogWith9 = ""
    GUICtrlSetData($Replace9, "")
    GUICtrlSetData($With9, "")
    HotKeySet($GetReplace9)
    ReplaceKeys()
EndFunc
Func ClearKeys10()
    $GetReplace10 = $LogReplace10
    $GetWith10 = ""
    $LogWith10 = ""
    GUICtrlSetData($Replace10, "")
    GUICtrlSetData($With10, "")
    HotKeySet($GetReplace10)
    ReplaceKeys()
EndFunc

Func ClearKeysALL()
    ClearKeys1()
    ClearKeys2()
    ClearKeys3()
    ClearKeys4()
    ClearKeys5()
    ClearKeys6()
    ClearKeys7()
    ClearKeys8()
    ClearKeys9()
    ClearKeys10()
EndFunc
;------------------------------------------------------------------------------- REASSIGN KEYS {END}

Func LogKeys();------------------------------------------------------------------------------- LOGS
    If $ToggleButton = 1 Then
        GUICtrlSetData($GetStartStop, $LogGetStartStop)
    EndIf
    If $GUIButton = 1 Then
        GUICtrlSetData($GUIOpen, $LogGUIOpen)
    EndIf
    If $GetEndButton = 1 Then
        GUICtrlSetData($GetEnd, $LogGetEnd)
    EndIf
    ;---------------------------------------------------- Create Macro
    If $X_Y_Send1 = 1 Then
        GUICtrlSetData($L1X, $LogL1X)
        GUICtrlSetData($L1Y, $LogL1Y)
    EndIf
    If $X_Y_Send2 = 1 Then
        GUICtrlSetData($L2X, $LogL2X)
        GUICtrlSetData($L2Y, $LogL2Y)
    EndIf
    If $X_Y_Send3 = 1 Then
        GUICtrlSetData($L3X, $LogL3X)
        GUICtrlSetData($L3Y, $LogL3Y)
    EndIf
    If $X_Y_Send4 = 1 Then
        GUICtrlSetData($L4X, $LogL4X)
        GUICtrlSetData($L4Y, $LogL4Y)
    EndIf
    ;----------------------------------------------------
    If $LeftClickCheckA = 1 Then
        GUICtrlSetState($LeftClickA, $GUI_CHECKED)
    EndIf
    If $LeftClickCheckA = 0 Then
        GUICtrlSetState($LeftClickA, $GUI_UNCHECKED)
    EndIf
    If $LeftClickCheckB = 1 Then
        GUICtrlSetState($LeftClickB, $GUI_CHECKED)
    EndIf
    If $LeftClickCheckB = 0 Then
        GUICtrlSetState($LeftClickB, $GUI_UNCHECKED)
    EndIf
    If $LeftClickCheckC = 1 Then
        GUICtrlSetState($LeftClickC, $GUI_CHECKED)
    EndIf
    If $LeftClickCheckC = 0 Then
        GUICtrlSetState($LeftClickC, $GUI_UNCHECKED)
    EndIf
    If $LeftClickCheckD = 1 Then
        GUICtrlSetState($LeftClickD, $GUI_CHECKED)
    EndIf
    If $LeftClickCheckD = 0 Then
        GUICtrlSetState($LeftClickD, $GUI_UNCHECKED)
    EndIf
    ;----------------------------------------------------
    If $RightClickCheckA = 1 Then
        GUICtrlSetState($RightClickA, $GUI_CHECKED)
    EndIf
    If $RightClickCheckA = 0 Then
        GUICtrlSetState($RightClickA, $GUI_UNCHECKED)
    EndIf
    If $RightClickCheckB = 1 Then
        GUICtrlSetState($RightClickB, $GUI_CHECKED)
    EndIf
    If $RightClickCheckB = 0 Then
        GUICtrlSetState($RightClickB, $GUI_UNCHECKED)
    EndIf
    If $RightClickCheckC = 1 Then
        GUICtrlSetState($RightClickC, $GUI_CHECKED)
    EndIf
    If $RightClickCheckC = 0 Then
        GUICtrlSetState($RightClickC, $GUI_UNCHECKED)
    EndIf
    If $RightClickCheckD = 1 Then
    GUICtrlSetState($RightClickD, $GUI_CHECKED)
    EndIf
    If $RightClickCheckD = 0 Then
    GUICtrlSetState($RightClickD, $GUI_UNCHECKED)
    EndIf
    ;----------------------------------------------------
    If $PressKeyA = 1 Then
        GUICtrlSetData($KeysToSendA, $LogKeysToSendA)
    EndIf
    If $PressKeyB = 1 Then
        GUICtrlSetData($KeysToSendB, $LogKeysToSendB)
    EndIf
    If $PressKeyC = 1 Then
        GUICtrlSetData($KeysToSendC, $LogKeysToSendC)
    EndIf
    If $PressKeyD = 1 Then
        GUICtrlSetData($KeysToSendD, $LogKeysToSendD)
    EndIf
    ;----------------------------------------------------
    GUICtrlSetData($SleepTimeA, $LogSleepTimeA)
    GUICtrlSetData($SleepTimeB, $LogSleepTimeB)
    GUICtrlSetData($SleepTimeC, $LogSleepTimeC)
    GUICtrlSetData($SleepTimeD, $LogSleepTimeD)
    ;---------------------------------------------------- Reassign Keys
    GUICtrlSetData($Replace1, $LogReplace1)
    GUICtrlSetData($With1, $LogWith1)

    GUICtrlSetData($Replace2, $LogReplace2)
    GUICtrlSetData($With2, $LogWith2)

    GUICtrlSetData($Replace3, $LogReplace3)
    GUICtrlSetData($With3, $LogWith3)

    GUICtrlSetData($Replace4, $LogReplace4)
    GUICtrlSetData($With4, $LogWith4)

    GUICtrlSetData($Replace5, $LogReplace5)
    GUICtrlSetData($With5, $LogWith5)

    GUICtrlSetData($Replace6, $LogReplace6)
    GUICtrlSetData($With6, $LogWith6)

    GUICtrlSetData($Replace7, $LogReplace7)
    GUICtrlSetData($With7, $LogWith7)

    GUICtrlSetData($Replace8, $LogReplace8)
    GUICtrlSetData($With8, $LogWith8)

    GUICtrlSetData($Replace9, $LogReplace9)
    GUICtrlSetData($With9, $LogWith9)

    GUICtrlSetData($Replace10, $LogReplace10)
    GUICtrlSetData($With10, $LogWith10)
    ;---------------------------------------------------- Key Into Click
    GUICtrlSetData($KeyToClick1, $LogKeyToClick1)
    GUICtrlSetData($Combo1, "")
    GUICtrlSetData($Combo1, "Left Click|Right Click|Middle Button", $LogCombo1)

    GUICtrlSetData($KeyToClick2, $LogKeyToClick2)
    GUICtrlSetData($Combo2, "")
    GUICtrlSetData($Combo2, "Left Click|Right Click|Middle Button", $LogCombo2)

    GUICtrlSetData($KeyToClick3, $LogKeyToClick3)
    GUICtrlSetData($Combo3, "")
    GUICtrlSetData($Combo3, "Left Click|Right Click|Middle Button", $LogCombo3)
    ;---------------------------------------------------- Disable Keys
    GUICtrlSetData($DisableKeys1, $LogDisableKeys1)
    GUICtrlSetData($DisableKeys2, $LogDisableKeys2)
    GUICtrlSetData($DisableKeys3, $LogDisableKeys3)
    GUICtrlSetData($DisableKeys4, $LogDisableKeys4)
    GUICtrlSetData($DisableKeys5, $LogDisableKeys5)
    GUICtrlSetData($DisableKeys6, $LogDisableKeys6)
    GUICtrlSetData($DisableKeys7, $LogDisableKeys7)
    GUICtrlSetData($DisableKeys8, $LogDisableKeys8)
    GUICtrlSetData($DisableKeys9, $LogDisableKeys9)
    GUICtrlSetData($DisableKeys10, $LogDisableKeys10)
    ;---------------------------------------------------- Mouse Button Swap
    If $SwapState = 1 Then
        GUICtrlSetState($ButtonSwap, $GUI_CHECKED)
    EndIf
    If $SwapState = 0 Then
        GUICtrlSetState($ButtonSwap, $GUI_UNCHECKED)
    EndIf
EndFunc
;------------------------------------------------------------------------------- LOGS {END}

Func MacroHelp();------------------------------------------------------------------------------- MACRO HELP
    Global $MacroHelpState = 1

    Local $idListview = GUICtrlCreateListView("Send() Command| Resulting Keypress", 10, 32, 390, 358)
    Local $idItem1 = GUICtrlCreateListViewItem("{!}|!", $idListview)
    Local $idItem2 = GUICtrlCreateListViewItem("{#}|#", $idListview)
    Local $idItem3 = GUICtrlCreateListViewItem("{+}|+", $idListview)
    Local $idItem4 = GUICtrlCreateListViewItem("{^}|^", $idListview)
    Local $idItem5 = GUICtrlCreateListViewItem("{{}|{", $idListview)
    Local $idItem6 = GUICtrlCreateListViewItem("{}}|}", $idListview)
    Local $idItem7 = GUICtrlCreateListViewItem("{SPACE}|SPACEBAR key", $idListview)
    Local $idItem8 = GUICtrlCreateListViewItem("{ENTER}|ENTER key", $idListview)
    Local $idItem9 = GUICtrlCreateListViewItem("{ALT}|ALT", $idListview)
    Local $idItem10 = GUICtrlCreateListViewItem("{BACKSPACE} or {BS}|BACKSPACE", $idListview)
    Local $idItem11 = GUICtrlCreateListViewItem("{DELETE} or {DEL}|DELETE", $idListview)
    Local $idItem12 = GUICtrlCreateListViewItem("{UP}|Up arrow", $idListview)
    Local $idItem13 = GUICtrlCreateListViewItem("{DOWN}|Down arrow", $idListview)
    Local $idItem14 = GUICtrlCreateListViewItem("{LEFT}|Left arrow", $idListview)
    Local $idItem15 = GUICtrlCreateListViewItem("{RIGHT}|Right arrow", $idListview)
    Local $idItem16 = GUICtrlCreateListViewItem("{HOME}|HOME", $idListview)
    Local $idItem17 = GUICtrlCreateListViewItem("{END}|END", $idListview)
    Local $idItem18 = GUICtrlCreateListViewItem("{ESCAPE} or {ESC}|ESCAPE", $idListview)
    Local $idItem19 = GUICtrlCreateListViewItem("{INSERT} or {INS}|INS", $idListview)
    Local $idItem20 = GUICtrlCreateListViewItem("{PGUP}|PageUp", $idListview)
    Local $idItem21 = GUICtrlCreateListViewItem("{PGDN}|PageDown", $idListview)
    Local $idItem22 = GUICtrlCreateListViewItem("{F1} - {F12}|Function keys", $idListview)
    Local $idItem23 = GUICtrlCreateListViewItem("{PRINTSCREEN}|Print Screen key", $idListview)
    Local $idItem24 = GUICtrlCreateListViewItem("{LWIN}|Left Windows key", $idListview)
    Local $idItem25 = GUICtrlCreateListViewItem("{RWIN}|Right Windows key", $idListview)
    Local $idItem26 = GUICtrlCreateListViewItem("{NUMLOCK on}|NUMLOCK (on/off/toggle)", $idListview)
    Local $idItem27 = GUICtrlCreateListViewItem("{CAPSLOCK off}|CAPSLOCK (on/off/toggle)", $idListview)
    Local $idItem28 = GUICtrlCreateListViewItem("{SCROLLLOCK toggle}|SCROLLLOCK (on/off/toggle)", $idListview)
    Local $idItem29 = GUICtrlCreateListViewItem("{BREAK}|for Ctrl+Break processing", $idListview)
    Local $idItem30 = GUICtrlCreateListViewItem("{PAUSE}|PAUSE", $idListview)
    Local $idItem31 = GUICtrlCreateListViewItem("{NUMPAD0} - {NUMPAD9}|Numpad digits", $idListview)
    Local $idItem32 = GUICtrlCreateListViewItem("{NUMPADMULT}|Numpad Multiply", $idListview)
    Local $idItem33 = GUICtrlCreateListViewItem("{NUMPADADD}|Numpad Add", $idListview)
    Local $idItem34 = GUICtrlCreateListViewItem("{NUMPADSUB}|Numpad Subtract", $idListview)
    Local $idItem35 = GUICtrlCreateListViewItem("{NUMPADDIV}|Numpad Divide", $idListview)
    Local $idItem36 = GUICtrlCreateListViewItem("{NUMPADDOT}|Numpad period", $idListview)
    Local $idItem37 = GUICtrlCreateListViewItem("{NUMPADENTER}|Enter key on the numpad", $idListview)
    Local $idItem38 = GUICtrlCreateListViewItem("{APPSKEY}|Windows App key", $idListview)
    Local $idItem39 = GUICtrlCreateListViewItem("{LALT}|Left ALT key", $idListview)
    Local $idItem40 = GUICtrlCreateListViewItem("{RALT}|Right ALT key", $idListview)
    Local $idItem41 = GUICtrlCreateListViewItem("{LCTRL}|Left CTRL key", $idListview)
    Local $idItem42 = GUICtrlCreateListViewItem("{RCTRL}|Right CTRL key", $idListview)
    Local $idItem43 = GUICtrlCreateListViewItem("{LSHIFT}|Left Shift key", $idListview)
    Local $idItem44 = GUICtrlCreateListViewItem("{RSHIFT}|Right Shift key", $idListview)
    Local $idItem45 = GUICtrlCreateListViewItem("{SLEEP}|Computer SLEEP key", $idListview)
    Local $idItem46 = GUICtrlCreateListViewItem("{ALTDOWN}|Holds the ALT key down until {ALTUP} is sent", $idListview)
    Local $idItem47 = GUICtrlCreateListViewItem("{SHIFTDOWN}|Holds the SHIFT key down until {SHIFTUP} is sent", $idListview)
    Local $idItem48 = GUICtrlCreateListViewItem("{CTRLDOWN}|Holds the CTRL key down until {CTRLUP} is sent", $idListview)
    Local $idItem49 = GUICtrlCreateListViewItem("{LWINDOWN}|Holds the left Windows key down until {LWINUP} is sent", $idListview)
    Local $idItem50 = GUICtrlCreateListViewItem("{RWINDOWN}|Holds the right Windows key down until {RWINUP} is sent", $idListview)
    Local $idItem51 = GUICtrlCreateListViewItem("{ASC nnnn}|Send the ALT+nnnn key combination", $idListview)
    Local $idItem52 = GUICtrlCreateListViewItem("{BROWSER_BACK}|Select the browser 'back' button", $idListview)
    Local $idItem53 = GUICtrlCreateListViewItem("{BROWSER_FORWARD}|Select the browser 'forward' button", $idListview)
    Local $idItem54 = GUICtrlCreateListViewItem("{BROWSER_REFRESH}|Select the browser 'refresh' button", $idListview)
    Local $idItem55 = GUICtrlCreateListViewItem("{BROWSER_STOP}|Select the browser 'stop' button", $idListview)
    Local $idItem56 = GUICtrlCreateListViewItem("{BROWSER_SEARCH}|Select the browser 'search' button", $idListview)
    Local $idItem57 = GUICtrlCreateListViewItem("{BROWSER_FAVORITES}|Select the browser 'favorites' button", $idListview)
    Local $idItem58 = GUICtrlCreateListViewItem("{BROWSER_HOME}|Launch the browser and go to the home page", $idListview)
    Local $idItem59 = GUICtrlCreateListViewItem("{VOLUME_MUTE}|Mute the volume", $idListview)
    Local $idItem60 = GUICtrlCreateListViewItem("{VOLUME_DOWN}|Reduce the volume", $idListview)
    Local $idItem61 = GUICtrlCreateListViewItem("{VOLUME_UP}|Increase the volume", $idListview)
    Local $idItem62 = GUICtrlCreateListViewItem("{MEDIA_NEXT}|Select next track in media player", $idListview)
    Local $idItem63 = GUICtrlCreateListViewItem("{MEDIA_PREV}|Select previous track in media player", $idListview)
    Local $idItem64 = GUICtrlCreateListViewItem("{MEDIA_STOP}|Stop media player", $idListview)
    Local $idItem65 = GUICtrlCreateListViewItem("{MEDIA_PLAY_PAUSE}|Play/pause media player", $idListview)
    Local $idItem66 = GUICtrlCreateListViewItem("{LAUNCH_MAIL}|Launch the email application", $idListview)
    Local $idItem67 = GUICtrlCreateListViewItem("{LAUNCH_MEDIA}|Launch media player", $idListview)
    Local $idItem68 = GUICtrlCreateListViewItem("{LAUNCH_APP1}|Launch user app1", $idListview)
    Local $idItem69 = GUICtrlCreateListViewItem("{LAUNCH_APP2}|Launch user app2", $idListview)
    Local $idItem70 = GUICtrlCreateListViewItem("{OEM_102}|Either the angle bracket key or the backslash key on the RT 102-key keyboard", $idListview)
    GUISetState(@SW_SHOW)
EndFunc

Func CloseMacroHelp()
    $MacroHelpState = 0
    GUIDelete($HelpTab1)
EndFunc

Func HelpTabs1()

    Global $MacroHelpState = 1
    Global $MacroHelp
    $HelpTab1 = GUICreate("Change_Hotkeys")
    GUICtrlCreateTab(10, 10, 392, 382)
    $keystab = GUICtrlCreateTabItem("Keys")
    MacroHelp()

    GUICtrlCreateTabItem("Info")
    GUICtrlCreateLabel("Hotkeys will be used to control the whole program.", 15, 37, 390, 20)
    GUICtrlCreateLabel("Start/Stop - Will begin and pause the current macro; as a toggle function.", 15, 57, 390, 20)
    GUICtrlCreateLabel("Open GUI - Opens the GUI window back up when pressed; immediately cancels", 15, 77, 390, 20)
    GUICtrlCreateLabel("the currently running macro.", 15, 97, 390, 20)
    GUICtrlCreateLabel("End Program - Closes the MacroMaker program when the GUI is hidden during", 15, 117, 390, 20)
    GUICtrlCreateLabel("a macro.", 15, 137, 390, 20)
    GUICtrlCreateLabel("Open GUI key can be used whenever the GUI window is hidden.", 15, 177, 390, 20)
    GUICtrlCreateLabel("Start/Stop key is also used to set the coordinates for 'Get Coords'.", 15, 217, 390, 20)

    GUICtrlCreateTabItem("")

    GUICtrlSetState($keystab, $GUI_SHOW)
    GUISetState(@SW_SHOW)
    While $MacroHelpState = 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            CloseMacroHelp()
    EndSwitch
    WEnd
EndFunc
Func HelpTabs2()

    Global $MacroHelpState = 1
    Global $MacroHelp
    $HelpTab1 = GUICreate("Create_Macro")
    GUICtrlCreateTab(10, 10, 392, 382)
    $keystab = GUICtrlCreateTabItem("Keys")
    MacroHelp()

    GUICtrlCreateTabItem("Info")
    GUICtrlCreateLabel("The order in which macros will execute is from top to bottom.", 15, 37, 390, 20)
    GUICtrlCreateLabel("All macros will begin paused on creation, Start/Stop key to activate.", 15, 57, 390, 20)
    GUICtrlCreateLabel("Macros will repeat indefinitely until the Start/Stop key is pressed.", 15, 77, 390, 20)
    GUICtrlCreateLabel("X, Y position - moves mouse to the location.", 15, 97, 390, 20)
    GUICtrlCreateLabel("Leftclick/Rightclick - will press the corresponding click.", 15, 117, 390, 20)
    GUICtrlCreateLabel("Keys - will type out anything in plain text; use {ENTER} to press the ENTER key.", 15, 137, 390, 20)
    GUICtrlCreateLabel("You can use {ENTER} YourMessageHere {ENTER} on a single 'Keys' line.", 15, 157, 390, 20)
    GUICtrlCreateLabel("Delay - sets a delay between macro functions. (in milliseconds)", 15, 177, 390, 20)
    GUICtrlCreateLabel("Get Coords - once pressed, use the Start/Stop key to set the coordinates.", 15, 197, 390, 20)
    GUICtrlCreateLabel("Leave anything you don't wish to use blank.", 15, 237, 390, 20)
    GUICtrlCreateLabel("", 15, 257, 390, 20)

    GUICtrlCreateTabItem("")

    GUICtrlSetState($keystab, $GUI_SHOW)
    GUISetState(@SW_SHOW)
    While $MacroHelpState = 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            CloseMacroHelp()
    EndSwitch
    WEnd
EndFunc
Func HelpTabs3()

    Global $MacroHelpState = 1
    Global $MacroHelp
    $HelpTab1 = GUICreate("Reassign_Keys")
    GUICtrlCreateTab(10, 10, 392, 382)
    $keystab = GUICtrlCreateTabItem("Keys")
    MacroHelp()

    GUICtrlCreateTabItem("Info")
    GUICtrlCreateLabel("Reassign Keys will allow you to change any key into any other key or keys.", 15, 37, 390, 20)
    GUICtrlCreateLabel("Replace - key you want to replace.", 15, 57, 390, 20)
    GUICtrlCreateLabel("With - keypress to set the key as.", 15, 77, 390, 20)
    GUICtrlCreateLabel("The buttons to the right of each input box will clear the data and", 15, 117, 390, 20)
    GUICtrlCreateLabel("immediately take effect.", 15, 137, 390, 20)

    GUICtrlCreateTabItem("")

    GUICtrlSetState($keystab, $GUI_SHOW)
    GUISetState(@SW_SHOW)
    While $MacroHelpState = 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            CloseMacroHelp()
    EndSwitch
    WEnd
EndFunc
Func HelpTabs4()

    Global $MacroHelpState = 1
    Global $MacroHelp
    $HelpTab1 = GUICreate("Key_Into_Click")
    GUICtrlCreateTab(10, 10, 392, 382)
    $keystab = GUICtrlCreateTabItem("Keys")
    MacroHelp()

    GUICtrlCreateTabItem("Info")
    GUICtrlCreateLabel("Key Into Click will change any keyboard key into a mouseclick.", 15, 37, 390, 20)
    GUICtrlCreateLabel("Turn - selected key to change.", 15, 57, 390, 20)
    GUICtrlCreateLabel("Into - Change the key into a click.", 15, 77, 390, 20)
    GUICtrlCreateLabel("Key can be held down to repeat the click until released.", 15, 97, 390, 20)
    GUICtrlCreateLabel("The buttons to the right of each input box will clear the data and", 15, 137, 390, 20)
    GUICtrlCreateLabel("immediately take effect.", 15, 157, 390, 20)

    GUICtrlCreateTabItem("")

    GUICtrlSetState($keystab, $GUI_SHOW)
    GUISetState(@SW_SHOW)
    While $MacroHelpState = 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            CloseMacroHelp()
    EndSwitch
    WEnd
EndFunc
Func HelpTabs5()

    Global $MacroHelpState = 1
    Global $MacroHelp
    $HelpTab1 = GUICreate("Disable_Keys")
    GUICtrlCreateTab(10, 10, 392, 382)
    $keystab = GUICtrlCreateTabItem("Keys")
    MacroHelp()

    GUICtrlCreateTabItem("Info")
    GUICtrlCreateLabel("Disable Keys will disable any keyboard key.", 15, 37, 390, 20)
    GUICtrlCreateLabel("The buttons to the right of each input box will clear the data and", 15, 77, 390, 20)
    GUICtrlCreateLabel("immediately take effect.", 15, 97, 390, 20)

    GUICtrlCreateTabItem("")

    GUICtrlSetState($keystab, $GUI_SHOW)
    GUISetState(@SW_SHOW)
    While $MacroHelpState = 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            CloseMacroHelp()
    EndSwitch
    WEnd
EndFunc
;------------------------------------------------------------------------------- MACRO HELP {END}

Func Hotkeys();------------------------------------------------------------------------------- SHARED
    If $Hotkeys = 0 Then
        HotKeySet($GetStartStopNew)
        HotKeySet($GUIOpenNew)
        HotKeySet($End_Program_New)
    EndIf
    If $Hotkeys = 1 Then
        HotKeySet($GetStartStopNew, "Toggle")
        HotKeySet($GUIOpenNew, "OpenGUI")
        HotKeySet($End_Program_New, "End")
    EndIf
EndFunc

Func ReassignKeysNotification()
    MsgBox($MB_SYSTEMMODAL, "Info", "Keys Reassigned")
EndFunc

Func HideMacroMakerGUI()
    GUISetState(@SW_HIDE, $Form1)
    HotKeySet($GUIOpenNew, "OpenMacroMakerGUI")
EndFunc
Func OpenMacroMakerGUI()
    GUISetState(@SW_SHOW, $Form1)
    HotKeySet($GUIOpenNew)
EndFunc

Func End()
    $SwapState = 0
    MouseClickSwap()
   Exit
EndFunc
;------------------------------------------------------------------------------- SHARED {END}

I might update the code sometime in the future to include more macro features.

I plan to eventually clean the code up a bit

 

 

 

 

 

 

 

MacroMaker 1.10.au3

MacroMaker 1.10.exe

Edited by HankHell
  • Like 1

Share this post


Link to post
Share on other sites
HankHell

 

[]Leftclick
[]Rightclick
Keys    {Enter} Hello There. {Enter}
Delay   1000    ms

putting {Enter} in the same box as "Hello There." works as well

MacroMaker.jpeg

Edited by HankHell
Image Example Added

Share this post


Link to post
Share on other sites
HankHell

[Update MacroMaker 1.10]

Features Added:

1. Added "Clear All" to Macro

2. Key into Click

3. Disable Keys

4. Help Menus

5. Swap Mouse Buttons

 

[Update MacroMaker 1.05]

Features Added:

1. MouseMove X,Y position

2. Get Coords ( Use the Start_Stop hotkey to set Coords )

3. Reassign Keys

 

 

Edited by HankHell

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

  • Similar Content

    • SkysLastChance
      By SkysLastChance
      I have a Razer Blackwidow Ultimate keyboard that has 5 extra keys marked M1 - M5. I was wondering if I would be able to setup Macros in AutoIt using these.
      I saw that Fn key is not possible. 
      I am also aware that the M1 keys work with razor snyapse. However, I am at work and can't download that program.
      If someone could let me know and point me in the right direction if it is possible I would be grateful.
    • TheAutomator
      By TheAutomator
      How can you get the downloads folder in AutoIT?
      As far as i know there isn't a macro for it right? like @Downloads or something?
      The ugly solution would be typing in the whole path but what if the user has chosen another location?
      Need to clear that folder regularly on my work and on different accounts..
      regards, TheAutomator
    • ur
      By ur
      I wrote a macro for outlook to send an email.
      Till yesterday it worked, don't know why it is not working today
      I am getting below error when I ran the macro.
       

    • 31290
      By 31290
      Hi everyone, 
      I'm writing a tool that will help my technician adding a user in the local admin group. 
      1- As the user, at first, is not part of the group, launching the .exe file ask for admin credentials. Thing is, whereas I'm using 
      RunWait(@ComSpec & ' /c ' & 'Net LocalGroup Administrators' & @username & ' /add' ,"") The @username macro is taking the admin user account in the variable instead of the current logged user one.
      Do you know how can I face this and have the "real" username value returned?
      2- do you guys think it's possible to give the admin access temporary? Maybe something to write in the reg? task scheduler? compare dates and execute a .exe? etc...?
      Thanks in advance
      -31290
    • RamPalav
      By RamPalav
      Hi,
      I want to send text into a VBA form's text field. Can someone please guide me on the autoit script that can help me.
      Below is the sample code that I need help on:
      #include <Excel.au3> #include <FileConstants.au3> #include <MsgBoxConstants.au3> @ScriptDir ="D:\\AutoIT\" $sFilePath = @ScriptDir & "\ExcelForm.xlsm" Local $oAppl = _Excel_Open() ;Local $oAppl = _Excel_Open(False, Default, Default, Default, True) Local $sWorkbook = $sFilePath Local $oWorkbook = _Excel_BookOpen($oAppl, $sWorkbook) ConsoleWrite('before opening macro.........1') $oAppl.Run('mymacro') Sleep(3000) ConsoleWrite('After opening macro.........1') Send('First text') ConsoleWrite('After opening macro.........2') Send('{TAB}') ConsoleWrite('After opening macro.........3') Send('Second text') ConsoleWrite('After opening macro.........4') Send('{TAB}') Send('{Enter}') ConsoleWrite('After opening macro.........5') thanks,
       
×