Anti macro for FW

Mazer · Post by **Mazer** » 2007-11-17 09:10:48

Again me

maybe some one have or can make a scrip for anti macros ?
Shard - Forgotten world
this isn info

this is first what you get then you click pickaxe then you close and try to mine again it shows again with other code. this is info gump :

Code: Select all

_____infogump_______
serial   0x000b3863
gumpid   0x000000b3
X   0
Y   0
781   packet size
0   reply packet size
Buttons: ________
Checks&Radios: __
Entryes: ________
All commands: ____
    1] AGE 
    2] umppic 215 322 223
    3] umppic 266 328 222
    4] umppic 217 315 223
    5] umppic 250 334 222
    6] utton 180 265 2228 2228 1 1 
    7] utton 360 265 2230 2230 1 1 
    8] esizepic 160 260 5170 240 24
    9] ext 215 262 152 
   10] ext 190 285 0 
   11] utton 342 391 2228 2228 1 1 
   12] utton 226 402 2225 2225 1 1 1
   13] utton 247 407 2226 2226 1 1 
   14] utton 300 390 2227 2227 1 1 
   15] utton 262 441 2230 2230 1 1 
   16] utton 340 452 2232 2232 1 1 
   17] utton 210 437 2229 2229 1 1 
   18] utton 293 430 2231 2231 1 1 
   19] umppic 206 319 222
   20] umppic 260 320 223
   21] ext 190 343 0 
   22] ext 190 355 0 
   23] ext 300 355 0 
Text: ____________
    0] Antimacros System
    1] Choose this protection code
    2] ----------------------
    3] Entering code:
    4] 0

So then you press corect answer

another gump shows

and this is info gump again

Code: Select all

_____infogump_______
serial   0x000b3863
gumpid   0x000000b3
X   0
Y   0
781   packet size
0   reply packet size
Buttons: ________
Checks&Radios: __
Entryes: ________
All commands: ____
    1] AGE 
    2] umppic 226 333 222
    3] umppic 255 314 222
    4] umppic 225 331 223
    5] umppic 246 312 222
    6] utton 180 265 2228 2228 1 1 
    7] utton 360 265 2230 2230 1 1 
    8] esizepic 160 260 5170 240 24
    9] ext 215 262 152 
   10] ext 190 285 0 
   11] utton 330 400 2228 2228 1 1 
   12] utton 205 396 2225 2225 1 1 1
   13] utton 259 392 2226 2226 1 1 
   14] utton 295 390 2227 2227 1 1 
   15] utton 257 448 2230 2230 1 1 
   16] utton 338 436 2232 2232 1 1 
   17] utton 216 439 2229 2229 1 1 
   18] utton 287 448 2231 2231 1 1 
   19] umppic 207 317 222
   20] umppic 260 327 223
   21] ext 190 343 0 
   22] ext 190 355 0 
   23] ext 300 355 0 
Text: ____________
    0] Antimacros System
    1] Choose this protection code
    2] ----------------------
    3] Entering code:
    4] 4

thats end

and gump

Code: Select all

_____infogump_______
serial   0x000b3863
gumpid   0x000000b3
X   0
Y   0
781   packet size
23   reply packet size
Buttons: ________
Checks&Radios: __
Entryes: ________
All commands: ____
    1] AGE 
    2] umppic 226 333 222
    3] umppic 255 314 222
    4] umppic 225 331 223
    5] umppic 246 312 222
    6] utton 180 265 2228 2228 1 1 
    7] utton 360 265 2230 2230 1 1 
    8] esizepic 160 260 5170 240 24
    9] ext 215 262 152 
   10] ext 190 285 0 
   11] utton 330 400 2228 2228 1 1 
   12] utton 205 396 2225 2225 1 1 1
   13] utton 259 392 2226 2226 1 1 
   14] utton 295 390 2227 2227 1 1 
   15] utton 257 448 2230 2230 1 1 
   16] utton 338 436 2232 2232 1 1 
   17] utton 216 439 2229 2229 1 1 
   18] utton 287 448 2231 2231 1 1 
   19] umppic 207 317 222
   20] umppic 260 327 223
   21] ext 190 343 0 
   22] ext 190 355 0 
   23] ext 300 355 0 
