Yoko

hi there.

i need some help to make a script. this script has to answer a kind of macro check. and they use gump for it. by the way, injection can answer it. i guess.


GUMPINFO 1:

First we have to click on it:
_____infogump_______
serial 0x01361d63
gumpid 0x0008b297
X 0
Y 0
107 packet size
0 reply packet size
Buttons: ________
page 0
1 [ 1] image=0x1582 at 3:67
Checks&Radios: __
Entryes: ________
All commands: ____
1] NoClose
2] button 3 67 5505 5506 1 0 1
3] text 0 126 38 0
Text: ____________
0] Anti Macro

IMG GUMP1:


GUMP INFO 2:
and then comes the numbers that we have to write.

_____infogump_______
serial 0x01361d63
gumpid 0x0008b297
X 0
Y 0
336 packet size
0 reply packet size
Buttons: ________
page 0
1 [ 31] image=0x0851 at 120:190
Checks&Radios: __
Entryes: ________
All commands: ____
1] noclose
2] resizepic 50 50 2620 200 200
3] text 60 75 900 1
4] text 60 60 900 0
5] text 100 95 900 2
6] resizepic 70 130 3000 150 20
7] TextEntry 70 130 150 20 900 1 3
8] button 120 190 2130 2129 1 0 31
Text: ____________
0] Tentativas: 1
1] Digite os numeros abaixo:
2] { 0, 0, 3 }
3] { 0, 0, 3 }


IMG GUMP 2:

I will try to explain ( my english is not so good).

First you hacve to click to open the MACRO CHECK.

now you have write the numbers and click OK to answer.

Help me plz

What does need to do in second gump? Choose one of digit in "{}" or something else?
And this antimacro have already soleved. Try to search.

first of all you have to click on this ball...

now you have to write all numbers between " { } " but sometimes its not only
three (3) numbers, sometimes is four(4) or five(5).


thx for your help

sub Solve()

   var code = ""
   var line = ""
   var i = 0
   
   if not uo.LastGump('replyed') then
      if uo.LastGump('text', 0) == 'Anti Macro' then
         uo.LClick(3, val(Left(uo.LastGump('button', 0), 3)))
         repeat
            wait(1000)
         until uo.LastGump('replyed', 0)
         return 1
      else
         if uo.LastGump('text', 1) == 'Digite os numeros abaixo:' then
            line = uo.LastGump('text', 2)
            for i = 0 to int(len(line)/3)-1
               code = code+line[2+i*3]
            next
            uo.Say(code)
            wait(1000)
            line = Right(uo.LastGump('button', 0), 7)
            uo.LClick(val(Left(line, 3)), val(Right(line, 3)))
            repeat
               wait(1000)
            until uo.LastGump('replyed', 0)
            return 2
         end if
      end if
   endif
   
end sub

If first gump apear it's do click and return 1
second enter numbers (is TextEntry clear?) then click and return 2
if nothing return 0

its not working. macro cant click on the right place...

the first click is wrong. hits the top left of the window.


O.O

i click by my self, and didnt happen anything. macro still running until i answer by my self.

What is your shard?
Give me address

my shard is this one:

www.uochaos.com.br

it is in portuguese :/

and remember.... as i said. sometimes is not only three numbers..

cometimes is four or five. the minimum is three.


:/ its not working