Yoko

All sides of Injection
It is currently 2026-02-19 17:03:29

All times are UTC+02:00




Post new topic  Reply to topic  [ 27 posts ]  Go to page 1 2 Next
Author Message
PostPosted: 2006-05-25 11:43:57 
Offline

Joined: 2006-05-22 18:11:32
Posts: 26
Подскажите как типы обьектов пачками собирать....вот например записать все типы обьектов которы в сумке....
или как конвертировать типы изиуо в инжектовские.
а то на каждый обьект делать инфо...долго и я думаю не нужно.

Или может можно как то записывать в файл по таргету? тоесть появился таргет -> клацнул на предмет -> тип предмета записался в файл.

Пасибо всем кто подскажет.


Top
   
 Post subject:
PostPosted: 2006-05-25 11:51:48 
Offline

Joined: 2005-06-12 22:12:15
Posts: 247
nicehgo dolgovo v 'info' na kazdyj obekt netu...


Top
   
 Post subject:
PostPosted: 2006-05-25 12:47:22 
Offline

Joined: 2006-05-22 18:11:32
Posts: 26
dmitrykit wrote:
nicehgo dolgovo v 'info' na kazdyj obekt netu...


А патом ещё скапиру запеши...а камушки все записать намана? савсем быстро..


Top
   
 Post subject:
PostPosted: 2006-05-25 13:26:55 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Cka3 мыслишь правильно, только чтобы такое сделать нужно хелп прочесть.
Только там много буков.

Code:
sub F_Type_Print()
   UO.IgnoreReset()
   UO.TextClear()
   UO.TextOpen()
   var k = 0
   UO.FindType("-1", "-1", "backpack")
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", "backpack")
   wend
endsub


вот что получим...

Code:
LType[0] = 0x0FF1
LType[1] = 0x0EED
LType[2] = 0x0F52
LType[3] = 0x0A28
LType[4] = 0x0E86
LType[5] = 0x0FBB
LType[6] = 0x0E86
LType[7] = 0x0E86
LType[8] = 0x1BF2


ЗЫ инструкцию не прилагаю, лень….


Last edited by omi4 on 2006-05-25 15:41:22, edited 1 time in total.

Top
   
 Post subject:
PostPosted: 2006-05-25 15:34:04 
Offline

Joined: 2005-06-12 22:12:15
Posts: 247
Cka3 wrote:
dmitrykit wrote:
nicehgo dolgovo v 'info' na kazdyj obekt netu...


А патом ещё скапиру запеши...а камушки все записать намана? савсем быстро..


jazh tebe ru4kami tyrkat' nepredlagaju...


Top
   
 Post subject:
PostPosted: 2006-05-25 16:15:18 
Offline

Joined: 2006-05-22 18:11:32
Posts: 26
omi4 wrote:
Cka3 мыслишь правильно

А что разве не каждый так мыслит когда доходит дело до макроса?
omi4 wrote:
только чтобы такое сделать нужно хелп прочесть.

Я то прочту, но как-то попожее...
omi4 wrote:
ЗЫ инструкцию не прилагаю, лень….

А какая тут инструкция нужна? Фсё понятно.
1.Спасибо за ответ.
2.Спасибо за то что угадал что мне надо(массив).
и вот так наферно бидет веселее(Удобнее):

Code:
sub F_Type_Print() 
   UO.IgnoreReset()
   UO.TextClear()
   UO.TextOpen()             
   uo.print('Тыкни в сумку с объектами: ')
   uo.exec('addobject bag')
   wait(5000)
   var k = 0
   UO.FindType("-1", "-1", "bag")
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", "bag")
   wend
endsub


Top
   
 Post subject:
PostPosted: 2006-05-25 17:26:04 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
а так еще фисилее

Code:
sub F_Type_D()
   var k = 0, LTimer = UO.Timer()
   UO.IgnoreReset()
   UO.TextClear()
   UO.TextOpen()
   UO.AddObject("bag", UO.GetSerial())
   UO.AddObject("bag")
   repeat
      wait(1000)
   until UO.GetSerial("bag") <> UO.GetSerial() || UO.Timer() > LTimer + 100
   if UO.GetSerial("bag") == UO.GetSerial() then
      F_Type_D()
   endif
   UO.FindType("-1", "-1", "bag")
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", "bag")
   wend
