Yoko

All sides of Injection
It is currently 2025-10-14 20:46:46

All times are UTC+02:00




Post new topic  Reply to topic  [ 201 posts ]  Go to page Previous 15 6 7 8 911 Next
Author Message
 Post subject:
PostPosted: 2009-11-17 20:55:14 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
TarantuL wrote:
Можно добавить в килл элемов, В отчет, скоко он руды с него поднял?)
А то я вообще не понимаю, убил, убежал или чё)

Code:
sub checkelem()
   var n
   var flagvortex, Elemental, flaginvis
   Dim ore[2]
   ore[1]='0x19B8'
   ore[2]='0x19B9'
   uo.set('finddistance','3')
   uo.findtype('0x0010',-1,'ground')
   while uo.findcount()
      Elemental=uo.getserial('finditem')
      if checkcolor(Elemental)==1 then
         flagvortex=1
         if not flaginvis==1 then
            invis()
            flaginvis=1
         endif
         castvortex()
         uo.textopen()
         uo.textprint(uo.getname(Elemental)+' @ '+MakeTime())
         for n=0 to 10
            wait(1000)
            checkpk()
            if flagpk==1 then
               return
            endif
         next
      else
         uo.ignore(Elemental)
      endif
      uo.findtype('0x0010',-1,'ground')
   wend
   if flagvortex==1 then
      repeat
         checklag()
         while uo.mana<22
            wait(500)
         wend
         uo.waittargetobject('self')
         uo.cast('Mass Dispel')
         WaitForMana()
         wait(1000)
      until not uo.injournal('The spell fizzles')
      for n=1 to 2
         uo.findtype(ore[n],-1,'ground')
         while uo.findcount()
            uo.textprint(uo.getname('finditem'))
            uo.moveitem('finditem',-1,'backpack')
            checklag()
            wait(700)
            uo.findtype(ore[n],-1,'ground')
         wend
      next
      return 1
   endif
endsub

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2009-11-18 05:58:21 
Offline
User avatar

Joined: 2006-08-06 10:23:20
Posts: 117
сутки нон-стоп... я в шоке :o


Top
   
 Post subject:
PostPosted: 2009-11-18 06:50:41 
Offline
User avatar

Joined: 2007-04-21 14:06:19
Posts: 79
спасибо...

Code:
sub main() 
   while NOT UO.Dead()
      if uo.Journal(0)=='You are preoccupied with thoughts of battle.' then
         uo.warmode(0)
      endif
      UO.WaitTargetObject('self')
      UO.UseSkill('Evaluating Intelligence')
      wait(5000)
   wend
endsub


дело было поздним вечером
Вроде посмотрел скрипты для ДРВ 2009
проблем быть не должно
нашёл то что нужно, включил скрипт пошёл спать...

на утро Parse Error по значению скила видно что скрипт отработал 2 час от силы ...

И почему вы не хотите добавить первым во все свои труды приостановку скрипта при WorldSave...?
________
просто для меня не понятно всё это дело :(

_________________
Adept DRW


Top
   
 Post subject:
PostPosted: 2009-11-18 08:21:29 
Offline
User avatar

Joined: 2006-08-06 10:23:20
Posts: 117
Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как 8)


Top
   
 Post subject:
PostPosted: 2009-11-18 09:33:15 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
Tiny wrote:
на утро Parse Error по значению скила видно что скрипт отработал 2 час от силы ...
(


TarantuL избавился от ошибки путем внедрения дуаллаунчера

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


Top
   
 Post subject:
PostPosted: 2009-11-18 09:45:29 
Offline
User avatar

Joined: 2006-08-06 10:23:20
Posts: 117
Mirage wrote:
Tiny wrote:
на утро Parse Error по значению скила видно что скрипт отработал 2 час от силы ...
(


TarantuL избавился от ошибки путем внедрения дуаллаунчера


не только. в первую очередь твой скрипт обкопа без
Code:
go to


Top
   
 Post subject:
PostPosted: 2009-11-18 14:17:03 
Offline
User avatar

Joined: 2006-08-06 10:23:20
Posts: 117
TarantuL wrote:
Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как 8)



чёта я пришёл или как то так, но не одного слова в текстовом окне :lol: :lol: и окна даже нет.


Top
   
 Post subject:
PostPosted: 2009-11-18 15:18:05 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
TarantuL wrote:
TarantuL wrote:
Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как 8)



чёта я пришёл или как то так, но не одного слова в текстовом окне :lol: :lol: и окна даже нет.

Админы ДРВ пропалили тему и убрали элементалей. Теперь будут барлоги выкапываться. Бедные минеры. :)

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


Top
   
 Post subject:
PostPosted: 2009-11-18 15:26:50 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
Mirage wrote:
TarantuL wrote:
TarantuL wrote:
Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как 8)



чёта я пришёл или как то так, но не одного слова в текстовом окне :lol: :lol: и окна даже нет.

Админы ДРВ пропалили тему и убрали элементалей. Теперь будут барлоги выкапываться. Бедные минеры. :)


