Yoko

Code: Select all

#################################### 
#####Mana Vampire на животное####### 
####################################
#####Версия : 1.2#######  
#################################### 
#####Автор: 3Jlо6Hblu' u0ry®T####### 
#################################### 
#####Благодарности в дополнии : ####### 
###########Sanch,Mr Nmy.############# 
###########Настройки :############## 
####uo.Count('0x1F61','0x0000')##### 
###Указываем тип и цвет скролов##### 
##uo.waittargetobject('0x012D0CA7')# 
#######Указываем ID Животного####### 
#Запускаем скрипт addon_uorypt_sanc и тыкаем на животное# 
#######Указываем ID Животного####### 

sub uorypt_mana_give() 
var m = UO.Mana 

If UO.Dead() Then 
UO.Print("You are dead") 
return 
endif 

if UO.Mana>=35 then 
UO.UseObject('self') 
checklag() 
if uo.Count('0x1F61') then 
UO.WaitTargetObject('Animal') 
UO.UseObject('0x1F61') 
Else 
UO.Cast('Mana Vampire','Animal') 
end if 
Repeat 
wait(100) 
Until uo.injournal('The spell fizzles.') or m < uo.mana 
UO.warmode(0) 
If UO.GetDistance('lasthorse')<4 Then 
UO.UseObject('Animal') 
else 
UO.Print("Please approach closer to an animal!") 
Endif 
else 
UO.Print("Low mana!") 
end sub 

sub checklag() 
UO.DeleteJournal() 
UO.Click('backpack') 
repeat 
wait(50) 
until UO.InJournal('backpack') 
end sub 

sub addon_uorypt_sanc() 
uo.print('Please specify an animal') 
uo.exec('addobject Animal') 
while uo.targeting() 
wait(100) 
wend 
UO.DeleteJournal() 
end sub