Author Topic: Бесконечный кликер  (Read 30865 times)

0 Members and 1 Guest are viewing this topic.

IIapazut

  • Зашел в гости
  • *
  • Posts: 2
    • View Profile
Бесконечный кликер
« on: June 24, 2015, 10:20:21 AM »
Здравствуйте.
Прошу помощи в написании бесконечного кликера. Интересует кликер который будет производить нажатие левой кнопки мыши бесконечное колличество раз при запуске определенной кнопкой, но интересно так же чтобы его всегда можно было остановить, в любой момент.

Писал скрипты для серверов ро(нпц) давно правда это было, функционал схож, так же как и с пхп, но видимо было это уж слишком давно. Буду благодарен откликнувшимся. ;D

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Бесконечный кликер
« Reply #1 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 - Привязать к окну под курсором (оконный режим)


IIapazut

  • Зашел в гости
  • *
  • Posts: 2
    • View Profile
Re: Бесконечный кликер
« Reply #2 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
« Last Edit: June 24, 2015, 03:56:26 PM by IIapazut »

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Бесконечный кликер
« Reply #3 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)

второй вариант для деменстрации сделан старт/стоп по одной кнопке. Так обычно удобней.
« Last Edit: June 24, 2015, 05:20:09 PM by Vint »