Yoko

####################################
#####Mana Vampire на животное#######
####################################
#####Скрипт настроен на сервер######
####################################
####Old Oskom Free(free.uoo.ru)#####
####################################
#####Автор: 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

Addon : Теперь чтобы каждый рас не вписывать id животного нужно всеголишь запустить скрипт addon_uorypt_sanc и указать таргетом на животное.

_________________
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc

sub uorypt_mana_give() 
var m = UO.Mana
If UO.Dead() Then 
  UO.Print("If you dead what for to you script?!") 
else 
  if UO.Mana>=35 then 
    UO.DeleteJournal('The spell fizzles.')
    UO.UseObject('self') 
    UO.FindType('0x1F61')
    if uo.FindCount() > 0 then 
      UO.WaitTargetObject('0x012D0CA7') 
      UO.UseObject('finditem') 
    Else 
      UO.Cast('Mana Vampire','0x012D0CA7') 
    end if 
    Repeat
       wait(100)
    Until uo.injournal('The spell fizzles.') or m < uo.mana
    UO.Exec('warmode 0') 
    If UO.GetDistance('0x012D0CA7')<4 Then 
      UO.UseObject('0x012D0CA7') 
    else 
      UO.Print("Please approach closer to an animal!") 
    Endif 
  else 
  UO.Print("Low mana!") 
endif 
end sub

Возможно так будет лудше.

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('lasthorse')
      UO.UseObject('_0x1F61')
    Else
      UO.Cast('Mana Vampire','lasthorse')
    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('lasthorse')
    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 

я тоже

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

Благодарю

_________________
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc

lasthorse - это последнее жавотное на которое садился верхом?

Последний обьект, использовав который вы оказались верхом. Может быть это не лошадь но всё же скорее всего это так :)
Если вы собрались использовать этот указатель, то не забудьте включить Permit vars loopback на закладке Main иначе долго указатель на лошади не продержится.

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

Советую использовать id животного а не

lasthorse

.


Следим за обновлением.



Написал аддон для ленивых просто нужно таргетом кинуть(Предварительно запустив аддон)

_________________
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc

ругих шардаф бывает что меняеш по 5 хорс в день

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

А что тебе мешает поставить хоткей на аддон и просто таргет кинуть на лошадь ?

_________________
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc

лень мешает и нафиг надо ?

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

Лень не лень, за зато будеш на все 100 уверен что скрипт не подведет

_________________
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc