Автокликер Clickermann :: Форум

Основной раздел => Общие вопросы => Topic started by: Plorik on December 24, 2015, 06:51:19 PM

Title: Подскажите пожалуйста
Post by: Plorik 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 есть свои координаты
Нужно чтобы кликерман брал из этого текстового файла первое число, первого ряда и кликал мышкой по координатам присвоенным этому числу ну и так далее.
Возможно тут вообще такое реализовать? Есть смысл дальше мучить форум и искать ответ?
Перевод массива цифр в координаты я уже решил другой программой, но если это возможно сделать здесь то было бы просто замечательно.
Title: Re: Подскажите пожалуйста
Post by: Луций on December 24, 2015, 07:15:09 PM
можно, создаем текстовый файл с двумя строками - координатами

читаем их:

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

кликаем

lclick($x,$y)

Title: Re: Подскажите пожалуйста
Post by: Plorik on December 24, 2015, 07:26:55 PM
можно, создаем текстовый файл с двумя строками - координатами

читаем их:

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

кликаем

lclick($x,$y)
Спасибо
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 24, 2015, 07:31:48 PM
Прошу прощение за не корректность, просто по работе мне написание данного скрипта очень облегчило бы жизнь!
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 24, 2015, 07:35:03 PM
можно, создаем текстовый файл с двумя строками - координатами

читаем их:

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

кликаем

lclick($x,$y)
Спасибо
А можно ли на каждое действие не создавать текстовый файл? а чтоб из одного все брал?
 
Title: Re: Подскажите пожалуйста
Post by: Oraven 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 // стоп
Title: Re: Подскажите пожалуйста
Post by: Plorik 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 // стоп
Огромное спасибо все работает только возник один момент.
Как-то можно что-бы он не читал весь массив целиком, а брал только первую строку? Потом отработав с ней удалял бы ее.
Не могу понять какую команду заменить
Title: Re: Подскажите пожалуйста
Post by: Oraven 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 // стоп
Title: Re: Подскажите пожалуйста
Post by: Plorik 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. удалял эту строку
А он тупо по кругу ее шлепает)))
Title: Re: Подскажите пожалуйста
Post by: Oraven on December 25, 2015, 02:16:08 PM
Плохо исправил, в строке 83 у меня удаление первой строки файла.
Title: Re: Подскажите пожалуйста
Post by: Plorik 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
Title: Re: Подскажите пожалуйста
Post by: Oraven 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
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 25, 2015, 02:33:53 PM
Спасибо вы мой спаситель))))))
Какая все таки хорошая программа буду  пытаться познавать ее. Она реально во многих вещах просто кардинально может облегчить жизнь.
К сожалению очень мало справочной информации и таким профанам как я сложновато освоить))))
Title: Re: Подскажите пожалуйста
Post by: Plorik 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
<
Блин все работает но опять не так)))
Он не только первую строку тыкает, а снова весь файл пока не удалит все строки.
А мне нужно между выполнением новой строки другие задачи вставить.
Я просто думал что просто потом запишу действия мышки и по новой скопирую скрипт и зациклю.
Title: Re: Подскажите пожалуйста
Post by: Oraven on December 25, 2015, 03:24:23 PM
Вставляй свои действия после TFDELETE("1.txt", 1)
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 25, 2015, 04:22:05 PM
Вставляй свои действия после TFDELETE("1.txt", 1)
Спасибо!!! Теперь почти идеально.
А какую команду надо написать и куда что-бы весь цикл делался 6 раз?
Потом я хочу вставить еще один скрипт действий мышки.
Пробовал поиграть с метками, но что-то не выходит
Сейчас скрипт выглядит так
 
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)
   waitms(2357)
  lDown(422,60)
waitms(103)
  lUp(422,60)
waitms(70)
  lDown(422,60)
waitms(149)
  lUp(422,60)
waitms(967)
  lDown(560,19)
waitms(120)
  lUp(560,19)
waitms(44)
  lDown(560,19)
waitms(149)
  lUp(561,19)
waitms(2358)
  lDown(299,450)
waitms(144)
  lUp(299,450)
waitms(4029)
  lDown(296,449)
waitms(253)
  lUp(296,449)
waitms(66)
  lDown(296,449)
waitms(135)
  lUp(297,449)
waitms(1722)
  lDown(1360,589)
waitms(1085)
  lUp(826,558)
waitms(471)
  keyDown(162)
waitms(0)
  keyDown(17)
waitms(329)
  keyDown(67)
waitms(159)
  keyUp(162)
waitms(0)
  keyUp(17)
waitms(32)
  keyUp(67)
waitms(2035)
  rDown(1014,579)
waitms(123)
  rUp(1014,579)
waitms(1107)
  lDown(1054,638)
waitms(154)
  lUp(1054,638)
waitms(2408)
  lDown(1408,522)
waitms(146)
  lUp(1408,522)
waitms(2141)
  lDown(771,57)
waitms(89)
  lUp(771,57)
waitms(4091)
  keyDown(17)
waitms(0)
  keyDown(162)
waitms(189)
  keyDown(83)
waitms(117)
  keyUp(83)
waitms(18)
  keyUp(17)
waitms(0)
  keyUp(162)
waitms(1480)
  lDown(947,175)
waitms(79)
   WAITMS(500)   
WHEELDOWN
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
END_CYC
HALT
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 25, 2015, 05:07:26 PM
[spoiler= всё повторить 6 раз]
Code: (clickermann) [Select]

FOR($a=0,$a<6) // всё от этой строки повторяем 6 раз
 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)
   waitms(2357)
  lDown(422,60)
waitms(103)
  lUp(422,60)
waitms(70)
  lDown(422,60)
waitms(149)
  lUp(422,60)
waitms(967)
  lDown(560,19)
waitms(120)
  lUp(560,19)
waitms(44)
  lDown(560,19)
waitms(149)
  lUp(561,19)
waitms(2358)
  lDown(299,450)
waitms(144)
  lUp(299,450)
waitms(4029)
  lDown(296,449)
waitms(253)
  lUp(296,449)
waitms(66)
  lDown(296,449)
waitms(135)
  lUp(297,449)
waitms(1722)
  lDown(1360,589)
waitms(1085)
  lUp(826,558)
waitms(471)
  keyDown(162)
waitms(0)
  keyDown(17)
waitms(329)
  keyDown(67)
waitms(159)
  keyUp(162)
waitms(0)
  keyUp(17)
waitms(32)
  keyUp(67)
waitms(2035)
  rDown(1014,579)
waitms(123)
  rUp(1014,579)
waitms(1107)
  lDown(1054,638)
waitms(154)
  lUp(1054,638)
waitms(2408)
  lDown(1408,522)
waitms(146)
  lUp(1408,522)
waitms(2141)
  lDown(771,57)
waitms(89)
  lUp(771,57)
waitms(4091)
  keyDown(17)
waitms(0)
  keyDown(162)
waitms(189)
  keyDown(83)
waitms(117)
  keyUp(83)
waitms(18)
  keyUp(17)
waitms(0)
  keyUp(162)
waitms(1480)
  lDown(947,175)
waitms(79)
   WAITMS(500)   
WHEELDOWN
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
END_CYC
END_CYC// всё до этой строки повторяем 6 раз
HALT

