GamerzPlanet - For All Your Online Gaming Needs!!

Go Back   GamerzPlanet - For All Your Online Gaming Needs!! > SilkRoad Online > SilkRoad Online Bots/Hacks Discussion

SilkRoad Online Bots/Hacks Discussion SilkRoad Bots and Hacks discussion



Help

SilkRoad Online Bots/Hacks Discussion


Closed Thread
 
Thread Tools Display Modes
Old 07-10-2006, 05:34 AM   #1
Registered User
 
Last Online: 06-19-2007 06:13 AM
Join Date: May 2006
Posts: 61
Thanks: 1
Thanked 0 Times in 0 Posts
Chaos-Casey is on a distinguished road
iTrader: 0 / 0%
Points: 2,044.00
Bank: 0.00
Total Points: 2,044.00
Help

Hey I'm a Hybrid Fire/Lighting so i have a lot of buffs.... was wondering if you could make a auto it bot that after every 500 seconds it would switch to a different belt and buff.... along with having another belt with all my attacks. or if i could add another belt into the code somehow i'm currently using this bot.....

Code:
; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author:         A.N.Other <[Only registered and activated users can see links. ]>
;
; Script Function:
;    Template AutoIt script.
;
; ----------------------------------------------------------------------------

; Script Start - Add your code below here

$Belt=inputbox("Belt Check","Which belt you use (1,2,3,4)?",""," 1")

WinWait("SRO_Client")
CheckBelt()
locateClose()

func CheckBelt()
    if $belt<>(0) then
        if $belt=("2") then
            winactivate("SRO_Client")
            sleep(100)
            Send("{F2}")
            sleep(100)
        endif
    else
        MsgBox(0,"Error","No number entered")
        exit
    endif
endfunc

Func Locate()
    Winactivate("SRO_Client")
    
    CheckHp()
    CheckBuff()
    Pet()
    $FindMob= pixelsearch(168,97,706,616,0xFF00FF,50,2)
    if not @error then
        mousemove($FindMob[0]+7,$FindMob[1]+3)
        sleep(50)
        mouseclick("left",$FindMob[0]+7,$FindMob[1]+3,1)
        sleep(70)
        Attack()
    else
        locateDark()
    endif
endfunc

Func Attack()
    winactivate("SRO_Client")
    CheckHp()
    Pet()
    sleep(500)
    $colorAlive=pixelgetcolor(436,46)
    $colorDying=pixelgetcolor(464,46)
    $colorMana=pixelgetcolor(88,54)
    sleep(500)
    while $colorAlive=(10227728)
        Send("1")
        sleep(500) 
        if $colormana=(5073098) then
            send("2")
            sleep(500)
            if $colorDying=(16724273) then
                send("3")
                sleep(200)
                send("2")
                sleep(200)
                send("4")
                sleep(200)
                send("2")
                sleep(200)
                send("5")
                sleep(200)
                send("2")
                sleep(200)
                send("6")
                sleep(200)
                send("2")
                sleep(500)
                send("7")
                sleep(200)
            endif
        endif
        $colorAlive=pixelgetcolor(436,46)
        $colorDying=pixelgetcolor(464,46)
        $colorMana=pixelgetcolor(88,54)
    wend
    for $x=1 to 4
        send("g")
        sleep(1000)
    next
    locate()
endfunc

func ChecKHP()
    $colorHp=pixelgetcolor(692,737)
    if $colorHp<>(4849664) then
        send("{esc}")
        sleep(200)
        mousemove(514,453)
        sleep(200)
        mouseclick("left",514,453,1)
        sleep(200)
        msgbox(0, "OMG", "You dont Have HP pots mate", 5)
        exit
    endif
endfunc

Func CheckBuff()
    $colorBuff=pixelgetcolor(218,31)
    if $colorBuff<>(52991) then
        send("8")
        sleep(200)
    endif
endfunc

Func Pet()
    $colorPet=pixelgetcolor(87,68)
    $colorPetHp=pixelgetcolor(168,87)
    $colorPetPots=pixelgetcolor(366,728)
    if $colorPet=(4343114) then
        if $colorPetPots= (13027022) then
            if $colorPetHp<>(16724273) then
                send("x")
                sleep(200)
            endif
        else
            MouseMove(657,696)
            sleep(200)
            mouseclick("right",657,696,1)
            sleep(200)
        endif
    endif
endfunc

