Author Topic: Подскажите пожалуйста  (Read 5088 times)

0 Members and 7 Guests are viewing this topic.

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Подскажите пожалуйста
« on: December 24, 2015, 06:51:19 PM »
Здравствуйте подскажите пожалуйста.
Как можно сделать так, что-бы кликер брал координаты из текстового файла и кликал бы по этим координатам мышкой?
Можно ли вообще такое сделать в этом кликере?
А то я уже всю голову сломал как такое реализовать.
А вообще задача такая:
1. Условно, есть текстовый файл в таком виде:
 3  6 18 22 31 36
 3  6 18 23 24 31
 3  6 18 23 25 36
 3  6 18 23 26 32
 3  6 18 23 27 33
 3  6 18 23 29 34
2. У каждой цифры от 1 до 36 есть свои координаты
Нужно чтобы кликерман брал из этого текстового файла первое число, первого ряда и кликал мышкой по координатам присвоенным этому числу ну и так далее.
Возможно тут вообще такое реализовать? Есть смысл дальше мучить форум и искать ответ?
Перевод массива цифр в координаты я уже решил другой программой, но если это возможно сделать здесь то было бы просто замечательно.
« Last Edit: December 24, 2015, 07:22:05 PM by Plorik »

Луций

  • Активный участник
  • ***
  • Posts: 248
  • чат в телеге: https://t.me/klickermannchat
    • View Profile
    • Пишу скрипты на заказ:
Re: Подскажите пожалуйста
« Reply #1 on: December 24, 2015, 07:15:09 PM »
можно, создаем текстовый файл с двумя строками - координатами

читаем их:

$x = tfread("file.txt",1)
$y = tfread("file.txt",2)

кликаем

lclick($x,$y)


Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #2 on: December 24, 2015, 07:26:55 PM »
можно, создаем текстовый файл с двумя строками - координатами

читаем их:

$x = tfread("file.txt",1)
$y = tfread("file.txt",2)

кликаем

lclick($x,$y)
Спасибо

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #3 on: December 24, 2015, 07:31:48 PM »
Прошу прощение за не корректность, просто по работе мне написание данного скрипта очень облегчило бы жизнь!

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #4 on: December 24, 2015, 07:35:03 PM »
можно, создаем текстовый файл с двумя строками - координатами

читаем их:

$x = tfread("file.txt",1)
$y = tfread("file.txt",2)

кликаем

lclick($x,$y)
Спасибо
А можно ли на каждое действие не создавать текстовый файл? а чтоб из одного все брал?
 

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Подскажите пожалуйста
« Reply #5 on: December 24, 2015, 09:38:50 PM »
Code: (clickermann) [Select]
FOR($a=1,$a<TFCOUNT("input.txt")+1) // последовательное чтение всех строк (3  6 18 22 31 36)
   $str = STRREPLACE(TFREAD("input.txt", $a), "  ", " ") // заменяем двойные пробелы одиночными
   STRSEPARATE($str, " ", $arr) // создаем массив с числами по разделителю (пробел) 
   FOR($b=0,$b<ARRSIZE($arr)) // последовательный перебор массива
      SWITCH($arr[$b]) // в зависимости от числа в массиве срабатывает та и ли иная секция свитча
      CASE(1)
         LCLICK(10,10) // координаты каждого числа установи свои
      CASE(2)
         LCLICK(10,10)
      CASE(3)
         LCLICK(10,10)
      CASE(4)
         LCLICK(10,10)
      CASE(5)
         LCLICK(10,10)
      CASE(6)
         LCLICK(10,10)
      CASE(7)
         LCLICK(10,10)
      CASE(8)
         LCLICK(10,10)
      CASE(9)
         LCLICK(10,10)
      CASE(10)
         LCLICK(10,10)
      CASE(11)
         LCLICK(10,10)
      CASE(12)
         LCLICK(10,10)
      CASE(13)
         LCLICK(10,10)
      CASE(14)
         LCLICK(10,10)
      CASE(15)
         LCLICK(10,10)
      CASE(16)
         LCLICK(10,10)
      CASE(17)
         LCLICK(10,10)
      CASE(18)
         LCLICK(10,10)
      CASE(19)
         LCLICK(10,10)
      CASE(20)
         LCLICK(10,10)
      CASE(21)
         LCLICK(10,10)
      CASE(22)
         LCLICK(10,10)
      CASE(23)
         LCLICK(10,10)
      CASE(24)
         LCLICK(10,10)
      CASE(25)
         LCLICK(10,10)
      CASE(26)
         LCLICK(10,10)
      CASE(27)
         LCLICK(10,10)
      CASE(28)
         LCLICK(10,10)
      CASE(29)
         LCLICK(10,10)
      CASE(30)
         LCLICK(10,10)
      CASE(31)
         LCLICK(10,10)
      CASE(32)
         LCLICK(10,10)
      CASE(33)
         LCLICK(10,10)
      CASE(34)
         LCLICK(10,10)
      CASE(35)
         LCLICK(10,10)
      CASE(36)
         LCLICK(10,10)
      DEFAULT
      END_SWITCH
      WAITMS(100) // задержка после клика
   END_CYC
   UNDEFINE($arr) // удаляем массив
