Антимакрос

Incorrect User · Post by **Incorrect User** » 2014-02-13 22:14:25

Вот пример гампа

_____infogump_______
serial   0x00079931
gumpid   0x000000b3
X   0
Y   0
781   packet size
0   reply packet size
Buttons: ________
Checks&Radios: __
Entryes: ________
All commands: ____
    1] AGE 
    2] umppic 260 361 222
    3] umppic 293 351 222
    4] umppic 261 348 222
    5] umppic 293 355 223
    6] utton 220 295 2230 2230 1 1 
    7] utton 400 295 2231 2231 1 1 
    8] esizepic 200 290 5170 240 24
    9] ext 255 292 152 
   10] ext 230 315 0 
   11] utton 377 444 2228 2228 1 1 
   12] utton 251 420 2225 2225 1 1 1
   13] utton 301 434 2226 2226 1 1 
   14] utton 345 424 2227 2227 1 1 
   15] utton 285 480 2230 2230 1 1 
   16] utton 376 479 2232 2232 1 1 
   17] utton 245 477 2229 2229 1 1 
   18] utton 340 463 2231 2231 1 1 
   19] umppic 264 348 223
   20] umppic 302 341 223
   21] ext 230 373 0 
   22] ext 230 385 0 
   23] ext 340 385 0 
Text: ____________
    0] Antimacros System
    1] Choose this protection code
    2] ----------------------
    3] Entering code:
    4] 0

Вот антимакрос для него

Code: Select all

sub AntiMacros()
  dim reindex[8]
  reindex[0] = 11
  reindex[1] = 12
  reindex[2] = 13
  reindex[3] = 10
  reindex[4] = 16
  reindex[5] = 14
  reindex[6] = 17
  reindex[7] = 15
  var GumpID = 0
  var ButtonID = 0
  var ButtonText
  var i = 18
  if uo.LastGump('text', 4) <> "0" then
    i = 19
  end if
  GumpID = val(Mid(uo.LastGump('command', i), 16, 4))
  ButtonID = reindex[GumpID-2225]
  ButtonText = uo.LastGump('command', ButtonID)
  uo.LClick(Val(Mid(ButtonText, 7, 3)), Val(Mid(ButtonText, 11, 3)))
  while not uo.LastGump('replyed')
    wait(100)
  wend
end sub

Обьясните принцип работы, я не могу понять от как он узнает какие кнопки требуется нажать. ZeroDX переделал этот антимакрос всего в несколько строчек. Хочу понять основы, не могу написать его сам, каждый раз приходится искать готовый

some · Post by **some** » 2014-02-13 22:23:22

ты лучше скажи как щас играешь на фв и не палишься . защиту же новую ввели

Incorrect User · Post by **Incorrect User** » 2014-02-13 22:30:09

Тебя спалили? А защита смотря на что? Фастлут, резка, спидхак или что?

some · Post by **some** » 2014-02-17 03:28:36

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

Incorrect User · Post by **Incorrect User** » 2014-02-17 10:38:22

От стелса не надо.
А про защиту, я нашел, один из ГМов писал

защита проверяет файлы, а так же делает шифрование передаваемого потока.

Это я хз, спалит или нет, меня это не беспокоит.

Incorrect User · Post by **Incorrect User** » 2014-02-18 23:24:48

Ладно, тогда переделайте его, если есть добрые люди :wink:

под новый инжект, чтобы без Lclick, ну и компактно. Zero помоги)

Incorrect User · Post by **Incorrect User** » 2014-02-21 14:40:20

Ап

Juicy Fruit · Post by **Juicy Fruit** » 2014-02-21 16:59:34

some wrote:пс - могу скинуть этот же антимакрос на стелсе, может допетришь как работает

Давай

2Incorrect User
Ты со старой инжи снимал infogump?

Incorrect User · Post by **Incorrect User** » 2014-02-21 17:41:14

Этот был из 13**, вот инфогамп из последнего билда

Code: Select all

_____infogump_______
serial   0x00079931
gumpid   0x000000b3
X   0
Y   0
781   packet size
23   reply packet size
Buttons: ________
 page 0
    1 [    1] image=0x08B4 at 180:325
    2 [    2] image=0x08B8 at 360:325
    3 [    9] image=0x08B4 at 347:464
    4 [   10] image=0x08B1 at 211:465
    5 [    3] image=0x08B2 at 261:463
    6 [    4] image=0x08B3 at 289:465
    7 [    5] image=0x08B6 at 246:509
    8 [    6] image=0x08B8 at 347:497
    9 [    7] image=0x08B5 at 215:508
   10 [    8] image=0x08B7 at 290:507
