1
Общие вопросы / Чтение файла txt больше 100 метров, как ускорить процесс ?
« on: July 30, 2020, 03:13:09 PM »
Всем доброго времени суток Уважаемые!
Написал скрипт, ну точнее собрал по частям с того что нашел на форуме, так как не особо соображаю в алгоритмах (
Проблема в том что файлы txt в среднем от 80 до 100 метров, и весь этот процесс очень туго идет, хотя тестировал на файлах до 2-3 метров - все летит как ракета )
Подскажите пожалуйста как можно это все безобразие оптимизировать и ускорить ?
Или как вариант чтение txt файлов с определенной папки по очереди (add.txt, add2.txt, ... add100.txt) к примеру.
Получилось вот что:
Спасибо за Ваше внимание, буду очень благодарен за помощь!
Написал скрипт, ну точнее собрал по частям с того что нашел на форуме, так как не особо соображаю в алгоритмах (
Проблема в том что файлы txt в среднем от 80 до 100 метров, и весь этот процесс очень туго идет, хотя тестировал на файлах до 2-3 метров - все летит как ракета )
Подскажите пожалуйста как можно это все безобразие оптимизировать и ускорить ?
Или как вариант чтение txt файлов с определенной папки по очереди (add.txt, add2.txt, ... add100.txt) к примеру.
Получилось вот что:
Code: (clickermann) [Select]
FOR ($a=0, $a<1) // 1 кусок цикла
WAITMS(10)
LCLICK(1011,360)
END_CYC
LCLICK(344,705)
FOR ($i=0, $i<150) // 2 кусок
INC ($num,1) // нарастающая переменная, строка +1
IF($num > TFCOUNT ("add.txt")) // файл со строками
HALT // конец скрипта
END_IF
$b = TFREAD ("add.txt", $num)
//TFDELETE("add.txt", 1) - неактуально, очень замедляет процесс
INC($e,1) // нарастающая переменная, считает количество строк в логе
TOCLIP(strconcat("Привет ",$b))
KEYDOWN (#CTRL)
KEYDOWN (#V)
KEYUP (#V)
KEYUP (#CTRL)
KEYPRESS(#ENTER)
WAITMS(5)
LOGWRITE ($e) // лог
END_CYC
Спасибо за Ваше внимание, буду очень благодарен за помощь!