END_CYC
HALT // стоп

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #6 on: December 25, 2015, 01:05:12 PM »
Code: (clickermann) [Select]
FOR($a=1,$a<TFCOUNT("input.txt")+1) // последовательное чтение всех строк (3  6 18 22 31 36)
   $str = STRREPLACE(TFREAD("input.txt", $a), "  ", " ") // заменяем двойные пробелы одиночными
   STRSEPARATE($str, " ", $arr) // создаем массив с числами по разделителю (пробел) 
   FOR($b=0,$b<ARRSIZE($arr)) // последовательный перебор массива
      SWITCH($arr[$b]) // в зависимости от числа в массиве срабатывает та и ли иная секция свитча
      CASE(1)
         LCLICK(10,10) // координаты каждого числа установи свои
      CASE(2)
         LCLICK(10,10)
      CASE(3)
         LCLICK(10,10)
      CASE(4)
         LCLICK(10,10)
      CASE(5)
         LCLICK(10,10)
      CASE(6)
         LCLICK(10,10)
      CASE(7)
         LCLICK(10,10)
      CASE(8)
         LCLICK(10,10)
      CASE(9)
         LCLICK(10,10)
      CASE(10)
         LCLICK(10,10)
      CASE(11)
         LCLICK(10,10)
      CASE(12)
         LCLICK(10,10)
      CASE(13)
         LCLICK(10,10)
      CASE(14)
         LCLICK(10,10)
      CASE(15)
         LCLICK(10,10)
      CASE(16)
         LCLICK(10,10)
      CASE(17)
         LCLICK(10,10)
      CASE(18)
         LCLICK(10,10)
      CASE(19)
         LCLICK(10,10)
      CASE(20)
         LCLICK(10,10)
      CASE(21)
         LCLICK(10,10)
      CASE(22)
         LCLICK(10,10)
      CASE(23)
         LCLICK(10,10)
      CASE(24)
         LCLICK(10,10)
      CASE(25)
         LCLICK(10,10)
      CASE(26)
         LCLICK(10,10)
      CASE(27)
         LCLICK(10,10)
      CASE(28)
         LCLICK(10,10)
      CASE(29)
         LCLICK(10,10)
      CASE(30)
         LCLICK(10,10)
      CASE(31)
         LCLICK(10,10)
      CASE(32)
         LCLICK(10,10)
      CASE(33)
         LCLICK(10,10)
      CASE(34)
         LCLICK(10,10)
      CASE(35)
         LCLICK(10,10)
      CASE(36)
         LCLICK(10,10)
      DEFAULT
      END_SWITCH
      WAITMS(100) // задержка после клика
   END_CYC
   UNDEFINE($arr) // удаляем массив
