Script Error
Hey Com sry falls ich euch störe aber ich komme einfach nicht weiter ._.
Ich möchte einen Bot schreiben der chatten und laufen beinhaltet.Ich habe es so gemacht dass man die Koordinaten in eine InputBox schreibt,und diese ausgelesen wird. Wenn ich den Bot starte,funktioniert einfach nichts.. Hier der Code:
Ich möchte einen Bot schreiben der chatten und laufen beinhaltet.Ich habe es so gemacht dass man die Koordinaten in eine InputBox schreibt,und diese ausgelesen wird. Wenn ich den Bot starte,funktioniert einfach nichts.. Hier der Code:
Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$OnlineBot = GUICreate("Automatic Online-Bot by .S1mpl3*", 629, 232, 192, 114)
$btn_credits = GUICtrlCreateButton("Credits", 24, 192, 129, 25, $WS_GROUP)
GUICtrlSetFont(-1, 18, 400, 0, "JasmineUPC")
GUICtrlSetBkColor(-1, 0x3A6EA5)
GUICtrlSetCursor (-1, 0)
$g_walk = GUICtrlCreateGroup("Walk", 16, 8, 297, 145)
GUICtrlSetFont(-1, 18, 400, 0, "JasmineUPC")
$co_x = GUICtrlCreateInput("", 32, 56, 121, 33)
GUICtrlSetCursor (-1, 5)
$lb_x = GUICtrlCreateLabel("X", 88, 24, 16, 32)
GUICtrlSetFont(-1, 20, 400, 0, "JasmineUPC")
$lb_y = GUICtrlCreateLabel("Y", 232, 24, 14, 29)
$co_y = GUICtrlCreateInput("", 176, 56, 121, 33)
GUICtrlSetCursor (-1, 5)
$co_x1 = GUICtrlCreateInput("", 32, 103, 121, 33)
GUICtrlSetCursor (-1, 5)
$co_y1 = GUICtrlCreateInput("", 180, 101, 121, 33)
GUICtrlSetCursor (-1, 5)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$g_chat = GUICtrlCreateGroup("Chat", 362, 6, 257, 177)
GUICtrlSetFont(-1, 18, 400, 0, "JasmineUPC")
$co_bar_x = GUICtrlCreateInput("", 418, 38, 185, 33)
GUICtrlSetCursor (-1, 5)
$lb_bar_x = GUICtrlCreateLabel("X:", 386, 38, 21, 32)
GUICtrlSetFont(-1, 20, 400, 0, "JasmineUPC")
$lb_bar_y = GUICtrlCreateLabel("Y:", 384, 96, 19, 29)
$co_bar_y = GUICtrlCreateInput("", 420, 90, 185, 33)
GUICtrlSetCursor (-1, 5)
$lb_text = GUICtrlCreateLabel("Text:", 376, 136, 37, 29)
$text = GUICtrlCreateInput("", 418, 131, 193, 33)
GUICtrlSetCursor (-1, 5)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$btn_start = GUICtrlCreateButton("Start Bot", 300, 193, 177, 25, $WS_GROUP)
GUICtrlSetFont(-1, 18, 400, 0, "JasmineUPC")
GUICtrlSetBkColor(-1, 0x3A6EA5)
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btn_credits
MsgBox(0, "Credits", "All Credits to .S1mpl3*")
Case $btn_start
_bot()
EndSwitch
WEnd
Func _bot()
While True
Sleep(4000)
_walk()
Sleep(30000)
_walk1()
Sleep(30000)
_chat()
Sleep(26000)
WEnd
EndFunc
Func _walk()
MouseMove($co_x, $co_y)
MouseClick("left")
EndFunc
Func _walk1()
MouseMove($co_x1, $co_y1)
MouseClick("left")
EndFunc
Func _chat()
MouseMove($co_bar, $co_bar1)
MouseClick("left")
Send($text)
Send("{Enter}")
EndFunc
