Добавлена тема оформления "Clickermann" для кода с подсветкой синтаксиса. Выбирается из выпадающего списка "Код" (рядом с "цвет", "размер" и "шрифт") в режиме редактирования поста. Либо просто BB-тегом "code=clickermann"
Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
KEYPRESS это нажатие, а не зажатие.Ну можно считать, что тема не актуальна.
Зажать это KEYDOWN, только... зажатия не работают в режиме привязки.
Ответ на свой вопрос услышал, жаль что не работает зажатие в режиме привязки(
FOR ($a=1, $a>0)
if(iskeydown(#w)=1)
keypress(#1)
ELSE
if(iskeydown(#x)=1)
KEYpress(#x)
ELSE
if(iskeydown(#space)=1)
KEYpress(#space)
ELSE
waitms(20)
END_IF
END_IF
END_IF
END_CYC
halt 
Не знаю конкретно за это ПО, или за афк-рыбалку. Но во всяком случае будьте осторожны с этой игрой.
$check = 0
WHILE($check = 0)
GETSCREEN (0,1014, 66,1079)
IF_PICTURE_IN (0,1014, 66,1079, "1.bmp", -1, 100)
$check = 1
KEYPRESS(#1)
WAITMS(100)
END_IF
END_CYC
else
$check = 0
WHILE($check = 0)
GETSCREEN (0,1014, 66,1079)
IF_PICTURE_IN (0,1014, 66,1079, "2.bmp", -1, 100)
$check = 1
KEYPRESS(#2)
WAITMS(100)
END_IF
END_CYC
else
$check = 0
WHILE($check = 0)
GETSCREEN (0,1014, 66,1079)
IF_PICTURE_IN (0,1014, 66,1079, "3.bmp", -1, 100)
$check = 1
KEYPRESS(#3)
WAITMS(100)
END_IF
END_CYC
else
haltСпасибоCode: (clickermann) [Select]// Клавиша | Константа | 10-ный код
// 0 | #0 | 48
// 1 | #1 | 49
// 2 | #2 | 50
// 3 | #3 | 51
// и т.д.
GETSCREEN (0, 1014, 66, 1079)
FOR($i = 1, $i < 4)
IF_PICTURE_IN (0, 1014, 66, 1079, STRCONCAT($i, ".bmp"), -1, 100)
KEYPRESS(48+$i)
WAITMS(100)
END_IF
END_CYC
HALT
Это часть кода с набором числа и нажатием Enterа, клики сам напишешь.Code: (clickermann) [Select]INC($n,1)
IF($n < 500)
KEYSTRING($n)
WAITMS(50)
KEYPRESS(#ENTER)
WAITMS(50)
ELSE
HALT
END_IF
LCLICK(927,572)
KEYSTRING("текст")
wait(5)
LCLICK(936,633)
wait(6)
LCLICK(920,1001)
wait(10)
LCLICK(1201,551) // клик на строку ввода
wait(1)
INC($n,201)
IF($n < 844)
KEYSTRING($n)
WAITMS(50)
KEYPRESS(#ENTER)
WAITMS(50)
ELSE
HALT
END_IF
wait(13)
LCLICK(970,465)
wait(4)
//обновляется браузерная страница, и переходит в самое начало.
Это часть кода с набором числа и нажатием Enterа, клики сам напишешь.Благодарю!Code: (clickermann) [Select]INC($n,1)
IF($n < 500)
KEYSTRING($n)
WAITMS(50)
KEYPRESS(#ENTER)
WAITMS(50)
ELSE
HALT
END_IF
Тоже думаю поискать удаленный сервер, вот только не знаю потянет ли игра. Только на виртуальную машину ставил. Голд обменивается на "жетон", а жетон -> подписка 30д./550р на счет блиzzард. Но от туда не вывести никакp.s:рыбалка пока приносит прибыль в виде золота (600к золота/мес. -> 2100р/мес. пассивного заработка, на оплату подписки и интернета хватаетТеперь ведь можно официально голд на реал менять?
Искать поплавок на воде визуально - дохлый номер. Не знаю может у тебя получится. У меня не получилось.Познавательно, спс за советы)
Я делал как написано здесь - http://crapware.aidf.org/forum/index.php?topic=3101.msg20696#msg20696 - по всплеску.
Вот пара советов из личного опыта. Если кому надо конечно.
Главное настроить графику самой игры. Там есть детализация воды и прочее. Всю графику естественно на минимум. Тогда определяет поплавок в момент поклевки 100%. Перед ловлей правда приходится немного покрутиться на месте, вода всегда разная. Но зато можно ловить даже у водопадов где вода рябит сильно. Помогает еще приближение и удаление изображения колесом мыши. Это уже как тонкая настройка. Все действия без задержек, по всплеску. Рандомная задержка только перед забросом удочки. Определение начала и конца каста ловли по наличию на экране полосы каста.
На звук ловить не пробовал. Баны тоже не ловил.
" )
Используй ISKEYDOWN для отлова нажатия клавиши, IF_PIXEL_IN для поиска попловка, PXLXOR или PXL для определения изменений пикселей в области микшера громкостиУфф) сложно) Как это реализовать в коде? Вот что имеется, здесь только по пикселю. Не пойму, как добавить чек звука
#name "v0.1 рыбалка WoW"
LOGCLEAR
LOGWRITE ("Старт")
1:
KEYPRESS(#E) // начало ловли
MOVE(276,870)
$time = $_time_t + 22 // таймер на 22 секунд
WHILE($time > $_time_t) // переход к сканированию пикселя
GETSCREEN(16,860,290,956)
COLORMODE(6,16,860,290,956)
IF_PIXEL_IN(16,860,290,956, 12566335,16777215,8388415)
WAITMS(RND(600,750))
LCLICK($_return1, $_return2) //клик на поплавок
$time = 0
waitms(100)
ELSE
waitms(50)
END_IF
END_CYC
IF($time ! 0)
LOGWRITE ("Перезаброс")
ELSE
INC($var,1)
LOGWRITE ("Поймал рыбу ",$var," раз Пиксель - ", PXL($_return1, $_return2) )
WAIT(RND(2,3)) // ждет 2-3 сек
END_IF
GOTO(1) //возврат в начало
//утро-день: 6 ColorMode 12566335,16777215,8388415
//ночь: 6 ColorMode [/spoiler]
Отличная работа! БлагодарюCode: (clickermann) [Select]// 16.12.2018
#name "v0.1 рыбалка WoW"
LOGWRITE ("Старт")
1:
KEYPRESS(#E) // начало ловли
$time = $_time_t + 15 // таймер на 15 секунд
WHILE($time > $_time_t)// переход к сканированию пикселя
GETSCREEN(46,265,1151,676)
COLORMODE(2,46,265,1151,676)
IF_PIXEL_IN(46,265,1151,676,16777215)
LCLICK($_return1, $_return2) //клик на поплавок
$time = 0
waitms(800)
ELSE
waitms(50)
END_IF
END_CYC
IF($time ! 0)
LOGWRITE ("Перезаброс")
ELSE
INC($var,1)
LOGWRITE ("Поймал рыбу ",$var," раз")
WAIT(RND(2,3)) // ждет 2-3 сек
END_IF
GOTO(1)//возврат в начало
1:
WAIT(RND(1,3))
KEYPRESS(#E) //начало рыбалки
GOTO(fish) //переход к сканированию пикселя
fish:
$check = 0
WHILE($check = 0)
GETSCREEN
COLORMODE(2)
IF_PIXEL_IN(46,265,1151,676,16777215)
$check = 1
waitms(800)
LCLICK($_return1, $_return2) //клик на поплавок
LOGWRITE ("Поймал рыбу")
END_IF
END_CYC
GOTO(1) //возврат в начало (не возвращается в начало если не нашел пиксель)