Page 1 of 1

Нуждаю в антимакросе..

Posted: 2009-01-31 18:29:44
by Finik
шард inhasad
анти макрос состоит в том, что каждые 200 юзов вылазит табличка, в которой 6 вариантов ответов, из которых 1 правильный.. "Я тута и нет у меня некакого макроса" у меня был на такой антимакрос обход,


sub Solve1()
var index = 0
while Right(uo.LastGump('command', 9+2*index), 1) <> '1'
index = index+1
wend
return index
end sub
sub Solve2()
var index = 0
while Right(uo.LastGump('command', 9+2*index), 1) <> '2'
index = index+1
wend
return index
end sub

sub antimacro()
while not uo.Dead()
if uo.LastGump('replyed') == 0 then
if uo.LastGump('text', 1) == 'Я тута и нет у меня никакого макроса!' then
uo.LClick(uo.LastGump('x')+30, uo.LastGump('y')+82+40*Solve1())
wait(1000)
end if
if uo.LastGump('text', 2) == 'Я тута и нет у меня никакого макроса!' then
uo.LClick(uo.LastGump('x')+30, uo.LastGump('y')+82+40*Solve2())
wait(1000)
end if

end if
wait(100)
wend
end sub


вот споственно он..
но теперь немного изменили, и варианты стали такими
"Я81тута79и67нет36у50меня95никакого92макроса!"
цвет надписи и цифры постоянно меняются, так же как и положение её в этой табличке... можно как то изменить мой скрипт ?

Posted: 2009-02-27 12:51:04
by Destruction
Случайно наткнулся на топик...

Выложите несколько отчетов infogump'а и скриншот.

Posted: 2009-03-07 01:49:35
by Finik
Выложите несколько отчетов "infogump'а" и скриншот - непонял что такое инфогамп.. а скрин выложу.. через 5 мин