Checks&Radios: __
Entryes: ________
All commands: ____
    1] PAGE 0
    2] gumppic 212 391 2229
    3] gumppic 246 392 2226
    4] gumppic 222 381 2230
    5] gumppic 262 388 2226
    6] button 180 325 2228 2228 1 1 1
    7] button 360 325 2232 2232 1 1 2
    8] resizepic 160 320 5170 240 240
    9] text 215 322 152 0
   10] text 190 345 0 1
   11] button 347 464 2228 2228 1 1 9
   12] button 211 465 2225 2225 1 1 10
   13] button 261 463 2226 2226 1 1 3
   14] button 289 465 2227 2227 1 1 4
   15] button 246 509 2230 2230 1 1 5
   16] button 347 497 2232 2232 1 1 6
   17] button 215 508 2229 2229 1 1 7
   18] button 290 507 2231 2231 1 1 8
   19] gumppic 217 375 2228
   20] gumppic 264 376 2232
   21] text 190 403 0 2
   22] text 190 415 0 3
   23] text 300 415 0 4
Text: ____________
    0] Antimacros System
    1] Choose this protection code
    2] ----------------------
    3] Entering code:
    4] 4
Reply: ___________
 [0006] primary reply
 Checks&Radios (0)
 Entryes (0)

some · Post by **some** » 2014-02-22 14:36:51

Juicy Fruit wrote:
some wrote:пс - могу скинуть этот же антимакрос на стелсе, может допетришь как работает
Давай

2Incorrect User
Ты со старой инжи снимал infogump?

procedure GumpWorkOut;
var
gi :TGumpInfo;
code1 : Cardinal;
code2 : Cardinal;
i : Integer;
//released_id : Cardinal;

begin
//UOSay('tyt');
GetGumpInfo(GetGumpsCount-1, gi);
code1 := gi.GumpButtons[0].released_id; // код картинки первой кнопки
code2 := gi.GumpButtons[1].released_id; // код картинки второй кнопки

// цикл по оставшимся кнопкам
for i := 2 to GetArrayLength(gi.GumpButtons)-1 do
begin
if gi.GumpButtons[i].released_id = code1 then // если код картинки совпадает, то...
begin
NumGumpButton(GetGumpsCount-1, gi.GumpButtons[i].return_value); // нажимаем эту кнопку
break; // и заканчиваем цикл
end;
end;
Wait(1000);
GetGumpInfo(GetGumpsCount-1, gi);
for i := 2 to GetArrayLength(gi.GumpButtons)-1 do
begin
if gi.GumpButtons[i].released_id = code2 then
begin
NumGumpButton(GetGumpsCount-1, gi.GumpButtons[i].return_value);
break;
end;
end;
end;

автор кода - drabadan http://stealth.od.ua/forum/memberlist.p ... ile&u=2531

Incorrect User · Post by **Incorrect User** » 2014-02-26 19:20:48

Ап ребята

Nmy · Post by **Nmy** » 2014-02-27 14:20:42

Как бы нажать надо на
6] utton 220 295 2230 2230 1 1
И скрипт определяет что нажать надо на
15] utton 285 480 2230 2230 1 1

И если я правильно помню то 285 480 это X:Y и дальше туда клацаем мышкой

uo.LClick(Val(Mid(ButtonText, 7, 3)), Val(Mid(ButtonText, 11, 3)))

Val(Mid(ButtonText, 7, 3)) = 285
Val(Mid(ButtonText, 11, 3)) = 480

Incorrect User · Post by **Incorrect User** » 2014-02-27 14:28:32

Нужно сделать чтобы без Lclick, с исползованием новых функций viewtopic.php?f=1&t=17279&start=280#p95963

Juicy Fruit · Post by **Juicy Fruit** » 2014-02-27 15:18:18

Да, там нужно порезать 0 и 1 кнопки (как видно из скрипта на Стелс), оставить последние цифры в них - это индексы кнопок нужных, а дальше просто uo.SendGumpSelect() по 0 кнопке и uo.WaitGump() по 1 кнопке сделать.

Nmy · Post by **Nmy** » 2014-02-27 15:29:17

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

Incorrect User · Post by **Incorrect User** » 2014-02-27 15:41:33

В ЛС. Кирку в руки бери и увидишь антимакрос.

Nmy · Post by **Nmy** » 2014-02-27 17:47:14

Code: Select all

sub main()
   dim button[10]
   button[1] = 10
   button[2] = 3
   button[3] = 4
   button[4] = 9
   button[5] = 7
   button[6] = 5
   button[7] = 8
   button[8] = 6
   
   var b0 = Val(Mid(uo.lastgump("button",0),21,1))
   var b1 = Val(Mid(uo.lastgump("button",1),21,1))
   uo.waitgump(button[b1])
   uo.sendgumpselect(button[b0])
end sub

Incorrect User · Post by **Incorrect User** » 2014-02-27 17:52:55

Спасибо.

Yoko

Антимакрос

Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос

Re: Антимакрос