Автокликер Clickermann :: Форум

Основной раздел => Использование => Topic started by: IIapazut on June 24, 2015, 10:20:21 AM

Title: Бесконечный кликер
Post by: IIapazut on June 24, 2015, 10:20:21 AM
Здравствуйте.
Прошу помощи в написании бесконечного кликера. Интересует кликер который будет производить нажатие левой кнопки мыши бесконечное колличество раз при запуске определенной кнопкой, но интересно так же чтобы его всегда можно было остановить, в любой момент.

Писал скрипты для серверов ро(нпц) давно правда это было, функционал схож, так же как и с пхп, но видимо было это уж слишком давно. Буду благодарен откликнувшимся. ;D
Title: Re: Бесконечный кликер
Post by: Oraven on June 24, 2015, 10:59:40 AM
Ну неужели так сложно две простые команды написать?
Code: (clickermann) [Select]
LCLICK(10,10) // клик в 10,10
WAITMS(100) // задержка в 100 мс

Горячие клавиши кликера (можно посмотреть в настройках)
Alt+A - Старт/Пауза
Alt+S - Стоп
Alt+R - Начать запись
Alt+Q - Вставить в окно редактора клик по текущем координатам мыши
Alt+W - Привязать к окну под курсором (оконный режим)

Title: Re: Бесконечный кликер
Post by: IIapazut on June 24, 2015, 03:31:18 PM
так то я написал и с условием ;D разобрался уже чуть позже после того как написал, плюс думал что можно это только скриптом прописать, спасибо 8)

только что доперло(поспал), наверное я имел ввиду что-то подобное
Code: [Select]
WHILE($I=1)
LCLICK(-1,-1)
END_CYC
IF(ISKEYDOWN(97)=1)
$I=1
END_IF
IF(ISKEYDOWN(98)=1)
$I=0
END_IF

может конечно с ошибками, но... ;D
Title: Re: Бесконечный кликер
Post by: Vint on June 24, 2015, 05:18:35 PM
Так неправильно.
Если в скрипте ничего больше нет, то зачем всё усложнять? просто переназначь горячие клавиши.

Ну можно и так как ты хочешь
Code: (clickermann) [Select]
WHILE($I = 1)
   LCLICK(-1,-1)
   waitms(30)
   IF(ISKEYDOWN(98) = 1)
      $I = 0
   END_IF
END_CYC
IF(ISKEYDOWN(97) = 1)
   $I = 1
END_IF
waitms(30)

Можно и через потоки
Code: (clickermann) [Select]
THREAD(cl)
   LCLICK(-1,-1)
   waitms(30)
END_THREAD

IF(ISKEYDOWN(97) = 1)
   $I = $I ^ 1
   IF($I = 0)
      SETTHREAD (cl, 0)
   ELSE
      SETTHREAD (cl, 1)
   END_IF
   WHILE(ISKEYDOWN(97) = 1)
      waitms(20)
   END_CYC
END_IF
waitms(30)

второй вариант для деменстрации сделан старт/стоп по одной кнопке. Так обычно удобней.