Yoko

Если увас есть желание, и если уменя будет свободное врем, то свашей же помощью можно переделать антимакрос под новый вариант (смешно было у видить, что цифры были сдвинуты по высоте, роли это не играет, главное предкновение это шрифт).
Что требуется...
постить сюда ЦЕЛИКОВЫЙ infogump снятый после того как вы правельно ввели антимакрокод и нажали на кнопку. Интересуют инфо гампы в котором содержится хотябы 1 цифра из списка: 0 (если вообще встречается), 4, 6. Остальные цифры есть;)

у меня он работал норм всегда, траблы небыли, там кажысь только один гамп макро неумеит правильно подсчитать но следующий раз все норм.

я работаю к другому- вот он, только он наверно покачто только для меня, вот скелет- недоработаный...

sub Alert()
UO.TextClear()
UO.DeleteJournal()
while true and not uo.dead()
If UO.JournalSerial()<>'0x00000000' && UO.JournalSerial()<>'0xFFFFFFFF' && UO.JournalSerial()<>'0x4013129C' && UO.JournalSerial()<>'0x001312A8' && UO.JournalSerial()<>'0x4009AECB' then
UO.PlayWAV('D:\games\ultima online old paradise\inject\alert2.wav')
UO.TextPrint(UO.JournalSerial())
UO.DeleteJournal()
end if
wait(200)
wend
end sub

по журналу работать невозможно, так как майнинг у меня этого непозволяет...

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

я пока даже не смотрел изменилась ли матрица тех цифр чт оуменя уже есть... когда все будут тогда и посмотрим;)
Поповоду проверки пожурналу...
Нуты не делай делейт журнал то...
Делай обыкновеный через setjournalline
нестрашно же правда;) + тут уже готовые скрипты были от Деста и еще ктото выкладывал...