Text: ____________
    0] Antimacros System
    1] Choose this protection code
    2] ----------------------
    3] Entering code:
    4] 4
Reply: ___________
 [0005] primary reply
 Checks&Radios (0)
 Entryes (0)

Thats enough info or you need something else ?

some · Post by **some** » 2007-11-19 22:11:14

Присоединяюсь к вышеописанному посту !
Аналогичную проблему уже постил в разделе покупки скриптов но топик захлебнулся.
Может кто помочь ?

KTO nyKHyJI??? · Post by **KTO nyKHyJI???** » 2007-11-19 22:49:10

грин про в этом деле )

Grin · Post by **Grin** » 2007-11-19 22:53:43

Что изменилось? посути мало чего... добавили 2 кропки для отводаглаз и изменили порядок кнопок с труктуре гампа... в чем сложности???
стало

Code: Select all

Code: Select all

sub OneClick() 

   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 

sub AntiMacro() 

   while not uo.Dead() 
      if not uo.LastGump('replyed') then 
         if uo.LastGump('text', 0) == 'Antimacros System' then 
            OneClick() 
         end if 
      endif 
      wait(500) 
   wend 
    
end sub

Да и обновите инжект в разделе Inject MOD

Mazer · Post by **Mazer** » 2007-11-20 15:37:41

i think that dosent work.. :/

Scripts Writer · Post by **Scripts Writer** » 2007-11-20 16:03:34

Mazer wrote:i think that dosent work.. :/

Try to write something yourself. I'm glad to see ur working scp

Mazer · Post by **Mazer** » 2007-11-20 16:05:34

im sorry that works

and i have tried

but i dont want to show ;D

it sux

some · Post by **some** » 2007-11-21 21:25:11

Уважаемые господа эксперты , а почему скрипт на антимакрос иногда не срабатывает ?
Вместо того чтобы закрывать сообщение о том что я капаю на макросе , совершается что-то непонятное и эти сообщения вылазиют одно на другое , не успевая закрываться
Что делать ?

mirag · Post by **mirag** » 2007-11-29 17:12:42

Неполучается его Юзать (( пишет что там какаято строчка неверна )))
я просто ваще в инже неале ))
обьясните плиз может там чето изменить надо.... :oops:

CuHTpoH · Post by **CuHTpoH** » 2007-12-15 09:39:29

отлично всё работает, респект Грину

NOs · Post by **NOs** » 2007-12-23 18:23:01

нде

NewLineCinema · Post by **NewLineCinema** » 2008-03-22 17:52:27

Grin wrote:Что изменилось? посути мало чего... добавили 2 кропки для отводаглаз и изменили порядок кнопок с труктуре гампа... в чем сложности???
стало

Code: Select all

Code: Select all

sub OneClick() 

   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 

sub AntiMacro() 

   while not uo.Dead() 
      if not uo.LastGump('replyed') then 
         if uo.LastGump('text', 0) == 'Antimacros System' then 
            OneClick() 
         end if 
      endif 
      wait(500) 
   wend 
    
end sub

Да и обновите инжект в разделе Inject MOD

Кто-нибудь доработал этот макрос?
Все время выдается ошибка что не правильная операция для ButtonID в этой строчке: uo.LClick(Val(Mid(ButtonText, 7, 3)), Val(Mid(ButtonText, 11, 3)))

NewLineCinema · Post by **NewLineCinema** » 2008-03-22 19:07:58

Все разобрался!
Это решило мою проблему:
http://narod.yandex.ru/100.xhtml?filebu ... umpfix.rar

some · Post by **some** » 2008-03-28 10:08:46

Так грин еще очень давно говорил что только на гампфиксе работает его антимакрос

Syskilla · Post by **Syskilla** » 2008-10-29 19:49:27

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

Syskilla · Post by **Syskilla** » 2008-10-29 20:09:12

действительно иногда срабатывает само но бывает порой альттабаешся в УО а там окон 100 с этим антимакросом... ТТ что делать
скрипт на лумбер переписывал дня два а здесь всё просто но нифига не разбираюсь в этих

dim reindex[8]
reindex[0] = 11
reindex[1] = 12
reindex[2] = 13
reindex[3] = 10
и т.д