Page 1 of 1
Антимакрос
Posted: 2014-02-13 22:14:25
by Incorrect User
Вот пример гампа
Code: Select all
_____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 переделал этот антимакрос всего в несколько строчек. Хочу понять основы, не могу написать его сам, каждый раз приходится искать готовый

Re: Антимакрос
Posted: 2014-02-13 22:23:22
by some
ты лучше скажи как щас играешь на фв и не палишься . защиту же новую ввели
Re: Антимакрос
Posted: 2014-02-13 22:30:09
by Incorrect User
Тебя спалили? А защита смотря на что? Фастлут, резка, спидхак или что?
Re: Антимакрос
Posted: 2014-02-17 03:28:36
by some
ну каждый месяц они теперь смотрят логи и выцепляют по ним.
вот я о чем ( пс - могу скинуть этот же антимакрос на стелсе, может допетришь как работает )
Re: Антимакрос
Posted: 2014-02-17 10:38:22
by Incorrect User
От стелса не надо.
А про защиту, я нашел, один из ГМов писал
защита проверяет файлы, а так же делает шифрование передаваемого потока.
Это я хз, спалит или нет, меня это не беспокоит.
Re: Антимакрос
Posted: 2014-02-18 23:24:48
by Incorrect User
Ладно, тогда переделайте его, если есть добрые люди

под новый инжект, чтобы без Lclick, ну и компактно. Zero помоги)
Re: Антимакрос
Posted: 2014-02-21 14:40:20
by Incorrect User
Ап

Re: Антимакрос
Posted: 2014-02-21 16:59:34
by Juicy Fruit
some wrote:пс - могу скинуть этот же антимакрос на стелсе, может допетришь как работает
Давай
2Incorrect User
Ты со старой инжи снимал infogump?
Re: Антимакрос
Posted: 2014-02-21 17:41:14
by Incorrect User
Этот был из 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)
Re: Антимакрос
Posted: 2014-02-22 14:36:51
by some
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
.released_id = code1 then // если код картинки совпадает, то...
begin
NumGumpButton(GetGumpsCount-1, gi.GumpButtons.return_value); // нажимаем эту кнопку
break; // и заканчиваем цикл
end;
end;
Wait(1000);
GetGumpInfo(GetGumpsCount-1, gi);
for i := 2 to GetArrayLength(gi.GumpButtons)-1 do
begin
if gi.GumpButtons.released_id = code2 then
begin
NumGumpButton(GetGumpsCount-1, gi.GumpButtons.return_value);
break;
end;
end;
end;
автор кода - drabadan http://stealth.od.ua/forum/memberlist.p ... ile&u=2531
Re: Антимакрос
Posted: 2014-02-26 19:20:48
by Incorrect User
Ап ребята
Re: Антимакрос
Posted: 2014-02-27 14:20:42
by Nmy
Как бы нажать надо на
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
Re: Антимакрос
Posted: 2014-02-27 14:28:32
by Incorrect User
Нужно сделать чтобы без Lclick, с исползованием новых функций
https://yoko.uokit.com/viewtopic.php?f= ... 280#p95963
Re: Антимакрос
Posted: 2014-02-27 15:18:18
by Juicy Fruit
Да, там нужно порезать 0 и 1 кнопки (как видно из скрипта на Стелс), оставить последние цифры в них - это индексы кнопок нужных, а дальше просто uo.SendGumpSelect() по 0 кнопке и uo.WaitGump() по 1 кнопке сделать.
Re: Антимакрос
Posted: 2014-02-27 15:29:17
by Nmy
я уже много чего забыл. если даш все чтоб зайти на сервер и акк, то хотя бы могу посмотреть что получится
Re: Антимакрос
Posted: 2014-02-27 15:41:33
by Incorrect User
В ЛС. Кирку в руки бери и увидишь антимакрос.
Re: Антимакрос
Posted: 2014-02-27 17:47:14
by Nmy
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
Re: Антимакрос
Posted: 2014-02-27 17:52:55
by Incorrect User
Спасибо.