Page 1 of 1

Need help modifying a script

Posted: 2014-02-11 18:29:40
by install
Hello, I am using a Magery script where I use Poison and Meditate.
Can some one modify the script, so I could use Poison till my Mana will end, and after that the character would meditate till the mana is full. And when its full he would use Poison again till the mana will end :)
And so on... :)

Mozhet kto pomoch perepisatj script tak chtobi Ja ispoljzoval Poison poka u menja nezakonchitsa Mana, I kak toka ona zakanchivaetsa, igrok nachal otkachevatj Manu do polnovo vostonovlenija i kak toka ona vostonovitsa, on opatj budet ispoljzovatj Poison poka nezakonchitsa mana.

Heres the script :

Var Sunduk='0x40226380'

sub main()
While uo.count('0x0F88','0x0000')>0

if uo.skillval('Magery',1)==1000 Then
return
end if

UO.FindType('0x0F88',-1,'backpack')
While UO.GetQuantity('finditem')<5
UO.FindType('0x0F88','0x0000',Sunduk)
wait(1000)
UO.Grab('100','finditem')
wait(700)
Wend

##while uo.mana>20
cheklag()
uo.cast('Poison','self')
wait(3000)
##wend


Repeat
uo.deletejournal()
uo.useskill('Meditation')
Wait(3000)
Until UO.InJournal("You must wait to perform another action") or uo.mana >= uo.int

While uo.mana < uo.int
Wait(100)
Wend
Wait(100)

Wend
end sub

sub cheklag()
uo.deletejournal()
uo.click('backpack')
Repeat
wait(100)
Until UO.InJournal("backpack")
end sub

Re: Need help modifying a script

Posted: 2014-02-12 08:51:58
by Mazer
Try this

Code: Select all

Sub magery()
var sunduk = ''#id of chest
repeat
while UO.Count('0x0F88')>10  #regents as i understand
Repeat
  UO.Cast('Poison','self')
  wait(3000)
until UO.Mana<=10

UO.WarMode('0')
Repeat
  UO.UseSkill('Meditation')
  Wait(1000)
Until UO.Mana >= UO.Int OR UO.WarMode() == 1
wend
If UO.Count('0x0F88')< 10 then
  UO.FindType('0x0F88','-1',Sunduk)
  wait(500)
  UO.Grab('100','finditem')
  wait(800)
endif
until UO.Dead()
end sub

Re: Need help modifying a script

Posted: 2014-02-12 15:54:04
by install
I have tried it but it says "Phrase 14 error"

Re: Need help modifying a script

Posted: 2014-02-12 15:57:30
by Mazer
install wrote:I have tried it but it says "Phrase 14 error"

Mistype, changed in my first post should work.
UO>.Int

Re: Need help modifying a script

Posted: 2014-02-12 18:28:34
by install
Not working again :)
Says: "Line 23: Function not found - main