Messages

31

Общие вопросы / Re: помогите грамотно построить код

« on: January 21, 2023, 09:25:05 AM »

Code: (clickermann) [Select]

GETSCREEN(930, 740, 950, 885)
IF_PIXEL_IN(930, 740, 950, 885, 1446469, 1446725)
    KEYDOWN(#RIGHT)
    WAITMS(100)
    KEYUP(#RIGHT)
ELSE
    KEYDOWN(#LEFT)
    WAITMS(100)
    KEYUP(#LEFT)
END_IF

WAITMS(500)

Я в своих скриптах использую вот такие паузы для кликов:

Code: (clickermann) [Select]

GETSCREEN(930, 740, 950, 885)
IF_PIXEL_IN(930, 740, 950, 885, 1446469, 1446725)
   $left_time = 0
   IF($right_time < $_ms)
      KEYDOWN(#RIGHT)
      WAITMS(100)
      KEYUP(#RIGHT)
      $right_time = $_ms + 500
   END_IF
ELSE
   $right_time = 0
   IF($left_time < $_ms)
      KEYDOWN(#LEFT)
      WAITMS(100)
      KEYUP(#LEFT)
      $left_time = $_ms + 500
   END_IF
END_IF

WAITMS(50)
Может как-то поможет? Кликает с паузами, но во время этих пауз, экран держится под контролем.

32

Общие вопросы / Re: Переименовать окно

« on: January 17, 2023, 08:31:28 PM »

Справка в кликере видимо для того, чтобы она просто была...

$_hwnd_self - Собственный hwnd кликера

Это же был эксперимент, просто на окне кликера. Поэтому делалось способом используемым на любых окнах.

Один хрен - справку никто не читает  - "Есть ли возможность средствами Кликермана переименовать окно?"

33

Общие вопросы / Re: Переименовать окно

« on: January 16, 2023, 09:41:22 PM »

Пробую на самом окне Кликермана:

Code: (clickermann) [Select]

$hwnd=wndfind("Clickermann",1)
print("$hwnd = ", $hwnd)
hsettext($hwnd, "Новый")
$hwnd2=wndfind("Новый",1)
print("$hwnd2 = ", $hwnd2)
halt
Получаю результат:
$hwnd = 198334
$hwnd2 = 0

Т.е. переименование увы не срабатывает. При этом иные опции с окнами (перемещение, установление размеров) - работают нормально.

Справка в кликере видимо для того, чтобы она просто была...

$_hwnd_self - Собственный hwnd кликера

Одна строка:

Code: (clickermann) [Select]

hsettext($_hwnd_self, "Новый")И счастья полные штаны...

34

Общие вопросы / Оптимизация скриптов

« 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)

35

Общие вопросы / Re: Размер файла bmp в папке в пикселях.

« on: January 10, 2023, 08:47:17 AM »

Это не загогулины. Зачем читать в массив весь файл. Нам ни к чему массив на ~5000 элементов ради пары чисел.
А то, что учитывается 2 байта на размер (из 4) это для универсальности. Твой ограничен размером 255px. Я бывает использую больше, например 1x600

Вот компактней

Code: (clickermann) [Select]

FREADDATA("test.bmp", $wh, 18, 6)
$w = $wh[0] + $wh[1] * 256
$h = $wh[4] + $wh[5] * 256

Благодарю!

36

Общие вопросы / Re: Размер файла bmp в папке в пикселях.

« on: January 09, 2023, 05:17:11 PM »

Когда-то давно нужно было, обходился костылём с AvtoIt.
Сейчас то можно кликером, но только на версии 4.14, а я ей не пользуюсь, там вывод лога тормозной.

Code: (clickermann) [Select]

#name "Размер картинки BMP"
// Author: Vint
// Version: 0.1 (09.01.2023)
// Скрипт для Clickermann v4.14.003b

FREADDATA("test.bmp", $warr, 18, 2)
FREADDATA("test.bmp", $harr, 22, 2)
$w = $warr[0] + $warr[1] * 256
$h = $harr[0] + $harr[1] * 256

LOGWRITE("Размер изображения: ", $w, " x ", $h)

HALT

Ну, я сделал в принципе то же самое, но без "загогулин" ))))

Code: (clickermann) [Select]

FREADDATA ($file, $arr)
$shirina = $arr[18]
$visota = $arr[22]
UNDEFINE ($arr)

37

Общие вопросы / Re: Размер файла bmp в папке в пикселях.

« on: January 05, 2023, 09:01:40 PM »

Сначала соорудил костыль для этого дела, в виде dll, а потом нашел способ сделать это чисто кликером. Интересно... А тут никому это больше не надо?

38

Общие вопросы / Размер файла bmp в папке в пикселях.

« on: January 05, 2023, 12:37:36 PM »

Доброго времени суток всем. Можем ли мы как-нибудь определить размер файла bmp в пикселях, который лежит в папке? Мне, при нахождении картинки на экране, нужно записать не только координаты X1 и Y1, в которых она была найдена, но и X2-Y2...

39

Предложения / Re: Анализ текста в окне

« on: March 25, 2022, 11:25:30 PM »

Решил попробовать с общей папкой для сетевого диска с яндексом. Сетевой диск создается в пять кликов, и не нужны никакие приложения (если для капчи, то на телефоне конечно нужно). И только потом вспомнил, что такое "общий доступ" для папок в винде, а ты наверно все это мутишь из виртуальной машины, там "общая папка", я подумал про папку с общим доступом для локальной сети  . Да и пофиг, раз решил проверить, проверяю... и, для папок из сетевого диска вообще в свойствах нет такой опции, как "общий доступ"  .

А вот и тот затык, что не дал кликеру сохранить ничего на диск. Как видно, путь верный, а у кликера ошибка 

У тебя какой-то путь странный... Что за - яндекс диск (Т:)?

40

Предложения / Re: Анализ текста в окне

« on: March 25, 2022, 08:02:46 AM »

И точно помню, что в чем то был затык.

Я вспомнил один затык. Если постоянно периодически сохронять файлы, то на другом конце они не прогружаются, пока не закончится сохранение. Но у меня, например, в скрипте стоит проверка на существование файла с хешем капчи. И если нет такого файла, то сохроняет. И капчи норм приходят на мобильник.

41

Предложения / Re: Анализ текста в окне

« on: March 25, 2022, 07:54:15 AM »

Ну понятно, но нужно еще приложение ядиск ставить? Я просто даже и не знал что оно есть, вернее не заострял на этом внимания.

Без этого никак. И на комп ставить, и на телефон. И чтоб работало с одним и тем же акком.

42

Предложения / Re: Анализ текста в окне

« on: March 24, 2022, 11:45:17 PM »

Круто. А ты именно через через общую папку с установкой ядиска? Потому-что я тогда скорее всего на сетевой диск мутил, который привязывал к ядиску. А к сетевому диску как таковой путь почему-то не работал. Вернее работал, но файл перенаправлялся куда-то на локальный диск, в какую-то непонятную директорию. Я и кинул, не сильно и нужно было.

Из виртуалки вот так путь к папке выглядит - C:\Users\Hito\YandexDisk\bmp Это папка такая - "bmp", уже на яндекс-диске.
Скрипт у меня в эту папку скидывает вот так:

Code: (clickermann) [Select]

SCREENSHOTFIX($x1cap,$y1cap, $x2cap,$y2cap, STRCONCAT("C:\Users\Hito\YandexDisk\bmp\",$log_name,"   ",$count,".bmp"), 0)

43

Предложения / Re: Анализ текста в окне

« on: March 24, 2022, 08:27:13 PM »

А ты попробуй, у меня такая идея была... возможно даже не у меня, на форуме ктото возможно писал. Я точно помню, что пытался реализовать. И точно помню, что в чем то был затык. Если не ошибаюсь, что-то с параметром пути к этой папке не работало. Но возможно я и не с общей папкой работал, а с сетевым диском... не помню точно. Но дело было.

Если затык тот что я описал, то все равно можно же через проводник, кнопашками. Попробуй.

У меня даже из виртуалки все получилось )) Без каких-либо затыков )) Скрин на телефоне через 3-5 сек ))

