Добавлена тема оформления "Clickermann" для кода с подсветкой синтаксиса. Выбирается из выпадающего списка "Код" (рядом с "цвет", "размер" и "шрифт") в режиме редактирования поста. Либо просто BB-тегом "code=clickermann"
0 Пользователей и 1 Гость просматривают эту тему.
$HWND = HGET($_xmouse,$_ymouse)$sx = $_xmouse$sy = $_ymouse // Если курсор стоит на месте, то в ожидании. При нажатии на ALT срабатывает LCLICK($sx,$sy). Если курсор сдвинулся хотя бы на пиксель, то HALT и ALT уже не запускает продолжение скрипта. IF($sx = $_xmouse) IF($sy = $_ymouse) WHILE(iskeydown(#ALT)=0) WAITMS(20) END_CYC WHILE(iskeydown(#ALT)=1) WAITMS(20) END_CYC WAITMS(20) LCLICK($sx,$sy) END_IFEND_IF
$sx = $_xmouse$sy = $_ymouseWHILE(($sx = $_xmouse) & ($sy = $_ymouse)) IF(ISKEYDOWN(#ALT) = 1) LCLICK($sx, $sy) WHILE(ISKEYDOWN(#ALT) = 1) WAITMS(20) END_CYC END_IF WAITMS(20)END_CYCHALT
Код: Clickermann$sx = $_xmouse$sy = $_ymouseWHILE(($sx = $_xmouse) & ($sy = $_ymouse)) IF(ISKEYDOWN(#ALT) = 1) WAITMS(300) LCLICK($sx, $sy) WAITMS(20) WHILE(ISKEYDOWN(#ALT) = 1) WAITMS(20) END_CYC END_IF WAITMS(20)END_CYCHALT
$sx = $_xmouse$sy = $_ymouseWHILE(($sx = $_xmouse) & ($sy = $_ymouse)) IF(ISKEYDOWN(#ALT) = 1) WAITMS(300) LCLICK($sx, $sy) WAITMS(20) WHILE(ISKEYDOWN(#ALT) = 1) WAITMS(20) END_CYC END_IF WAITMS(20)END_CYCHALT