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

[rebenok]

Есть у кого скрипт, чтобы чар кастовал на противника магию со скролла, а если скроллы кончились, то с спеллбука ? Спасибо заранее.

[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 

[rebenok]

Вот ФС:

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 

Спасибо! %)