helldragon

bump

ok well does nobody know how to watch a process, to see if it is responsive or not? and if not how do i close it... WITHOUT ME BEING AT THE COMPUTER OR DOING ANYTHING

where do i get this Beta?

psst change ur password thats trojand, my friend made it edite- oops thats the clearscreen version, not sure if he changed nething

mm Line 70 (File "C:\program files\autoit3\include\process.au3:): case 0x00000040 Error: "Case" statement with no matching "select" statement

mmm yeah doesnt work for me... case and select error...

when you press alt ctrl delete to end a non-responsive process... is there a way to check and do that in autoit?e

ok cool thanks ill give it a try

lolol no no, not that lols the reason why 20 of each were running

ok it works up to a certain point... i fell asleep at the keyboard... and when i woke up i had about 20 silkroad.exe's running and 20 scracks.exe's running.. lol computer didnt handle that all too well rofl, any idea why?

ok here is the script as it stands right now ; ---------------------------------------------------------------------------- ; ; AutoIt Version: 3.1.0 ; Author: HellsDragon ; ; Script Function: ; SRO Restart script. ; ; ---------------------------------------------------------------------------- ; Script Start - Begin the mofo ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Declarations ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; $Scrack=("C:\Documents and Settings\David\Desktop\Bot110\SCrack.exe") $SRO=("C:\Program Files\Silkroad\Silkroad.exe") $SROEXE=("sro_client.exe") $SROLaunch=("Silkroad Online Launcher") $acct=("account") $pass=("password") $connected=0 $disconnected=0 ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Main Code ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; if processexists($SROEXE) Then $connected=1 $disconnected=0 Else $connected=0 $disconnected=1 endif While $Connected=0 programs() login() if $connected=2 Then botstart() EndIf WEnd while $Connected=2 sleep(5000) send("{Enter}") WEnd ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Functions ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; func programs() if $disconnected=1 then run ($Scrack);launch crack sleep(12000) run($SRO);launch sro launcher sleep(6000) mouseclick("left", 863, 631, 1, 3);click launch $connected=1 EndIf endfunc;ending programs() if $disconnected=1 Then run ($Scrack);launch crack sleep(10000) Run($SRO);launch sro launcher sleep(10000) mouseclick("left", 863, 631, 1, 3);click launch EndIf func login() if $connected=1 Then sleep(10000) winactivate($SROexe) sleep(1000) send("{ENTER}") sleep(1000) mouseclick("left",675 ,550 ,1 ,0) sleep(1000) send($acct) sleep(1000) send("{TAB}") sleep(1000) send($pass) send("{ENTER}") sleep(9000) MouseClick ("Left", 397, 500, 3, 5); Press first character Sleep (5000) MouseClick ("Left", 992, 939, 2, 0); press start $connected=2 EndIf endfunc;end of login func botstart() sleep(1000) mouseclick("right", 500, 500, 1, 0) MouseWheel("down", 8);Just to expand visual distance ingame sleep(100) MouseClick ("Left", 11, 960, 4, 3); Expands Chat window if $connected=2 Then sleep(10000) send("{INSERT}") While 1 Sleep(60000) Controlsend("SRO_Client","","","{ENTER}",0) Wend EndIf Send("e") Sleep(1000) MouseClick("Left", 390, 590, 1, 0) Sleep(2000) MouseClick("Left", 465, 525, 1, 0) Sleep(5000) Send("e") sleep (6000) endfunc;ending botstart

yes i knew that, but i cannot get the controlID, the info thing wont show me the numbers for it, and another question... do you happen to know the reason why after the program crashes, it does not restart everything? like go back to the top and begin it all over again?? EDIT-ok i got the controlid things to work, controlID i left as default, because there isnt one... it was the flag thing that was messing it up, but i still cannot get it to loop itself... any help??

ok cool, ill give that a shot, and im having one other problem also... instead of just doing send("{ENTER}") and having it do it to everything... how can i make it to send just to the client... i tried this... but its not working... Controlsend("SRO_Client","","","{ENTER}") im not sure if im doing it correctly though...

no salty is right, the game crashes often, its part of my bad coding, im not too great at it unfortunately, i just realised that it didnt work too. any assistance? p.s. when i change hte code to what great suggested, it still doesnt work

hehe firstly, how many times are u gonna say how many? lols, and each time its something different...and each time i add more and more to the script

bump...

ok guys i need some help... yet again, i went to do my party section of my script, problem is... it never even starts up the party section of the script... ; ---------------------------------------------------------------------------- ; ; AutoIt Version: 3.1.0 ; Author: HellsDragon ; ; Script Function: ; SRO Restart script. ; ; ---------------------------------------------------------------------------- ; Script Start - Begin the mofo ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Declarations ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; $Scrack=("C:\Documents and Settings\David\Desktop\Bot110\SCrack.exe") $SRO=("C:\Program Files\Silkroad\Silkroad.exe") $SROEXE=("sro_client.exe") $SROLaunch=("Silkroad Online Launcher") $acct=("account") $pass=("password") $connected=0 $disconnected=0 ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Main Code ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; if processexists($SROEXE) Then $connected=1 $disconnected=0 Else $connected=0 $disconnected=1 endif While $Connected=0 programs() login() if $connected=2 Then botstart() EndIf WEnd while $Connected=2 sleep(5000) send("{Enter}") WEnd ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Functions ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; func programs() if $disconnected=1 then run ($Scrack);launch crack sleep(12000) run($SRO);launch sro launcher sleep(6000) mouseclick("left", 863, 631, 1, 3);click launch $connected=1 EndIf endfunc;ending programs() if $disconnected=1 Then run ($Scrack);launch crack sleep(10000) Run($SRO);launch sro launcher sleep(10000) mouseclick("left", 863, 631, 1, 3);click launch EndIf func login() if $connected=1 Then sleep(10000) winactivate($SROexe) sleep(1000) send("{ENTER}") sleep(1000) mouseclick("left",675 ,550 ,1 ,0) sleep(1000) send($acct) sleep(1000) send("{TAB}") sleep(1000) send($pass) send("{ENTER}") sleep(9000) MouseClick ("Left", 397, 500, 3, 5); 1st char Sleep (5000) MouseClick ("Left", 992, 939, 2, 0); start $connected=2 EndIf endfunc;end of login func botstart() sleep(1000) mouseclick("right", 500, 500, 1, 0) MouseWheel("down", 8);display sleep(100) MouseClick ("Left", 11, 960, 4, 3); chat if $connected=2 Then sleep(10000) send("{INSERT}") While 1 Sleep(5000) send("{ENTER}") Wend EndIf If PixelGetColor(39, 93) <> 16726845 Then Do Send("e") Sleep(1000) MouseClick ("Left", 390, 590, 1, 0) Sleep(2000) MouseClick ("Left", 465, 525, 1, 0) Sleep(5000) Send("e") Until PixelGetColor(39, 93) = 16726845 endif endfunc;ending botstart

jeeze silly me, thank you a lot i appreciate it, i got it working so far, got a bit more to write up though

nope thats not it, just removed it still saying.... line 54 (File blah blah blah func programs() eorr:"If" statement has no matching "EndIf" statement.

ok well here is the code that i have sofar, right now its telling me i have an if statement without and endif statement, but i cant find it.... how does it look? ; ---------------------------------------------------------------------------- ; ; AutoIt Version: 3.1.0 ; Author: HellsDragon ; ; Script Function: ; SRO Restart script. ; ; ---------------------------------------------------------------------------- ; Script Start - Begin the mofo ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Declarations ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; $Scrack=("C:\Documents and Settings\David\Desktop\Bot110\SCrack.exe") $SRO=("C:\Program Files\Silkroad\Silkroad.exe") $SROEXE=("sro_client.exe") $SROLaunch=("Silkroad Online Launcher") $acct=("acct") $pass=("pass") $connected=0 $disconnected=0 ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Main Code ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; if processexists($SROEXE) Then $connected=1 $disconnected=0 Else $connected=0 $disconnected=1 While $Connected=0 programs() connect() if connected=2 Then botstart() EndIf WEnd while $Connected=2 sleep(5000) send("{Enter}") WEnd While $Connected = 0 StartPrograms() Connect() If $Connected = 1 Then StartBot() EndIf Wend ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Functions ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; func programs() run ($Scrack);launch crack sleep(10000) run($SRO);launch sro launcher sleep(6000) mouseclick("left", 863, 631, 1, 3);click launch $connected=1 endfunc;ending programs() func login() if $connected=1 Then winactivate($SROexe) sleep(1000) send("{ENTER}") sleep(1000) mouseclick("left",675 ,550 ,1 ,0) sleep(1000) send($acct) sleep(1000) send("{TAB}") sleep(1000) send($pass) send("{ENTER}") $connected=2 EndIf endfunc;ending login

ok well here is the code that i have sofar, right now its telling me i have an if statement without and endif statement, but i cant find it.... how does it look? ; ---------------------------------------------------------------------------- ; ; AutoIt Version: 3.1.0 ; Author: HellsDragon ; ; Script Function: ; SRO Restart script. ; ; ---------------------------------------------------------------------------- ; Script Start - Begin the mofo ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Declarations ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; $Scrack=("C:\Documents and Settings\David\Desktop\Bot110\SCrack.exe") $SRO=("C:\Program Files\Silkroad\Silkroad.exe") $SROEXE=("sro_client.exe") $SROLaunch=("Silkroad Online Launcher") $acct=("acct") $pass=("pass") $connected=0 $disconnected=0 ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Main Code ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; if processexists($SROEXE) Then $connected=1 $disconnected=0 Else $connected=0 $disconnected=1 While $Connected=0 programs() connect() if connected=2 Then botstart() EndIf WEnd while $Connected=2 sleep(5000) send("{Enter}") WEnd While $Connected = 0 StartPrograms() Connect() If $Connected = 1 Then StartBot() EndIf Wend ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; ;Functions ; ;-==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==--==-; func programs() run ($Scrack);launch crack sleep(10000) run($SRO);launch sro launcher sleep(6000) mouseclick("left", 863, 631, 1, 3);click launch $connected=1 endfunc;ending programs() func login() if $connected=1 Then winactivate($SROexe) sleep(1000) send("{ENTER}") sleep(1000) mouseclick("left",675 ,550 ,1 ,0) sleep(1000) send($acct) sleep(1000) send("{TAB}") sleep(1000) send($pass) send("{ENTER}") $connected=2 EndIf endfunc;ending login

well, i just started with autoit scripting, and i guess im setting my goals pretty high already, and well ive been having some problems with my autoit scripts, and im not much of a person to keep posting on forums and begging people for help, but i was just wondering if anyone would be able to maybe help me out a little bit through lets say Aol instant messenger, or msn instant messenger? im not asking someone to code something for me, just someone that i can message quickly and ask a quick and simple question when needed. thanks for your time.

what do you mean?

this is a script that one of the users here posted, i decided i was going to edit it a bit (im not too advanced so i cant really COMPLETELY build my own yet). I got it all working, except for when it disconnects, it will load the game back up, and continue to do what is needed, except for pushing enter every 60 seconds, which is very much needed, here is the code.... yet again i dont take credit for making this whole thing, though i did edit some of it already and much more to come. $SCrack = ("C:\Documents and Settings\David\Desktop\Bot110\SCrack.exe") $SRO = ("C:\Program Files\Silkroad\Silkroad.exe") $SROExe = ("sro_client.exe") $SROClient = ("SRO_Client") $Account = ("acct") $Password = ("password") $SROLauncher = ("Silkroad Online Launcher") $Connected = 0 $Disconnected = 0 ;================================================= While $Connected = 0 StartPrograms() Connect() If $Connected = 1 Then StartBot() EndIf Wend While $Connected = 1 While $Disconnected = 0 sleep (2500) ControlSend($SROClient, "", "", "{ENTER}") Sleep (60000) If ProcessExists ($SROExe) Then $Disconnected = 0 Else $Disconnected = 1 $Connected = 0 WinKill ($SROExe) EndIf Wend While $Connected = 0 StartPrograms() Connect() If $Connected = 1 Then StartBot() EndIf Wend wend ;================================================== Func StartPrograms() Run($SCrack) Sleep(4000) Run($SRO) EndFunc Func Connect() WinActive ($SROLauncher) Sleep (5000) ControlClick ($SROLauncher, "", 1000) Sleep (7500) WinActivate ($SROClient) Sleep (1000) MouseClick ("Left", 674, 550, 1, 0) Sleep (2000) MouseClick ("Left", 674, 550, 1, 0) Sleep (2000) Send ($Account) Sleep (1000) Send ("{TAB}") Send ($Password) Sleep (1000) WinActivate ($SROClient) Send ("{ENTER}") Sleep(7500) MouseClick ("Left", 397, 500, 3, 5); Press first character Sleep (5000) MouseClick ("Left", 992, 939, 2, 0); press start If WinExists ($SROClient) = 1 Then $Connected = 1 Else $Connected = 0 EndIf EndFunc Func StartBot() Sleep(10000) MouseWheel("down", 8);Just to expand visual distance ingame sleep (100) Send("{INSERT}") sleep(100) MouseClick ("Left", 800, 337, 1, 10);close pet inventory sleep(200) MouseClick ("Left", 11, 960, 4, 3); Expands Chat window sleep(2000) If PixelGetColor(39, 93) <> 16202041 Then do Send("e");open AutoMatch sleep(1000) MouseClick ("Left", 513, 717, 1, 10); Press AutoMatch sleep(1000) MouseClick ("Left", 596, 659, 1, 10); Press Confirm sleep(1000) Send("e") Until PixelGetColor(39, 93) = 16202041 endif EndFunc any help would be greatly appreciated, thanks for your time