BuffBot by Marvenion!

[Only registered and activated users can see links. Click Here To Register...]
[Only registered and activated users can see links. Click Here To Register...]
[Only registered and activated users can see links. Click Here To Register...]

While 1
$NMSG = GUIGetMsg()
Switch $NMSG
Case $GUI_EVENT_CLOSE
Exit
Case $S
If GUICtrlRead($CHECKBOX2) = 1 Then
VERZOEGERUNG()
ElseIf GUICtrlRead($CHECKBOX2) = 4 Then
NORMAL()
EndIf
Case $HA
GUICtrlSetState($H1, $GUI_DISABLE)
GUICtrlSetState($H2, $GUI_DISABLE)
GUICtrlSetState($H3, $GUI_DISABLE)
Case $E
Exit
EndSwitch
WEnd
Func VERZOEGERUNG()
IniWrite(@ScriptDir & "/Dateien/Saves.sa", "HotKey", "Input", GUICtrlRead($H1))
IniWrite(@ScriptDir & "/Dateien/Saves.sa", "HotKey2", "Input", GUICtrlRead($H2))
IniWrite(@ScriptDir & "/Dateien/Saves.sa", "HotKey3", "Input", GUICtrlRead($H3))
If GUICtrlRead($CHECKBOX3) = 1 Then
VHIDE()
ElseIf GUICtrlRead($CHECKBOX3) = 4 Then
VSHOW()
EndIf
EndFunc
Func NORMAL()
IniWrite(@ScriptDir & "/Dateien/Saves.sa", "HotKey", "Input", GUICtrlRead($H1))
IniWrite(@ScriptDir & "/Dateien/Saves.sa", "HotKey2", "Input", GUICtrlRead($H2))
IniWrite(@ScriptDir & "/Dateien/Saves.sa", "HotKey3", "Input", GUICtrlRead($H3))
If GUICtrlRead($CHECKBOX3) = 1 Then
NHIDE()
ElseIf GUICtrlRead($CHECKBOX3) = 4 Then
NSHOW()
EndIf
EndFunc
Func VHIDE()
HotKeySet(GUICtrlRead($H1), "Start")
HotKeySet(GUICtrlRead($H2), "Pause")
HotKeySet(GUICtrlRead($H3), "Ende")
GUISetState(@SW_HIDE)
WHILE (1)
Sleep(500)
WEnd
EndFunc

//Hier werden die Tasten gedrückt
Func START()
WHILE (1)
MouseClick("left")
Sleep(1000)
Send("{F1}")
Sleep(500)
Send("{F2}")
Sleep(500)
Send("{F3}")
Sleep(500)
WEnd
EndFunc
Func PAUSE()
WHILE (1)
Sleep(500)
WEnd
EndFunc
Func ENDE()
Exit
EndFunc
Func START2()
WHILE (1)
MouseClick("left")
Send("{F1}")
Send("{F2}")
Send("{F3}")
WEnd
EndFunc
Func PAUSE2()
WHILE (1)
Sleep(500)
WEnd
EndFunc
Func ENDE2()
Exit
EndFunc