Yoko

All sides of Injection
It is currently 2025-12-02 10:31:59

All times are UTC+02:00




Post new topic  Reply to topic  [ 14 posts ] 
Author Message
PostPosted: 2007-11-04 16:03:21 
Offline
User avatar

Joined: 2006-02-26 22:41:09
Posts: 90
Вотобщем срипт - Чар стоит на респе, появляеться живка он ее таймит -шринкует -кидает-в пак-на протежении всего времени кричит Guards)
Буду очень бланодарен товариги скриптеры. :roll: :?


Top
   
 Post subject:
PostPosted: 2007-11-04 16:13:31 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Скрипт не сложный- совмести таминг с поиском животным, зашринкованием и криками гвардс если вокруг будет персонаж с красным ником -и зацикли всё это.


Top
   
 Post subject:
PostPosted: 2007-11-04 16:25:38 
Offline
User avatar

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


Я конешно супер мега скриптер)), но такой написать не смогу))


Top
   
 Post subject:
PostPosted: 2007-11-04 19:29:34 
Offline
User avatar

Joined: 2007-10-12 20:48:07
Posts: 100
Ну возьми скрипт на таминг. ДОбавь туда шринк животного и grab по типу.

_________________
Image
Image


Top
   
 Post subject:
PostPosted: 2007-11-04 19:35:23 
Offline
User avatar

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


Для меня слова *добавь, напиши, перепиши, совмести и т.д* невозможны)), ну я вообще не рублу в скриптах)


Top
   
 Post subject:
PostPosted: 2007-11-04 20:09:00 
Offline
User avatar

Joined: 2007-10-12 20:48:07
Posts: 100
Ты же когда-нибудь хочешь сам что-то сделать? Или всегда хотел просить только? :)

_________________
Image

Image


Top
   
 Post subject:
PostPosted: 2007-11-05 00:23:45 
Offline
User avatar

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


Блин я очень редко пишу когда сам не смогу справиться, но тут не смогу)


Top
   
 Post subject:
PostPosted: 2007-11-05 10:57:26 
Offline
User avatar

Joined: 2007-10-12 20:48:07
Posts: 100
Ну давай вместе :) Полностью я не буду делать за тебя.
Итай, найди на тайминг скрипт и если есть, то и на шринк. Если нету такого, то как он должен выглядеть по твоему?

_________________
Image

Image


Top
   
 Post subject:
PostPosted: 2007-11-05 15:53:28 
Offline
User avatar

Joined: 2006-02-26 22:41:09
Posts: 90
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


Top
   
 Post subject:
PostPosted: 2007-11-05 16:04:40 
Offline
User avatar

Joined: 2007-10-12 20:48:07
Posts: 100
В чем проблема?
Берем первый скрипт, убираем оттуда релиз и вставляем туда функцию шринка.
Кстати, что за 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

_________________
Image

Image


Top
   
 Post subject:
PostPosted: 2007-11-05 16:23:59 
Offline
User avatar

Joined: 2007-05-26 00:00:56
Posts: 173
Location: Украина, Ode$$a:[X-TEAM Group]
Quote:
В чем проблема?
Берем первый скрипт, убираем оттуда релиз и вставляем туда функцию шринка.
Кстати, что за 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


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

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

_________________
Image


Top
   
 Post subject:
PostPosted: 2007-11-05 16:50:58 
Offline
User avatar

Joined: 2007-10-12 20:48:07
Posts: 100
Да, кстати, я что-то не подумал об этом... :)
Ну тогда будет так выглядеть:
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


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

_________________
Image

Image


Top
   
 Post subject:
PostPosted: 2007-11-05 17:16:03 
Offline
User avatar

Joined: 2006-02-26 22:41:09
Posts: 90
Еще бы совместить это все в один скрипт, и я не вижу поиск животного и цикличность.


Top
   
 Post subject:
PostPosted: 2007-11-05 17:51:54 
Offline
User avatar

Joined: 2007-10-12 20:48:07
Posts: 100
О_о скопируй, пожалуйста, в один файл оба скрипта и попробуй. Йокалэмэнэ. Они и так совмещены, это две функции. В первой вызывается вторая, если посмотришь внимательно.
А если еще внимательнее посмотреть и увидеть while NOT UO.Dead(), то можно догадаться, что он циклится пока не умрешь.

_________________
Image

Image


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 14 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 3 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited