Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - shatun

Pages: 1 [2] 3
16
Не дают мне покоя эти капчи )) куда не сунешься они везде. Но вот есть капчи в которых нужно двигать пазл на место вырезанной картинки.
Вот пример: https://i.imgur.com/03F0gdr.png
Причём сейчас немного усовершенствовали эти капчи. Например вместо пазла который нужно двигать теперь может появиться ромбик, сердечко и т.д.
Так вот в BAS люди уже вроде как решают такие капчи.
Как мне видится, каким-то образом отбрасываются все лишнее в картинке и остаются только два контура. Первый который нужно двигать и второй в который нужно поставить эту картинку. Затем считается количество пикселей от одного края контура до второго и после этого картинка сдвигается на заданное кол-во пикселей.

Может у кого есть мысль как это лучше реализовать при помощи кликера?

17
Общие вопросы / Re: Кликер EXE'шник.
« on: May 07, 2022, 11:35:29 AM »
Quote
скрыть можешь и сейчас... от ламеров
у меня вообще ничего особенного в коде нет, но я хочу для облегчения некоторых операций на работе его выложить для общего пользования. Но вот есть некоторые умельцы которые любят залезть и поковыряться в коде. Для меня крайне желательно, чтобы работало так как настроено. Понятно что всё что человеком сделано, завсегда сломать можно )) но вот как хотя бы по минимуму прикрыть доступ к коду от горе умельцев?

18
Если кому понадобиться переносить файлы с мобильного или на мобильный, имейте ввиду, что этот скрипт работает, но чтобы назначить мобильнику имя диска (например -  A:) без рут прав при помощи Wi Fi, можно использовать программу для андройда - WebDav сервер.
Vint, ещё раз спасибо!

19
Проверил код с пробелами как файлы так и путь
Даже попробовал создать папку с русскими буквами и пробелами C:\тест с пробелом
Код работает!
пробовал перенести на мобильник Этот компьютер\SKR-H0\Внутренний общий накопитель\DCIM\Camera
К сожалению не переносится. Но это уже другая история и другая тема.

Code: (clickermann) [Select]
$dir_in = "C:\office\test"   //папка, где будем искать
$dir_out = "C:\тест с пробелом"  // Куда перемещаем
$template = "7777"  // шаблон поиска
 
$clear = STRCONCAT("del /q ", $dir_out)
LOGWRITE ("удалили файлы")
$moveto = STRCONCAT("cd ", CHAR(34), $dir_in, CHAR(34), " && for /f ", CHAR(34), "delims=", CHAR(34), " %i in ('dir /b /s /a-d ", CHAR(34), $dir_in, "\*", $template, "*.jpg", CHAR(34), "') do (copy /y ", CHAR(34), "%i", CHAR(34), " ", CHAR(34), $dir_out, CHAR(34), ")")
 
$cmd = STRCONCAT("/C ", $clear, " && ", $moveto)
//print($cmd)
LOGWRITE ("cmd: ", $cmd)
EXECUTE("cmd.exe", $cmd)
 
HALT

20
Quote
Вот почему. Основное задание здесь, его и перечитывал несколько раз. А здесь сказано перенести.
Извиняюсь. Действительно в названии написал одно, а описал коряво. Что тут сказать - нужно мне подучиться ставить задачи.

