Author Topic: 1 LCLICK= 4 LCLICK..?  (Read 6158 times)

0 Members and 1 Guest are viewing this topic.

islavik83

  • Освоившийся
  • **
  • Posts: 21
    • View Profile
1 LCLICK= 4 LCLICK..?
« on: March 18, 2013, 11:39:08 PM »
помогите пожалуйста.. как написать скрипт что бы при одном нажатии левой клавиши мыши скрипт нажимал эту клавишу например 4 раза с интервалом 20 мс.

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: 1 LCLICK= 4 LCLICK..?
« Reply #1 on: March 19, 2013, 01:03:42 AM »
Code: (clickermann) [Select]
IF (iskeydown(1)=1)
   WHILE(iskeydown(1)=1)
      WAITMS(10)
   END_CYC
   for ($a, $a<4)
      LCLICK(-1,-1)
      WAITMS(20)
   end_cyc
Else
   WAITMS(20)
END_IF

islavik83

  • Освоившийся
  • **
  • Posts: 21
    • View Profile
Re: 1 LCLICK= 4 LCLICK..?
« Reply #2 on: March 19, 2013, 01:54:43 AM »
Code: (clickermann) [Select]
IF (iskeydown(1)=1)
спасибо.. работает..

JacsoN

  • Активный участник
  • ***
  • Posts: 152
  • извините но мне нужны полнейшие обяснения
    • View Profile
Re: 1 LCLICK= 4 LCLICK..?
« Reply #3 on: February 21, 2021, 03:39:29 PM »
Code: (clickermann) [Select]
IF (iskeydown(1)=1)
   WHILE(iskeydown(1)=1)
      WAITMS(10)
   END_CYC
   for ($a, $a<4)
      LCLICK(-1,-1)
      WAITMS(20)
   end_cyc
Else
   WAITMS(20)
END_IF

Отлично ! ! !  а  почему  срабатывает толлько  1  раз  после  запуска    кликера ????  как сделать чтобы  работало всегда  когда  нажимаем  клавишу #1см  пирмер  мой
Code: (clickermann) [Select]
IF (iskeydown(#1)=1)
   WHILE(iskeydown(#1)=1)
      WAITMS(10)
   END_CYC
   for ($a, $a<4)
      KEYPRESS(#A)
     
      WAITMS(20)
   end_cyc
Else
   WAITMS(20)
END_IF
если  есть  возможность  объясни  по  скайпу  что  да  как

dramster

  • Герой форума
  • *****
  • Posts: 1134
    • View Profile
Re: 1 LCLICK= 4 LCLICK..?
« Reply #4 on: February 21, 2021, 09:01:46 PM »
Отлично ! ! !  а  почему  срабатывает толлько  1  раз  после  запуска    кликера ????  как сделать чтобы  работало всегда  когда  нажимаем  клавишу #1см  пирмер  мой
Code: (clickermann) [Select]
IF (iskeydown(#1)=1)
   WHILE(iskeydown(#1)=1)
      WAITMS(10)
   END_CYC
   for ($a, $a<4)
      KEYPRESS(#A)
     
      WAITMS(20)
   end_cyc
Else
   WAITMS(20)
END_IF

 :-\ Ты бы глянул дату создания этой темы, начало 2013 года.

Наращиваемая переменная в цикле FOR не обнуляется после завершения цикла. По этому, если это нужно, ее следует обнулять либо присваивать другое значение -  for ($a=0, $a<4)

В 2013 году там была черт его знает какая бородатая версия, и в ней скорее всего переменная обнулялась автоматом.