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/