Мининг обкопка клиент 2.0.3

Ask for help

Moderators: Murderator+, Murderator

Post Reply
Mafia
Posts: 4
Joined: 2012-04-15 09:34:03

Мининг обкопка клиент 2.0.3

Post by Mafia »

Code: Select all

sub kopat()
VAR ms1 = "There is no ore here to mine"
VAR ms2 = "You can't use"
VAR ms3 = "You put the"
VAR ms4 = "You loosen"
VAR ms5 = "You have no"
VAR ms6 = "Ooo ia inoaeinu"
VAR ms7 = "Oi.."
VAR TileNum = '400'
VAR Kirka = 0x0f39
var x,y,k,q,xs,ys,zs,xt,yt,coords
UO.DeleteJournal()
for y=-2 to 2
   for x=-2 to 2
      repeat
      xs = UO.GetX()
      ys = UO.GetY()
      zs = UO.GetZ()
      xt = xs + x
      yt = ys + y
        q=0
        UO.DeleteJournal()
      uo.waittargettile('0',str(xt),str(yt),str(zs))
        UO.UseType( Kirka )   
        repeat     
            q=q+1
            wait(200)
         until UO.InJournal(ms1) OR UO.InJournal(ms2) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR UO.InJournal(ms7) OR (q>50)
      until ( UO.InJournal(ms6) AND UO.InJournal(ms7))
   next
next
end sub

Кто подскажет, в чем ошибка? То не капает, то покапает и перестанет.
Last edited by Mafia on 2012-04-15 11:40:47, edited 1 time in total.
Андрюха из Одессы
Posts: 164
Joined: 2009-03-21 10:03:06
Location: Одесса-Мама
Contact:

Re: Мининг обкопка клиент 2.0.3

Post by Андрюха из Одессы »

Сообщения в журнале проверял? Может отличаются от сообщений на твоем сервере.
Тип кирки не верный (если склероз не изменяет, то вписан тип топора), тип тайла не указан.

Если нужна обкопка, я всегда беру за основу этот скрипт.
И совет тебе. У нас на форуме принято скрипты обрамлять тегом Code.
Спасибо всем, у кого учился!

Меня трудно найти, легко потерять, и невозможно забыть. Я - рабочий исходник!
Mafia
Posts: 4
Joined: 2012-04-15 09:34:03

Re: Мининг обкопка клиент 2.0.3

Post by Mafia »

Сообщения проверял, тем более если он копает, то действительно начинает копать заного когда выкапывает. Тип - лопата, просто назвал неудачно, не суть важно тем более, что с киркой также не работает. Тип тайла указывал самый разный, но дело в том, что его не угадаешь. Тем более скрипт иногда работает и он начинает копать - копает пару раз и останавливается. Проблема в том, что он не всегда вообще начинает и бросает после нескольких попыток.

Я тоже этот скрипт брал за основу.
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Мининг обкопка клиент 2.0.3

Post by Mirage »

Если "то копает, то не копает" значит стопроцентно виноваты сообщения - пролетает какая то месага которой нет в списке и скрипт вырубается. Типо "это слишком далеко".
Mafia
Posts: 4
Joined: 2012-04-15 09:34:03

Re: Мининг обкопка клиент 2.0.3

Post by Mafia »

В коде специально на этот случай стоит параметр q, даж если сообщения не воспринимаются - через определённое время цикл останавливается. Но чар даже первого удара не делает. Или делает, но потом останавливается, хотя тайл не выкопан.
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: Мининг обкопка клиент 2.0.3

Post by ZeroDX »

Code: Select all

until ( UO.InJournal(ms6) AND UO.InJournal(ms7))
сюда бы добавить ms1 и 2 и 5
Mafia
Posts: 4
Joined: 2012-04-15 09:34:03

Re: Мининг обкопка клиент 2.0.3

Post by Mafia »

Не работает..
Successful
Posts: 174
Joined: 2008-12-13 00:00:15

Re: Мининг обкопка клиент 2.0.3

Post by Successful »

Потому что они у тебя через "and" перечислены. Убери общую скобку и замени на "or" + добавь месаги которые Зеро посоветовал
Post Reply