_____infogump_______
serial   0x00075bd0
gumpid   0x000003ee
X   278
Y   144
3033   packet size
0   reply packet size
Buttons: ________
Checks&Radios: __
Entryes: ________
All commands: ____
    1] oclose
    2] omove
    3] esizepic 0 0 3500 210 16
    4] ext 28 15 48 
    5] esizepic 55 63 83 100 3
    6] ilepic 57 34 382
    7] ilepic 58 34 382
    8] ilepic 59 34 382
    9] ilepic 60 34 382
   10] ilepic 56 35 382
   11] ilepic 57 35 382
   12] ilepic 60 35 382
   13] ilepic 61 35 382
   14] ilepic 56 36 382
   15] ilepic 57 36 382
   16] ilepic 60 36 382
   17] ilepic 61 36 382
   18] ilepic 56 37 382
   19] ilepic 57 37 382
   20] ilepic 60 37 382
   21] ilepic 61 37 382
   22] ilepic 57 38 382
   23] ilepic 58 38 382
   24] ilepic 59 38 382
   25] ilepic 60 38 382
   26] ilepic 56 39 382
   27] ilepic 57 39 382
   28] ilepic 60 39 382
   29] ilepic 61 39 382
   30] ilepic 56 40 382
   31] ilepic 57 40 382
   32] ilepic 60 40 382
   33] ilepic 61 40 382
   34] ilepic 56 41 382
   35] ilepic 57 41 382
   36] ilepic 60 41 382
   37] ilepic 61 41 382
   38] ilepic 56 42 382
   39] ilepic 57 42 382
   40] ilepic 60 42 382
   41] ilepic 61 42 382
   42] ilepic 57 43 382
   43] ilepic 58 43 382
   44] ilepic 59 43 382
   45] ilepic 60 43 382
   46] ilepic 89 42 382
   47] ilepic 90 42 382
   48] ilepic 88 43 382
   49] ilepic 89 43 382
   50] ilepic 90 43 382
   51] ilepic 87 44 382
   52] ilepic 88 44 382
   53] ilepic 89 44 382
   54] ilepic 90 44 382
   55] ilepic 87 45 382
   56] ilepic 89 45 382
   57] ilepic 90 45 382
   58] ilepic 89 46 382
   59] ilepic 90 46 382
   60] ilepic 89 47 382
   61] ilepic 90 47 382
   62] ilepic 89 48 382
   63] ilepic 90 48 382
   64] ilepic 89 49 382
   65] ilepic 90 49 382
   66] ilepic 89 50 382
   67] ilepic 90 50 382
   68] ilepic 89 51 382
   69] ilepic 90 51 382
   70] ilepic 99 42 382
   71] ilepic 100 42 382
   72] ilepic 101 42 382
   73] ilepic 102 42 382
   74] ilepic 98 43 382
   75] ilepic 99 43 382
   76] ilepic 102 43 382
   77] ilepic 103 43 382
   78] ilepic 98 44 382
   79] ilepic 99 44 382
   80] ilepic 102 44 382
   81] ilepic 103 44 382
   82] ilepic 98 45 382
   83] ilepic 99 45 382
   84] ilepic 102 45 382
   85] ilepic 103 45 382
   86] ilepic 99 46 382
   87] ilepic 100 46 382
   88] ilepic 101 46 382
   89] ilepic 102 46 382
   90] ilepic 98 47 382
   91] ilepic 99 47 382
   92] ilepic 102 47 382
   93] ilepic 103 47 382
   94] ilepic 98 48 382
   95] ilepic 99 48 382
   96] ilepic 102 48 382
   97] ilepic 103 48 382
   98] ilepic 98 49 382
   99] ilepic 99 49 382
  100] ilepic 102 49 382
  101] ilepic 103 49 382
  102] ilepic 98 50 382
  103] ilepic 99 50 382
  104] ilepic 102 50 382
  105] ilepic 103 50 382
  106] ilepic 99 51 382
  107] ilepic 100 51 382
  108] ilepic 101 51 382
  109] ilepic 102 51 382
  110] ilepic 111 42 382
  111] ilepic 112 42 382
  112] ilepic 113 42 382
  113] ilepic 114 42 382
  114] ilepic 110 43 382
  115] ilepic 111 43 382
  116] ilepic 114 43 382
  117] ilepic 115 43 382
  118] ilepic 114 44 382
  119] ilepic 115 44 382
  120] ilepic 114 45 382
  121] ilepic 115 45 382
  122] ilepic 112 46 382
  123] ilepic 113 46 382
  124] ilepic 114 46 382
  125] ilepic 114 47 382
  126] ilepic 115 47 382
  127] ilepic 114 48 382
  128] ilepic 115 48 382
  129] ilepic 114 49 382
  130] ilepic 115 49 382
  131] ilepic 110 50 382
  132] ilepic 111 50 382
  133] ilepic 114 50 382
  134] ilepic 115 50 382
  135] ilepic 111 51 382
  136] ilepic 112 51 382
  137] ilepic 113 51 382
  138] ilepic 114 51 382
  139] extentry 75 69 145 32 998 1 
  140] utton 77 108 4005 4006 1 0 
  141] utton 103 108 4005 4006 1 0 
  142] esizepic 77 108 5120 57 2
  143] ext 87 108 1067 
Text: ____________
    0] enter anti macro code:
    1]  
    2] enter

[/code]

По-моему, Grin имел ввиду, что гамп надо сначало отправить, а потом смотреть infogump - тогда появляется еще один раздел - Reply.

Тогда и скрины не нужны.

