nur leider funktionieren die checkboxen nicht , bis auf die erste...
Code:
HotKeySet("{ESC}", "_exit")
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$GUI_GlobalSpam = GUICreate("GlobalSpam Info", 536, 309, 398, 153)
$GUI_Spam1 = GUICtrlCreateInput("Was soll GlobalSpam als erstes spamen?", 24, 96, 321, 21)
$GUI_Spam2 = GUICtrlCreateInput("Was soll GlobalSpam als zweites spamen?", 24, 136, 321, 21)
$GUI_button_start = GUICtrlCreateButton("Start", 40, 224, 89, 25)
$GUI_button_Stop = GUICtrlCreateButton("Stop", 144, 224, 89, 25)
$GUI_button_abbrechen = GUICtrlCreateButton("abbrechen", 400, 224, 89, 25)
$GUI_Copyright = GUICtrlCreateLabel("Copyright© by Globalscript", 392, 280, 129, 17)
$GUI_checkbox_1sec = GUICtrlCreateCheckbox("1sec", 408, 88, 97, 17)
$GUI_checkbox_10sec = GUICtrlCreateCheckbox("10sec", 408, 112, 89, 17)
$GUI_checkbox_30sec = GUICtrlCreateCheckbox("30sec", 408, 136, 97, 17)
$GUI_checkbox_1min = GUICtrlCreateCheckbox("1min", 408, 160, 97, 17)
$GUI_checkbox_2min = GUICtrlCreateCheckbox("2min", 408, 184, 97, 17)
$GUI_text_zeit = GUICtrlCreateLabel("Wähle den Zeitabstand", 376, 48, 115, 17)
$GUI_text_zeit2 = GUICtrlCreateLabel("zwischen den Spams:", 384, 64, 107, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_button_start
While 1
If GUICtrlRead($GUI_checkbox_1sec) = $GUI_CHECKED Then
Send(GUICtrlRead($GUI_spam1))
Sleep (1000)
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Sleep (1000)
Send ("{enter}")
ElseIf GUICtrlRead($GUI_checkbox_1sec) = $GUI_UNCHECKED Then
Send(GUICtrlRead($GUI_spam1))
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Send ("{enter}")
EndIf
WEnd
While 1
If GUICtrlRead($GUI_checkbox_10sec) = $GUI_CHECKED Then
Send(GUICtrlRead($GUI_spam1))
Sleep (10000)
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Sleep (10000)
Send ("{enter}")
ElseIf GUICtrlRead($GUI_checkbox_10sec) = $GUI_UNCHECKED Then
Send(GUICtrlRead($GUI_spam1))
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Send ("{enter}")
EndIf
WEnd
While 1
If GUICtrlRead($GUI_checkbox_30sec) = $GUI_CHECKED Then
Send(GUICtrlRead($GUI_spam1))
Sleep (30000)
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Sleep (30000)
Send ("{enter}")
ElseIf GUICtrlRead($GUI_checkbox_30sec) = $GUI_UNCHECKED Then
Send(GUICtrlRead($GUI_spam1))
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Send ("{enter}")
EndIf
WEnd
While 1
If GUICtrlRead($GUI_checkbox_1min) = $GUI_CHECKED Then
Send(GUICtrlRead($GUI_spam1))
Sleep (60000)
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Sleep (60000)
Send ("{enter}")
ElseIf GUICtrlRead($GUI_checkbox_1min) = $GUI_UNCHECKED Then
Send(GUICtrlRead($GUI_spam1))
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Send ("{enter}")
EndIf
WEnd
While 1
If GUICtrlRead($GUI_checkbox_2min) = $GUI_CHECKED Then
Send(GUICtrlRead($GUI_spam1))
Sleep (120000)
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Sleep (120000)
Send ("{enter}")
ElseIf GUICtrlRead($GUI_checkbox_2min) = $GUI_UNCHECKED Then
Send(GUICtrlRead($GUI_spam1))
Send("{enter}")
Send (GUICtrlRead($GUI_spam2))
Send ("{enter}")
EndIf
WEnd
Case $GUI_button_Stop
Case $GUI_button_abbrechen
Exit
EndSwitch
WEnd
Func _exit()
Exit
EndFunc






