Yoko

All sides of Injection
It is currently 2018-10-18 21:16:40

All times are UTC+02:00




Post new topic  Reply to topic  [ 5 posts ] 
Author Message
 Post subject: Gump Script
PostPosted: 2017-01-23 15:59:28 
Offline

Joined: 2017-01-23 15:28:45
Posts: 3
Hello, I'm trying to write a simple anti captcha but can't get it working.. it only require write the text in [] (first a letter then two numbers).

This is the gump info:
Code:
_____infogump_______
injection id   0x31a6cfb8
serial   0x000321dc
gumpid   0x000004bb
X   170
Y   160
in client    yes
458   packet size
0   reply packet size
Buttons: ________
    8 [    1] image=0x0FBE at 367:145
Checks&Radios: __
Entryes: ________
    9 [    1] 83:130*330:35 []
All commands: ____
    1] nomove
    2] resizepic 60 0 5120 370 170
    3] text 83 20 56 0
    4] text 83 100 80 4
    5] text 83 144 80 3
    6] htmlgump 83 40 300 65 1 0 1
    7] resizepic 74 125 3000 345 20
    8] button 367 145 4030 4031 1 0 1
    9] textentry 83 130 330 35 1152 1 2
Text: ____________
    0] Anti Makro System
    1] Girilmesi Gerek Kod [n03]
    2] Enter The Kod [n03]
    3] Write the code on textbox
    4]


Script:
Code:
sub afkcheck()
   repeat
      if uo.LastGump('text',0) == 'Anti Makro System' and uo.LastGump('replyed') == 0 then
         uo.lclick(269,294)
         uo.say(GetSNum(uo.LastGump('text', 3)))
         wait(250)
         uo.sendgumpselect(1)
      endif
      wait(500)
   until uo.dead()
end sub

sub GetSNum(s)
   var l = 14
   var SNum = ''
   while s[l] <> '['
      SNum = SNum+s[l]
      l = l+2
   wend
   return SNum
end sub


Last edited by airnax on 2017-01-25 10:14:38, edited 1 time in total.

Top
   
 Post subject: Re: AFK Gump Script Help
PostPosted: 2017-01-24 10:13:54 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2150
Location: Latvia
uo.say(GetSNum(uo.LastGump('text', 2)))

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject: Re: AFK Gump Script Help
PostPosted: 2017-01-24 10:34:04 
Offline

Joined: 2017-01-23 15:28:45
Posts: 3
Thanks for your reply.
If I do uo.say(GetSNum(uo.LastGump('text', 2))) it don't write anything, there is a problem with GetSNum but cant find the wrong.

If I do uo.say(uo.LastGump('text', 3)) it write: Enter The Kod [n03].


Top
   
 Post subject: Re: AFK Gump Script Help
PostPosted: 2017-01-24 11:45:08 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2150
Location: Latvia
maybe this will help

Code:
sub test()
   var msg = "Enter The Kod [n03]"
   uo.say(GetSNum(msg))
endsub
sub GetSNum(s)
   var n, ret=""
   for n=0 to Len(s)-1
       if s[n] == "[" then
          ret = s[n+1] + s[n+2] + s[n+3]
          return ret
       endif
   next
end sub

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject: Re: AFK Gump Script Help
PostPosted: 2017-01-24 16:04:44 
Offline

Joined: 2017-01-23 15:28:45
Posts: 3
Thanks it work perfect


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 5 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited