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 - Aleksandr31

Pages: [1] 2
1
Ошибки / Re: Массив
« on: March 05, 2017, 01:25:52 PM »
да так, не к чему, это же ПРИМЕР из справки с ошибкой, ну как бы думал что надо сообщать если нашёл ошибку  :-[

2
Ошибки / Массив (не верный скрипт в справке)
« on: March 05, 2017, 04:42:33 AM »
понадобилось сложить цифры массива, заглянул в справку

Code: (clickermann) [Select]
// массив из трех элементов
$var[0] = 1
$var[1] = 2
$var[2] = 3

$result = 0 // накапливаемая сумма

// перебор через цикл элементов массива [0 .. 2]
for($i, $i < 3)
  $result = $result + $var[ $i-1 ]
end_cyc

// вывод суммы элементов
print( $result )
не работает

Code: (clickermann) [Select]
// массив из трех элементов
$var[0] = 1
$var[1] = 2
$var[2] = 3

$result = 0 // накапливаемая сумма

// перебор через цикл элементов массива [0 .. 2]
for($i, $i < 3)
  $result = $result + $var[ $i ]
end_cyc

// вывод суммы элементов
print( $result )
а так работает

3
Общие вопросы / Re: поиск чисел в текстовом файле
« on: March 22, 2015, 12:56:02 PM »
NStra, спасибо за помощь, возьму твой скрипт за основу, попробую переделать т.к. нужно чтобы находил Все цифры в файле а не одно и записывал их в другой файл. Вечером попробую переделать, результат опишу  :D. $Number=$Number+0 //Без этой записи кликер принимает переменную за строку - не знал, спасибо за подсказку. Получается если с переменной производится арифметическое  действие то кликер воспринимает его как число, а если нет то как текст? Странно.

4
Общие вопросы / Re: поиск чисел в текстовом файле
« on: March 22, 2015, 12:13:18 AM »
UNDEFINE($x)
UNDEFINE($y)
UNDEFINE($h)
UNDEFINE($s)
UNDEFINE($str)

DEFINE($x, 50) //начальное число для поиска
DEFINE($y, 7)  //начальная строка поиска
DEFINE($h, 8)  //шаг увеличения часла


FOR($y,$y<TFCOUNT ("ИсхНабор.txt")+1)
   FOR($x,$x < 500)
     
      $str = TFREAD ("ИсхНабор.txt", $y)
      INT($str)
      IF(STRPOS($str, $x,) > 0)
         TFWRITE("ОбрНабор.txt",STRCONCAT($x,":", $y-1, ":",$h))
      END_IF
     
      LOGWRITE ("шаг=",$h)
      LOGWRITE ("Х=",$x)
      LOGWRITE ("У=",$y)
     
      INC($x,$h)
   END_CYC
   
   DEFINE($s, $x-500)
   UNDEFINE($x)
   DEFINE($x, $s)
   
   WAIT(5)
END_CYC

вот моя попытка, придумать но чую вызовет смех  :-[, очень сильно не смейтесь лузер я. Уперся в правильный поиск числа и с шагом какая то ошибка, не пойму задаю определённый шаг а в итоге шаг на 1 больше :( , в записи результата $y-1, задал специально т.к. в тексте до : строки начинаются с нулевой а реально строка может быть только 1.

5
Общие вопросы / Re: поиск чисел в текстовом файле
« on: March 21, 2015, 11:52:11 PM »
хм.. и правда пример текста чего то не подумал приложить, извиняйте, да и задачку я вкратце описал, что тоже наверно неправильно, просто хочется самому разобраться но знаний походу не хватает :-(, а задачка состоит в том что надо обработать текстовый файл полученный при помощи скрипта который недавно предложил Vint (еще раз спасибо), но обработать его надо с определённый условием. К примеру задано начальное строка "7" и число поиска "50", его может и не быть в этой строке но потом это число увеличивается на заданный шаг скажем "8", и снова ищется в этой строке и т.д. строка может содержать числа от 0-500, то есть число поиска может увеличится не более чем до 500. Когда все варианты для этой строки найдены, поиск переходит к следующей строке но начальное число поиска в следующей строке это разница числа с последним шагом и максимальным значением 500 ну и т.д., а самое интересное что закончится поиск должен там где начался, то есть с начальной строки и ограничится начальным числом поиска, как бы пройдя по кругу, ну вот такая нетривиальная задачка, по крайней мере для меня.  В Обработанном варианте числа хотелось бы записать в виде 7:50:8. строка:число:шаг.

6
Общие вопросы / поиск чисел в текстовом файле
« on: March 21, 2015, 06:16:32 PM »
снова я с поиском в чисел  ???, требуется найти одна, двух, трехзначных чисел. К сожалению как найти одно и двухзначные числа не могу понять, кликер находит одно и двухзначные числа в составе трехзначных (скажем 23 в 230 или в 623)  :(, как это то исключить недопонимаю, может подскажите.

7
Общие вопросы / Re: работа с текстом
« on: March 13, 2015, 12:12:09 PM »
ОГРОМНОЕ СПАСИБО! по моему Всё Работает  :D, пока в процессе почти 40 000 строк обрабатывает.

Все Отлично, Vint еще Раз Спасибо.

8
Общие вопросы / Re: работа с текстом
« on: March 13, 2015, 11:46:11 AM »
да первый сортированный, но количество одинаковых значений может быть разным

9
Общие вопросы / работа с текстом
« on: March 13, 2015, 11:11:32 AM »
Подскажите как организовать такой скрипт.
Есть текстовый файл такого вида
2:54
2:345
2:420
3:19
3:220
3:365
3:415
4:460
а нужно получить на выходе, файл такого вида
2: 54 345 420
3: 19 220 365 415
4: 460
чего то не как не могу сообразить как завязать найти обрезать вставить в нужную строку  :(. Спасибо за понимание.

10
Общие вопросы / Re: Копировать системное время в буфер обмена.
« on: January 09, 2015, 11:12:39 PM »
Спасибо и мне пригодится (handshake)

11
Общие вопросы / Re: копировать текст в буфер и запись его в фаил
« on: December 17, 2014, 12:49:29 AM »
Так попробовал, не работает. Теперь по порядку Спасибо за помощь TFWRITE("out.txt", FROMCLIP()) тоже до этого пробовал, но так как не сработало стал сомневаться что то не правильно написал. Но был уверен что точно до этого РАБОТАЛО. Оказывается в Clickermann v4.10 всё фурычет а Clickermann v4.11 НЕТ.
По поводу картинка не картинка, енто точно текст, текст из панели разработчика. Это какой то баг именно версии 4.11 :(( правда текст в формате encoding="UTF-8" может в этом проблема. Эх предается пока для этих целей по юзать 10.

12
Общие вопросы / копировать текст в буфер и запись его в фаил
« on: December 12, 2014, 03:45:58 AM »
Парни помогите допетрить,
  $check = 0
   WHILE($check = 0) // пока не найдет
      GETSCREEN
      IF_PICTURE_IN (900,150, 1040, 250, "map.bmp", -1, 100)
         $check = 1
         move($_return1, $_return2)
         LCLICK($_return1, $_return2)
         KEYDOWN(#CTRL)
         WAITMS(50)
         KEYPRESS(#a)
         WAITMS(50)
         KEYDOWN (#C)
         WAITMS (50)
         KEYUP (#C)
         KEYUP (#CTRL)
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
   
   //запись в файл
   $tekst = FROMCLIP()
   STRWRITELN("out.txt",$tekst,0)
   
   WAIT(60)

лыжи походу не смазал, не врубаюсь, на выходе имею строку с 0, из 30 копируемых

13
Общие вопросы / Re: поиск в текстовом файле
« on: November 10, 2014, 01:34:24 AM »
Всё, обнаружил, что поиску мешают пустые строки, после их удаления всё заработало. А насчет поиска прямо в буфере, как я понимаю, не удалишь "" работать не будет, жаль. Может в следующей версии кликера появится полноценная возможность работы также и с текстом. Или может кликер можно подружить с uvFilesCorrector.
Спасибо за помощь.

14
Общие вопросы / Re: поиск в текстовом файле
« on: November 09, 2014, 11:09:58 PM »
у меня вот такая хрень вылазит
Ошибка при интерпретации строки: $str=
даже после удаления "
и даже уже скачал твой отредактированный файл txt, всё ровно тоже самое, что такое может быть?

15
Общие вопросы / Re: поиск в текстовом файле
« on: November 09, 2014, 08:23:15 PM »
спасибо, но чего то не работает :-\.
$str2 = "Город" // слово для поиска
 
FOR($a=1,$a<TFCOUNT ("skan.txt"))
   $str = TFREAD ("skan.txt", $a)
   IF(STRPOS($str, $str2) > 0)
      TFWRITE("output.txt", $str)
   END_IF
END_CYC
 
HALT

пример файла во вложении

Pages: [1] 2