Yoko :: Есть ли у каво?(

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

Есть ли у каво?( http://forum.yoko.com.ua/viewtopic.php?f=20&t=12720	Page 1 of 1

Author:	NoName* [ 2007-11-04 16:03:21 ]
Post subject:	Есть ли у каво?(
Вотобщем срипт - Чар стоит на респе, появляеться живка он ее таймит -шринкует -кидает-в пак-на протежении всего времени кричит Guards) Буду очень бланодарен товариги скриптеры.

Author:	Scripts Writer [ 2007-11-04 16:13:31 ]
Post subject:
Скрипт не сложный- совмести таминг с поиском животным, зашринкованием и криками гвардс если вокруг будет персонаж с красным ником -и зацикли всё это.

Author:	NoName* [ 2007-11-04 16:25:38 ]
Post subject:
Scripts Writer wrote: Скрипт не сложный- совмести таминг с поиском животным, зашринкованием и криками гвардс если вокруг будет персонаж с красным ником -и зацикли всё это. Я конешно супер мега скриптер)), но такой написать не смогу))

Author:	Okypok [ 2007-11-04 19:29:34 ]
Post subject:
Ну возьми скрипт на таминг. ДОбавь туда шринк животного и grab по типу.

Author:	NoName* [ 2007-11-04 19:35:23 ]
Post subject:
Okypok wrote: Ну возьми скрипт на таминг. ДОбавь туда шринк животного и grab по типу. Для меня слова добавь, напиши, перепиши, совмести и т.д* невозможны)), ну я вообще не рублу в скриптах)*

Author:	Okypok [ 2007-11-04 20:09:00 ]
Post subject:
Ты же когда-нибудь хочешь сам что-то сделать? Или всегда хотел просить только?

Author:	NoName* [ 2007-11-05 00:23:45 ]
Post subject:
Okypok wrote: Ты же когда-нибудь хочешь сам что-то сделать? Или всегда хотел просить только? Блин я очень редко пишу когда сам не смогу справиться, но тут не смогу)

Author:	Okypok [ 2007-11-05 10:57:26 ]
Post subject:
Ну давай вместе Полностью я не буду делать за тебя. Итай, найди на тайминг скрипт и если есть, то и на шринк. Если нету такого, то как он должен выглядеть по твоему?

Author:

No***Name [ 2007-11-05 15:53:28 ]

Post subject:

Code:

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.UseType('0x13F8') 
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

Этот скрипт просто на прокачку тайминга-таймит релизит таймит, на просто тайминг живки не нашел.

И вот сообственно Живка в шринку)

Code:

sub AnimalToShrink()
var idAnimal = uo.getserial('0x002FE46C')
var cAnimal = uo.getcolor(idAnimal)
var xA,yA,zA,dA
     if uo.count('0x0F0E','0x0388') == 0 then
          uo.print('шринков то и нет ')
          return
     end if
     dA = uo.GetDistance(idAnimal)
     xA = uo.GetX(idAnimal)
     yA = uo.GetY(idAnimal)
     zA = uo.GetZ(idAnimal)
     uo.waittargetobject(idAnimal)
     uo.usetype('0x0F0E','0x0388')
     while uo.containerof(idAnimal) == '0xFFFFFFFF'
          wait(100)
     wend
     uo.set('finddistance',str(dA))
     uo.findtype('-1',cAnimal,'ground')
     while uo.findcount() > 0
          if uo.GetX('finditem') == xA and uo.GetZ('finditem') == zA and uo.GetZ('finditem') == zA then
               uo.moveitem('finditem','-1','backpack')
               return
          else
               uo.ignore('finditem')
          end if
     wend
     uo.set('finddistance','14')
end sub

Author:

Okypok [ 2007-11-05 16:04:40 ]

Post subject:

В чем проблема?
Берем первый скрипт, убираем оттуда релиз и вставляем туда функцию шринка.
Кстати, что за UO.UseType('0x13F8') в функции тайминга?

Code:

sub Taming()
var count=0
var TOT = '0x00000000'
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('TOT')
UO.UseType('0x13F8')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems') Then
AnimalToShrink() 
Endif
wend
end sub

Ниже вставляем функцию шринка.

Code:

