Yoko
http://forum.yoko.com.ua/

I need Anti Macro
http://forum.yoko.com.ua/viewtopic.php?f=17&t=12991		 Page 1 of 1
Author:  malves [ 2008-01-02 14:06:57 ]
Post subject:  I need Anti Macro
Hello, I need a script to answer a antimacro. Already tried to create and modify many but never successfully.

Looks like is the antimacro ... The first is a ball with the word "Anti Macro" You click on it and then appears a gump with some numbers. You enter these numbers if you have everything right and it appears the message "Antimacro respondido com sucesso" if he did not back the beginning ... See the ball ...

The numbers that appear on gump are always this way ...

{ 3, 4, 6 }
{ 6, 5, 2, 3 }
{ 2, 1, 3 }
{ 7, 8, 9, 0 }

3 or 4 numbers!

1º:
Image

Code:
_____infogump_______
serial   0x65478ff4
gumpid   0x000864df
X   0
Y   0
108   packet size
0   reply packet size
Buttons: ________
 page 0
    1 [    1] image=0x1582 at 3:359
Checks&Radios: __
Entryes: ________
All commands: ____
    1] NoClose
    2] button 3 359 5505 5506 1 0 1
    3] text 0 418 38 0
Text: ____________
    0] Anti Macro

---------------------------

_____infogump_______
serial   0x65478ff4
gumpid   0x0008e987
X   0
Y   0
108   packet size
0   reply packet size
Buttons: ________
 page 0
    1 [    1] image=0x1582 at 3:423
Checks&Radios: __
Entryes: ________
All commands: ____
    1] NoClose
    2] button 3 423 5505 5506 1 0 1
    3] text 0 482 38 0
Text: ____________
    0] Anti Macro

---------------------------

_____infogump_______
serial   0x65478ff4
gumpid   0x0008e65f
X   0
Y   0
108   packet size
0   reply packet size
Buttons: ________
 page 0
    1 [    1] image=0x1582 at 3:108
Checks&Radios: __
Entryes: ________
All commands: ____
    1] NoClose
    2] button 3 108 5505 5506 1 0 1
    3] text 0 167 38 0
Text: ____________
    0] Anti Macro

---------------------------

_____infogump_______
serial   0x65478ff4
gumpid   0x0008e4hg
X   0
Y   0
108   packet size
0   reply packet size
Buttons: ________
 page 0
    1 [    1] image=0x1582 at 3:359
Checks&Radios: __
Entryes: ________
All commands: ____
    1] NoClose
    2] button 3 359 5505 5506 1 0 1
    3] text 0 418 38 0
Text: ____________
    0] Anti Macro


Quote:
1 [ 1] image=0x1582 at 3:359
1 [ 1] image=0x1582 at 3:108
1 [ 1] image=0x1582 at 3:423


When you click it appears the other gump (3 or 4 numbers)...

2º:

Image

Image

Image


3 numbers!
Code:
_____infogump_______
serial   0x65478ff4
gumpid   0x000926f2
X   0
Y   0
336   packet size
33   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] { 6, 6, 0 }
    3] { 6, 6, 0 }
Reply: ___________
 [001F] primary reply
 Checks&Radios (0)
 Entryes (1)
  [0001] 660
0000: 36 36 30 -- -- -- -- -- -- -- -- -- -- -- -- -- : 660

****************************

_____infogump_______
serial   0x65478ff4
gumpid   0x00087j45
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] { 6, 7, 3 }
    3] { 6, 7, 3 }
Reply: ___________
 [001F] primary reply
 Checks&Radios (0)
 Entryes (1)
  [0001] 673
0000: 36 37 33 -- -- -- -- -- -- -- -- -- -- -- -- -- : 673

****************************
_____infogump_______
serial   0x65478ff4
gumpid   0x000866hg
X   0
Y   0
336   packet size
33   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] { 5, 7, 8 }
    3] { 5, 7, 8 }
Reply: ___________
 [001F] primary reply
 Checks&Radios (0)
 Entryes (1)
  [0001] 578
0000: 35 37 38 -- -- -- -- -- -- -- -- -- -- -- -- -- : 578


Image

Image


4 numbers!
Code:
_____infogump_______
serial   0x65478ff4
gumpid   0x00093654
X   0
Y   0
342   packet size
35   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] { 2, 8, 1, 0 }
    3] { 2, 8, 1, 0 }
Reply: ___________
 [001F] primary reply
 Checks&Radios (0)
 Entryes (1)
  [0001] 2810
0000: 32 38 31 30 -- -- -- -- -- -- -- -- -- -- -- -- : 2810

****************************

