DRW (2009) by Dark Enemy - Обсуждение, вопросы и ответы...

[Nmy]

Можно добавить в килл элемов, В отчет, скоко он руды с него поднял?)
А то я вообще не понимаю, убил, убежал или чё)

Code: Select all

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

[TarantuL]

сутки нон-стоп... я в шоке

[Tiny]

спасибо...

Code: Select all

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...?
________
просто для меня не понятно всё это дело

[TarantuL]

Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как

[Mirage]

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

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

[TarantuL]

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

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

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

Code: Select all

go to

[TarantuL]

Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как

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

[Mirage]

Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как

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

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

[Nmy]

Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как

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

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

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

Code: Select all

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

[Nmy]

спасибо...

Code: Select all

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...?
________
просто для меня не понятно всё это дело

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

[Mirage]

Не подумайте что я придираюсь - мне просто реально интересно.

Code: Select all

        while uo.mana<22 ; вот ЭТО зачем тут? Мана копится сама разве?
            wait(500)
         wend

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

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

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

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

Code: Select all

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 вы только не подумайте что я придираюсь или просто так болтаю - могу предложить свои решения некоторых проблем. А так скрипт классный (жаль не для моего шарда)

[Nmy]

Так как у моего минера 180 маны, я не обращал внимание на такие вещи, но проблема в том, если кастуеш 2й или 3й раз и маны не хватает, то ты не можешь медитировать тк елем тебя убьет. если будет реальна нужда брать тотал маны, это можно дописать

Code: Select all

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

[stickman]

Сенкс, зарядил дописывалку к отчету о убийстве, вечером покажу, что и как

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

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

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

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

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

[Nmy]

http://drw.ru/forum/showthread.php?t=12529

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

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

[Nmy]

добавил тинкер для стелса и поправил мининг - убийство елема ждет теперь не 11 секунд а 16

[Nmy]

попробую отследить почему другой раз когда кастует елем - елем попадает в скалу на верху

[Mirage]

,resend вставь перед прицелом.

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

[TarantuL]

МОжет стоит сделать в мининге, чтобы замарченную новую руну в пещеру сразу относил в сейф? просто такие вещи на вес золота.. проще потратить 6 регов и 2 прыжка, имхо

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

[TarantuL]

Code: Select all

while uo.findcount()
            uo.textprint(uo.getname('finditem'))
            uo.moveitem('finditem',-1,'backpack') 

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

[TarantuL]

Интересную штучку (всем известную, но всё же) сделал из твоего скрипта на куклу... Тут еще хайд, без потери во времени на юз куклы.. То бишь должна расти ловкость еще))) Но это будет интересно только новичкам, или бото-качателям.

Code: Select all

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