endsub


Top
   
 Post subject:
PostPosted: 2006-05-25 18:29:58 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
Code:
   UO.AddObject("bag", UO.GetSerial()) 
   UO.AddObject("bag")
   repeat
      wait(1000)
   until UO.GetSerial("bag") <> UO.GetSerial() || UO.Timer() > LTimer + 100
   if UO.GetSerial("bag") == UO.GetSerial() then
      F_Type_D()
   endif

Действительно очень весело... Не уложился в 10 сек получит еще один принт... а если и в 20 не уложился то еще ... и так далее;))
Code:
UO.AddObject("bag")
while uo.Targeting()
wait(100)
wend


Top
   
 Post subject:
PostPosted: 2006-05-25 18:42:05 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Угу + еще проверку на мусор можно заделать

Code:
   if UO.GetSerial("bag") == UO.GetSerial() || UO.GetSerial("bag") == 0x00000000 then
      F_Type_D()
   endif


Top
   
 Post subject:
PostPosted: 2006-05-25 19:16:00 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
Ом утебя все скрипты такие веселые?;))


Top
   
 Post subject:
PostPosted: 2006-05-25 22:06:45 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Обработка исключений давно стала привычкой. Вот и получаются такие веселые скрипты..
Только на полуязыке это не всегда выходит, последнее время больше нравится встраивать все нужное прямо в инжу, С для этого больше подходит.


Top
   
 Post subject:
PostPosted: 2006-05-25 22:51:11 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
так это все была не шутка?;))
Ужас...
Товарищь обрати внимание на рекурсию утебя образовавшиюсю;))


Top
   
 Post subject:
PostPosted: 2006-05-26 01:11:17 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Рекурсия совершенно нормальная, произойдет только в двух случаях
Если контейнер сам перс или тыкнули в некуда(а это бывает).

Лишнего там только ADDobject. Если ты про то, что переписывать ХМЛ вредно, то эта проблема уже решена Вендором, он подрубил последнюю версию ДЛЛ. Которая libexpad, глюков с потерей файла не бывает.

Но на всякий случай удалим адд

Code:
sub F_Type_D()
   var k = 0, LTimer = UO.Timer(), bag = UO.GetSerial())
   UO.IgnoreReset()
   UO.TextClear()
   UO.TextOpen()
   repeat
      wait(1000)
   until bag <> UO.GetSerial() || UO.Timer() > LTimer + 100
   if bag == UO.GetSerial() || bag == 0x00000000 then
      F_Type_D()
   endif
   UO.FindType("-1", "-1", bag)
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", bag)
   wend
endsub


Last edited by omi4 on 2006-05-26 09:05:26, edited 2 times in total.

Top
   
 Post subject:
PostPosted: 2006-05-26 01:56:48 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
Ничего вендор не исправил как падало так и падает;)
А последний скрипт вообще лишен смысла;))
Даже интересно а зачем его за пускать;)) рекурсия раз в 10 сек;) интервал большой... Русками аддобджект вводить?;))
Ужас в общем..


Top
   
 Post subject:
PostPosted: 2006-05-26 07:31:05 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
omi4 wrote:
Рекурсия совершенно нормальная, произойдет только в двух случаях
Если контейнер сам перс или тыкнули в некуда(а это бывает).

Code:
sub F_Type_D()
   var k = 0, LTimer = UO.Timer(), bag = UO.GetSerial())
   UO.IgnoreReset()
   UO.TextClear()
   UO.TextOpen()
   repeat
      wait(1000)
   until bag <> UO.GetSerial() || UO.Timer() > LTimer + 100
   if bag == UO.GetSerial() || bag == 0x00000000 then
      F_Type_D()
   endif
   UO.FindType("-1", "-1", bag)
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", bag)
   wend
endsub


1.
Code:
bag = UO.GetSerial())

лишняя скобка здесь

