Anti Macross [Need Help] End & Ru

_____infogump_______
serial   0x40033222
gumpid   0x00000408
X   100
Y   100
279   packet size
0   reply packet size
Buttons: ________
Checks&Radios: __
Entryes: ________
All commands: ____
    1] esizepic 0 0 3500 333 11
    2] ext 99 7 1152 
    3] ext 35 48 32 
    4] ext 78 77 152 
    5] ext 35 77 1152 
    6] extentry 150 48 253 25 1152 1 
    7] utton 250 77 2311 2312 1 1 
Text: ____________
    0] Fix macros sys
    1] Enter code :
    2] 1172
    3] Code :
    4] ****

Top

Profile

Reply with quote

enamy

Post subject:

PostPosted: 2008-05-26 08:26:41

Offline

Joined: 2008-05-21 09:58:20
Posts: 4

Top

Profile

Reply with quote

Grin

Post subject:

PostPosted: 2008-05-26 13:47:42

Offline

Expert!

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва

1. Установить фокус на поле ввода если его нет.
2. Очистить поле ввода (chr(8))
3. Заполнить поле ввода (say(code))

ну и uo.LastGump(...)

Top

Profile

Reply with quote

Destruction

Post subject:

PostPosted: 2008-05-26 16:28:22

Offline

Junior Expert

Joined: 2004-06-24 22:08:56
Posts: 3220

Code:

sub antimacro()
   var i
   repeat
      if uo.lastgump( "replyed" ) == 0 && uo.lastgump( "gumpid" ) == "0x00000408" then
         uo.lclick( 255,  150 )
         for i = 0 to 3
            uo.say( chr( 8 ) )
         next
         uo.say( uo.lastgump( "text", 2 ) )
         uo.lclick( 355, 180 )
         while uo.lastgump( "replyed" ) == 0
            wait( 50 )
         wend
      endif
      wait( 100 )
   until false
endsub

Теоретически так, но имхо - навярняка где-нибудь напутал... Гампы зло

_________________
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.
Skype: d119060

Top

Profile

Reply with quote

enamy

Post subject:

PostPosted: 2008-05-27 13:46:33

Offline

Joined: 2008-05-21 09:58:20
Posts: 4

Destruction wrote:

sub antimacro()
var i
repeat
if uo.lastgump( "replyed" ) == 0 && uo.lastgump( "gumpid" ) == "0x00000408" then
uo.lclick( 255, 150 )
for i = 0 to 3
uo.say( chr( 8 ) )
next
uo.say( uo.lastgump( "text", 2 ) )
uo.lclick( 355, 180 )
while uo.lastgump( "replyed" ) == 0
wait( 50 )
wend
endif
wait( 100 )
until false
endsub

Теоретически так, но имхо - навярняка где-нибудь напутал... Гампы зло

Vse vrode ok toka on steraet toka odnu *... tri ise ostajotsa

Top

Profile

Reply with quote

Grin

Post subject:

PostPosted: 2008-05-27 14:01:37

Offline

Expert!

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва

Code:

 for i = 0 to 3
uo.say( chr( 8 ) )
wait(400)
next

Очень странно... или слишком быстро приходят клавиши или фокус пропадает с поля ввода...

Top

Profile

Reply with quote

Destruction

Post subject:

PostPosted: 2008-05-27 14:50:57

Offline

Junior Expert

Joined: 2004-06-24 22:08:56
Posts: 3220

Интересно...

а так не прокатит, я писал - сомневался:

Code:

uo.say( chr(8) + chr(8) + chr(8) + chr(8) )

? Если прокатит - налицо сокращение скрипта на 3 строки

_________________
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.
Skype: d119060

Top

Profile

Reply with quote

Grin

Post subject:

PostPosted: 2008-05-27 15:18:37

Offline

Expert!

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва

прокатит

Top

Profile

Reply with quote

enamy

Post subject:

PostPosted: 2008-05-27 16:06:42

Offline

Joined: 2008-05-21 09:58:20
Posts: 4

Vse rabotaet, spasibo parni

Top

Profile

Reply with quote

Post new topic Reply to topic

Page 1 of 1

[ 9 posts ]

Home » Board index » Scripts » Scripting Ore

All times are UTC+02:00

Who is online

Users browsing this forum: Bing [Bot] and 7 guests

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