Quote:
das ist v2
?Quote:
Spam Bot v1.rar
HOTKEYSET("{F6}", "start")
HotKeySet("{ESC}", "_EXIT")
HotKeySet("{F4}", "HIDE")
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$TEST1 = InputBox("Text", "Was willst du schreiben?")
MsgBox(0, "Functions", "Jetzt kommt erstmal ein Test Fenster..." & @CRLF & "F6 = Bot starten" & @CRLF & "ESC = Bot schließen" & @CRLF & "F4 = Bot Minimieren")
#Region ### START Koda GUI section ### Form=
$FORM1 = GUICreate("Test für Spammen", 268, 295, 192, 124)
$TEXTEINGABE = GUICtrlCreateEdit("", 0, 0, 265, 289)
GUICtrlSetData(-1, "Dein Text den du eingeben willst...")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$NMSG = GUIGetMsg()
Switch $NMSG
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE)
MsgBox(0, "Der Bot...", "Der Bot laüft noch wenn du auf X oder F4 gedrückt hast")
EndSwitch
WEnd
Func START()
While 1
Send($TEST1)
Send("{ENTER}")
WEnd
EndFunc
Func HIDE()
GUISetState(@SW_HIDE)
MsgBox(0, "Der Bot...", "Der Bot laüft noch wenn du auf X oder F4 gedrückt hast")
EndFunc
Func _EXIT()
MsgBox(0, "Der Bot...", "Der Bot wird geschlossen")
MsgBox(0, "Der Bot...", "10")
MsgBox(0, "Der Bot...", "9")
MsgBox(0, "Der Bot...", "8")
MsgBox(0, "Der Bot...", "7")
MsgBox(0, "Der Bot...", "Kein Bock mehr")
MsgBox(0, "Der Bot...", "#closed")
Exit
EndFunc
Halt die Fresse.Kannst selber so was nicht und wirst neidisch. Exxe Datei in au3 umändern...Quote:
Sag mal... Suchst du Aufmerksamkeit? Das gehört nichtmal in "kleinere Releases", da das Teil nach wie vor keinen Sinn ergibt...
Code:HOTKEYSET("{F6}", "start") HotKeySet("{ESC}", "_EXIT") HotKeySet("{F4}", "HIDE") #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> $TEST1 = InputBox("Text", "Was willst du schreiben?") MsgBox(0, "Functions", "Jetzt kommt erstmal ein Test Fenster..." & @CRLF & "F6 = Bot starten" & @CRLF & "ESC = Bot schließen" & @CRLF & "F4 = Bot Minimieren") #Region ### START Koda GUI section ### Form= $FORM1 = GUICreate("Test für Spammen", 268, 295, 192, 124) $TEXTEINGABE = GUICtrlCreateEdit("", 0, 0, 265, 289) GUICtrlSetData(-1, "Dein Text den du eingeben willst...") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $NMSG = GUIGetMsg() Switch $NMSG Case $GUI_EVENT_CLOSE GUISetState(@SW_HIDE) MsgBox(0, "Der Bot...", "Der Bot laüft noch wenn du auf X oder F4 gedrückt hast") EndSwitch WEnd Func START() While 1 Send($TEST1) Send("{ENTER}") WEnd EndFunc Func HIDE() GUISetState(@SW_HIDE) MsgBox(0, "Der Bot...", "Der Bot laüft noch wenn du auf X oder F4 gedrückt hast") EndFunc Func _EXIT() MsgBox(0, "Der Bot...", "Der Bot wird geschlossen") MsgBox(0, "Der Bot...", "10") MsgBox(0, "Der Bot...", "9") MsgBox(0, "Der Bot...", "8") MsgBox(0, "Der Bot...", "7") MsgBox(0, "Der Bot...", "Kein Bock mehr") MsgBox(0, "Der Bot...", "#closed") Exit EndFunc