1
Общие вопросы / Re: Смотрю в книгу и вижу...
« on: September 24, 2017, 10:08:20 PM »блестяще!
Добавлена тема оформления "Clickermann" для кода с подсветкой синтаксиса. Выбирается из выпадающего списка "Код" (рядом с "цвет", "размер" и "шрифт") в режиме редактирования поста. Либо просто BB-тегом "code=clickermann"
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.
А вот 3-й можно было и без, но как его вписать в эти два пока не соображу. То есть, его можно в режиме ожидания постоянно использовать.Все больше думаю над этим вариантом. 3-й сценарий на пикселе в постоянный цикл, ведь в какой-то ситуации просто могу забыть его включить.
И так ли нужны эти потоки?Например 2 первых нужны у них специфическая функция. А вот 3-й можно было и без, но как его вписать в эти два пока не соображу. То есть, его можно в режиме ожидания постоянно использовать.
// поток 1
THREAD(cl, 0)
keyDown(#v)
waitms(rnd(73, 121))
keyUp(#v)
waitms(rnd(1711, 2102))
END_THREAD
// переключптель 1
IF(ISKEYDOWN(#p) = 1)
$run = $run ^ 1
IF($run = 0)
SETTHREAD(cl, 2)
waitms(20)
IF(ISKEYDOWN(#v) = 1)
keyUp(#v)
END_IF
ELSE
SETTHREAD(cl, 1)
END_IF
WHILE(ISKEYDOWN(#p) = 1)
waitms(20)
END_CYC
END_IF
waitms(30)
// поток 2
THREAD(cll, 0)
waitms(rnd(262,373))
keyDown(#d)
waitms(rnd(262,373))
move(1027,73)
waitms(rnd(262,373))
DBLCLICK(1027,73)
waitms(rnd(262,373))
keyUp(#d)
waitms(rnd(4325,5046))
END_THREAD
// переключатель 2
IF(ISKEYDOWN(#o) = 1)
$run1 = $run1 ^ 1
IF($run1 = 0)
SETTHREAD(cll,2)
waitms(20)
IF(ISKEYDOWN(#o) = 1)
keyUp(#o)
END_IF
ELSE
SETTHREAD(cll, 1)
END_IF
WHILE(ISKEYDOWN(#o) = 1)
waitms(20)
END_CYC
END_IF
waitms(30)
// поток 3 ожидание пикселя
THREAD(pl, 0)
$check = 0
WHILE($check = 0)
GETSCREEN
IF(PXL(804,768) = 1710830)
$check = 1
KEYDOWN(#4)
WAITMS(RND(73, 121))
KEYUP(#4)
WAIT(RND(63, 101))
ELSE
WAITMS(50)
END_IF
END_CYC
END_THREAD
// переключатель 3
IF(ISKEYDOWN(#l) = 1)
$run2 = $run2 ^ 1
IF($run2 = 0)
SETTHREAD(pl,2)
waitms(20)
IF(ISKEYDOWN(#l) = 1)
keyUp(#l)
END_IF
ELSE
SETTHREAD(pl, 1)
END_IF
WHILE(ISKEYDOWN(#l) = 1)
waitms(20)
END_CYC
END_IF
waitms(30)
// ожидание пикселя
$check = 0
WHILE($check = 0)
GETSCREEN
IF(PXL(804,768) = 1710830)
$check = 1
KEYDOWN(#4)
WAITMS(RND(73, 121))
KEYUP(#4)
WAIT(RND(63, 101))
ELSE
WAITMS(50)
END_IF
END_CYC
$check = 1 //если пиксель нашелся в области, то переменной $check присваеваем "не 0" , любое число не равное нулюЕсли это единственный скрипт в файле, то он начнет с начала?
//и в следующей проверке условия цикла, $check уже не равен нулю, и значит что цикл завершится, скрипт пойдет далее, то что после END_CYC
$check = 0
WHILE($check = 0)
GETSCREEN
IF_PIXEL_IN(200,200, 400,400, 255)
$check = 1
ELSE
WAITMS(50)
END_IF
END_CYC
Как только первый попавшийся пиксель будет найден, инструкция вернет его координаты в переменные $_return1, $_return2 и прекратит анализто есть наличие этих переменных обязательное? если нет этих переменных, то анализ будет продолжаться?
Возвращаемые параметрытот случай, когда одеваешь штаны, а трусы проигнорировал.
$_return1 - x координата найденного пикселя
$_return2 - y координата
// поток 1
THREAD(cl, 0)
keyDown(#v)
waitms(rnd(73, 121))
keyUp(#v)
waitms(rnd(1711, 2102))
END_THREAD
// переключптель 1
IF(ISKEYDOWN(#p) = 1)
$run = $run ^ 1
IF($run = 0)
SETTHREAD(cl, 2)
waitms(20)
IF(ISKEYDOWN(#v) = 1)
keyUp(#v)
END_IF
ELSE
SETTHREAD(cl, 1)
END_IF
WHILE(ISKEYDOWN(#p) = 1)
waitms(20)
END_CYC
END_IF
waitms(30)
////////////////////////////////////////////////////////////////////////
// поток 2
THREAD(cll, 0)
waitms(rnd(262,373))
keyDown(#d)
waitms(rnd(262,373))
move(1027,73)
waitms(rnd(262,373))
DBLCLICK(1027,73)
waitms(rnd(262,373))
keyUp(#d)
waitms(rnd(4325,5046))
END_THREAD
// переключатель 2
IF(ISKEYDOWN(#o) = 1)
$run = $run ^ 1
IF($run = 0)
SETTHREAD(cll,2)
waitms(20)
IF(ISKEYDOWN(#o) = 1)
keyUp(#o)
END_IF
ELSE
SETTHREAD(cll, 1)
END_IF
WHILE(ISKEYDOWN(#o) = 1)
waitms(20)
END_CYC
END_IF
waitms(30)
// поток 1
THREAD(cl, 0)
keyDown(#v)
waitms(rnd(73, 121))
keyUp(#v)
waitms(rnd(1711, 2102))
END_THREAD
// переключптель 1
IF(ISKEYDOWN(#p) = 1)
$run = $run ^ 1
IF($run = 0)
SETTHREAD(cl, 2)
waitms(20)
IF(ISKEYDOWN(#v) = 1)
keyUp(#v)
END_IF
ELSE
SETTHREAD(cl, 1)
END_IF
WHILE(ISKEYDOWN(#p) = 1)
waitms(20)
END_CYC
END_IF
waitms(30)
////////////////////////////////////////////////////////////////////////
// поток 2
THREAD(cl, 3)
waitms(rnd(262,373))
keyDown(#d)
waitms(rnd(262,373))
move(1027,73)
waitms(rnd(262,373))
DBLCLICK(1027,73)
waitms(rnd(262,373))
keyUp(#d)
waitms(rnd(4325,5046))
END_THREAD
// переключатель 2
IF(ISKEYDOWN(#o) = 1)
$run = $run ^ 4
IF($run = 3)
SETTHREAD(cl, 5)
waitms(20)
IF(ISKEYDOWN(#o) = 1)
keyUp(#o)
END_IF
ELSE
SETTHREAD(cl, 4)
END_IF
WHILE(ISKEYDOWN(#o) = 1)
waitms(20)
END_CYC
END_IF
waitms(30)