Messages

211

Прочее / Re: Защита от CeatEngine.

« on: February 11, 2019, 06:23:53 PM »

Есть платный артмани)

212

Предложения / Re: UNDEFINEALL()

« on: February 10, 2019, 12:13:23 PM »

может быть это не критично, но если перед запуском не закрыть текущий процесс кликера, то у нового процесса горячие клавиши работать не будут

213

Общие вопросы / Re: Все же можно программно отжать физически зажатую кнопку

« on: February 10, 2019, 11:17:17 AM »

Мне не понятна твоя проблема, но вот одной кнопкой с проверкой

Code: (clickermann) [Select]

IF(ISKEYDOWN(0x01) = 1)
   $time = $_ms + 900
   WHILE(ISKEYDOWN(0x01) = 1)
      WAITMS(25)
   END_CYC
   IF($_ms > $time)
      $state = $state ^ 1
      SETTHREAD(ThreadScript, $state)
   END_IF
END_IF

THREAD(ThreadScript, 0)
   // Твой скрипт
END_THREAD

214

Предложения / Re: UNDEFINEALL()

« on: February 10, 2019, 09:33:07 AM »

Если скрипт нужно начать сначала, то можно просто перезапустить скрипт через батник

215

Общие вопросы / Re: Работа одновременно двух программ с курсором

« on: February 08, 2019, 08:54:53 PM »

Неверный синтаксис

А почему тогда работает и не сообщает об синтаксической ошибке? Или речь идёт о том, что отсутствие скобок не гарантирует порядок проверки условия слева на право?

216

Общие вопросы / Re: Работа одновременно двух программ с курсором

« on: February 08, 2019, 05:05:03 PM »

То же самое, без циклов. Таким образом можно "распараллеливать" выполнение скрипта без потоков

Code: (clickermann) [Select]

IF($camouflage != 0 & $time_camouflage < $_time_t)
   SWITCH($search_clo4k)
   CASE(0)
      GETSCREEN    ($FlashPlayer_left, $FlashPlayer_top, $FlashPlayer_width, $FlashPlayer_height)
      IF_PICTURE_IN($FlashPlayer_left, $FlashPlayer_top, $FlashPlayer_width, $FlashPlayer_height, STRCONCAT("data\pictures\camouflage_", STRCUT("XL,XS", $clo4k_type, 2), ".bmp"), -1, 100)
         $_xclo4k = $_return1
         $_yclo4k  = $_return2
         $search_clo4k = 2
         $clo4k_type = STRCUT("XL,XS",    $clo4k_type, 2)
         PRINT("Камуфляжный процессор: ", $clo4k_type)
      ELSE
         $clo4k_type = $clo4k_type + 4
      END_IF
      IF($clo4k_type == 8)
         PRINT("Камуфляжный процессор не найден")
         $camouflage = 0
      END_IF
   CASE(1)
      GETSCREEN  ($_xclo4k - 17, $_yclo4k - 13, $_xclo4k + 17, $_yclo4k + 24)
      IF(PXLCOUNT($_xclo4k - 17, $_yclo4k - 13, $_xclo4k + 17, $_yclo4k + 24, 2959912) != 0)
         PRINT("Камуфляжный процессор: ", $clo4k_type, " израсходован")
         $camouflage = 0
      ELSE
         $search_clo4k = 2
      END_IF
   CASE(2)
      GETSCREEN  ($_xclo4k - 17, $_yclo4k - 13, $_xclo4k + 17, $_yclo4k - 9)
      IF(PXLCOUNT($_xclo4k - 17, $_yclo4k - 13, $_xclo4k + 17, $_yclo4k - 9,  9204268) != 0)
         LCLICK($_xclo4k + 1 + RND(-5,5), $_yclo4k + 10 + RND(-5,5))
         $total_num = $total_num + 1
         PRINT("Использован камуфляжный процессор: ", $clo4k_type, " | ", "Всего использованно: ", $total_num)
         $time_camouflage = $_time_t + 1
         $search_clo4k = 1
      END_IF
   END_SWITCH
END_IF


217

Ошибки / Re: WINDOWS 10 жутко виснет

« on: February 07, 2019, 09:23:23 PM »

Я уже заметил. Если кликеру перекрыть доступ к сети, то всё начинает нормально работать

218

Ошибки / Re: WINDOWS 10 жутко виснет

« on: February 07, 2019, 09:06:48 PM »

У меня то же самое происходит

219

Общие вопросы / Re: Нужна помощь, кликер через раз пропускает картинку.

« on: February 06, 2019, 07:41:32 PM »

Используй лог для отладки скрипта

Code: (clickermann) [Select]

GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, "like.bmp", -1, 100)
   PRINT("Нашёл like.bmp")
   MOVE($_return1, $_return2)
   WAITMS(250)
   LCLICK($_return1, $_return2)
   WAITMS(250)
ELSE
   PRINT("Не нашёл like.bmp")
END_IF

220

Общие вопросы / Re: Нужна помощь с потоками

« on: February 02, 2019, 10:17:07 PM »

пиши так, что бы скрипт не зацикливался на одном месте где нужна проверка)

221

Общие вопросы / Re: Помогите с кодом, пожалуйста.

« on: February 02, 2019, 01:14:19 PM »

Code: (clickermann) [Select]

SCREENSHOTEX (x1, y1, x2, y2, [pref], [format] )
// x1, y1, x2, y2 - четыре координаты, описывающие сохраняемую область буфера
// pref - необязательный параметр; префикс названия
// format - необязательный параметр; тип файла (сжатие): 0 - bmp; 1 - jpeg 

222

Общие вопросы / Re: Почистить все переменные.

« on: February 01, 2019, 02:47:56 PM »

Мой вариант чем не подходит?)

Вот еще один вариант через массив

Code: (clickermann) [Select]

$var534 = 1
$var758 = 1

SUB(SETVARLIST, $variable_names_list, $value)
   STRSEPARATE ($variable_names_list, ",", $arraylist)
   FOR($count = ARRSIZE($arraylist), $count > 0, -1)
      SETVAR(STRCONCAT("$", $arraylist[$count-1]), $value)
   END_CYC
   UNDEFINE($arraylist)
END_SUB


SETVARLIST("var534,var758", #FALSE)

PRINT("var534 = ", $var534, ", ", "var758 = ", $var758)

HALT


223

Общие вопросы / Re: Почистить все переменные.

« on: February 01, 2019, 11:37:45 AM »

еще можно вот так

Code: (clickermann) [Select]

$a
$b
$c

FOR($count = 3, $count > 0, -1)
   SETVAR(STRCONCAT("$", CHAR(STRCONCAT("0x4", $count))), #TRUE)
END_CYC

PRINT("a = ", $a, ", b = ", $b, ", c = ", $c)

FOR($count = 3, $count > 0, -1)
   SETVAR(STRCONCAT("$", CHAR(STRCONCAT("0x4", $count))), #FALSE)
END_CYC

PRINT("a = ", $a, ", b = ", $b, ", c = ", $c)

HALT


224

Общие вопросы / Re: Помогите реализовать

« on: January 30, 2019, 05:21:30 PM »

я не знаю, у меня тоже 4.13 и всё работает, но на свеже-скачанным такая же фигня

P.S.
Попробуй так

Code: (clickermann) [Select]

IF(STRLEN(HTTPGET("http://crapware.aidf.org/")) > 0)

END_IF


225

Общие вопросы / Re: Помогите реализовать

« on: January 30, 2019, 05:13:27 PM »

А какая у тебя версия кликера?