44

Предложения / Re: Анализ текста в окне

« on: March 24, 2022, 09:28:49 AM »

Я тут вопрос с серьезной капчей решал и мне такая идея в голову пришла, что я аж обалдел. А нафига мы решали - каким образом отправлять картинку в какой-нибудь месенджер...? Устанавливаешь тот же яндекс-диск на комп и мутишь одну общую (с ним) папку на компе. Все капчи, какие выскакивают, сохраняешь кликером в эту папку и в чат пусть кликер пишет, что мол - капча появилась. На телефон свой ставишь яндекс-диск и фходишь в нем в акк, через который с ним работает кликер. У тебя на телефоне - тилинь-тилинь - "капча появилась". Ты открываешь папку яндекс-диска и смотришь капчу и ответ посылаешь кликеру через чат.

45

Общие вопросы / Re: Как из строки сделать математический пример, чтобы узнать решение?

« on: March 23, 2022, 04:03:35 PM »

Вариант для примеров посложнее, но только плюс и минус.

Code: (clickermann) [Select]

$str = "7-67+345+876+86+7-67-56787+7898+6787+56789"

$len = 1
arrpush($sign, 0)
WHILE($len > 0)
   $len = STRPOS ($str, "+", $len)
   IF($len > 0)
      arrpush($sign, $len)
      $len = $len+1
   END_IF
END_CYC

$len = 1
WHILE($len > 0)
   $len = STRPOS ($str, "-", $len)
   IF($len > 0)
      arrpush($sign, $len+0.00004)
      $len = int($len+1)
   END_IF
END_CYC
arrpush($sign, STRLEN ($str)+1)

ARRSORT ($sign)

$num = STRCUT2($str, int($sign[$a])+1, int($sign[$a+1])-1)
FOR($a=1,$a<arrsize($sign)-1)
   IF(int($sign[$a])<$sign[$a])
      $num = $num - STRCUT2($str, int($sign[$a])+1, int($sign[$a+1])-1)
   else
      $num = $num + STRCUT2($str, int($sign[$a])+1, int($sign[$a+1])-1)
   END_IF
END_CYC

print("ответ:   ", $num)

halt


Благодарю!