4
78] ilepic 96 42 382
79] ilepic 97 42 382
80] ilepic 96 43 382
81] ilepic 97 43 382
82] ilepic 95 44 382
83] ilepic 96 44 382
84] ilepic 97 44 382
85] ilepic 95 45 382
86] ilepic 96 45 382
87] ilepic 97 45 382
88] ilepic 94 46 382
89] ilepic 96 46 382
90] ilepic 97 46 382
91] ilepic 94 47 382
92] ilepic 96 47 382
93] ilepic 97 47 382
94] ilepic 93 48 382
95] ilepic 96 48 382
96] ilepic 97 48 382
97] ilepic 93 49 382
98] ilepic 94 49 382
99] ilepic 95 49 382
100] ilepic 96 49 382
101] ilepic 97 49 382
102] ilepic 98 49 382
103] ilepic 96 50 382
104] ilepic 97 50 382
105] ilepic 96 51 382
106] ilepic 97 51 382

6
70] ilepic 89 34 382
71] ilepic 90 34 382
72] ilepic 91 34 382
73] ilepic 88 35 382
74] ilepic 91 35 382
75] ilepic 92 35 382
76] ilepic 87 36 382
77] ilepic 88 36 382
78] ilepic 87 37 382
79] ilepic 88 37 382
80] ilepic 87 38 382
81] ilepic 88 38 382
82] ilepic 89 38 382
83] ilepic 90 38 382
84] ilepic 91 38 382
85] ilepic 87 39 382
86] ilepic 88 39 382
87] ilepic 91 39 382
88] ilepic 92 39 382
89] ilepic 87 40 382
90] ilepic 88 40 382
91] ilepic 91 40 382
92] ilepic 92 40 382
93] ilepic 87 41 382
94] ilepic 88 41 382
95] ilepic 91 41 382
96] ilepic 92 41 382
97] ilepic 87 42 382
98] ilepic 88 42 382
99] ilepic 91 42 382
100] ilepic 92 42 382
101] ilepic 88 43 382
102] ilepic 89 43 382
103] ilepic 90 43 382
104] ilepic 91 43 382

0
не когда не было

[/b]

4
78] ilepic 96 42 382
79] ilepic 97 42 382
80] ilepic 96 43 382
81] ilepic 97 43 382
82] ilepic 95 44 382
83] ilepic 96 44 382
84] ilepic 97 44 382
85] ilepic 95 45 382
86] ilepic 96 45 382
87] ilepic 97 45 382
88] ilepic 94 46 382
89] ilepic 96 46 382
90] ilepic 97 46 382
91] ilepic 94 47 382
92] ilepic 96 47 382
93] ilepic 97 47 382
94] ilepic 93 48 382
95] ilepic 96 48 382
96] ilepic 97 48 382
97] ilepic 93 49 382
98] ilepic 94 49 382
99] ilepic 95 49 382
100] ilepic 96 49 382
101] ilepic 97 49 382
102] ilepic 98 49 382
103] ilepic 96 50 382
104] ilepic 97 50 382
105] ilepic 96 51 382
106] ilepic 97 51 382

6
70] ilepic 89 34 382
71] ilepic 90 34 382
72] ilepic 91 34 382
73] ilepic 88 35 382
74] ilepic 91 35 382
75] ilepic 92 35 382
76] ilepic 87 36 382
77] ilepic 88 36 382
78] ilepic 87 37 382
79] ilepic 88 37 382
80] ilepic 87 38 382
81] ilepic 88 38 382
82] ilepic 89 38 382
83] ilepic 90 38 382
84] ilepic 91 38 382
85] ilepic 87 39 382
86] ilepic 88 39 382
87] ilepic 91 39 382
88] ilepic 92 39 382
89] ilepic 87 40 382
90] ilepic 88 40 382
91] ilepic 91 40 382
92] ilepic 92 40 382
93] ilepic 87 41 382
94] ilepic 88 41 382
95] ilepic 91 41 382
96] ilepic 92 41 382
97] ilepic 87 42 382
98] ilepic 88 42 382
99] ilepic 91 42 382
100] ilepic 92 42 382
101] ilepic 88 43 382
102] ilepic 89 43 382
103] ilepic 90 43 382
104] ilepic 91 43 382