func locateDark()
    Winactivate("SRO_Client")
    CheckHp()
    CheckBuff()
    Pet()
    $FindMob= pixelsearch(168,97,706,616,0x8600ac,50,2)
    if not @error then
        mousemove($FindMob[0]+7,$FindMob[1]+3)
        sleep(100)
        mouseclick("left",$FindMob[0]+7,$FindMob[1]+3,1)
        sleep(120)
        Attack()
    else
        send("{left 100}")
        sleep(200)
        locateClose()
    endif
endfunc

func locateClose()
    Winactivate("SRO_Client")
    CheckHp()
    CheckBuff()
    Pet()
    $FindMob= pixelsearch(352,277,293,242,0xFF00FF,50,2)
    if not @error then
        mousemove($FindMob[0]+7,$FindMob[1]+3)
        sleep(50)
        mouseclick("left",$FindMob[0]+7,$FindMob[1]+3,1)
        sleep(70)
        Attack()
    else
        locateClosedark()
    endif
endfunc

func locateclosedark()
    Winactivate("SRO_Client")
    CheckHp()
    CheckBuff()
    Pet()
    $FindMob= pixelsearch(352,277,293,242,0x8600ac,50,2)
    if not @error then
        mousemove($FindMob[0]+7,$FindMob[1]+3)
        sleep(100)
        mouseclick("left",$FindMob[0]+7,$FindMob[1]+3,1)
        sleep(120)
        Attack()
    else
        locate()
    endif
endfunc
Chaos-Casey is offline  
Sponsored Links
Old 07-10-2006, 07:37 AM   #2
Registered User
 
Last Online: 04-27-2008 02:13 AM
Join Date: Jun 2006
Location: Beside a computer.
Posts: 108
Thanks: 1
Thanked 5 Times in 5 Posts
argenteyez is on a distinguished road
iTrader: 0 / 0%
Points: 0.00
Bank: 0.00
Total Points: 0
Re: Help

PHP Code:
if PixelGetColor(260,31) <> 52991 and PixelGetColor(260,31) <> 0 then
THE BELT WITH BUFFS
   Send
("{F2/F3/F4}")
   
sleep(300)
   
Send("0") ; example grasswalk flow
   Sleep
(500)
   
Send("9") ; example bird
   Sleep
(500)
   
Send("8") ; example grasswalk flow
   Sleep
(1200)
   
Send("7") ; example bird
;THE BELT PREVIOUS TO BUFFING
   Send
("{F2/F3/F4}")
  EndIf 
this checks the top of ur screen, when it find out that there are no skills running it will activate 4 skils. ripped rite off neger's autoattacker

EDIT: works with 1024, 1280 so far. Also chante the belts to whatever ur belt is. ex. send("{F2}")
argenteyez is offline  
Old 07-10-2006, 03:51 PM   #3
Registered User
 
Last Online: 06-19-2007 06:13 AM
Join Date: May 2006
Posts: 61
Thanks: 1
Thanked 0 Times in 0 Posts
Chaos-Casey is on a distinguished road
iTrader: 0 / 0%
Points: 2,044.00
Bank: 0.00
Total Points: 2,044.00
Re: Help

now how would i make it so that i would loop it or check every 400 seconds or something like that
Chaos-Casey is offline  
Old 07-10-2006, 08:41 PM   #4
Registered User
 
Last Online: 10-26-2008 06:29 AM
Join Date: May 2006
Age: 24
Posts: 155
Thanks: 0
Thanked 15 Times in 9 Posts
nbourg8 is on a distinguished road
iTrader: 0 / 0%
Points: 700.00
Bank: 0.00
Total Points: 700.00
Re: Help

400 seconds is 400000 milliseconds. you could do a sleep(400000) but i dont recommend it since it pauses your entire program to wait for that sleep. I only find that spamming the skill non stop works just fine because you then dont care about the timer.
nbourg8 is offline  
Old 07-11-2006, 03:26 AM   #5
Registered User
 
Last Online: 06-19-2007 06:13 AM
Join Date: May 2006
Posts: 61
Thanks: 1
Thanked 0 Times in 0 Posts
Chaos-Casey is on a distinguished road
iTrader: 0 / 0%
Points: 2,044.00
Bank: 0.00
Total Points: 2,044.00
Re: Help

is their like a wait command so it would wait other than sleep becauze you said sleep pauses it.....
Chaos-Casey is offline  
Closed Thread

Bookmarks

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are Off
Pingbacks are Off
Refbacks are Off

All times are GMT -7. The time now is 05:19 PM.


Powered by: vBulletin
Copyright ©2008, GamerzPlanet.Net
SEO by vBSEO 3.2.0 ©2008, Crawlability, Inc.
Network: GamerzPlanet | ForumzPlanet | GzPUpload | GzPArcade | GzP Host | Australian Poker | Watch Desperate Housewives | Visits: