BoneKeeper Posted January 23, 2010 Posted January 23, 2010 Hey all i tried to search on this forums but couldn't find what i was looking for i wanted to make a chat bot for a game Called Knight Online after reading alot about autoit i thought i could make it so easy guess i was wrong. so anyways this is as far as i have come: expandcollapse popup#cs ---------------------------------------------------------------------------- BoneKeeper's Projekt #ce ---------------------------------------------------------------------------- #include <GUIConstantsEx.au3> GUICreate("BoneKeeper's Chat Spammer, Version 1.0", 400,100) GUISetState(@SW_SHOW) GUICtrlCreateLabel("Type the text you wanna spamm and press Start =)", 8, 10) $text1 = GUICtrlCreateInput("", 35, 30, 120) $button = GUICtrlCreateButton("Start",35, 60, 80, 20) $count = 0 While 1 Switch GUIGetMsg() Case $button If $count = 1 Then GUICtrlSetData($button, "Start") $count = 0 ElseIf $count = 0 Then GUICtrlSetData($button, "Stop") $count = 1 EndIf If $count = 1 Then $send1 = GUICtrlRead($text1) While 1 ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", $send1 + "1") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", $send1 + "2") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", $send1 + "3") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", $send1 + "4") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", $send1 + "5") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(100) ControlSend("Knight Online Client", "", "", $send1 + "6") Sleep(100) ControlSend("Knight Online Client", "", "", "{ENTER}") Sleep(10000) WEnd EndIF Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd so to my first problem i need help with is: i wanna send the string $send1 + a number (cause i don't want to type same message as it gets auto blocked if u type > 2 equal messages in a row)
JohnOne Posted January 23, 2010 Posted January 23, 2010 Mate, Spammers ar frowned upon around here, and rightly so. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans.
Recommended Posts