Mana Vampire на лошать с обратным залезанием на нее.(Oskom )

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Mana Vampire на лошать с обратным залезанием на нее.(Oskom )

Post by u0rypT »

Code: Select all

####################################
#####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 и указать таргетом на животное.
Last edited by u0rypT on 2007-04-21 01:18:04, edited 8 times in total.
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
Sanch
Posts: 308
Joined: 2005-07-17 15:30:52
Location: www.drw.ru

Post by Sanch »

Code: Select all

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


Возможно так будет лудше.
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

Code: Select all

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


я тоже :)
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

Благодарю
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
Sanch
Posts: 308
Joined: 2005-07-17 15:30:52
Location: www.drw.ru

Post by Sanch »

lasthorse - это последнее жавотное на которое садился верхом?
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

lasthorse

Code: Select all

Последний обьект, использовав который вы оказались верхом. Может быть это не лошадь но всё же скорее всего это так :)
Если вы собрались использовать этот указатель, то не забудьте включить Permit vars loopback на закладке Main иначе долго указатель на лошади не продержится.
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

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

Code: Select all

lasthorse
.


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

Sanch wrote: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
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

ругих шардаф бывает что меняеш по 5 хорс в день
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

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

А что тебе мешает поставить хоткей на аддон и просто таргет кинуть на лошадь ?
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
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

3Jlo6Hblu' u0ry®T wrote:
Mr Nmy wrote:ругих шардаф бывает что меняеш по 5 хорс в день

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

лень мешает и нафиг надо ? :)
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

Mr Nmy wrote:лень мешает и нафиг надо ? :)

Лень не лень, за зато будеш на все 100 уверен что скрипт не подведет :shock:
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
Post Reply