END_CYC
HALT // стоп
Огромное спасибо все работает только возник один момент.
Как-то можно что-бы он не читал весь массив целиком, а брал только первую строку? Потом отработав с ней удалял бы ее.
Не могу понять какую команду заменить
« Last Edit: December 25, 2015, 01:29:47 PM by Plorik »

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Подскажите пожалуйста
« Reply #7 on: December 25, 2015, 01:28:10 PM »
Все просто
Code: (clickermann) [Select]
WHILE(TFCOUNT("input.txt") > 0)
   $str = STRREPLACE(TFREAD("input.txt", 1), "  ", " ") // заменяем двойные пробелы одиночными
   STRSEPARATE($str, " ", $arr) // создаем массив с числами по разделителю (пробел)
   FOR($b=0,$b<ARRSIZE($arr)) // последовательный перебор массива
      SWITCH($arr[$b]) // в зависимости от числа в массиве срабатывает та и ли иная секция свитча
      CASE(1)
         LCLICK(10,10) // координаты каждого числа установи свои
      CASE(2)
         LCLICK(10,10)
      CASE(3)
         LCLICK(10,10)
      CASE(4)
         LCLICK(10,10)
      CASE(5)
         LCLICK(10,10)
      CASE(6)
         LCLICK(10,10)
      CASE(7)
         LCLICK(10,10)
      CASE(8)
         LCLICK(10,10)
      CASE(9)
         LCLICK(10,10)
      CASE(10)
         LCLICK(10,10)
      CASE(11)
         LCLICK(10,10)
      CASE(12)
         LCLICK(10,10)
      CASE(13)
         LCLICK(10,10)
      CASE(14)
         LCLICK(10,10)
      CASE(15)
         LCLICK(10,10)
      CASE(16)
         LCLICK(10,10)
      CASE(17)
         LCLICK(10,10)
      CASE(18)
         LCLICK(10,10)
      CASE(19)
         LCLICK(10,10)
      CASE(20)
         LCLICK(10,10)
      CASE(21)
         LCLICK(10,10)
      CASE(22)
         LCLICK(10,10)
      CASE(23)
         LCLICK(10,10)
      CASE(24)
         LCLICK(10,10)
      CASE(25)
         LCLICK(10,10)
      CASE(26)
         LCLICK(10,10)
      CASE(27)
         LCLICK(10,10)
      CASE(28)
         LCLICK(10,10)
      CASE(29)
         LCLICK(10,10)
      CASE(30)
         LCLICK(10,10)
      CASE(31)
         LCLICK(10,10)
      CASE(32)
         LCLICK(10,10)
      CASE(33)
         LCLICK(10,10)
      CASE(34)
         LCLICK(10,10)
      CASE(35)
         LCLICK(10,10)
      CASE(36)
         LCLICK(10,10)
      DEFAULT
      END_SWITCH
      WAITMS(100) // задержка после клика
   END_CYC
   UNDEFINE($arr) // удаляем массив
   TFDELETE("input.txt", 1) // удаляем первую строку
END_CYC
HALT // стоп

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #8 on: December 25, 2015, 01:57:19 PM »
Все просто
Code: (clickermann) [Select]
WHILE(TFCOUNT("input.txt") > 0)
   $str = STRREPLACE(TFREAD("input.txt", 1), "  ", " ") // заменяем двойные пробелы одиночными
   STRSEPARATE($str, " ", $arr) // создаем массив с числами по разделителю (пробел)
   FOR($b=0,$b<ARRSIZE($arr)) // последовательный перебор массива
      SWITCH($arr[$b]) // в зависимости от числа в массиве срабатывает та и ли иная секция свитча
      CASE(1)
         LCLICK(10,10) // координаты каждого числа установи свои
      CASE(2)
         LCLICK(10,10)
      CASE(3)
         LCLICK(10,10)
      CASE(4)
         LCLICK(10,10)
      CASE(5)
         LCLICK(10,10)
      CASE(6)
         LCLICK(10,10)
      CASE(7)
         LCLICK(10,10)
      CASE(8)
         LCLICK(10,10)
      CASE(9)
         LCLICK(10,10)
      CASE(10)
         LCLICK(10,10)
      CASE(11)
         LCLICK(10,10)
      CASE(12)
         LCLICK(10,10)
      CASE(13)
         LCLICK(10,10)
      CASE(14)
         LCLICK(10,10)
      CASE(15)
         LCLICK(10,10)
      CASE(16)
         LCLICK(10,10)
      CASE(17)
         LCLICK(10,10)
      CASE(18)
         LCLICK(10,10)
      CASE(19)
         LCLICK(10,10)
      CASE(20)
         LCLICK(10,10)
      CASE(21)
         LCLICK(10,10)
      CASE(22)
         LCLICK(10,10)
      CASE(23)
         LCLICK(10,10)
      CASE(24)
         LCLICK(10,10)
      CASE(25)
         LCLICK(10,10)
      CASE(26)
         LCLICK(10,10)
      CASE(27)
         LCLICK(10,10)
      CASE(28)
         LCLICK(10,10)
      CASE(29)
         LCLICK(10,10)
      CASE(30)
         LCLICK(10,10)
      CASE(31)
         LCLICK(10,10)
      CASE(32)
         LCLICK(10,10)
      CASE(33)
         LCLICK(10,10)
      CASE(34)
         LCLICK(10,10)
      CASE(35)
         LCLICK(10,10)
      CASE(36)
         LCLICK(10,10)
      DEFAULT
      END_SWITCH
      WAITMS(100) // задержка после клика
   END_CYC
   UNDEFINE($arr) // удаляем массив
   TFDELETE("input.txt", 1) // удаляем первую строку
