![]() |
| |||||||
| Home | GzP Upload | GzP Arcade | Register | vbBux / vbPlaza | All Albums | FAQ | Donate | Members List | Calendar | Mark Forums Read |
| SilkRoad Online Bots/Hacks Discussion SilkRoad Bots and Hacks discussion |
![]() |
| | Thread Tools | Display Modes |
| | #1 |
| Registered User | [PROJECT]Auto login Hello guys, I just started with AutoIt making scripts I'm making a Silkroad login bot, but I need some help actualy =\ He waits till Silkroad.exe is active now, clicks start waits 15000M/s then clicks and fills in username and pw...but then I need to do the Image code, I want to to Show it in a new window, with a input box, but I really don't know how to do this, and I want him to know or he logged in or.....Return to Line XX so he will try it again... and my X button isn't working XD This is the source code from the program atm: Code: dim $USERNAME , $PASSWORD ; lol, Idk what it is but its needed.
;*****Read ini file for ID/PW if not there then need to fill in
$USERNAME= IniRead("Login.ini", "account", "SRO_ID", "")
if $USERNAME= "" Then
$USERNAME = GUICtrlCreateInput( $USERNAME, 100, 10, 96, 20)
IniWrite("Login.ini", "account", "ID", $USERNAME )
EndIf
$MAIN = GUICreate("Autologin", 200, 100, @DesktopWidth / 2 - 100, 250)
GUISetState()
GUICtrlCreateGroup("", 0, 0, 200, 65)
GUICtrlCreateLabel("SRO Username:", 5, 13, 100, 20)
;*****read ini file
$USERNAME= IniRead("Login.ini", "account", "SRO_ID", "")
;*****check ini file
IF $USERNAME="" Then
$USERNAME= Inputbox("Fill in account/password", "Please fill in your Account" )
Iniwrite("Login.ini", "account", "SRO_ID", $USERNAME)
Endif
;*****Username fill in
$USERNAME = GUICtrlCreateInput( $USERNAME, 100, 10, 96, 20)
GUICtrlSetFont(-1, 8.5, 800)
$SRO_ID = StringLower(GUICtrlRead($USERNAME))
GUICtrlSetFont(-1, 8.5, 800)
;*****read ini file
$PASSWORD= IniRead("Login.ini", "account", "SRO_PW", "")
;*****If password= nothing then fill in
IF $PASSWORD="" Then
$PASSWORD= Inputbox("Fill in account/password", "Please fill in your password" )
Iniwrite("Login.ini", "account", "SRO_PW", $PASSWORD)
Endif
;*****Password fill in
GUICtrlCreateLabel("SRO Password:", 5, 40, 100, 20)
$PASSWORD = GUICtrlCreateInput($PASSWORD, 100, 40, 96, 20)
GUICtrlSetFont(-1, 8.5, 800)
$SRO_PW = StringLower(GUICtrlRead($PASSWORD))
GUICtrlSetFont(-1, 8.5, 800)
GUICtrlCreateGroup("", 0, 65, 200, 35)
;*****read ini file for silkroad path
$SilkroadPath= IniRead("Login.ini", "silkroad.exe path", "Path", "ERROR")
;*****check ini file for silkroad path
IF $SilkroadPath="" Then
$SilkroadPath= Inputbox("Fill in account/password", "Please fill in your Silkroad path Example: C:\program files\Silkroad\Silkroad.exe, Please loacate the Silkroad.exe nothnig the map Silkroad" )
Iniwrite("Login.ini", "silkroad.exe path", "Path", $SilkroadPath)
Endif
;*****Button for starting silkroad
Opt("GUIOnEventMode", 1)
$Button_1 = GUICtrlCreateButton("Start SRO[F6]", 50, 75, 95, 20)
GUICtrlSetOnEvent ($Button_1, "StartSilkroad" )
;*****When succesfully launched
while 1
;used this so the window wouldn't disappear xD
WEnd
;*****Func when $Button_1 is pressed Silkroad.exe starts
Func StartSilkroad()
run($SilkroadPath)
Sleep(5)
if ProcessExists("Silkroad.exe") then
GUISetState(@SW_HIDE)
sleep (600)
;*****When Silkroad already launched give this error
if WinActive ( 'Silkroad Online' , 'OK' ) Then
MsgBox(0, "ERROR", "Failed to start Silkroad.exe, because sro is already running")
GUISetState(@SW_Show)
Return(13)
EndIf
;*****If silkroad started succesfully do this
sleep(5000)
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",1)
WinWait("Silkroad Online Launcher" )
If Not WinActive("Silkroad Online Launcher" ) Then WinActivate("Silkroad Online Launcher" )
WinWaitActive("Silkroad Online Launcher" )
MouseMove(768, 541)
MouseDown("left")
MouseUp("left")
winwaitactive("SRO_Client")
Sleep(15000)
MouseDown("left")
MouseUp("left")
sleep(500)
Mousemove( 545, 432)
MouseDown("left")
MouseUp("left")
Sleep(500)
Send($SRO_ID)
sleep(20)
Mousemove( 545, 460)
MouseDown("left")
MouseUp("left")
sleep(500)
Send($SRO_PW)
Sleep(20)
Mousemove( 452, 560)
sleep(20)
MouseDown("left")
MouseUp("left")
endif
endfunc ;==>StartSilkroad
Code: [account] SRO_ID= SRO_PW= ID=0 [silkroad.exe path] Path= Well, I love to program, And I'll do it for free, but I just need a little help, I hope you guys could help me~! Take care and have fun, this is my first autoit script anyways ( I would love to have feedback) |
| |
| The Following 3 Users Say Thank You to ekipsss For This Useful Post: |
| Sponsored Links |
| |
| | #2 |
| Lurker | Re: [PROJECT]Auto login good job man :)! but that is really hard to do, the image verification isnt a program or a text is a digital image, that means only a human can see that letters from image and writen to log in silkroad... i really dont know if there is a way that the bot get that words.. :( |
| |
| | #3 |
| Registered User | Re: [PROJECT]Auto login But...I guy that cracked lots of captcha its [Only registered and activated users can see links. ] u can see which captcha he can read and how much% he has to have the code good, maybe I can contact that guy and try to implent it... But maybe anyone here can ( for now) make a code that it will display in a new window with a input box, and then you write it there and he fills it in, just as a temp one. |
| |
| | #4 |
| Registered User | Re: [PROJECT]Auto login Cracking the image is not going to be easy, you are either going to have to write one yourself or pay lots of money for someone else to do it. I have never seen the silkroads image used anywhere else, so its not very common at all. Also about displaying the image code in its own window... there is no easy way to do this like in VB as far as i know. I have tried myself, but just gave up and ended up just taking a screen shot of the whole silkroad window then displaying that file in a new window with an input box. Then i ended up giving up all together with autoit and switched to VB. If you really want to make an auto login i would suggest you use something other then auto it. VB would be pretty easy for something like that. If anyone remembers SilkMind, that was made in VB.net 2005, the soruce code is floating around somewhere. Anyways, goodluck and keep us posted. I am working on my own auto login with VB, but without decoding the image code. I am doing something else, cant really say, but once i get closer to being done, ill show it. Last edited by 53380; 12-27-2007 at 08:28 AM.. |
| |
| | #5 |
| Registered User | Re: [PROJECT]Auto login Ok thanks for that helpfull post, can't I not make a screenshot of a certain area of the screen, like the image code only? I'll try out VB later I think...I'm just 14, and just started programming |
| |
| | #6 |
| Registered User | Re: [PROJECT]Auto login its shold work making a bot that reads and wrights the letters in the dicplay becouse i have seen a bot like that for annother game and i know the post machines can read all letters that u wright on your card |
| |
| | #7 |
| Registered User | Re: [PROJECT]Auto login As far as i know you cannot take a screenshot of just a certain area of a screen in autoit. You can however do this is VB and other languages. I'll look into it more tomorrow because i have wanted to know myself if this is possible in autoit. Maybe there is a UDF somewhere that can do it. Ill look into it. And for being just 14 you are doing great and heading in the right direction, so keep up the good work and you will make it far in programming. Goodluck with your project :D if u need any help with anything autoit or VB related just let me know. Been programming in autoit for over 4 years now and have being programming in VB for about 2 years now. I'm picking up C++ in a few weeks after my classes start again. |
| |
| | #8 |
| Registered User | Re: [PROJECT]Auto login You are going to get ****ing alot of respect if you create autologin which will solve that picture code without bugs for free. You will be my god if you do it. =) |
| |
![]() |
| Bookmarks |
| Thread Tools | |
| Display Modes | |
| |