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

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Finik
Posts: 14
Joined: 2009-01-29 01:24:56
Contact:

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

Post 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макроса!"
цвет надписи и цифры постоянно меняются, так же как и положение её в этой табличке... можно как то изменить мой скрипт ?
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Случайно наткнулся на топик...

Выложите несколько отчетов infogump'а и скриншот.
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.
Telegram: @tatikom
Finik
Posts: 14
Joined: 2009-01-29 01:24:56
Contact:

Post by Finik »

Выложите несколько отчетов "infogump'а" и скриншот - непонял что такое инфогамп.. а скрин выложу.. через 5 мин
Post Reply