Page 1 of 1

Каст со скролла

Posted: 2005-09-19 21:37:51
by rebenok
Есть у кого скрипт, чтобы чар кастовал на противника магию со скролла, а если скроллы кончились, то с спеллбука ? Спасибо заранее.

Posted: 2005-09-20 10:30:57
by Leo
Вот ФС:

Code: Select all

sub Flame() 
UO.Set('lasttarget','laststatus') 
UO.FindType('0x1F5F',-1,'my') 
If UO.GetQuantity('finditem')>0 then 
if UO.Mana>=22 then 
UO.WaitTargetObject('lasttarget') 
UO.UseObject('finditem') 
UO.Print("Scroll") 
else 
UO.Print("Low mana!!! Scroll!") 
endif 
else 
if UO.Mana>=45 then 
UO.Cast('Flame Strike','laststatus') 
UO.Print("Spell") 
else 
UO.Print("Low mana!!! Spell!") 
endif 
endif 
end sub 

Posted: 2005-09-21 15:17:48
by rebenok
Leo wrote:Вот ФС:

Code: Select all

sub Flame() 
UO.Set('lasttarget','laststatus') 
UO.FindType('0x1F5F',-1,'my') 
If UO.GetQuantity('finditem')>0 then 
if UO.Mana>=22 then 
UO.WaitTargetObject('lasttarget') 
UO.UseObject('finditem') 
UO.Print("Scroll") 
else 
UO.Print("Low mana!!! Scroll!") 
endif 
else 
if UO.Mana>=45 then 
UO.Cast('Flame Strike','laststatus') 
UO.Print("Spell") 
else 
UO.Print("Low mana!!! Spell!") 
endif 
endif 
end sub 
Спасибо! %)