Yoko

All sides of Injection
It is currently 2025-12-24 05:15:45

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
PostPosted: 2004-05-06 01:55:43 
Offline

Joined: 2004-05-06 01:51:52
Posts: 5
Есть скрипт, который нашел на форуме дрв, короче. чар сумонит мишек подряд, пока есть мана, при етом их не атакуя. кто знает что надо поправить, чтоб чар атаковал, плиз поправте))

Сам скрипт:

sub battle()
var t
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.InJournal("No bandages found") then
uo.closeuo()
endif
until UO.Life==UO.Str
endif
UO.Arm('arm')
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
t=0
repeat
wait(500)
t=t+1
if t>15 then
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
t=0
endif
UO.findtype('0x00d5','0xffff','ground')
until uo.FindCount()==1
repeat
wait(1000)
UO.Attack('finditem')
UO.findtype('0x00d5','0xffff','ground')
until uo.FindCount()==0
wend
end sub


Top
   
 Post subject:
PostPosted: 2004-05-06 02:07:41 
Offline

Joined: 2004-05-06 01:51:52
Posts: 5
ах да, я не сказал, етот скрипт вроде как на сворд)


Top
   
 Post subject:
PostPosted: 2004-05-06 04:27:01 
Offline
User avatar

Joined: 2004-04-28 03:38:17
Posts: 23
В закладке Мэйн поставь галочку в Трек ворлд итем.
И все будет ок :)


Top
   
 Post subject:
PostPosted: 2004-05-09 19:06:08 
Offline

Joined: 2004-05-09 18:39:39
Posts: 5
Юзнаю свой скрипт :)
Вот модифнутая версия с мытьём бинтиков и медитаций, когда кончается мана:
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("washbasin")
uo.usetype("bloodbandages")
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<40
UO.Exec("warmode 0")
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") or UO.Mana>40
UO.DeleteJournal()
wait(1000)
wend
endif
t=0
repeat
wait(500)
t=t+1
if t>15 then
UO.WaitTargetSelf()
UO.Cast('Summ. Crea')
t=0
endif
UO.findtype('0x00d5','0x08FD','ground')
until uo.FindCount()>0
repeat
wait(1000)
UO.Attack('finditem')
UO.findtype('0x00d5','0x08FD','ground')
until uo.FindCount()==0
wend
end sub


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 4 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 3 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited