Yoko

Кто то уже обошел эту хрень с появлением таблички с тремя цифрами после скила 90? Которая при неправельном нажатии тебя вырубает.
Я честно говоря еще сам не пробывал что то написать,просто скиллы маловаты и лично с табличкой не сталкивался. Но зарание хочу быть готов. Отпостите кто может помоч. Заранее благодарен

Грин у нас специалист по этому

Тогда давайте другжно попросим Грина избавить нас от этого недуга!
Грииииин... гриииин...

Грин ща занят ЗХИ, поэтому немешайте.

Если неошибаюсь то вот этот отрезок:



У нас на шарде было 4 цифры, так что редактируйте, я нузнаю че там делать

nerac wrote:Если неошибаюсь то вот этот отрезок:

Code: Select all

sub decode()
var temp='',i=0
var pos=0
var line=5
var sX=0, sY=0
var code=''
var finding = 1
var CurrX=0
var CurrY=0
var NumSum
dim tempXY[2]
dim Num[9]
Num[0]=6
Num[1]=35
Num[2]=45
Num[3]=-24
Num[4]=34
Num[5]=-5
Num[6]=26
Num[7]=4
Num[8]=-6
   Repeat
      temp=uo.LastGump('command',line)
      GetXY(temp, tempXY)
      if pos >= 17 then
         if pos == 17 then
            NumSum=(CurrX-sX)*10+(CurrY-sY)
            finding = 1
            i=0
            while finding  
               if NumSum == num[i] then
                  code=code+str(i+1)
                  finding = 0
               end if
               i=i+1
            wend
         end if
         if tempXY[0]-CurrX > 5 then
            pos=0
         end if
      end if
      if not pos then
         sX=tempXY[0]
         sY=tempXY[1]
         pos=15
         line=line+15
      end if
      CurrX=tempXY[0]
      CurrY=tempXY[1]
      pos=pos+1
      line=line+1
   Until len(code) == 4
   return code
end sub

sub AAmacro()
   while not uo.dead()
      if uo.LastGump('text',0) == 'enter anti macro code:' and uo.LastGump('replyed') == 0 then
         uo.lclick(uo.LastGump('x')+75, uo.LastGump('y')+69)
         wait(300)
         uo.say(decode())
         wait(300)
         uo.lclick(uo.LastGump('x')+77, uo.LastGump('y')+108)
      end if
      wait(1000)
   wend
end sub

У нас на шарде было 4 цифры, так что редактируйте, я нузнаю че там делать

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

У нас его уже убрали, но он появлялся, маленькая рамка там было 4 цыфры, под ними поле куда вписывать и ниже ок. Давалось 30 секунд чтоб вписать - невписал - цл, и 2 часа неможеш рубить\копать

Да уж,это другая фишка. У нас всё сложнее. Но всеровно спасибо...
Похоже Абисовский антимакрос у кого и есть,то он зажал его. Ну и это можно понять,штука очень нужная