Sign in to follow this  
Followers 0
aquaandi

Silkroad Online wolf potion bot

2 posts in this topic

Here's a try to keep the wolf pet in Silkroad Online alive. The pause function is imported from another script. The problem is that the script always closes after starting it and i don't know why :P

Global $Paused, $checksum1, $checksum2
HotKeySet("{F1}", "Terminate")
HotKeySet("{F2}", "TogglePause")


Func Health_potter()

    $color = PixelGetColor ( 147 , 87 )   //coordinates of the critical point of the wolfs health bar @ 1280x1024

If $color <> "FF3232" Then 
    Send("{7}") 
    S(1000) 
EndIf

EndFunc


Func HGP_potter()

    $color = PixelGetColor ( 108 , 93 )  //coordinates of the critical point of the wolfs hgp bar @ 1280x1024

If $color <> "FFD652" Then
    Send("{6}") 
    S(1000) 
EndIf

EndFunc


Func TogglePause()
    $Paused = Not $Paused
    While $Paused
    WEnd
EndFunc
Func Terminate()
    Exit 0
EndFunc

Share this post


Link to post
Share on other sites



Here's a try to keep the wolf pet in Silkroad Online alive. The pause function is imported from another script. The problem is that the script always closes after starting it and i don't know why :P

Global $Paused, $checksum1, $checksum2
HotKeySet("{F1}", "Terminate")
HotKeySet("{F2}", "TogglePause")
Func Health_potter()

    $color = PixelGetColor ( 147 , 87 )   //coordinates of the critical point of the wolfs health bar @ 1280x1024

If $color <> "FF3232" Then 
    Send("{7}") 
    S(1000) 
EndIf

EndFunc
Func HGP_potter()

    $color = PixelGetColor ( 108 , 93 )  //coordinates of the critical point of the wolfs hgp bar @ 1280x1024

If $color <> "FFD652" Then
    Send("{6}") 
    S(1000) 
EndIf

EndFunc
Func TogglePause()
    $Paused = Not $Paused
    While $Paused
    WEnd
EndFunc
Func Terminate()
    Exit 0
EndFunc
you don't appear to have a main loop, just 3 functions that are never called.... try adding
while 1
sleep(100)
wend

outside of your functions (after your hotkeysets)


1100111 00001011101111 00011101101111 00010111100100 00001111110100 00110111110010 00101101111001 0011100i didn't make up this form of encryption, but i like it.credit to the lvl 6 challenge on arcanum.co.nz

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0