Author Topic: Чуток править макрос  (Read 1743 times)

0 Members and 1 Guest are viewing this topic.

Varan1875

  • Зашел в гости
  • *
  • Posts: 9
    • View Profile
Чуток править макрос
« on: November 03, 2022, 07:18:06 PM »
Привет, как сделать что бы этот макрос активировался не по нажатию key 1, а по зажатию. Т.е пока зажата клавиша мыши, он зажимает Right и Mid, а когда отжата, отжимает.
Code: [Select]
$key = 1
IF(ISKEYDOWN($key) = 1)
    $active = $active ^ 1
    IF($active = 1)
        RDOWN($_xmouse, $_ymouse)
        WAITMS(RND(250,350))
        MDOWN($_xmouse, $_ymouse)
    ELSE
        RUP($_xmouse, $_ymouse)
        MUP($_xmouse, $_ymouse)
    END_IF
 
    WHILE(ISKEYDOWN($key) = 1)
        WAITMS(20)
    END_CYC
ELSE
    WAITMS(20)
END_IF

kiril

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Чуток
« Reply #1 on: November 04, 2022, 12:17:13 AM »
Code: (clickermann) [Select]

$key = 1
IF(ISKEYDOWN($key) = 1)
   IF($active1 = 0)
      SETTHREAD (name1,1) // 0 - Пауза, 1 - Старт, 2 - Стоп
      SETTHREAD (name2,2)
      $active1=1
      $active2=0
   END_IF
ELSE
   IF($active2 = 0)
      SETTHREAD (name2,1)
      SETTHREAD (name1,2)
      $active2=1
      $active1=0
   END_IF
END_IF
WAITMS(20)

THREAD(name1, 0)
   RDOWN($_xmouse, $_ymouse)
   WAITMS(RND(250,350))
   MDOWN($_xmouse, $_ymouse)
   WAITMS(20)
END_THREAD

THREAD(name2, 0)
   RUP($_xmouse, $_ymouse)
   MUP($_xmouse, $_ymouse)
   WAITMS(20)
END_THREAD

Varan1875

  • Зашел в гости
  • *
  • Posts: 9
    • View Profile
Re: Чуток
« Reply #2 on: November 04, 2022, 12:47:58 AM »
Извиняюсь за потраченное время. Капец, думал там пару строк да переменных поменять  :o
Спасибо большое, затещу попожже.

upd. Работает как швейцарские часы. Спасибо то что нужно!
« Last Edit: November 04, 2022, 12:54:57 AM by Varan1875 »