MsgBox (0, "MacroTool by KuhSchubser", "Wer die Source will soll mich in Skype adden : megadjking")
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("MacroTool by KuhSchubser

", 615, 495, 192, 124)
GUICtrlCreateInput("Box1", 24, 16, 449, 21)
GUICtrlCreateInput("Box2", 24, 56, 449, 21)
GUICtrlCreateInput("Box3", 24, 96, 449, 21)
GUICtrlCreateInput("Box4", 24, 136, 449, 21)
GUICtrlCreateInput("Box5", 24, 176, 449, 21)
$Label1 = GUICtrlCreateLabel("1", 488, 16, 16, 17)
$Label2 = GUICtrlCreateLabel("2", 488, 56, 16, 17)
$Label3 = GUICtrlCreateLabel("3", 488, 96, 16, 17)
$Label4 = GUICtrlCreateLabel("4", 488, 136, 16, 17)
$Label5 = GUICtrlCreateLabel("5", 488, 176, 16, 17)
GUICtrlCreateInput("Box6", 24, 216, 449, 21)
GUICtrlCreateInput("Box7", 24, 256, 449, 21)
GUICtrlCreateInput("Box8", 24, 296, 449, 21)
GUICtrlCreateInput("Box9", 24, 336, 449, 21)
GUICtrlCreateInput("Box10", 24, 376, 449, 21)
GUICtrlCreateInput("Box11", 24, 416, 449, 21)
GUICtrlCreateInput("Box12", 24, 456, 449, 21)
$Label6 = GUICtrlCreateLabel("6", 488, 216, 16, 17)
$Label7 = GUICtrlCreateLabel("7", 488, 256, 16, 17)
$Label8 = GUICtrlCreateLabel("8", 488, 296, 16, 17)
$Label9 = GUICtrlCreateLabel("9", 488, 336, 16, 17)
$Label10 = GUICtrlCreateLabel("10", 488, 384, 30, 25)
$Label11 = GUICtrlCreateLabel("11", 488, 416, 22, 17)
$Label12 = GUICtrlCreateLabel("12", 488, 456, 22, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func {1}()
Send(GUICtrlRead($Box1))
Send("{ENTER}")
Sleep
EndFunc
Func {2}()
Send(GUICtrlRead($Box2))
Send("{ENTER}")
Sleep
EndFunc
Func {3}()
Send(GUICtrlRead($Box3))
Send("{ENTER}")
Sleep
EndFunc
Func {4}()
Send(GUICtrlRead($Box4))
Send("{ENTER}")
Sleep
EndFunc
Func {5}()
Send(GUICtrlRead($Box5))
Send("{ENTER}")
Sleep
EndFunc
Func {6}()
Send(GUICtrlRead($Box6))
Send "{ENTER}")
Sleep
EndFunc
Func {7}()
Send(GUICtrlRead($Box7))
Send("{ENTER}")
Sleep
EndFunc
Func {8}()
Send(GUICtrlRead($Box8))
Send("{ENTER}")
Sleep
EndFunc
Func {9}()
Send(GUICtrlRead($Box9))
Send("{ENTER}")
sleep
EndFunc
Func {10}()
Send(GUICtrlRead($Box10))
Send("{ENTER}")
Sleep
EndFunc
Func {11}()
Send(GUICtrlRead($Box11))
Send("{ENTER}")
Sleep
EndFunc
Func {12}()
Send(GUICtrlRead($Box12))
Send("{ENTER}")
Sleep
EndFunc