Author Topic: Оптимизация скриптов  (Read 1644 times)

0 Members and 1 Guest are viewing this topic.

Hito

  • Герой форума
  • *****
  • Posts: 1212
    • View Profile
Оптимизация скриптов
« on: January 11, 2023, 12:23:10 PM »
Предлагаю в эту тему скидывать свои варианты оптимизации скриптов. Что будет входить в эту оптимизацию... - Скорость и удобство скриптов. Например, я скину сюда первый свой вариант оптимизации, который отвечает больше за удобство скрипта, чем за скорость. У меня бывает такое, что кликеру нужно поработать в окне, которое нельзя спрятать, пока кликер с ним работает. Но в это же время я могу заниматься за компом какими-то своими делами. И вот чтобы то, что я делаю с мышкой, пока я занимаюсь этими делами, не конфликтовало со скриптом кликера, я сделал такой SUB:

Code: (clickermann) [Select]
SUB(MouseClick, $L_R, $x_click, $y_click)
   
   $xmous = $_xmouse
   $ymous = $_ymouse
   
   WHILE(($_xmouse ! $x_click)|($_ymouse ! $y_click))
      WHILE((ISKEYDOWN(1) > 0)|(ISKEYDOWN(2) > 0))
         LUP($_xmouse,$_ymouse)
         RUP($_xmouse,$_ymouse)
         WAITMS(50)
      END_CYC
     
      MOVE($x_click, $y_click)
      WAITMS(50)
   END_CYC
   
   WHILE((ISKEYDOWN(1) > 0)|(ISKEYDOWN(2) > 0))
      LUP($_xmouse,$_ymouse)
      RUP($_xmouse,$_ymouse)
      WAITMS(50)
   END_CYC
   
   IF($L_R = "L")
      LDOWN($x_click, $y_click)
      WAITMS(84)
      LUP($x_click, $y_click)
      WAITMS(50)
   else
      IF($L_R = "R")
         RDOWN($x_click, $y_click)
         WAITMS(84)
         RUP($x_click, $y_click)
         WAITMS(50)
      else
         
      END_IF
   END_IF
   
   WHILE(($_xmouse ! $xmous)|($_ymouse ! $ymous))
      WHILE((ISKEYDOWN(1) > 0)|(ISKEYDOWN(2) > 0))
         LUP($_xmouse,$_ymouse)
         RUP($_xmouse,$_ymouse)
         WAITMS(50)
      END_CYC
     
      MOVE($xmous, $ymous)
      WAITMS(50)
   END_CYC

END_SUB

Вызывается эта подпрограмма таким образом:

Code: (clickermann) [Select]
MouseClick ("L", 1309,284)
Я не ду... Потому и не бу...