Page 1 of 1
Подправте плиз скрипт
Posted: 2008-06-13 19:12:08
by TheGamer
Здравствуйте.Вот нашел скрипт залезать и слезать с живности, но там он там слазит и залазит по ID живности, дак вот хотел вас попросить переделать его чтобы он залезал и слезал по типу живности.Помогите плз!
Вот скрипт:
Code: Select all
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
Re: Подправте плиз скрипт
Posted: 2008-06-13 19:47:21
by Kynep
TheGamer wrote:Здравствуйте.Вот нашел скрипт залезать и слезать с живности, но там он там слазит и залазит по ID живности, дак вот хотел вас попросить переделать его чтобы он залезал и слезал по типу живности.Помогите плз!
Вот скрипт:
Мейби так?
Code: Select all
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
Posted: 2008-06-14 13:07:17
by TheGamer
Не хочет =( Пишет Ноу итем фаунд
Posted: 2008-06-14 14:20:07
by Scripts Writer
Тип вставь
Posted: 2008-06-14 16:07:10
by TheGamer
Вставлял я тип!Стою рядом с ламой жму кнопку, а он No item found(Слезать слезает, а залезать не хочет(
Posted: 2008-06-15 11:31:35
by 666||TORCHKI
Незнаю ) я бегаю со скриптом там таргетом указаваеш хорсе )
Взял найта указал и бегай пока не здохнит
Posted: 2008-06-15 14:50:59
by TheGamer
Выложи плз если не трудно !
Posted: 2008-06-15 16:16:47
by 666||TORCHKI
Code: Select all
###############################################
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
Posted: 2008-06-15 16:52:38
by TheGamer
Спасибо болшое за помощ!Етот скрипт даже лучше.Еще раз спасибо =)