Yoko

Posted: **2004-09-04 13:27:55**

Прива Парни у меня такая трабля все знают что на ДРВ накастованные животные дохнут при первом ударе так вот чтоб прокачать боевые можно зделать так All Transfer на лошадь например и качаться поэтому если не сложно доделайте скрипт чтоб он после того как накостовал медведя кричал трансфер на муста а после этого валил его и если не сложно чтоб еще мыл бандажки! думаю после этого проблемы отпадут у нас

Code: Select all

sub SummonKill() 
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') 
UO.DeleteJournal() 
t=0 
repeat 
wait(500) 
t=t+1 
if t>15 then 
UO.WaitTargetSelf() 
UO.Cast('Summ. Crea') 
if UO.InJournal('lack sufficient') then 
   UO.DeleteJournal() 
    
   while UO.Mana<UO.Int 
       UO.WarMode('flip') 
                                 wait(100) 
                                 UO.Warmode(0)      
                                  UO.UseSkill('Meditation') 
      repeat 
         wait(100) 
      until UO.InJournal("You are") OR UO.InJournal("You lose") 
      UO.DeleteJournal() 
      wait(1000) 
   wend 

endif 

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

Спасибо Заранее !!!

Posted: **2004-09-04 15:00:01**

Вообщем посидел подумал и зделал так

Code: Select all

sub SummonKill() 
uo.exec('addobject TOT') 
while uo.targeting() 
wait(100) 
wend 
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') 
UO.DeleteJournal() 
t=0 
repeat 
wait(500) 
t=t+1 
if t>15 then 
UO.WaitTargetSelf() 
UO.Cast('Summ. Crea') 
if UO.InJournal('lack sufficient') then 
   UO.DeleteJournal() 
    
   while UO.Mana<UO.Int 
       UO.WarMode('flip') 
                                 wait(100) 
                                 UO.Warmode(0)      
                                  UO.UseSkill('Meditation') 
      repeat 
         wait(100) 
      until UO.InJournal("You are") OR UO.InJournal("You lose") 
      UO.DeleteJournal() 
      wait(1000) 
   wend 

endif 

t=0 
endif 
UO.findtype('0x00d5','0xffff','ground') 
until uo.FindCount()==1 
uo.waittargetobject('TOT') 
UO.say('All transfer')
repeat 
wait(1000) 
UO.Attack('finditem') 
UO.findtype('0x00d5','0xffff','ground') 
until uo.FindCount()==0 
wend 
end sub

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

Yoko

Доделайте плиз

Доделайте плиз