Help to fix my anti macro script

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
DogStyle
Posts: 17
Joined: 2007-03-19 18:25:51

Help to fix my anti macro script

Post by DogStyle »

Hi there.

for a long time i have been using this script since they catch us and change the gump information.

----- OLD SCRIPT -----

Code: Select all

sub GetWord(string, num)
   var pstart = 0
   var n = 0
   string = string+' '
   for var i = 0 to Len(string)
      if Mid(string, i, 1) == ' ' then
         n = n+1
         if n == num then
            return Mid(string, pstart, i-pstart)
         endif
         pstart = i+1
      endif
   next
   return ''
endsub

Sub ArrayToString(Array)
   var num = ''
   var n = (Len(Array)-2)/3
   if n >= 1 then
      for var i = 1 to n
         num = num+Mid(Array, i*3-1, 1)
      next
   endif
   return num
endsub

sub Antimacro()
inicio:
uo.press(118)
if uo.LastGump('text') == 'Anti Macro' then
uo.LClick(3, val(GetWord(uo.LastGump('command', 1), 3)))
goto responder
endif
goto inicio
responder:
if uo.LastGump('text',1) == 'Digite os numeros abaixo:' then
uo.LClick(70, 130)
wait(2000)
uo.say(ArrayToString(uo.LastGump('text', 2)))
wait(2000)
uo.LClick(120, 190)
goto inicio
endif
goto responder
endsub


-- FIRST GUMP IMAGE --

Image
this gump is not important

-- SECOND GUMP IMAGE --

Image


-- NEW GUMP INFORMATION (second gump image) --

Code: Select all

_____infogump_______
serial   0x029215a5
gumpid   0x0021028e
X   0
Y   0
789   packet size
0   reply packet size
Buttons: ________
 page 0
    1 [    2] image=0x0851 at 115:160
Checks&Radios: __
Entryes: ________
All commands: ____
    1] noclose
    2] resizepic 40 50 3500 200 150
    3] resizepic 70 130 3000 150 20
    4] TextEntry 70 130 150 20 900 3 3
    5] button 115 160 2130 2129 1 0 2
    6] text 55 75 0 0
    7] text 55 90 0 1
    8] text 100 110 0 11
    9] text 125 110 0 12
   10] text 150 110 0 13
Text: ____________
    0] Tentativas: 1
    1] Digite os numeros abaixo:
    2] Tentativas: 1<br>Digite os numeros abaixo:<br>      { 5, 0, 1, 9, 7 }<br><br><br><br><br>Precisa de Ajuda ? Clique aqui
    3] Tentativas: 1<br>Digite os numeros abaixo:<br>      { 5, 0, 1, 9, 7 }<br><br><br><br><br>Precisa de Ajuda ? Clique aqui
    4] pid 30166
    5] ClientAuthenticationHash e53991521f5bc3b12593928d193aea79
    6] {2,
    7] 1,
    8] 1,
    9] 3,
   10] 8}
   11] {6,
   12] 6,
   13] 5}


-- NOTES --

The answers are the last three or four numbers between "{ }" in this case { 665 } is the right answer.

The old script is typing wrong lines.


anyone could fix that?

thx a lot
Last edited by DogStyle on 2009-03-15 07:58:35, edited 1 time in total.
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Post more infogump reports and screenshots.
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Telegram: @tatikom
DogStyle
Posts: 17
Joined: 2007-03-19 18:25:51

Post by DogStyle »

I guess image is not necessary in this case, because this script is WORKING, the only thing is, it is typing WRONG LINES to answer. we just need to fix that.
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Code: Select all

var text
text = uo.lastgump( 'text', 11 )
text = text + uo.lastgump( 'text', 12 )
text = text + uo.lastgump( 'text', 13 )
uo.say( text[1] + text[3] + text[5] )

Its doesnt work, i know.

Are u really need help ?
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Telegram: @tatikom
DogStyle
Posts: 17
Joined: 2007-03-19 18:25:51

Post by DogStyle »

yeah i need help ¬¬


i need someone who knows how to fix that...... i would like to fix by my self but i cant.


someone?
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

If you want to - you can see the topics on the forum. Many people treated with similar problems and they help me and Grin.

So I repeat once again:

>>Post more infogump reports and screenshots.

To understand another's code is often more complicated than write your own.

Translated into English with Google.

PS: You infogump reports must be with Reply section.
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Telegram: @tatikom
Post Reply