Page 1 of 1

Script

Posted: 2006-08-26 13:59:13
by xalat_

Code: Select all

sub battle() 
var t
UO.CancelMenu()
UO.DeleteJournal()
UO.Setarm('arm')
UO.AutoMenu('What','Polar')
while NOT UO.Dead()
if UO.Life<UO.Str then
repeat
UO.Bandageself()
wait(5000)
if UO.Count('0x0e21')==0 then
uo.waittargettype('0x1008')
uo.usetype('0x0E20')
wait(500)
UO.DeleteJournal()
endif
until UO.Life==UO.Str
endif
UO.Arm('arm')
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
wait(500)
if UO.InJournal('lack sufficient') then
while UO.Mana<90
UO.WarMode(0)
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
if not UO.InJournal("You lose") then
repeat
wait(100)
until UO.InJournal('You lose') or UO.Mana>=90
endif
UO.DeleteJournal()
wait(2000)
wend
endif
t=0
repeat
wait(500)
t=t+1
if t>15 then
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
t=0
if UO.InJournal('lack sufficient') then
while UO.Mana<90
UO.WarMode(0)
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
if not UO.InJournal("You lose") then
repeat
wait(100)
until UO.InJournal('You lose') or UO.Mana>=90
endif
UO.DeleteJournal()
wait(2000)
wend
endif
endif
UO.findtype('0x00D5',-1,'ground')
until uo.FindCount()>0
UO.WarMode(1)
repeat
wait(500)
if abs(UO.GetX('finditem')-UO.GetX())>2 or abs(UO.GetY('finditem')-UO.GetY())>1 then
UO.UseType('0x0F4F')
endif
if UO.InJournal('too close') then
UO.Arm('arm')
endif
if UO.Life<35 then
UO.UseType('0x0F0E','0x09BB')
endif
UO.DeleteJournal()
UO.Attack('finditem')
wait(2000)
UO.findtype('0x00D5',-1,'ground')
until uo.FindCount()==0
wend
end sub

народ помогите пожалуйсто, сделайте так чтобы етот скрипт сумонил медведя на землю

Posted: 2006-08-26 14:17:51
by Skazi69
А куда он его сумонит ? в бэкпэк ? :shock:

Posted: 2006-08-26 14:20:19
by xalat_
Skazi69 wrote:А куда он его сумонит ? в бэкпэк ? :shock:

Он его на себя сумонит а у меня на шарде это не катит!

Posted: 2006-08-28 11:23:20
by xalat_
Блиин народ я подовляюсь, вам сложно помоч ?

Posted: 2006-08-28 12:48:02
by Nmy

Code: Select all

UO.WaitTargetSelf()
UO.Cast('Summ. Crea')


на

Code: Select all

UO.WaitTargetObject('backpack')
UO.Cast('Summ. Crea')


или

Code: Select all

UO.Cast('Summ. Crea','backpack')


нетестил :roll:

Posted: 2006-09-01 09:01:07
by xalat_
Такой вариант тоже не катит ! так как, нелзя у нас на сервере кастовать етот спел на бекпак! :(

Posted: 2006-09-01 12:40:58
by Cornor
uo.waittargettile("400",str(uo.getx("laststatus")),str(uo.gety("laststatus")),str(uo.getz("laststatus")))
uo.cast("Чё кастать")

Posted: 2006-09-01 13:47:56
by Mguai
Умно

Posted: 2006-09-01 14:47:14
by Cornor
работает ведь ....

Posted: 2006-09-01 14:49:51
by Nmy
laststatus можно поменять на self - будет под ногами...