2. Я так думаю, ты параметр у UO.GetSerial() потерял - там явно должен быть lastcontainer по всему тексту скрипта. Без параметра - это сериал своего чара.

_________________
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...


Top
   
 Post subject:
PostPosted: 2006-05-26 09:26:34 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Grin wrote:
Ничего вендор не исправил как падало так и падает;)
А последний скрипт вообще лишен смысла;))
Даже интересно а зачем его за пускать;)) рекурсия раз в 10 сек;) интервал большой... Русками аддобджект вводить?;))
Ужас в общем..


В последнем ты прав ошибка, ну забыл зачем адд был….
Так увлекся поиском патологии от рекурсии

Libexpad.dll это более свежая версия expad.dll, если просто переименовывать то, глюк никуда не исчезнет.
Нужно использовать свежую версию dll. Та что вендор сделал как положено, только dll не включил в архив.

В чем ужас, в отрицании права рекурсии на жизнь? Можно через Goto сделать


Top
   
 Post subject:
PostPosted: 2006-05-26 12:33:56 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
какой гоу ту то??? скрипты писать подругому надо...
А рекурсия живее всех живых...
Тоесль ко последнее основное действие повторится столько же раз какой уровень рекурсии ты допустил... нах это надо?
И потом как раз клил в никуда был бы более подходящим для отмены действия... а Таргетинг тебе так и не угодил;))


Top
   
 Post subject:
PostPosted: 2006-05-26 13:58:43 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Согласен что 10 сек тут нафиг не нужны.
Выход должен быть по исчезновению или отмене таргета.
Зачем замутил такую проверку сам не понял…

Таргетами почти никогда не пользовался, только waittargetы и lastы.

Code:
sub F_Type_D()
   var k = 0, LTimer = UO.Timer()
   UO.IgnoreReset()
   UO.TextClear()
   UO.TextOpen()
   UO.AddObject("bag", UO.GetSerial())
   UO.AddObject("bag")
   repeat
      wait(1000)
   until NOT UO.Targeting()

   if UO.GetSerial("bag") == 0x00000000 then
      F_Type_D()
   endif

   if UO.GetSerial("bag") == UO.GetSerial() then
      return 0
   endif
   UO.FindType("-1", "-1", "bag")
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", "bag")
   wend
endsub


Top
   
 Post subject:
PostPosted: 2006-05-26 14:12:42 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
Code:
sub F_Type_D() 
   var k = 0
   UO.IgnoreReset()
   UO.TextClear()
   UO.TextOpen()
   UO.AddObject("bag")
   repeat
      wait(100)
   until NOT UO.Targeting()
   if UO.GetSerial("bag") == 0 then
      return 0 
   endif
   UO.FindType("-1", "-1", "bag")
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", "bag")
   wend
endsub

зачем тебе рекурсия?


Top
   
 Post subject:
PostPosted: 2006-05-26 15:10:42 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
Запусти скрипт и отмени прицел Esc.
Объект bag содержит все что угодно только не нули, там будет ид прошлой цели.
А такого объекта в памяти инжи может и не быть, страшного ничего нет, ругнется и все

А рекурсия на случай указания прицелом на статику или землю, можно и не делать.
Пользы от этого не много, хотя и вреда нет. 100 раз промазать можно только специально.


Code:
sub F_Type_D()
   var k = 0, LTimer = UO.Timer()
   UO.IgnoreReset()
   ;UO.TextClear()
   UO.TextOpen()
   UO.AddObject("bag", 0)
   UO.AddObject("bag")
   repeat
      wait(1000)
   until NOT UO.Targeting()

   if UO.GetSerial("bag") == 0 then
      UO.Print("ERORR")
      return 0
   endif

   UO.FindType("-1", "-1", "bag")
   while UO.FindCount()
      UO.TextPrint("LType[" + str(k) + "] = " + UO.GetGraphic('finditem'))
      UO.Ignore('finditem')
      k = k + 1
      UO.FindType("-1", "-1", "bag")
   wend
endsub


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 27 posts ]  Go to page 1 2 Next

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


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