Yoko
http://forum.yoko.com.ua/

Подправте плиз скрипт
http://forum.yoko.com.ua/viewtopic.php?f=17&t=13684
Page 1 of 1

Author:  TheGamer [ 2008-06-13 19:12:08 ]
Post subject:  Подправте плиз скрипт

Здравствуйте.Вот нашел скрипт залезать и слезать с живности, но там он там слазит и залазит по ID живности, дак вот хотел вас попросить переделать его чтобы он залезал и слезал по типу живности.Помогите плз!
Вот скрипт:
Code:
sub maunt() 
VAR horse='0x000D656D' #ID Horse
if UO.GetGlobal('chto') == '1' then
UO.SetGlobal('chto', '0')
UO.UseObject('self')
wait(500)
UO.WaitTargetObject('laststatus')
UO.WaitTargetObject('lastattack')
UO.Print('Down Horse')
else
UO.SetGlobal('chto', '1')
 wait(500)
UO.UseObject(horse)
UO.Print('Up Horse')
endif
end sub

Author:  Kynep [ 2008-06-13 19:47:21 ]
Post subject:  Re: Подправте плиз скрипт

TheGamer wrote:
Здравствуйте.Вот нашел скрипт залезать и слезать с живности, но там он там слазит и залазит по ID живности, дак вот хотел вас попросить переделать его чтобы он залезал и слезал по типу живности.Помогите плз!
Вот скрипт:


Мейби так?
Code:
sub maunt() 
VAR horse='0x000D' #Type Horse
if UO.GetGlobal('chto') == '1' then
UO.SetGlobal('chto', '0')
UO.UseObject('self')
wait(500)
UO.WaitTargetObject('laststatus')
UO.WaitTargetObject('lastattack')
UO.Print('Down Horse')
else
UO.SetGlobal('chto', '1')
 wait(500)
UO.UseType(horse)
UO.Print('Up Horse')
endif
end sub

Author:  TheGamer [ 2008-06-14 13:07:17 ]
Post subject: 

Не хочет =( Пишет Ноу итем фаунд

Author:  Scripts Writer [ 2008-06-14 14:20:07 ]
Post subject: 

Тип вставь

Author:  TheGamer [ 2008-06-14 16:07:10 ]
Post subject: 

Вставлял я тип!Стою рядом с ламой жму кнопку, а он No item found(Слезать слезает, а залезать не хочет(

Author:  666||TORCHKI [ 2008-06-15 11:31:35 ]
Post subject: 

Незнаю ) я бегаю со скриптом там таргетом указаваеш хорсе )
Взял найта указал и бегай пока не здохнит :roll:

Author:  TheGamer [ 2008-06-15 14:50:59 ]
Post subject: 

Выложи плз если не трудно !

Author:  666||TORCHKI [ 2008-06-15 16:16:47 ]
Post subject: 

Code:
###############################################
sub mount()
If UO.ObjAtLayer('Horse') Then
   UO.useobject('self')
   wait(100)
   UO.WaitTargetObject('laststatus')
   uo.fontcolor (0x0003)
   UO.MSG('all kill')
   uo.fontcolor (0x0035)
Else
   wait(100)
   UO.Useobject('Horse')
End If
end sub
######################################################
sub HorseAdd()
   UO.UseObject('self')
   UO.AddObject('Horse')
   UO.SaveConfig()
end sub

Author:  TheGamer [ 2008-06-15 16:52:38 ]
Post subject: 

Спасибо болшое за помощ!Етот скрипт даже лучше.Еще раз спасибо =)

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/