Page 1 of 1

Script Healing For PVP (Auto-Healing)

Posted: 2004-07-15 18:09:52
by DeathMan
What is Problem?
-----------------------------------------------------------------------------
Sub control()
HealX:
if (UO.life<=90) then
UO.Print("***Using Bandageself***")
UO.usetype("bandageself") ; Healing-Bandage
wait(5500)
end if
if (UO.life<=40) then
UO.Print("***Using Life Potion***")
UO.exec("usetype 0x0F82 0x0532") ; ID and Graphic Os life Potion
endif
goto HealX
end sub
-----------------------------------------------------------------------------

Re: Script Healing For PVP (Auto-Healing)

Posted: 2004-07-16 17:51:01
by Kazoo
DeathMan wrote:What is Problem?
-----------------------------------------------------------------------------
Sub control()
HealX:
if (UO.life<=90) then
UO.Print("***Using Bandageself***")

Code: Select all

UO.usetype("bandageself") ; Healing-Bandage  <----- 

wait(5500)
end if
if (UO.life<=40) then
UO.Print("***Using Life Potion***")
UO.exec("usetype 0x0F82 0x0532") ; ID and Graphic Os life Potion
endif
goto HealX
end sub


-----------------------------------------------------------------------------

UO.exec ("bandageself") ; Healing-Bandage <-----

Script

Posted: 2004-07-16 19:22:22
by DeathMan
Sorry,
This Script Was Error inLine 15, Function Not FOund... i undestand thsi error...

Look all and try find error:

Sub control()
healx:
if (UO.life<=90) then
UO.Print("***Using Bandage***")
UO.exec ("bandageself")
wait(5500)
end if
if (UO.life<=40) then
UO.Print("***Using Heal Potion***")
UO.exec("usetype 0x0F82 0x0532")
endif
goto Healx
end sub

this is a script... i need search error,

Re: Script

Posted: 2004-07-16 20:05:00
by Kazoo
DeathMan wrote:Sorry,
This Script Was Error inLine 15, Function Not FOund... i undestand thsi error...

Look all and try find error:

Sub control()

Code: Select all

healx:

if (UO.life<=90) then
UO.Print("***Using Bandage***")
UO.exec ("bandageself")
wait(5500)
end if
if (UO.life<=40) then
UO.Print("***Using Heal Potion***")
UO.exec("usetype 0x0F82 0x0532")
endif

Code: Select all

goto Healx < ---   goto healx with small "h" becouse up there is with small "h" 

end sub

this is a script... i need search error,

Script

Posted: 2004-07-16 20:22:42
by DeathMan
=/
i'm try using this script, and find error retry in Line 15... i undestand this error..

Code: Select all

Sub control() 
healx:
if (UO.life<=90) then
UO.Print("***Using Bandage***")
UO.exec ("bandageself")
wait(5500)
end if
if (UO.life<=40) then
UO.Print("***Using Heal Potion***")
UO.exec("usetype 0x0F82 0x0532")
endif
goto healx
end sub



Sub control() < it is true???????

Re: Script

Posted: 2004-07-16 22:09:17
by Kazoo
DeathMan wrote:=/
i'm try using this script, and find error retry in Line 15... i undestand this error..
Sub control()
healx:
if (UO.life<=90) then
UO.Print("***Using Bandage***")
UO.exec ("bandageself")
wait(5500)
end if
if (UO.life<=40) then
UO.Print("***Using Heal Potion***")
UO.exec("usetype 0x0F82 0x0532")
endif
goto healx
end sub



Sub control() < it is true???????



Try This

Code: Select all

Sub control() 
healx:
if uo.life<90 then
UO.Print("***Using Bandage***")
UO.exec ("bandageself")
wait(5500)
end if
if uo.life<40 then
UO.Print("***Using Heal Potion***")
UO.exec("usetype 0x0F82 0x0532")
endif
goto healx
end sub

Script

Posted: 2004-07-17 05:02:15
by DeathMan
Don't function...

do you have a script to PVP From me?