46
Общие вопросы / Re: Помогите найти картинку
« on: December 02, 2019, 06:33:28 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.
$number = 0
EXECUTE("chrome.exe", STRCONCAT("--profile-directory=", "vk_user_data_", $number, "--new-window --window-position=0,0 --window-size=800,800 https://vk.com/play...."))
HALT
STRCUT2($io, STRPOS($io, " ", 2) + 1, STRLEN($io))
#DEFINE EOL: CHAR(13), CHAR(10)
$k = "текст из переменной"
$b = STRCONCAT($_date_str, "г.", " Кефир", EOL, EOL, $k, EOL)
PRINT($b)
HALT
GETSCREEN
SCANPICTURE($arr, $_xmin, $_ymin, $_xmax, $_ymax, "picture.bmp", -1, 100)
FOR($i = ARRSIZE($arr), $i > 0, - 2)
DBLCLICK($arr[$i - 2], $arr[$i - 1])
WAITMS(500)
END_CYC
HALT
$start_X = 331
$start_Y = 579
$end_X = $start_X + (9 * 35)
$end_Y = $start_Y + (11 * 35)
GETSCREEN($start_X, $start_Y, $end_X, $end_Y)
FOR($k = $end_Y, $k > $start_Y, - 35)
FOR($i = $end_X, $i > $start_X, - 35)
IF(PXL($i, $k) = 255)
// ...
END_IF
END_CYC
END_CYC
#DEFINE WM_SYSCOMMAND: 0x0112
#DEFINE SC_CLOSE: 0xF060
$arr[0] = 0 + INT(INPUTBOX("Кол-во проходов:", "1", 999))
$arr[1] = 0 + INT(INPUTBOX("Кол-во проходов:", "1", 999))
$arr[2] = 0 + INT(INPUTBOX("Кол-во проходов:", "1", 999))
$i = 0
WHILE($i < 3)
SWITCH($state)
CASE(2) // Тут действия с окном
LOGWRITE ("Окно №", $i + 1, "Еще проходов: ", $arr[$i])
$arr[$i] = $arr[$i] - 1
KEYPRESS(#A)
$state = 1 + ($arr[$i] > 0)
CASE(1) // Тут завершение работы с окном
LOGWRITE ("Завершение работы, с ", $i + 1, " окном")
SENDMESSAGE($hwnd, WM_SYSCOMMAND, SC_CLOSE, 0) // Закрываем окно
$i = $i + 1
$state = 0
CASE(0) // Зайдёт по 1 разу перед каждым окном
$hwnd = HGET(INT($_xmax / 2), INT($_ymax / 2)) // Получение дескриптора окна по координатам
WNDBUMP($hwnd) // Перевод окна на передний план
$state = 2
END_SWITCH
END_CYC
STRSEPARATE
Разбивает строку на подстроки, которые помещаются в массив.
// STRSEPARATE("x, y, sleep, x, y, sleep, x, y, sleep", ",", $arr)
STRSEPARATE("1,1,1000,2,2,2000,3,3,3000", ",", $arr)
$size = ARRSIZE($arr)
FOR($i = 0, $i < $size, 3)
PRINT("Координата X = ", $arr[$i], ", Координата = Y ", $arr[$i + 1], ", Задержка = ", $arr[$i + 2])
END_CYC
HALT