Page 1 of 1

taming upgrade

Posted: 2006-12-03 22:55:28
by -=Morf=-
надо очень

Re: taming upgrade

Posted: 2006-12-03 22:59:02
by -=Morf=-

Code: Select all



sub Taming()
var count=0
uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems') Then
UO.Say('All release')
Endif
wend
end sub




Добавте пжлста чтобы кормил выбранный объект 'TOT' сеном, а сено брал из сундука

Re: taming upgrade

Posted: 2006-12-04 00:32:24
by GimFlex
-=Morf=- wrote:

Code: Select all



sub Taming()
var count=0
uo.print('Тотем')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseSkill('Animal Taming')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems') Then
UO.Say('All release')
Endif
wend
end sub




Добавте пжлста чтобы кормил выбранный объект 'TOT' сеном, а сено брал из сундука


а сундук в утке, а утка в небе, а небо далекоооооооо...

Posted: 2006-12-04 04:37:20
by Scripts Writer

Code: Select all

findtype(seno,'-1','backpack')
if findcount() then
  uo.waittargetobject('TOT')
  moveitem('finditem')
  wait(750)
else
  findtype(seno,'-1',sunduk)
  if findcount() then
    uo.waittargetobject('TOT') # || moveitem('finditem','TOT')
    uo.moveitem('finditem')    #
    wait(750)
  else
    uo.closeuo()
  end if
end if

Posted: 2006-12-04 14:35:25
by -=Morf=-
а можно еще 1 дополнение, если при тамление напишут This creature very hungry, тогда скрипт кормил объект и запускал заново Taming()


=)))

Posted: 2006-12-05 15:22:51
by -=Morf=-
Админы удалите тему пжлста, я все нашел что мне нужно 8)