Quote
Если надо, чтоб работало с пробелами, нужно добавить кавычек, чтоб в итоге запрос получился такой
Вообще супер!
Признаться есть такая сложность с пробелами да и с русскими названиями тоже ((
Если потребуется все эти файлики перенести на телефон то в путях будут пробелы и русские буквы.
Вот например как выглядит путь если расшарить телефон (поставить в режиме работы USB) передачу файлов:
Этот компьютер\SKR-H0\Внутренний общий накопитель\DCIM\Camera
Тут и русские буквы и пробелы присутствуют ((
думал попытаться решить это изменением названия и укоротить путь.
Типа SKR-H0\USB\DCIM
не знаю получиться или нет

22
Вот же блин!!! Когда меняешь файлам имя группой, винда вставляет пробел с номером в скобках - IMG_12201_16_145647 (21)
Внёс изменения в названия файлов и они перенеслись мигом.
Жаль что файлики которые копируются тоже удаляются. Оставить их как-то можно?
Так или иначе...
Vint, снимаю шляпу!
Огромнейшее спасибо!!!

23
Надеюсь в путях нет пробелов и русских букв.
Если будут файлы с одинаковыми именами, они перезапишутся.
Три раза проверил (все папки в корне диск C:)
1. Вспомнил историю на форуме как ты нашёл проблему и долго смеялся. Оказалось, что название у юзера картинки было с русскими буквами  а написано по английски.
2. Файлы с одинаковыми именами, они перезапишутся. Да, да.. спасибо. Извиняюсь что не написал, именно так и нужно.

Только вот у меня файлики удаляются, а в папку IMG не переносятся (
Code: (clickermann) [Select]
$dir_in = "C:\office\test"   //папка, где будем искать
$dir_out = "C:\IMG\"  // Куда перемещаем
$template = "7777"  // шаблон поиска
 
$clear = STRCONCAT("del /q ", $dir_out)
LOGWRITE ("удалили файлы")
$moveto = STRCONCAT("cd ", $dir_in, " && for /f ", CHAR(34), "delims=", CHAR(34), " %i in ('dir /b /s /a-d ", $dir_in, "\*", $template, "*.jpg') do (move /y %i ", $dir_out, ")")
 
$cmd = STRCONCAT("/C ", $clear, " && ", $moveto)
//print($cmd)
LOGWRITE ("cmd: ", $cmd)
EXECUTE("cmd.exe", $cmd)
 
HALT

вот cmd в логе..
Code: [Select]
20:16:16 удалили файлы
20:16:16 cmd: /C del /q C:\IMG\ && cd C:\office\test && for /f "delims=" %i in ('dir /b /s /a-d C:\office\test\*7777*.jpg') do (move /y %i C:\IMG\)
Важно где будет находиться запускаемый файл?
Пробовал его размещать
C:\office\test
и
C:\office
не хочет копировать файлы. Вот пример с именем файла IMG_177777_12_145647 (17).jpg.
Подскажи что не так?

24
Добрый день!
Нужно копировать файлы с определённым названием в одну папку. Перед копированием удалить все ранее сохранённые там файлы.
Например условно есть разные папки:
C:\Office\test\222
C:\Office\test\555
C:\Office\test\333

В которых имеются файлы с названиями типа: a611-47730.JPG, a611-77770.JPG, a611-47880.JPG,  7777-47880.JPG ну и т.д. и вот нужно все файлы в которых в названии есть например 7777 перенести в отдельную папку например C:\IMG и конечно перед переносом её почистить от всего лишнего.
В поиске долго искал, но как-то с перемещением файлов не так много тем. Нашёл что-то приближённое: http://crapware.aidf.org/forum/index.php?topic=4575.msg31318#msg31318 но у меня почему-то не "взлетело" подскажите пожалуйста как это лучше реализовать. В дальнейшем планирую для поиска файлов использовать переменную.

25
Общие вопросы / Re: Поиск картинок
« on: March 16, 2022, 08:08:04 AM »
.... а вот второй более весомый - координаты картинок должны быть статичны.
т.е. если монета просто вращается вокруг оси то это ТОП по скорости поиска анимированных картинок, а если она вращается и двигается (вверх, вниз, вправо или влево) этот скрипт работать небудет?

26
Общие вопросы / Re: Поиск картинок
« on: March 14, 2022, 09:01:31 AM »
Quote
А зачем там столько вызовов GETSCREEN?
я думал поскольку картинки динамические и постоянно меняют расположение нужно постоянно скринить экран и по новому скрину искать пиксели. Блин здорово если это не так. Это по сути должно ускорить работу скрипта.
Quote
И если координаты одни, в IF_PIXEL_IN можно указывать несколько цветов через запятую. Сработает на первом найденном.
у меня было много раз когда выпала одна монетка (например красная), а далее подряд сыпятся штуки 4 монетки (например зелёные)
Если кликер сразу не попал по красной картинке (такое тоже часто случается) она опустится ниже пока кликер будет жать все зелёные монетки ну и проигрыш.

Т.е. если алгоритм будет такой?:
- поиск красной
- клик по красной (промахнулся)
- поиск зелёной
- клик по зелёной
- поиск зелёной
- клик по зелёной
- поиск зелёной
- клик по зелёной
или он будет искать и жать на красную пока не нажмёт её?

Я вот уже думаю в сторону Вашего скрипта написанного выше, но для пикселей а не для картинок т.к. с анимацией он у меня не работает, но логика именно та - поиск с низу вверх как описывал автор топика.

27
Общие вопросы / Re: Поиск картинок
« on: March 13, 2022, 01:09:27 PM »
Да, Вы правы.
Я уже пошёл по этому пути. Обработка при поиске пикселей действительно происходит намного быстрее в отличии от картинок. Закинул в SUB и вызываю его раз 30)))) пока не закончится игра (не прокликаются все монетки). Только со скоростью просмотра и нажатия на найденные пиксели ещё нужно поработать.
Code: [Select]
SUB(cocfff)
 GETSCREEN(526,371, 1375, 857)
  IF_PIXEL_IN(526,371, 1374, 856, 6542231)
      LCLICK($_return1, $_return2+30)
   END_IF
WAITMS(100)
 GETSCREEN(526,371, 1375, 857)
  IF_PIXEL_IN(526,371, 1374, 856, 1205465)
      LCLICK($_return1, $_return2+30)
   END_IF
WAITMS(100)
 GETSCREEN(526,371, 1375, 857)
  IF_PIXEL_IN(526,371, 1374, 856, 1263545)
      LCLICK($_return1, $_return2+60) // здесь спец. нажатие ниже т.к. появляется похожий объект с приближённым цветом по которому нельзя нажимать
   END_IF
WAITMS(100)
 GETSCREEN(526,371, 1375, 857)
  IF_PIXEL_IN(526,371, 1374, 856, 4564812)
      LCLICK($_return1, $_return2+30)
   END_IF
WAITMS(100)
END_SUB

28
Общие вопросы / Re: Поиск картинок
« on: March 11, 2022, 04:49:59 PM »
Прошу прощения код от Atas у меня не работает, а если запускаю код который написал Vint всё чётко работает. Может что-то делаю не так...
Так или иначе большое вам спасибо. уже дней пять смотрю на форуме решение и ничего ближе к своей задаче пока не нашёл.
Уточняющий вопрос по этой теме - а можно настроить этот скрипт чтобы он работал с анимированными картинками?
Ну например разные монетки из разных цветов вращаются вокруг своей оси и опускаются вниз. Скрипт здорово работает именно по той логике которой описал автор топика, но у меня почему-то не получается чтобы он кликал по двигающимся вниз монеткам. Подскажите пожалуйста как доработать этот скрипт?
Я уже  пробовал менять   COLORMODE и размер окна в котором происходит поиск, но пока мои попытки не увенчались успехом.
Или кликермен не может искать анимированные (картинки в движении) и нажимать на них? Если вдруг кто нашёл похожее обсуждение оставьте пожалуйста ссылочку.
За ранее благодарю!

29
Code: [Select]
KEYDOWN(#CTRL)
WAITMS(50)
FOR($i=0, $i < 3)
    WHEELDOWN(1)
    WAITMS(1000)
END_CYC
KEYUP(#CTRL)
WAITMS(50)

Первый раз чётко срабатывает, но когда запускаю по кругу :

Code: [Select]
sub(mouse)
KEYDOWN(#CTRL)
WAITMS(50)
FOR($i=0, $i < 3)
    WHEELDOWN(1)
    WAITMS(1000)
END_CYC
KEYUP(#CTRL)
WAITMS(50)
end_sub


wait(1)
mouse()
wait(1)

WAIT(RND(1,3)) // рандомная задержка
LCLICK(464,961) // нажали кнопку
WAIT(RND(1,3)) // рандомная задержка

WAIT(RND(1,3)) // рандомная задержка
LCLICK(464,961) // нажали кнопку
WAIT(RND(1,3)) // рандомная задержка

WAIT(RND(1,3)) // рандомная задержка
LCLICK(1765,97) // нажали кнопку
WAIT(RND(1,3)) // рандомная задержка

WAIT(RND(1,3)) // рандомная задержка
LCLICK(270,811) // нажали кнопку
WAIT(RND(1,3)) // рандомная задержка

Пробовал много раз и пытался понять что не так. Методом перебора возможных вариантов обнаружил, что после первого круга кликер нажимает в область:

Code: [Select]
LCLICK(117,184)

30
когда просто вставляешь код, то всё чётко работает, а вот когда запускаешь циклом по кругу с нажатиями на объекты, начинаются глюки кода доходит дело до скрола мышки.
убрал вообще всё лишнее оставил простейшие нажатия.  Ещё попробовал в суб воткнуть в надежде, что поможет. пока не получается.
Code: [Select]
sub(mouse)
KEYDOWN (#CTRL)
WAITMS (50)
 
WHEELDOWN (1) //куртим колесо
 
WAITMS (50)
KEYUP (#CTRL)
 
wait(1)

KEYDOWN (#CTRL)
WAITMS (50)
 
WHEELDOWN (1) //куртим колесо
 
WAITMS (50)
KEYUP (#CTRL)
 
wait(1)


KEYDOWN (#CTRL)
WAITMS (50)
 
WHEELDOWN (1) //куртим колесо
 
WAITMS (50)
KEYUP (#CTRL)
 
wait(1)
end_sub


wait(1)
mouse()
wait(1)

WAIT(RND(1,3)) // рандомная задержка
LCLICK(464,961) // нажали кнопку
WAIT(RND(1,3)) // рандомная задержка


Pages: 1 [2] 3