04.08.2011, 00:19
#46
Разведчик
Регистрация: 01.08.2011
Сообщений: 3
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
ушел в третий бан.
итак, пробная версия модификация меняла коориднаты клика по иксу на кнопку "обыскать друга", по иксу и игрику при клике на аватарку, при клике на кнопку обыскать + - 10 px. как мы поняли, в данный момент вымолотили нас в моментт нажатия кнопки выйти.
наработки аттачу.
переменные xz1,xz2,xzz1,xzz2,xz21,xz22
приаттачить не дало.
кидаю сюда.
PHP код:
// Вормикс: обыск друзей v 2.5.6 (31.07.2011)
// Скрипт для Clickermann v4.3.001 - 4.4.001
// <<<ОПЦИИ>>> ///////////////////
// Прокачка реакции (0 - выключена 1 - включена 2 - принудительно)
$reaction = 0
// Игнорирование 1 левела (0 - выключена 1 - включено)
$ignor = 0
// Отключение при достижени нулевых фузов (0 - выключена 1 - включено)
$zero = 0
/////ПРОГРАММА//////////////////////////////////////////////////////////////////
DEFINE ( $alreadysearched , 0 )
DEFINE ( $longnogame , 0 )
DEFINE ( $obsk , 0 )
DEFINE ( $rea , 0 )
DEFINE ( $firstclik , 1 )
LOGCLEAR
LOGSHOW ( 0 )
GOSUB ( Опр_положения_окна )
LOGWRITE ( "СТАРТ" )
while( $var = 0 )
//друг 1
$cdA = 78
$cdB = 558
$cdC = 75
$cdD = 555
$cdE = 136
$cdF = 516
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 2
$cdA = 143
$cdB = 558
$cdC = 142
$cdD = 555
$cdE = 199
$cdF = 513
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 3
$cdA = 208
$cdB = 558
$cdC = 209
$cdD = 556
$cdE = 263
$cdF = 514
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 4
$cdA = 273
$cdB = 558
$cdC = 271
$cdD = 557
$cdE = 318
$cdF = 513
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 5
$cdA = 338
$cdB = 558
$cdC = 335
$cdD = 553
$cdE = 384
$cdF = 515
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 6
$cdA = 403
$cdB = 558
$cdC = 401
$cdD = 556
$cdE = 444
$cdF = 513
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 7
$cdA = 468
$cdB = 558
$cdC = 469
$cdD = 555
$cdE = 517
$cdF = 515
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 8
$cdA = 533
$cdB = 558
$cdC = 534
$cdD = 556
$cdE = 579
$cdF = 515
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
//друг 9
$cdA = 598
$cdB = 558
$cdC = 598
$cdD = 554
$cdE = 601
$cdF = 514
$cdG = 3193852
GOSUB ( ошибка )
GOSUB ( ВЫЗОВ )
GOSUB ( фузы1 )
GOSUB ( обыск_друга )
GOSUB ( фузы2 )
GOSUB ( ошибка )
WAITMS ( RND ( 100 , 200 ))
GOSUB ( следующая_страница )
WAITMS ( RND ( 200 , 300 ))
end_cyc
/////КОНЕЦ ПРОГРАММЫ////////////////////////////////////////////////////////////
sub ( Опр_положения_окна ) // Определение положения окна
GETSCREEN
IF_PIXEL_IN ( 1 , 1 , $_xmax , $_ymax , 16446943 )
$vX = $_return1
$vY = $_return2
$hwnd = hget ( $vX + 335 , $vY + 303 )
//LOGWRITE("Координаты XY: ",$_return1,":",$_return2)
ELSE
TRAYSAY ( "Игра не найдена!" )
HALT
END_IF
end_sub
sub ( обыск_друга ) // Обыск друга
getscreen
if ( pxl ( $vX + $cdA , $vY + $cdB ) = $cdG ) // Проверка наличия друга
TRAYSAY ( "Обыск завершен" )
GOSUB ( отчет )
LOGWRITE ( "Обыск завершен" )
LOGSHOW ( 1 )
HALT
end_if
$xz1 = RND ( $cdC - 10 , $cdC + 10 )
$xz2 = RND ( $cdD - 10 , $cdD + 10 )
LCLICK ( $vX + $xz1 , $vY + $xz2 ) // Клик на иконке друга
WAITMS ( RND ( 400 , 600 ))
$xzz1 = RND ( $cdE - 7 , $cdE + 7 )
LCLICK ( $vX + $xzz1 , $vY + $cdF ) // Клик на меню "Посетить друга"
WAITMS ( RND ( 400 , 600 ))
getscreen
if ( pxl ( $vX + 38 , $vY + 156 ) = 10925815 )
INC ( $obsk , 1 )
WAITMS ( 50 )
$xz21 = RND ( $vX + 38 - 10 , $vX + 38 + 10 )
$xz22 = RND ( $vY + 156 - 10 , $vY + 156 + 10 )
MOVE ( $xz21 , $xz22 )
WAITMS ( 50 )
LCLICK ( $xz21 , $xz22 ) // Клик на "Обыск"
WAITMS ( 50 )
B :
getscreen
if ( pxl ( $vX + 38 , $vY + 156 ) = 10925815 )
WAITMS ( 50 )
goto( B )
end_if
WAITMS ( 200 )
GOSUB ( ВЫЗОВ )
GOSUB ( ошибка )
GOSUB ( внимание )
Else
$fuz = 0
IF( $reaction = 1 )
goto( skip )
END_IF
end_if
getscreen
if (( pxl ( $vX + 39 , $vY + 93 ) = 12056575 ) & ( $reaction > 0 ) & ( $reaction2 = 1 ))
INC ( $rea , 1 )
WAITMS ( 50 )
LCLICK ( $vX + 39 , $vY + 93 ) // Клик на "Прокочать скорость"
WAITMS ( 50 )
A :
getscreen
if ( pxl ( $vX + 39 , $vY + 93 ) = 12056575 )
WAITMS ( 50 )
goto( A )
end_if
WAITMS ( 200 )
GOSUB ( ВЫЗОВ )
GOSUB ( ошибка )
GOSUB ( внимание2 )
end_if
skip :
$reaction2 = 1
WAITMS ( RND ( 300 , 500 ))
LCLICK ( $vX + 712 , $vY + 38 ) // Клик по "Выйти"
WAITMS ( RND ( 300 , 500 ))
MOVE ( $vX + RND ( 714 , 738 ), $vY + RND ( 79 , 440 ))
end_sub
SUB ( внимание ) // ВНИМАНИЕ обыск
getscreen
if ( pxl ( $vX + 352 , $vY + 32 ) = 5591648 )
WAITMS ( 300 )
getscreen
if (( pxl ( $vX + 337 , $vY + 239 ) = 65955 ) & ( pxl ( $vX + 256 , $vY + 274 ) = 4807536 ) & ( pxl ( $vX + 495 , $vY + 279 ) = 4807536 ))
INC ( $obsk , - 1 )
IF( $ignor = 0 )
WAITMS ( RND ( 200 , 400 )) // друг 1 уровень
LCLICK ( $vX + 357 , $vY + 347 )
WAITMS ( RND ( 200 , 400 ))
LCLICK ( $vX + 712 , $vY + 38 )
TRAYSAY ( "Обыск завершен" )
GOSUB ( отчет )
LOGWRITE ( "Обыск завершен" )
LOGSHOW ( 1 )
HALT
Else
LCLICK ( $vX + 357 , $vY + 347 )
END_IF
Else
getscreen
if (( pxl ( $vX + 234 , $vY + 271 ) = 4807536 ) & ( pxl ( $vX + 303 , $vY + 279 ) = 4807536 ) & ( pxl ( $vX + 504 , $vY + 278 ) = 4807536 ) & ( pxl ( $vX + 425 , $vY + 294 ) = 4807536 ))
//LOGWRITE("Уже обыскали")
INC ( $alreadysearched , 1 )
$reaction2 = 1 //уже обыскали
else
//LOGWRITE("Давно небыл в игре")
INC ( $longnogame , 1 )
IF( $reaction = 1 )
$reaction2 = 0
END_IF
END_IF
LCLICK ( $vX + 357 , $vY + 347 ) // Другое
END_IF
$fuz = 0
WAITMS ( RND ( 300 , 500 ))
Else
$fuz = 1
end_if
END_SUB
SUB ( внимание2 ) // ВНИМАНИЕ прокачка
getscreen
if ( pxl ( $vX + 352 , $vY + 32 ) = 5591648 )
WAITMS ( 200 )
getscreen
if (( pxl ( $vX + 252 , $vY + 278 ) = 4807536 ) & ( pxl ( $vX + 502 , $vY + 272 ) = 4807536 ) & ( pxl ( $vX + 434 , $vY + 292 ) = 4807536 ))
$reaction = 0
INC ( $rea , - 1 )
LOGWRITE ( "Достигнут лимит на прокачку скорости" )
TRAYSAY ( "Достигнут лимит на прокачку скорости" )
end_if
WAITMS ( RND ( 200 , 500 ))
LCLICK ( $vX + 357 , $vY + 347 )
WAITMS ( RND ( 200 , 500 ))
goto( skip2 )
end_if
IF( $firstclik = 1 )
WAITMS ( RND ( 3000 , 4000 ))
GETSCREEN
if (( pxl ( $vX + 253 , $vY + 260 ) = 4807536 ) & ( pxl ( $vX + 337 , $vY + 267 ) = 4807536 ) & ( pxl ( $vX + 427 , $vY + 278 ) = 4807536 ))
$firstclik = 0
LCLICK ( $vX + 422 , $vY + 348 )
END_IF
END_IF
skip2 :
END_SUB
SUB ( фузы1 )
GETSCREEN
$count1fuz = PXLXOR ( $vX + 93 , $vY + 6 , $vX + 165 , $vY + 60 )
WAITMS ( 100 )
END_SUB
SUB ( фузы2 )
WAITMS ( 100 )
GETSCREEN
$count2fuz = PXLXOR ( $vX + 93 , $vY + 6 , $vX + 165 , $vY + 60 )
IF(( $count1fuz = $count2fuz ) & ( $fuz = 1 ))
TRAYSAY ( "Ноль фузов!" )
//LOGWRITE("Ноль фузов!")
$fuz = 0
IF( $zero = 1 )
TRAYSAY ( "Обыск завершен" )
GOSUB ( отчет )
LOGWRITE ( "Обыск завершен" )
LOGSHOW ( 1 )
HALT
END_IF
END_IF
END_SUB
SUB ( ВЫЗОВ ) // Вызов на бой
GETSCREEN
if (( pxl ( $vX + 426 , $vY + 14 ) = 5789027 ) | ( pxl ( $vX + 482 , $vY + 10 ) = 11446400 ))
//LOGWRITE("ВЫЗОВ: ", PXLXOR($vX+211,$vY+184,$vX+527,$vY+236))
WAITMS ( RND ( 200 , 500 ))
IF( PXLXOR ( $vX + 211 , $vY + 184 , $vX + 527 , $vY + 236 ) = 10097450 )
LCLICK ( $vX + 445 , $vY + 381 )
WAITMS ( RND ( 200 , 500 ))
END_IF
END_IF
END_SUB
SUB ( ошибка )
$hwnd2 = hget ( $vX + 335 , $vY + 303 )
IF( $hwnd ! $hwnd2 )
TRAYSAY ( "ОШИБКА: Окно игры потеряно!" )
GOSUB ( отчет )
LOGWRITE ( "ОШИБКА: Окно игры потеряно!" )
LOGSHOW ( 1 )
HALT
END_IF
GETSCREEN
IF( PXLXOR ( $vX + 214 , $vY + 220 , $vX + 532 , $vY + 366 ) = 15912664 )
TRAYSAY ( "ОШИБКА: соединение потеряно!" )
GOSUB ( отчет )
LOGWRITE ( "ОШИБКА: соединение потеряно!" )
LOGSHOW ( 1 )
HALT
END_IF
END_SUB
SUB ( отчет ) // Отчет
$succesobsk = $obsk - $longnogame - $alreadysearched
LOGWRITE ( "-------Отчет-------" )
LOGWRITE ( "Всего обыскано: " , $obsk )
LOGWRITE ( "Успешно обыскано: " , $succesobsk )
LOGWRITE ( "Реакции прокачено: " , $rea )
LOGWRITE ( "Уже обыскали: " , $alreadysearched )
LOGWRITE ( "Давно небыл в игре: " , $longnogame )
LOGWRITE ( "-------------------" )
END_SUB
SUB ( следующая_страница ) //Следующая страница
getscreen
if ( pxl ( $vX + 728 , $vY + 556 ) = 8037562 )
$var = 1
TRAYSAY ( "Обыск завершен" )
GOSUB ( отчет )
LOGWRITE ( "Обыск завершен" )
HALT
end_if
GETSCREEN
$next = PXLXOR ( $vX + 44 , $vY + 527 , $vX + 697 , $vY + 584 )
LCLICK ( $vX + 729 , $vY + 563 )
No :
WAITMS ( RND ( 1000 , 2000 ))
GETSCREEN
$next2 = PXLXOR ( $vX + 44 , $vY + 527 , $vX + 697 , $vY + 584 )
IF( $next = $next2 )
goto( No )
END_IF
END_SUB
Добавлено через 19 минут
кстати, на этот раз успешнро проскролило 2 списка игроков.
Последний раз редактировалось unnamed_dev; 04.08.2011 в 00:38 .
Причина: Добавлено сообщение
04.08.2011, 00:55
#47
Капитан
Регистрация: 22.02.2011
Сообщений: 308
Популярность: 273
Сказал(а) спасибо: 4
Поблагодарили 140 раз(а) в 42 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
Цитата:
ушел в третий бан.
итак, пробная версия модификация меняла коориднаты клика по иксу на кнопку "обыскать друга", по иксу и игрику при клике на аватарку, при клике на кнопку обыскать + - 10 px. как мы поняли, в данный момент вымолотили нас в моментт нажатия кнопки выйти.
наработки аттачу.
переменные xz1,xz2,xzz1,xzz2,xz21,xz22
приаттачить не дало.
кидаю сюда.
Добавлено через 19 минут
кстати, на этот раз успешнро проскролило 2 списка игроков.
Ды я уже сделал рандом кликов, а задержки вернул прежнии
Вормикс обыск друзей v 2.5.7
PS: взял список своих друзей 150 с лишним, подменил на фейке, обыскал всех и нет бана
А на основном аке уже 3 раза бан давали
но v 2.5.7 я не пробовал уже чет боюсь
04.08.2011, 01:48
#48
Разведчик
Регистрация: 01.08.2011
Сообщений: 3
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
JeM-D34336 , готовочег, проверено на 2х акках.
под катом код
PHP код:
// Вормикс: обыск друзей v 2.5.6 (31.07.2011) // Скрипт для Clickermann v4.3.001 - 4.4.001 // <<<ОПЦИИ>>> /////////////////// // Прокачка реакции (0 - выключена 1 - включена 2 - принудительно) $reaction = 0 // Игнорирование 1 левела (0 - выключена 1 - включено) $ignor = 1 // Отключение при достижени нулевых фузов (0 - выключена 1 - включено) $zero = 1 /////ПРОГРАММА////////////////////////////////////////////////////////////////// DEFINE ( $alreadysearched , 0 ) DEFINE ( $longnogame , 0 ) DEFINE ( $obsk , 0 ) DEFINE ( $rea , 0 ) DEFINE ( $firstclik , 1 ) LOGCLEAR LOGSHOW ( 0 ) GOSUB ( Опр_положения_окна ) LOGWRITE ( "СТАРТ" ) while( $var = 0 ) //друг 1 $cdA = 78 $cdB = 558 $cdC = 75 $cdD = 555 $cdE = 136 $cdF = 516 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 2 $cdA = 143 $cdB = 558 $cdC = 142 $cdD = 555 $cdE = 199 $cdF = 513 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 3 $cdA = 208 $cdB = 558 $cdC = 209 $cdD = 556 $cdE = 263 $cdF = 514 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 4 $cdA = 273 $cdB = 558 $cdC = 271 $cdD = 557 $cdE = 318 $cdF = 513 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 5 $cdA = 338 $cdB = 558 $cdC = 335 $cdD = 553 $cdE = 384 $cdF = 515 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 6 $cdA = 403 $cdB = 558 $cdC = 401 $cdD = 556 $cdE = 444 $cdF = 513 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 7 $cdA = 468 $cdB = 558 $cdC = 469 $cdD = 555 $cdE = 517 $cdF = 515 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 8 $cdA = 533 $cdB = 558 $cdC = 534 $cdD = 556 $cdE = 579 $cdF = 515 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) //друг 9 $cdA = 598 $cdB = 558 $cdC = 598 $cdD = 554 $cdE = 601 $cdF = 514 $cdG = 3193852 GOSUB ( ошибка ) GOSUB ( ВЫЗОВ ) GOSUB ( фузы1 ) GOSUB ( обыск_друга ) GOSUB ( фузы2 ) GOSUB ( ошибка ) WAITMS ( RND ( 100 , 200 )) GOSUB ( следующая_страница ) WAITMS ( RND ( 200 , 300 )) end_cyc /////КОНЕЦ ПРОГРАММЫ//////////////////////////////////////////////////////////// sub ( Опр_положения_окна ) // Определение положения окна GETSCREEN IF_PIXEL_IN ( 1 , 1 , $_xmax , $_ymax , 16446943 ) $vX = $_return1 $vY = $_return2 $hwnd = hget ( $vX + 335 , $vY + 303 ) //LOGWRITE("Координаты XY: ",$_return1,":",$_return2) ELSE TRAYSAY ( "Игра не найдена!" ) HALT END_IF end_sub sub ( обыск_друга ) // Обыск друга getscreen if ( pxl ( $vX + $cdA , $vY + $cdB ) = $cdG ) // Проверка наличия друга TRAYSAY ( "Обыск завершен" ) GOSUB ( отчет ) LOGWRITE ( "Обыск завершен" ) LOGSHOW ( 1 ) HALT end_if $xz1 = RND ( $cdC - 15 , $cdC + 15 ) $xz2 = RND ( $cdD - 15 , $cdD + 15 ) MOVE ( $vX + $xz1 , $vY + $xz2 ) LCLICK ( $vX + $xz1 , $vY + $xz2 ) // Клик на иконке друга WAITMS ( RND ( 400 , 600 )) $xzz1 = RND ( $cdE - 10 , $cdE + 10 ) $xzz2 = RND ( $cdF - 3 , $cdF + 3 ) MOVE ( $vX + $xzz1 , $vY + $xzz2 ) LCLICK ( $vX + $xzz1 , $vY + $xzz2 ) // Клик на меню "Посетить друга" WAITMS ( RND ( 400 , 600 )) getscreen if ( pxl ( $vX + 38 , $vY + 156 ) = 10925815 ) INC ( $obsk , 1 ) WAITMS ( 50 ) $xz21 = RND ( $vX + 38 - 15 , $vX + 38 + 15 ) $xz22 = RND ( $vY + 156 - 15 , $vY + 156 + 15 ) MOVE ( $xz21 - 2 , $xz22 - 2 ) MOVE ( $xz21 , $xz22 ) WAITMS ( 50 ) LCLICK ( $xz21 , $xz22 ) // Клик на "Обыск" WAITMS ( 50 ) B : getscreen if ( pxl ( $vX + 38 , $vY + 156 ) = 10925815 ) WAITMS ( 50 ) goto( B ) end_if WAITMS ( 200 ) GOSUB ( ВЫЗОВ ) GOSUB ( ошибка ) GOSUB ( внимание ) Else $fuz = 0 IF( $reaction = 1 ) goto( skip ) END_IF end_if getscreen if (( pxl ( $vX + 39 , $vY + 93 ) = 12056575 ) & ( $reaction > 0 ) & ( $reaction2 = 1 )) INC ( $rea , 1 ) WAITMS ( 50 ) LCLICK ( $vX + 39 , $vY + 93 ) // Клик на "Прокочать скорость" WAITMS ( 50 ) A : getscreen if ( pxl ( $vX + 39 , $vY + 93 ) = 12056575 ) WAITMS ( 50 ) goto( A ) end_if WAITMS ( 200 ) GOSUB ( ВЫЗОВ ) GOSUB ( ошибка ) GOSUB ( внимание2 ) end_if skip : $reaction2 = 1 WAITMS ( RND ( 300 , 500 )) $dX = RND ( $vX + 712 - 15 , $vX + 712 + 15 ) $dY = RND ( $vY + 38 - 5 , $vY + 38 + 5 ) MOVE ( $dX , $dY ) LCLICK ( $dX , $dY ) // Клик по "Выйти" WAITMS ( RND ( 300 , 500 )) MOVE ( $vX + RND ( 714 , 738 ), $vY + RND ( 79 , 440 )) end_sub SUB ( внимание ) // ВНИМАНИЕ обыск getscreen if ( pxl ( $vX + 352 , $vY + 32 ) = 5591648 ) WAITMS ( 300 ) getscreen if (( pxl ( $vX + 337 , $vY + 239 ) = 65955 ) & ( pxl ( $vX + 256 , $vY + 274 ) = 4807536 ) & ( pxl ( $vX + 495 , $vY + 279 ) = 4807536 )) INC ( $obsk , - 1 ) IF( $ignor = 0 ) WAITMS ( RND ( 200 , 400 )) // друг 1 уровень LCLICK ( $vX + 357 , $vY + 347 ) WAITMS ( RND ( 200 , 400 )) LCLICK ( $vX + 712 , $vY + 38 ) TRAYSAY ( "Обыск завершен" ) GOSUB ( отчет ) LOGWRITE ( "Обыск завершен" ) LOGSHOW ( 1 ) HALT Else $dX = RND ( $vX + 357 - 15 , $vX + 357 + 15 ) $dY = RND ( $vY + 347 - 5 , $vY + 347 + 5 ) MOVE ( $dX , $dY ) LCLICK ( $dX , $dY ) END_IF Else getscreen if (( pxl ( $vX + 234 , $vY + 271 ) = 4807536 ) & ( pxl ( $vX + 303 , $vY + 279 ) = 4807536 ) & ( pxl ( $vX + 504 , $vY + 278 ) = 4807536 ) & ( pxl ( $vX + 425 , $vY + 294 ) = 4807536 )) //LOGWRITE("Уже обыскали") INC ( $alreadysearched , 1 ) $reaction2 = 1 //уже обыскали else //LOGWRITE("Давно небыл в игре") INC ( $longnogame , 1 ) IF( $reaction = 1 ) $reaction2 = 0 END_IF END_IF // LCLICK($vX+357,$vY+347) // Другое //LCLICK(RND($vX+357-15,$vX+357+15),RND($vY+347-5,$vY+347+5)) $dX = RND ( $vX + 357 - 15 , $vX + 357 + 15 ) $dY = RND ( $vY + 347 - 5 , $vY + 347 + 5 ) MOVE ( $dX , $dY ) LCLICK ( $dX , $dY ) END_IF $fuz = 0 WAITMS ( RND ( 300 , 500 )) Else $fuz = 1 end_if END_SUB SUB ( внимание2 ) // ВНИМАНИЕ прокачка getscreen if ( pxl ( $vX + 352 , $vY + 32 ) = 5591648 ) WAITMS ( 200 ) getscreen if (( pxl ( $vX + 252 , $vY + 278 ) = 4807536 ) & ( pxl ( $vX + 502 , $vY + 272 ) = 4807536 ) & ( pxl ( $vX + 434 , $vY + 292 ) = 4807536 )) $reaction = 0 INC ( $rea , - 1 ) LOGWRITE ( "Достигнут лимит на прокачку скорости" ) TRAYSAY ( "Достигнут лимит на прокачку скорости" ) end_if WAITMS ( RND ( 200 , 500 )) LCLICK ( $vX + 357 , $vY + 347 ) WAITMS ( RND ( 200 , 500 )) goto( skip2 ) end_if IF( $firstclik = 1 ) WAITMS ( RND ( 3000 , 4000 )) GETSCREEN if (( pxl ( $vX + 253 , $vY + 260 ) = 4807536 ) & ( pxl ( $vX + 337 , $vY + 267 ) = 4807536 ) & ( pxl ( $vX + 427 , $vY + 278 ) = 4807536 )) $firstclik = 0 $dX = RND ( $vX + 422 - 15 , $vX + 422 + 15 ) $dY = RND ( $vY + 348 - 15 , $vY + 348 + 15 ) MOVE ( $dX , $dY ) LCLICK ( $dX , $dY ) //LCLICK($vX+422,$vY+348) END_IF END_IF skip2 : END_SUB SUB ( фузы1 ) GETSCREEN $count1fuz = PXLXOR ( $vX + 93 , $vY + 6 , $vX + 165 , $vY + 60 ) WAITMS ( 100 ) END_SUB SUB ( фузы2 ) WAITMS ( 100 ) GETSCREEN $count2fuz = PXLXOR ( $vX + 93 , $vY + 6 , $vX + 165 , $vY + 60 ) IF(( $count1fuz = $count2fuz ) & ( $fuz = 1 )) TRAYSAY ( "Ноль фузов!" ) //LOGWRITE("Ноль фузов!") $fuz = 0 IF( $zero = 1 ) TRAYSAY ( "Обыск завершен" ) GOSUB ( отчет ) LOGWRITE ( "Обыск завершен" ) LOGSHOW ( 1 ) HALT END_IF END_IF END_SUB SUB ( ВЫЗОВ ) // Вызов на бой GETSCREEN if (( pxl ( $vX + 426 , $vY + 14 ) = 5789027 ) | ( pxl ( $vX + 482 , $vY + 10 ) = 11446400 )) //LOGWRITE("ВЫЗОВ: ", PXLXOR($vX+211,$vY+184,$vX+527,$vY+236)) WAITMS ( RND ( 200 , 500 )) IF( PXLXOR ( $vX + 211 , $vY + 184 , $vX + 527 , $vY + 236 ) = 10097450 ) $dX = RND ( $vX + 445 - 15 , $vX + 445 + 15 ) $dY = RND ( $vY + 381 - 2 , $vY + 381 + 2 ) MOVE ( $dX , $dY ) LCLICK ( $dX , $dY ) //LCLICK($vX+445,$vY+381) WAITMS ( RND ( 200 , 500 )) END_IF END_IF END_SUB SUB ( ошибка ) $hwnd2 = hget ( $vX + 335 , $vY + 303 ) IF( $hwnd ! $hwnd2 ) TRAYSAY ( "ОШИБКА: Окно игры потеряно!" ) GOSUB ( отчет ) LOGWRITE ( "ОШИБКА: Окно игры потеряно!" ) LOGSHOW ( 1 ) HALT END_IF GETSCREEN IF( PXLXOR ( $vX + 214 , $vY + 220 , $vX + 532 , $vY + 366 ) = 15912664 ) TRAYSAY ( "ОШИБКА: соединение потеряно!" ) GOSUB ( отчет ) LOGWRITE ( "ОШИБКА: соединение потеряно!" ) LOGSHOW ( 1 ) HALT END_IF END_SUB SUB ( отчет ) // Отчет $succesobsk = $obsk - $longnogame - $alreadysearched LOGWRITE ( "-------Отчет-------" ) LOGWRITE ( "Всего обыскано: " , $obsk ) LOGWRITE ( "Успешно обыскано: " , $succesobsk ) LOGWRITE ( "Реакции прокачено: " , $rea ) LOGWRITE ( "Уже обыскали: " , $alreadysearched ) LOGWRITE ( "Давно небыл в игре: " , $longnogame ) LOGWRITE ( "-------------------" ) END_SUB SUB ( следующая_страница ) //Следующая страница getscreen if ( pxl ( $vX + 728 , $vY + 556 ) = 8037562 ) $var = 1 TRAYSAY ( "Обыск завершен" ) GOSUB ( отчет ) LOGWRITE ( "Обыск завершен" ) HALT end_if GETSCREEN $next = PXLXOR ( $vX + 44 , $vY + 527 , $vX + 697 , $vY + 584 ) //LCLICK($vX+729,$vY+563) LCLICK ( RND ( $vX + 729 - 8 , $vX + 729 + 8 ), RND ( $vY + 563 - 8 , $vY + 563 + 8 )) No : WAITMS ( RND ( 1000 , 2000 )) GETSCREEN $next2 = PXLXOR ( $vX + 44 , $vY + 527 , $vX + 697 , $vY + 584 ) IF( $next = $next2 ) goto( No ) END_IF END_SUB
04.08.2011, 02:42
#49
Капитан
Регистрация: 22.02.2011
Сообщений: 308
Популярность: 273
Сказал(а) спасибо: 4
Поблагодарили 140 раз(а) в 42 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
05.08.2011, 00:56
#50
Капитан
Регистрация: 22.02.2011
Сообщений: 308
Популярность: 273
Сказал(а) спасибо: 4
Поблагодарили 140 раз(а) в 42 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
Цитата:
Немогу скрипт разархивировать,помогите плиз
Добавлено через 5 минут
Может кто нибудь мне скинет уже разархивированый скрипт...?
Скачай 7 зип, им и разархивируеш
[
Ссылки могут видеть только зарегистрированные пользователи. ]
06.08.2011, 22:40
#51
Разведчик
Регистрация: 14.12.2010
Сообщений: 1
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
Официальная группа игры Вормикс
Исправлена ошибка с баном за обыск друзей. Все, кто попал в бан по этой причине были амнистированы. Теперь в бан за обыск попадают только те, кто пользуется программами для накрутки рубинов.
23.08.2011, 00:40
#52
Пехотинец
Регистрация: 13.11.2010
Сообщений: 89
Популярность: 526
Сказал(а) спасибо: 44
Поблагодарили 38 раз(а) в 25 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
JeM-D34336 , верни прежнюю скорость скрипту. за одинаковые клики не банят(поскольку в запросах на прокачку реакции и на обыск ничего не меняется, тоесть не зависит от скорости). лучше сделай рандомные задержки в кликах на обыск в пределах 1-3 сек, если боишься бана
________________
Помог???
Нажми спасибоДля просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
17.09.2011, 12:53
#53
Разведчик
Регистрация: 02.09.2011
Сообщений: 5
Популярность: 362
Сказал(а) спасибо: 20
Поблагодарили 14 раз(а) в 13 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
18.10.2011, 16:58
#54
Разведчик
Регистрация: 17.09.2011
Сообщений: 3
Популярность: 377
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
когда будет новая версия??? сделайте плиз, классный у Вас был бот очень... еще с читмайкерса им пользовался)
18.10.2011, 18:26
#55
Капитан
Регистрация: 22.02.2011
Сообщений: 308
Популярность: 273
Сказал(а) спасибо: 4
Поблагодарили 140 раз(а) в 42 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
31.10.2011, 17:30
#56
Разведчик
Регистрация: 06.12.2009
Сообщений: 1
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
не подскажите у всех работает бот ? У меня пишет что Игра не найдена запусаить пробывал и mozile и chrome и експлоере
31.10.2011, 17:46
#57
Капитан
Регистрация: 22.02.2011
Сообщений: 308
Популярность: 273
Сказал(а) спасибо: 4
Поблагодарили 140 раз(а) в 42 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
Цитата:
не подскажите у всех работает бот ? У меня пишет что Игра не найдена запусаить пробывал и mozile и chrome и експлоере
Ну конечно ведь там обновился титульный экран!
Но домик остался прежним.
Совет: зайди в домик друга и там запусти скрипт (игра найдется
)
31.10.2011, 18:10
#58
Капитан
Регистрация: 22.02.2011
Сообщений: 308
Популярность: 273
Сказал(а) спасибо: 4
Поблагодарили 140 раз(а) в 42 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
Пока там в вормиксе идет хеллуин нужно временно заменить код цвета в строке 182
Код:
IF_PIXEL_IN(1,1,$_xmax,$_ymax, 16446943)
на
Код:
IF_PIXEL_IN(1,1,$_xmax,$_ymax, 14999265)
сохранить скрипт в другой файл и все будет работать
09.11.2011, 03:45
#59
Пехотинец
Регистрация: 13.11.2010
Сообщений: 89
Популярность: 526
Сказал(а) спасибо: 44
Поблагодарили 38 раз(а) в 25 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
JeM-D34336 , можешь сделать скрипт под хелоуинскую обнову???
Добавлено через 7 минут
[Ссылки могут видеть только зарегистрированные пользователи. ] отредактированный скрипт под хелоуин, если кому надо
________________
Помог???
Нажми спасибоДля просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
Последний раз редактировалось pahan35; 09.11.2011 в 03:54 .
Причина: Добавлено сообщение
25.11.2011, 13:32
#60
Разведчик
Регистрация: 10.03.2010
Сообщений: 4
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Re: Бот для Вормикс: автоматизированный обыск друзей и прокачка реакции
Закрывает окно и выдает это, ничего не сделав
11:27:10 СТАРТ
11:27:14 Обыск завершен
11:27:15 Достигнут лимит на прокачку скорости
Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 11:32 .