sub AnimalToShrink()
var idAnimal = uo.getserial('0x002FE46C')
var cAnimal = uo.getcolor(idAnimal)
var xA,yA,zA,dA
     if uo.count('0x0F0E','0x0388') == 0 then
          uo.print('шринков то и нет ')
          return
     end if
     dA = uo.GetDistance(idAnimal)
     xA = uo.GetX(idAnimal)
     yA = uo.GetY(idAnimal)
     zA = uo.GetZ(idAnimal)
     uo.waittargetobject(idAnimal)
     uo.usetype('0x0F0E','0x0388')
     while uo.containerof(idAnimal) == '0xFFFFFFFF'
          wait(100)
     wend
     uo.set('finddistance',str(dA))
     uo.findtype('-1',cAnimal,'ground')
     while uo.findcount() > 0
          if uo.GetX('finditem') == xA and uo.GetZ('finditem') == zA and uo.GetZ('finditem') == zA then
               uo.moveitem('finditem','-1','backpack')
               return
          else
               uo.ignore('finditem')
          end if
     wend
     uo.set('finddistance','14')
end sub

Author:

-=JoKeR=- [ 2007-11-05 16:23:59 ]

Post subject:

Quote:

Code:

sub Taming() 
var count=0 
var TOT = '0x00000000' 
UO.DeleteJournal() 
while NOT UO.Dead() 
UO.DeleteJournal() 
UO.WaitTargetObject('TOT') 
UO.UseType('0x13F8') 
repeat

Code:

UO.UseType('0x13F8')

- это мне кажеться таминг стаф =)
А это -->

Code:

var TOT = '0x00000000'

зачем? ведь айди будут разные у животных, ну жно вместо этого кусочка скрипта, который я выделил, зделать так чтобы чар искал животину по типу и цвету и записывал как ТОТ при удачном поиске. Потом при It seems шринковал.

Author:

Okypok [ 2007-11-05 16:50:58 ]

Post subject:

Да, кстати, я что-то не подумал об этом...

Ну тогда будет так выглядеть:

Code:

sub Taming()
var count=0
var TOT
UO.DeleteJournal()
while NOT UO.Dead()
UO.DeleteJournal()
UO.set('finddistance', 4)
   UO.findtype('0x0000','-1','ground') #Вот тут тайп живки
        wait(100)
   if UO.FindCount() then
           TOT=UO.GetSerial('finditem')
UO.WaitTargetObject('TOT')
UO.UseType('0x13F8')
repeat
wait(1000)
until UO.InJournal('You fail') OR UO.InJournal('It seems')
If Uo.InJournal('It seems') Then
AnimalToShrink()
Endif
end if
wend
end sub

Code:

sub AnimalToShrink()
var idAnimal
var cAnimal
var xA,yA,zA,dA
     if uo.count('0x0F0E','0x0388') == 0 then
          uo.print('шринков то и нет ')
          return
     end if
UO.set('finddistance', 3)
   UO.findtype('0x0000','-1','ground')  #Вот тут тайп шринкованной живности
        wait(100)
   if UO.FindCount() then
           idAnimal=UO.GetSerial('finditem')
    cAnimal = uo.getcolor(idAnimal)
     dA = uo.GetDistance(idAnimal)
     xA = uo.GetX(idAnimal)
     yA = uo.GetY(idAnimal)
     zA = uo.GetZ(idAnimal)
     uo.waittargetobject(idAnimal)
     uo.usetype('0x0F0E','0x0388')
     while uo.containerof(idAnimal) == '0xFFFFFFFF'
          wait(100)
     wend
     uo.set('finddistance',str(dA))
     uo.findtype('-1',cAnimal,'ground')
     while uo.findcount() > 0
          if uo.GetX('finditem') == xA and uo.GetZ('finditem') == zA and uo.GetZ('finditem') == zA then
               uo.moveitem('finditem','-1','backpack')
               return
          else
               uo.ignore('finditem')
          end if
     wend
     uo.set('finddistance','14')
end if
end sub

Что-то вроде того тогда будет. Тайпы животного и зашринкованного животного прописать там, где выделено.

Author:	NoName* [ 2007-11-05 17:16:03 ]
Post subject:
Еще бы совместить это все в один скрипт, и я не вижу поиск животного и цикличность.

Author:	Okypok [ 2007-11-05 17:51:54 ]
Post subject:
О_о скопируй, пожалуйста, в один файл оба скрипта и попробуй. Йокалэмэнэ. Они и так совмещены, это две функции. В первой вызывается вторая, если посмотришь внимательно. А если еще внимательнее посмотреть и увидеть while NOT UO.Dead(), то можно догадаться, что он циклится пока не умрешь.

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