END_CYC
HALT // стоп

Спасибо исправил! Я искрени прошу прощение за нубство, но что-то не так
после изменения он стал бесконечно кликать первую строку из текстовика и дальше не чего не происходит.
А нужно что-бы
1. Брал строку
2. Кликал по координатам соответствующим числам из этой строки
3. удалял эту строку
А он тупо по кругу ее шлепает)))

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Подскажите пожалуйста
« Reply #9 on: December 25, 2015, 02:16:08 PM »
Плохо исправил, в строке 83 у меня удаление первой строки файла.

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #10 on: December 25, 2015, 02:18:11 PM »
Плохо исправил, в строке 83 у меня удаление первой строки файла.
Я это внес вот мой вариант
Code: (clickermann) [Select]
WHILE(TFCOUNT("1.txt") > 0)
   $str = STRREPLACE(TFREAD("1.txt", 1), "  ", " ")
   STRSEPARATE($str, " ", $arr)
   FOR($b=0,$b<ARRSIZE($arr))
      SWITCH($arr[$b])
      CASE(1)
         LCLICK(465,365)
      CASE(2)
         LCLICK(515,365)
      CASE(3)
         LCLICK(569,365)
      CASE(4)
         LCLICK(621,365)
      CASE(5)
         LCLICK(673,365)
      CASE(6)
         LCLICK(725,365)
      CASE(7)
         LCLICK(465,400)
      CASE(8)
         LCLICK(515,400)
      CASE(9)
         LCLICK(569,400)
      CASE(10)
         LCLICK(621,400)
      CASE(11)
         LCLICK(673,400)
      CASE(12)
         LCLICK(725,400)
      CASE(13)
         LCLICK(465,435)
      CASE(14)
         LCLICK(515,435)
      CASE(15)
         LCLICK(569,435)
      CASE(16)
         LCLICK(621,435)
      CASE(17)
         LCLICK(673,435)
      CASE(18)
         LCLICK(725,435)
      CASE(19)
         LCLICK(465,470)
      CASE(20)
         LCLICK(515,470)
      CASE(21)
         LCLICK(569,470)
      CASE(22)
         LCLICK(621,470)
      CASE(23)
         LCLICK(673,470)
      CASE(24)
         LCLICK(725,470)
      CASE(25)
         LCLICK(465,505)
      CASE(26)
         LCLICK(515,505)
      CASE(27)
         LCLICK(569,505)
      CASE(28)
         LCLICK(621,505)
      CASE(29)
         LCLICK(673,505)
      CASE(30)
         LCLICK(725,505)
      CASE(31)
         LCLICK(465,542)
      CASE(32)
         LCLICK(515,542)
      CASE(33)
         LCLICK(569,542)
      CASE(34)
         LCLICK(621,542)
      CASE(35)
         LCLICK(673,542)
      CASE(36)
         LCLICK(725,542)
      DEFAULT
      END_SWITCH
      WAITMS(100)
   END_CYC
   UNDEFINE($arr)
END_CYC
TFDELETE("1.txt", 1) // удаляем первую строку
HALT
« Last Edit: December 25, 2015, 02:28:58 PM by Plorik »

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Подскажите пожалуйста
« Reply #11 on: December 25, 2015, 02:28:56 PM »
Внес да не туда! Внимательнее надо быть...
Code: (clickermann) [Select]
WHILE(TFCOUNT("1.txt") > 0)
   $str = STRREPLACE(TFREAD("1.txt", 1), "  ", " ")
   STRSEPARATE($str, " ", $arr)
   FOR($b=0,$b<ARRSIZE($arr))
      SWITCH($arr[$b])
      CASE(1)
         LCLICK(465,365)
      CASE(2)
         LCLICK(515,365)
      CASE(3)
         LCLICK(569,365)
      CASE(4)
         LCLICK(621,365)
      CASE(5)
         LCLICK(673,365)
      CASE(6)
         LCLICK(725,365)
      CASE(7)
         LCLICK(465,400)
      CASE(8)
         LCLICK(515,400)
      CASE(9)
         LCLICK(569,400)
      CASE(10)
         LCLICK(621,400)
      CASE(11)
         LCLICK(673,400)
      CASE(12)
         LCLICK(725,400)
      CASE(13)
         LCLICK(465,435)
      CASE(14)
         LCLICK(515,435)
      CASE(15)
         LCLICK(569,435)
      CASE(16)
         LCLICK(621,435)
      CASE(17)
         LCLICK(673,435)
      CASE(18)
         LCLICK(725,435)
      CASE(19)
         LCLICK(465,470)
      CASE(20)
         LCLICK(515,470)
      CASE(21)
         LCLICK(569,470)
      CASE(22)
         LCLICK(621,470)
      CASE(23)
         LCLICK(673,470)
      CASE(24)
         LCLICK(725,470)
      CASE(25)
         LCLICK(465,505)
      CASE(26)
         LCLICK(515,505)
      CASE(27)
         LCLICK(569,505)
      CASE(28)
         LCLICK(621,505)
      CASE(29)
         LCLICK(673,505)
      CASE(30)
         LCLICK(725,505)
      CASE(31)
         LCLICK(465,542)
      CASE(32)
         LCLICK(515,542)
      CASE(33)
         LCLICK(569,542)
      CASE(34)
         LCLICK(621,542)
      CASE(35)
         LCLICK(673,542)
      CASE(36)
         LCLICK(725,542)
      DEFAULT
      END_SWITCH
      WAITMS(100)
   END_CYC
   UNDEFINE($arr)
   TFDELETE("1.txt", 1) // удаляем первую строку
