Скрипт на лошадку

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
колхоз
Posts: 34
Joined: 2004-06-27 19:59:56

Скрипт на лошадку

Post by колхоз »

Помогите переделать такой значит сцп:

Code: Select all

sub horse() 
while 1==1
wait(100)
UO.FindType('0x00D2',-1,'ground')
If UO.FindCount('finditem')>0 Then
UO.UseObject('finditem')
Endif
wend
end sub

На шарде при касте маг падает с лошадки. А этот сцп пытается запрыгнуть на любую лошадку такого же типа находящуюся рядом. А надо чтобы на чужих лошадок не обращал внимание и пытался залезть токо на свою...
Kazoo
Posts: 173
Joined: 2004-04-03 18:39:28
Contact:

Post by Kazoo »

Lasthorse
11
колхоз
Posts: 34
Joined: 2004-06-27 19:59:56

Post by колхоз »

Мне бы чтобы сцп проверял на транспорте ли я и делал lastobject lasthorse если я на ногах.
колхоз
Posts: 34
Joined: 2004-06-27 19:59:56

Post by колхоз »

Code: Select all

sub horse ()
while uo.GetGraphic(uo.ObjAtLayer('horse'))<>"0x00CC" then
uo.useobject("lasthorse")
wait(500)
wend
end sub
Исправте чё не так.
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Lobster wrote:

Code: Select all

sub horse ()
while uo.GetGraphic(uo.ObjAtLayer('horse'))<>"0x00CC" then
uo.useobject("lasthorse")
wait(500)
wend
end sub
Исправте чё не так.


Может так?

Code: Select all

sub horse()
while NOT UO.Dead()
   if uo.GetGraphic(uo.ObjAtLayer('horse'))<>"0x00CC" then
      uo.useobject("lasthorse")
      wait(500)
   else
      wait(500)
   endif
wend
end sub
колхоз
Posts: 34
Joined: 2004-06-27 19:59:56

Post by колхоз »

Всё круто, но всеравно не то 8). Как бы тогда сделать чтобы если я кастую любой спелл, то инжект делает uo.useobject("lasthorse")? Если так нельзя, можно чтобы реагировал на какой-то определённый спелл.
Kazoo
Posts: 173
Joined: 2004-04-03 18:39:28
Contact:

Post by Kazoo »

Code: Select all

UO.Cast('Magic Arrow','laststatus')
wait(150)
UO.UseObject("Lasthorse")
11
Post Reply