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

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

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

Post by No***Name »

Вотобщем срипт - Чар стоит на респе, появляеться живка он ее таймит -шринкует -кидает-в пак-на протежении всего времени кричит Guards)
Буду очень бланодарен товариги скриптеры. :roll: :?
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Скрипт не сложный- совмести таминг с поиском животным, зашринкованием и криками гвардс если вокруг будет персонаж с красным ником -и зацикли всё это.
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

Post by No***Name »

Scripts Writer wrote:Скрипт не сложный- совмести таминг с поиском животным, зашринкованием и криками гвардс если вокруг будет персонаж с красным ником -и зацикли всё это.


Я конешно супер мега скриптер)), но такой написать не смогу))
Okypok
Posts: 100
Joined: 2007-10-12 20:48:07

Post by Okypok »

Ну возьми скрипт на таминг. ДОбавь туда шринк животного и grab по типу.
Image
Image
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

Post by No***Name »

Okypok wrote:Ну возьми скрипт на таминг. ДОбавь туда шринк животного и grab по типу.


Для меня слова *добавь, напиши, перепиши, совмести и т.д* невозможны)), ну я вообще не рублу в скриптах)
Okypok
Posts: 100
Joined: 2007-10-12 20:48:07

Post by Okypok »

Ты же когда-нибудь хочешь сам что-то сделать? Или всегда хотел просить только? :)
Image
Image
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

Post by No***Name »

Okypok wrote:Ты же когда-нибудь хочешь сам что-то сделать? Или всегда хотел просить только? :)


Блин я очень редко пишу когда сам не смогу справиться, но тут не смогу)
Okypok
Posts: 100
Joined: 2007-10-12 20:48:07

Post by Okypok »

Ну давай вместе :) Полностью я не буду делать за тебя.
Итай, найди на тайминг скрипт и если есть, то и на шринк. Если нету такого, то как он должен выглядеть по твоему?
Image
Image
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

Post by No***Name »

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.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: Select all

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
Okypok
Posts: 100
Joined: 2007-10-12 20:48:07

Post by Okypok »

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

Code: Select all

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: Select all

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
Image
Image
-=JoKeR=-
Posts: 173
Joined: 2007-05-26 00:00:56
Location: Украина, Ode$$a:[X-TEAM Group]
Contact:

Post by -=JoKeR=- »

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

Code: Select all

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


Code: Select all

UO.UseType('0x13F8')
- это мне кажеться таминг стаф =)
А это -->

Code: Select all

var TOT = '0x00000000'

зачем? ведь айди будут разные у животных, ну жно вместо этого кусочка скрипта, который я выделил, зделать так чтобы чар искал животину по типу и цвету и записывал как ТОТ при удачном поиске. Потом при It seems шринковал.
Image
Okypok
Posts: 100
Joined: 2007-10-12 20:48:07

Post by Okypok »

Да, кстати, я что-то не подумал об этом... :)
Ну тогда будет так выглядеть:

Code: Select all

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: Select all

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


Что-то вроде того тогда будет. Тайпы животного и зашринкованного животного прописать там, где выделено.
Image
Image
No***Name
Posts: 90
Joined: 2006-02-26 22:41:09

Post by No***Name »

Еще бы совместить это все в один скрипт, и я не вижу поиск животного и цикличность.
Okypok
Posts: 100
Joined: 2007-10-12 20:48:07

Post by Okypok »

О_о скопируй, пожалуйста, в один файл оба скрипта и попробуй. Йокалэмэнэ. Они и так совмещены, это две функции. В первой вызывается вторая, если посмотришь внимательно.
А если еще внимательнее посмотреть и увидеть while NOT UO.Dead(), то можно догадаться, что он циклится пока не умрешь.
Image
Image
Post Reply