не пугай народ
Code:
Obsidian Elemental @ 2:50:16 @ 9.11.18
Plutonium Elemental @ 3:01:36 @ 9.11.18
Dragon Elemental @ 5:48:07 @ 9.11.18
Dragon Elemental @ 5:48:28 @ 9.11.18
Dragon Elemental @ 5:49:44 @ 9.11.18
 @ 5:51:13 @ 9.11.18
- dead - @ 5:51:14 @ 9.11.18
Gorgan Elemental @ 7:05:22 @ 9.11.18
Gorgan Elemental @ 7:05:43 @ 9.11.18
Vulcan Elemental @ 7:26:05 @ 9.11.18
Vulcan Elemental @ 7:26:26 @ 9.11.18
Steel Elemental @ 11:32:01 @ 9.11.18
Fuckmachine @ 12:27:53 @ 9.11.18

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2009-11-18 15:28:01 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
Tiny wrote:
спасибо...

Code:
sub main() 
   while NOT UO.Dead()
      if uo.Journal(0)=='You are preoccupied with thoughts of battle.' then
         uo.warmode(0)
      endif
      UO.WaitTargetObject('self')
      UO.UseSkill('Evaluating Intelligence')
      wait(5000)
   wend
endsub


дело было поздним вечером
Вроде посмотрел скрипты для ДРВ 2009
проблем быть не должно
нашёл то что нужно, включил скрипт пошёл спать...

на утро Parse Error по значению скила видно что скрипт отработал 2 час от силы ...

И почему вы не хотите добавить первым во все свои труды приостановку скрипта при WorldSave...?
________
просто для меня не понятно всё это дело :(


ок пересмотрю все лоры и добавлю чеклаг это спасет

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2009-11-18 15:53:56 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
Не подумайте что я придираюсь - мне просто реально интересно.
Code:
        while uo.mana<22 ; вот ЭТО зачем тут? Мана копится сама разве?
            wait(500)
         wend

зачем в касте ворта пауза цикличная пока маны меньше 13 и 20 с чемто? Если сделать ЕСЛИ маны столько то И нет элема и ПК то медитируем или пьем тоталку и кастуем ворта дальше.

Могу ошибиться. но помоему алгоритм каста вортексов немного не в порядке.

У автора:
до тех пор пока есть элем
кастуем вортекса
в касте идет каст со свитка если мало маны или каст с книги если маны много ЗАТЕМ проверка маны
Если не ошибаюсь каст ворта достаточно маноемкое заклинание и если например вызвать 2 то на 3 может маны не хватить. НО проверка то стоит ПОСЛЕ каста а не перед.

PS
из косметики можно ввести 2 функции для "взять item\положить item" и использовать в скрипте просто GET(type)\PUT(type)

Code:
sub main()
put(ore1, sund)
put(ore2, sund)
put(ore3, sund)
put(ore4, sund)
get(eda, backpack, 1, 50)
eda()
put(eda, sund)
get(kirka, backpack, 2, 1)
get(kirka, backpack, 2, 1)
end sub

Sub GET(item, cont, min, max)          ;    предмет, откуда, минимум, сколько брать
   If UO.Count( item ) < min Then
      #       UO.Print("Кончилось сырье в рукзаке")
      UO.FindType( item, '-1', cont )
      if UO.FindCount() > 0 Then
         #        UO.Print('Сырья в сундуке: ' + Str( UO.FindCount( item ) ) )
         uo.moveitem('finditem', max, 'backpack')
         checklag()
      else
         #           UO.Print( 'Полностью кончилось сырье' )
         UO.CancelMenu()
         return
      endif
   Endif
end sub
Sub PUT(item, cont)
   while UO.Count( item ) > 0
      UO.FindType( item, -1, -1 )
      UO.MoveItem( 'finditem', 0, cont )
      checklag()
   wend
end sub


PPS вы только не подумайте что я придираюсь или просто так болтаю - могу предложить свои решения некоторых проблем. А так скрипт классный (жаль не для моего шарда) :)

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


Top
   
 Post subject:
PostPosted: 2009-11-18 16:29:50 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
Так как у моего минера 180 маны, я не обращал внимание на такие вещи, но проблема в том, если кастуеш 2й или 3й раз и маны не хватает, то ты не можешь медитировать тк елем тебя убьет. если будет реальна нужда брать тотал маны, это можно дописать

Code:
sub castvortex()
   repeat
      checklag()
      uo.waittargettile('1341',str(uo.getx()),str(uo.gety()),str(uo.getz()))
ставим прицел
      uo.findtype('0x1F66',-1,'backpack')
ищем скрол
      if uo.findcount() then
если есть скрол и маны больше 12 юзаем скролл или ждем
         while uo.mana<13
            wait(500)
         wend
         uo.useobject('finditem')
      else
скролл не нашли, ждем ману или кастуем магию
         while uo.mana<27
            wait(500)
         wend
         uo.cast('Energy Vortex')
      endif
ждем завиршение каста
      WaitForMana()
кастуем пока нету физла
   until not uo.injournal('The spell fizzles')
endsub

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2009-11-18 22:55:09 
Offline
User avatar