0
не когда не было
[/b]

можеш запостить старый алгоритм проверки по матрице

Алгоритм был упрощен. На самомом деле получив все цифпы и достаточно было сравнить только в 1 точке для 100% идентификации.
Что бы не тратить время на выделение 1 цифры мы прыгали сразуже к предпологаемой точке и так дажее;) Вроде ничего сложного...
И на сколько я виу ты сам уже смог логически выделить цифры изгампа.

Шрифт ни на паксель не был изменен;)
А что анти макрос реально не работает?;)
М\помойму так все пучком болжно бвть... сейчас копнем...

узрить можно твое творение ?

_________________
все для альфы , [url=http://newvlad.nm.ru/prog]здесь[/url]
модернизация ремонт продажа игровых консолей
Sky: admirka1 Москва

sub GetXY(str,arnum)
   arnum[0]=val(mid(str, 7, 3))
   arnum[1]=val(mid(str, 10, 3))
end sub

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

держи

Не авторизировался;)

Провеирил циферки сходятся , нолика в антимакро гампе нету ?
на перле не писал его же ?

_________________
все для альфы , [url=http://newvlad.nm.ru/prog]здесь[/url]
модернизация ремонт продажа игровых консолей
Sky: admirka1 Москва

Ты чё на ОЛДП играешь?
ЖестЬ!
Кстате от этого дебугера сейчас толку мало... Там новая система-Канслер летает и задаёт вопросы если не отвечаешь на них то следовательно ты на макросе-Джайл или стоун. Зы я замутил скрипт но так и не испробовал его.Да и нужны доработки на которых времени не очень да и самому леняво в это кувыряться.

JacК тоже там )
лумба уже 70 3мя чарами рублю .

_________________
все для альфы , [url=http://newvlad.nm.ru/prog]здесь[/url]
модернизация ремонт продажа игровых консолей
Sky: admirka1 Москва

Ладно тогда у меня вопрос если пишеш в инвизе(.invis(гм команда)) это заноситься в Journal? И можно ли както по "invis Messages" выделить и поставить на них условие? Просто Иногда Журнал глючит и неотображает Ник того кто пишет...
Крч как мне на этого канслера поставить условие ?
If UO.InJournal("WuBrothers|"отличительная черта invis Messages"then
pobazarit()
Del(так еще вопрос существует ли что то вроде deletlastmsg)
Вот тогда то Антимакро и будет работать на все 100%

ну лей нету. и на перле он написан;)
Поповоду сообщений... все сообщения кросе системыных и скилов
фиксируются коректно;)
отловить сообщение ерунда по сравнению с грамотным ответом на вопрос;))

uo.msg("Sorji mnje pora )");
logout

Грин на Перле бы сюда в топик скриптец .

_________________
все для альфы , [url=http://newvlad.nm.ru/prog]здесь[/url]
модернизация ремонт продажа игровых консолей
Sky: admirka1 Москва

sub decode{
my($pos, $line, $sx, $sy, $code, $currx, $curry, $sum);
$line=5;
@num=(6, 35, 45, -24, 34, -5, 26, 4, -6);
   while (length($code)<4){
      @words=split(/ /, uo::lastgump("command",$line), 4);
      uo::print(@words);
      &wait(100);
      if ($pos>=17){
         if ($pos==17){
            $sum=($currx-$sx)*10+($curry-$sy);
            for($i=0; $i<9; $i++){
               if ($numsum==$num[$i]){
                  $code.=$i+1;
                  last;
               }
            }
         }
         if ($words[1]-$currx>5){
            $pos=0;
         }
      }
      if (!$pos){
         $sx=$words[1];
         $sy=$words[2];
         $pos=15;
         $line+=15;
      }
      $currx=$words[1];
      $curry=$words[2];
      $pos++;
      $line++;
   }
   return $code;
}

Не помню только протестил ли я это доконца...
Остальное сам допишешь.