[/spoiler]
Блин нет немного не так)))
Мне нужно чтобы после удаления 6 строк он делал еще массив кликов мышкой, а не продолжал дальше работать с файлом до посинения пока он не будит пуст.
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 25, 2015, 05:27:25 PM
Проще говоря нужно чтобы было так:
1. Берет первую строку, работает с ней кликая по координатам, потом удаляет ее.
2. Выполняет массив кликов мышкой и клавиатурой
3. Эти оба действия выполняет 6 раз
4. Выполняет новый массив кликов мышкой
Все.
И заново пока не кончаться строки в файле.
А сейчас он лапатит все равно весь массив пока не удаляться все строки!
Приходиться мониторить  и в нужный мне момент останавливать, потом запускать снова.
Title: Re: Подскажите пожалуйста
Post by: Oraven on December 25, 2015, 06:09:15 PM
Code: (clickermann) [Select]
WHILE(TFCOUNT("1.txt") > 0)
   $str = STRREPLACE(TFREAD("1.txt", 1), "  ", " ")
   STRSEPARATE($str, " ", $arr)
   TFDELETE("1.txt", 1)
   FOR($a=0,$a<6) // повтор 6 раз
      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
      waitms(500)
      lDown(422,60)
      waitms(103)
      lUp(422,60)
      waitms(70)
      lDown(422,60)
      waitms(149)
      lUp(422,60)
      waitms(967)
      lDown(560,19)
      waitms(120)
      lUp(560,19)
      waitms(44)
      lDown(560,19)
      waitms(149)
      lUp(561,19)
      waitms(2358)
      lDown(299,450)
      waitms(144)
      lUp(299,450)
      waitms(4029)
      lDown(296,449)
      waitms(253)
      lUp(296,449)
      waitms(66)
      lDown(296,449)
      waitms(135)
      lUp(297,449)
      waitms(1722)
      lDown(1360,589)
      waitms(1085)
      lUp(826,558)
      waitms(471)
      keyDown(162)
      waitms(0)
      keyDown(17)
      waitms(329)
      keyDown(67)
      waitms(159)
      keyUp(162)
      waitms(0)
      keyUp(17)
      waitms(32)
      keyUp(67)
      waitms(2035)
      rDown(1014,579)
      waitms(123)
      rUp(1014,579)
      waitms(1107)
      lDown(1054,638)
      waitms(154)
      lUp(1054,638)
      waitms(2408)
      lDown(1408,522)
      waitms(146)
      lUp(1408,522)
      waitms(2141)
      lDown(771,57)
      waitms(89)
      lUp(771,57)
      waitms(4091)
      keyDown(17)
      waitms(0)
      keyDown(162)
      waitms(189)
      keyDown(83)
      waitms(117)
      keyUp(83)
      waitms(18)
      keyUp(17)
      waitms(0)
      keyUp(162)
      waitms(1480)
      lDown(947,175)
      waitms(79)
      lUp(947,175)
      WAITMS(500)
      WHEELDOWN
      WAITMS(100)
      KEYDOWN(#DOWN)
      WAITMS(100)
      KEYUP(#DOWN)
      WAITMS(100)
      KEYDOWN(#DOWN)
      WAITMS(100)
      KEYUP(#DOWN)
      WAITMS(100)
      KEYDOWN(#DOWN)
      WAITMS(100)
      KEYUP(#DOWN)
      WAITMS(100)
   END_CYC
   UNDEFINE($arr)
END_CYC
HALT
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 26, 2015, 11:29:34 AM
[spoiler]
Code: (clickermann) [Select]
WHILE(TFCOUNT("1.txt") > 0)
   $str = STRREPLACE(TFREAD("1.txt", 1), "  ", " ")
   STRSEPARATE($str, " ", $arr)
   TFDELETE("1.txt", 1)
   FOR($a=0,$a<6) // повтор 6 раз
      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
      waitms(500)
      lDown(422,60)
      waitms(103)
      lUp(422,60)
      waitms(70)
      lDown(422,60)
      waitms(149)
      lUp(422,60)
      waitms(967)
      lDown(560,19)
      waitms(120)
      lUp(560,19)
      waitms(44)
      lDown(560,19)
      waitms(149)
      lUp(561,19)
      waitms(2358)
      lDown(299,450)
      waitms(144)
      lUp(299,450)
      waitms(4029)
      lDown(296,449)
      waitms(253)
      lUp(296,449)
      waitms(66)
      lDown(296,449)
      waitms(135)
      lUp(297,449)
      waitms(1722)
      lDown(1360,589)
      waitms(1085)
      lUp(826,558)
      waitms(471)
      keyDown(162)
      waitms(0)
      keyDown(17)
      waitms(329)
      keyDown(67)
      waitms(159)
      keyUp(162)
      waitms(0)
      keyUp(17)
      waitms(32)
      keyUp(67)
      waitms(2035)
      rDown(1014,579)
      waitms(123)
      rUp(1014,579)
      waitms(1107)
      lDown(1054,638)
      waitms(154)
      lUp(1054,638)
      waitms(2408)
      lDown(1408,522)
      waitms(146)
      lUp(1408,522)
      waitms(2141)
      lDown(771,57)
      waitms(89)
      lUp(771,57)
      waitms(4091)
      keyDown(17)
      waitms(0)
      keyDown(162)
      waitms(189)
      keyDown(83)
      waitms(117)
      keyUp(83)
      waitms(18)
      keyUp(17)
      waitms(0)
      keyUp(162)
      waitms(1480)
      lDown(947,175)
      waitms(79)
      lUp(947,175)
      WAITMS(500)
      WHEELDOWN
      WAITMS(100)
      KEYDOWN(#DOWN)
      WAITMS(100)
      KEYUP(#DOWN)
      WAITMS(100)
      KEYDOWN(#DOWN)
      WAITMS(100)
      KEYUP(#DOWN)
      WAITMS(100)
      KEYDOWN(#DOWN)
      WAITMS(100)
      KEYUP(#DOWN)
      WAITMS(100)
   END_CYC
   UNDEFINE($arr)
END_CYC
HALT
[/spoiler]
Извините, но я походу не правильно условие поставил в самом начале и по этому все последующие ошибки.
Вот правильное условие:
1. Есть текстовый документ такого вида
 8  7 12 24 28 31
 8  7 12 24 28 32
 8  7 12 24 28 33
 8  7 12 24 28 34
 8  7 12 24 28 35
 8  7 12 24 28 36

 8  7 12 24 28 31
 8  7 12 24 28 32
 8  7 12 24 28 33
 8  7 12 24 28 34
 8  7 12 24 28 35
 8  7 12 24 28 36

 8  7 12 24 28 31
 8  7 12 24 28 32
 8  7 12 24 28 33
 8  7 12 24 28 34
 8  7 12 24 28 35
 8  7 12 24 28 36
2. Нужно чтобы кликер брал первые шесть строк (а не одну как я изначально писал)
3. Работал с этими строками выполняя клики по координатам от 1 до 36
4. После отработки с шестью строками выполнял нужные мне клики мышкой
5. Потом удалял эти шесть строк и начинал все по кругу пока не закончиться тект

Такой цикл будит правильный.
Title: Re: Подскажите пожалуйста
Post by: Oraven on December 26, 2015, 11:40:48 AM
7 пятниц на неделе...

Пустых строк в файле "1.txt" быть не должно
Code: (clickermann) [Select]
WHILE(TFCOUNT("1.txt") > 0)
   FOR($a=1,$a<7) // обработка 6 строк
      $str = STRREPLACE(TFREAD("1.txt", $a), "  ", " ")
      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
   
   waitms(500)
   lDown(422,60)
   waitms(103)
   lUp(422,60)
   waitms(70)
   lDown(422,60)
   waitms(149)
   lUp(422,60)
   waitms(967)
   lDown(560,19)
   waitms(120)
   lUp(560,19)
   waitms(44)
   lDown(560,19)
   waitms(149)
   lUp(561,19)
   waitms(2358)
   lDown(299,450)
   waitms(144)
   lUp(299,450)
   waitms(4029)
   lDown(296,449)
   waitms(253)
   lUp(296,449)
   waitms(66)
   lDown(296,449)
   waitms(135)
   lUp(297,449)
   waitms(1722)
   lDown(1360,589)
   waitms(1085)
   lUp(826,558)
   waitms(471)
   keyDown(162)
   waitms(0)
   keyDown(17)
   waitms(329)
   keyDown(67)
   waitms(159)
   keyUp(162)
   waitms(0)
   keyUp(17)
   waitms(32)
   keyUp(67)
   waitms(2035)
   rDown(1014,579)
   waitms(123)
   rUp(1014,579)
   waitms(1107)
   lDown(1054,638)
   waitms(154)
   lUp(1054,638)
   waitms(2408)
   lDown(1408,522)
   waitms(146)
   lUp(1408,522)
   waitms(2141)
   lDown(771,57)
   waitms(89)
   lUp(771,57)
   waitms(4091)
   keyDown(17)
   waitms(0)
   keyDown(162)
   waitms(189)
   keyDown(83)
   waitms(117)
   keyUp(83)
   waitms(18)
   keyUp(17)
   waitms(0)
   keyUp(162)
   waitms(1480)
   lDown(947,175)
   waitms(79)
   lUp(947,175)
   WAITMS(500)
   WHEELDOWN
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   
   FOR($с=0,$с<6) // удаляем первые 6 строк из файла
      TFDELETE("1.txt", 1)
   END_CYC
END_CYC
HALT
Title: Re: Подскажите пожалуйста
Post by: Plorik on December 26, 2015, 09:57:16 PM
7 пятниц на неделе...

Пустых строк в файле "1.txt" быть не должно
[spoiler]
Code: (clickermann) [Select]
WHILE(TFCOUNT("1.txt") > 0)
   FOR($a=1,$a<7) // обработка 6 строк
      $str = STRREPLACE(TFREAD("1.txt", $a), "  ", " ")
      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
   
   waitms(500)
   lDown(422,60)
   waitms(103)
   lUp(422,60)
   waitms(70)
   lDown(422,60)
   waitms(149)
   lUp(422,60)
   waitms(967)
   lDown(560,19)
   waitms(120)
   lUp(560,19)
   waitms(44)
   lDown(560,19)
   waitms(149)
   lUp(561,19)
   waitms(2358)
   lDown(299,450)
   waitms(144)
   lUp(299,450)
   waitms(4029)
   lDown(296,449)
   waitms(253)
   lUp(296,449)
   waitms(66)
   lDown(296,449)
   waitms(135)
   lUp(297,449)
   waitms(1722)
   lDown(1360,589)
   waitms(1085)
   lUp(826,558)
   waitms(471)
   keyDown(162)
   waitms(0)
   keyDown(17)
   waitms(329)
   keyDown(67)
   waitms(159)
   keyUp(162)
   waitms(0)
   keyUp(17)
   waitms(32)
   keyUp(67)
   waitms(2035)
   rDown(1014,579)
   waitms(123)
   rUp(1014,579)
   waitms(1107)
   lDown(1054,638)
   waitms(154)
   lUp(1054,638)
   waitms(2408)
   lDown(1408,522)
   waitms(146)
   lUp(1408,522)
   waitms(2141)
   lDown(771,57)
   waitms(89)
   lUp(771,57)
   waitms(4091)
   keyDown(17)
   waitms(0)
   keyDown(162)
   waitms(189)
   keyDown(83)
   waitms(117)
   keyUp(83)
   waitms(18)
   keyUp(17)
   waitms(0)
   keyUp(162)
   waitms(1480)
   lDown(947,175)
   waitms(79)
   lUp(947,175)
   WAITMS(500)
   WHEELDOWN
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   KEYDOWN(#DOWN)
   WAITMS(100)
   KEYUP(#DOWN)
   WAITMS(100)
   
   FOR($с=0,$с<6) // удаляем первые 6 строк из файла
      TFDELETE("1.txt", 1)
   END_CYC
END_CYC
HALT
[/spoiler]
Большое спасибо еще раз!
Теперь все работает идеально.
Вы вообще неутруждаете себя обдумыванием технического задания, а программисты приучены кодить так, как логически интерпритирует написанное, трезвый и психически здоровый человек. Неужели трудно, всего один раз вместо вежливых слов, быть вежливым по сути и немного подумать, как поймёт описание ваших хотелок другой человек? Ненужно бесконечно эксплуатировать отзывчивость модераторов, она ведь может пригодиться тем достойным людям, что нуждаются в помощи больше вас. :-X
Вы конечно правы в чем-то, но не в том, что я не утруждаю себя, это не так. Просто я не программист и без всякого обмана мне это очень сложно дается, перед тем как писать новое сообщении я по долгу сидел и пробовал сам и перечитал много инфы на форуме. Люди разные кому то это легко дается, а кому то нет.
Зато я могу с закрытыми глазами разобрать и собрать двигатель Т90. А кухарка приготовит такой вкусный борщ, который вы не когда в жизни не сможете сделать. И тут не в трезвости и психическом здоровье дело, а просто в умении что-то делать лучше чем другие ну и складе ума.

Хочу еще раз поблагодарить за помощь и пожелать приятно и весело провести всем новогодние праздники!!!
Удачи ребята с НОВЫМ ГОДОМ
тему закрываю