Joined: 2005-04-05 04:13:24
Posts: 139
Location: DRW
Nmy wrote:
Mirage wrote:
TarantuL wrote:
TarantuL wrote:
Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как 8)



чёта я пришёл или как то так, но не одного слова в текстовом окне :lol: :lol: и окна даже нет.

Админы ДРВ пропалили тему и убрали элементалей. Теперь будут барлоги выкапываться. Бедные минеры. :)


не пугай народ

Obsidian Elemental @ 2:50:16 @ 9.11.18
Plutonium Elemental @ 3:01:36 @ 9.11.18
Dragon Elemental @ 5:48:07 @ 9.11.18
Dragon Elemental @ 5:48:28 @ 9.11.18
Dragon Elemental @ 5:49:44 @ 9.11.18
@ 5:51:13 @ 9.11.18
- dead - @ 5:51:14 @ 9.11.18
Gorgan Elemental @ 7:05:22 @ 9.11.18
Gorgan Elemental @ 7:05:43 @ 9.11.18
Vulcan Elemental @ 7:26:05 @ 9.11.18
Vulcan Elemental @ 7:26:26 @ 9.11.18
Steel Elemental @ 11:32:01 @ 9.11.18
Fuckmachine @ 12:27:53 @ 9.11.18


он такой бесявый чел, ет чтото ))


Top
   
 Post subject:
PostPosted: 2009-11-19 00:16:14 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
http://drw.ru/forum/showthread.php?t=12529

Это когда я начал копать на скрипте. Рун уже было где то 40, шахт примерно на шахту 2-3 руны, это 13-20 шахт :lol:

Щас заметил - игроков больше,но по шахтам меньше бегают т.к. шанс меня убить крайне мал - это надо под vas ort grav забегать в каждую шахту, надеется что я там :lol:

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2009-11-19 14:54:39 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
добавил тинкер для стелса и поправил мининг - убийство елема ждет теперь не 11 секунд а 16

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2009-11-19 15:00:17 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
попробую отследить почему другой раз когда кастует елем - елем попадает в скалу на верху

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2009-11-19 15:31:51 
Offline
User avatar

Joined: 2009-05-28 09:58:28
Posts: 2802
Location: Иваново
,resend вставь перед прицелом.

Program Tinkering;
чего то ты не в тему :lol:

_________________
Image
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.


Top
   
 Post subject:
PostPosted: 2009-11-19 22:12:43 
Offline
User avatar

Joined: 2006-08-06 10:23:20
Posts: 117
МОжет стоит сделать в мининге, чтобы замарченную новую руну в пещеру сразу относил в сейф? просто такие вещи на вес золота.. проще потратить 6 регов и 2 прыжка, имхо :roll:

или, раз такое дело, в рунбуку кидал :oops:


Last edited by TarantuL on 2009-11-20 08:19:25, edited 1 time in total.

Top
   
 Post subject:
PostPosted: 2009-11-20 08:13:10 
Offline
User avatar

Joined: 2006-08-06 10:23:20
Posts: 117
Code:
while uo.findcount()
            uo.textprint(uo.getname('finditem'))
            uo.moveitem('finditem',-1,'backpack')


Как я понял, тут нужно либо добавить чтобы кликал на найденное, либо какую-то галку в инжекте выставить, ибо у меня пустой строчкой в Логе отображается...
Ну и вообще, всегда, в инжекте, когда посредством ,info что-то пытаешься вынюхать, пока не кликнешь на айтем, в строчке Name= будет пустота.


Top
   
 Post subject:
PostPosted: 2009-11-20 09:26:42 
Offline
User avatar

Joined: 2006-08-06 10:23:20
Posts: 117
Интересную штучку (всем известную, но всё же) сделал из твоего скрипта на куклу... Тут еще хайд, без потери во времени на юз куклы.. То бишь должна расти ловкость еще))) Но это будет интересно только новичкам, или бото-качателям.

Code:
sub main()
   uo.addobject('doll')
   while uo.targeting()
      wait(500)
   wend
   while 1
      uo.useskill( 'Hiding' )
   wait(2501)
          checklag()
      uo.useobject('doll')
      wait(1851)
      if uo.str>99 then
         uo.findtype( -1 , -1 ,'backpack')
         uo.deletejournal()
         uo.click('finditem')
         wait(1500)
         if uo.injournal('of Curse') then
            uo.useobject('finditem')
         else
            if uo.journal(0)<>"" then
               uo.ignore('finditem')
            endif
         endif
      endif
      if uo.dead() then
         uo.playwav("C:\Program Files\Dragon World\Ultima Online\music\FlyinOff.wav")
      endif
   wend
end sub


sub checklag()
   repeat
      UO.DeleteJournal()
      UO.Click('backpack')
   until backpack()==1
endsub
sub backpack()
   var n
   for n=0 to 200
      if uo.injournal('a backpack') then
         return 1
      endif
      wait(200)
   next
endsub


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 201 posts ]  Go to page Previous 15 6 7 8 911 Next

All times are UTC+02:00


Who is online

Users browsing this forum: Bing [Bot] and 2 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