_____infogump_______
serial   0x65478ff4
gumpid   0x000ae435
X   0
Y   0
342   packet size
35   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] { 8, 0, 8, 8 }
    3] { 8, 0, 8, 8 }
Reply: ___________
 [001F] primary reply
 Checks&Radios (0)
 Entryes (1)
  [0001] 8088
0000: 38 30 38 38 -- -- -- -- -- -- -- -- -- -- -- -- : 8088



If you answer all sure it appears the message "Antimacro respondido com sucesso"

3º:
Image



Someone please help me?
Author:  Grin [ 2008-01-02 14:21:42 ]
Post subject: 
http://forum.yoko.com.ua/viewtopic.php?t=12756&highlight=digite++numeros
Author:  malves [ 2008-01-02 14:57:11 ]
Post subject: 
I saw this topic. But not worked.
I tried to change but also not getting success.

Then created a topic a little more explanatory that the DogStyle to see if helped.

It seems that not worked for the DogStyle also.
Author:  Grin [ 2008-01-02 16:14:01 ]
Post subject: 
Code:
sub Solve() 

   var code = "" 
   var line = "" 
   var i = 0 
   button 3 359 
   if not uo.LastGump('replyed') then 
      if uo.LastGump('text', 0) == 'Anti Macro' then 
         uo.LClick(3, val(Right(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

try
Author:  SmokeHemp [ 2008-02-10 14:38:16 ]
Post subject: 
Says error on line 6
Author:  Grin [ 2008-02-10 14:54:27 ]
Post subject: 
Code:
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(Right(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

turn on your mind
Author:  SmokeHemp [ 2008-02-10 15:23:49 ]
Post subject: 
Im not much of scripting. In fact i just started out =) Thanx !

EDIT: if i just run the script, it will automatically response for every gump for the "antimacro" that appears ?
Author:  Grin [ 2008-02-10 15:33:34 ]
Post subject: 
this is a function reply on one of two gumps and return (if UO gump was return 1, Numbers return 2, nothing 0)...
All other are for you...
Author:  SmokeHemp [ 2008-02-10 15:44:33 ]
Post subject: 
How could i make this active while i play? Maybe some kind of "while" command ?

Also, the script oppens up the gump, but doesnt answer it. Do u know how this could be fixed?
Author:  Grin [ 2008-02-10 15:46:45 ]
Post subject: 
i have no uo now and can't check
Author:  SmokeHemp [ 2008-02-10 16:25:55 ]
Post subject: 
No problem at all. Pheraphs the gump is difrerent... the gump posted by the hoster of the topic plays in a server thats almost like mine, but a little different... my gump of pressing the numbers would be this

Code:
_____infogump_______
serial   0x027ee33d
gumpid   0x00049b74
X   0
Y   0
429   packet size
33   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] HtmlGump 55 75 280 60 0 0 0
    4] resizepic 70 130 3000 150 20
    5] TextEntry 70 130 150 20 900 3 1
    6] button 115 160 2130 2129 1 0 2
Text: ____________
    0] Tentativas: 1<br>Digite os numeros abaixo:<br>      { 9, 9, 4 }<br><br><br><br><br>Precisa de Ajuda ? Clique aqui
    1] Tentativas: 1<br>Digite os numeros abaixo:<br>      { 9, 9, 4 }<br><br><br><br><br>Precisa de Ajuda ? Clique aqui
Reply: ___________
 [0002] primary reply
 Checks&Radios (0)
 Entryes (1)
  [0003] 994
0000: 39 39 34 -- -- -- -- -- -- -- -- -- -- -- -- -- : 994


dont know if makes any difference, cause the gump looks like almost the same, but with other resizepic.
Author:  Grin [ 2008-02-10 16:30:51 ]
Post subject: 
infogump isn't same, function willn't work
Author:  SmokeHemp [ 2008-02-10 19:41:49 ]
Post subject: 
Can o try to remake it for this next gump ? if there is no bother of course.
Author:  SmokeHemp [ 2008-02-10 22:18:47 ]
Post subject: 
Ok, i studyed the scripts carefully and noticed a big difference.

You called an If(text2="") , then goes on the script...
BUT, on the second gump, we have the "random numbers" inside this text, we have this

Code:
 Tentativas: 1<br>Digite os numeros abaixo:<br>      { 9, 9, 4 }<br><br><br><br><br>Precisa de Ajuda ? Clique aqui


What i think should be done (that i dont know how to do)?

I Should verify that if with something shorter, like "Tentativas", the first word. Then i would need a LEN or something to catch up the { 9, 9, 4 } random numbers. Then i think i would need some method i dont know, to identify if its 3, 4 or 5 characters. I have no idea on how ill do that, so if someone could help me i would apreciate alot.



EDIT: just thinkin, can i separate the strings by the <BR>s ?
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/