END_CYC
HALT

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #12 on: December 25, 2015, 02:33:53 PM »
Спасибо вы мой спаситель))))))
Какая все таки хорошая программа буду  пытаться познавать ее. Она реально во многих вещах просто кардинально может облегчить жизнь.
К сожалению очень мало справочной информации и таким профанам как я сложновато освоить))))

Plorik

  • Зашел в гости
  • *
  • Posts: 14
  • Мужик?
    • View Profile
Re: Подскажите пожалуйста
« Reply #13 on: December 25, 2015, 03:16:15 PM »
Внес да не туда! Внимательнее надо быть...
Code: (clickermann) [Select]
WHILE(TFCOUNT("1.txt") > 0)
   $str = STRREPLACE(TFREAD("1.txt", 1), "  ", " ")
   STRSEPARATE($str, " ", $arr)
   FOR($b=0,$b<ARRSIZE($arr))
      SWITCH($arr[$b])
      CASE(1)
         LCLICK(465,365)
      CASE(2)
         LCLICK(515,365)
      CASE(3)
         LCLICK(569,365)
      CASE(4)
         LCLICK(621,365)
      CASE(5)
         LCLICK(673,365)
      CASE(6)
         LCLICK(725,365)
      CASE(7)
         LCLICK(465,400)
      CASE(8)
         LCLICK(515,400)
      CASE(9)
         LCLICK(569,400)
      CASE(10)
         LCLICK(621,400)
      CASE(11)
         LCLICK(673,400)
      CASE(12)
         LCLICK(725,400)
      CASE(13)
         LCLICK(465,435)
      CASE(14)
         LCLICK(515,435)
      CASE(15)
         LCLICK(569,435)
      CASE(16)
         LCLICK(621,435)
      CASE(17)
         LCLICK(673,435)
      CASE(18)
         LCLICK(725,435)
      CASE(19)
         LCLICK(465,470)
      CASE(20)
         LCLICK(515,470)
      CASE(21)
         LCLICK(569,470)
      CASE(22)
         LCLICK(621,470)
      CASE(23)
         LCLICK(673,470)
      CASE(24)
         LCLICK(725,470)
      CASE(25)
         LCLICK(465,505)
      CASE(26)
         LCLICK(515,505)
      CASE(27)
         LCLICK(569,505)
      CASE(28)
         LCLICK(621,505)
      CASE(29)
         LCLICK(673,505)
      CASE(30)
         LCLICK(725,505)
      CASE(31)
         LCLICK(465,542)
      CASE(32)
         LCLICK(515,542)
      CASE(33)
         LCLICK(569,542)
      CASE(34)
         LCLICK(621,542)
      CASE(35)
         LCLICK(673,542)
      CASE(36)
         LCLICK(725,542)
      DEFAULT
      END_SWITCH
      WAITMS(100)
   END_CYC
   UNDEFINE($arr)
   TFDELETE("1.txt", 1) // удаляем первую строку
END_CYC
HALT
<
Блин все работает но опять не так)))
Он не только первую строку тыкает, а снова весь файл пока не удалит все строки.
А мне нужно между выполнением новой строки другие задачи вставить.
Я просто думал что просто потом запишу действия мышки и по новой скопирую скрипт и зациклю.

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Подскажите пожалуйста
« Reply #14 on: December 25, 2015, 03:24:23 PM »
Вставляй свои действия после TFDELETE("1.txt", 1)