Уроки по составлению скриптов для HTP.
Урок 1 (Создание первого скрипта)
Урок 2 (Улучшение первого скрипта)
Урок 3 (Cборка нужных алгоритмов из частей)
Сборка нужного алгоритма из частей.
Иногда нет времени вникать в программирование, даже в такой простой язык как HTP, требуется быстро, в течении нескольких минут создать средство для обработки группы файлов по каким-то не типовым законам (например, вырезать из содержимого файлов первую строку или т.п.).
Имея HOD Text Processor решить такие задачи легко, например, модифицировав один из стандартных, поставляемых с программой алгоритмов или собрав нужный алгоритм из частей.
Ниже приведена основная часть любого алгоритма обработки группы файлов:
Обход всех файлов в рабочей директории.
; FACE="Обход файлов в раб. директории", "3"
; @u0=E, "Типы файлов для обработки:", "txt htm"
FindE $9, @u0, "*", 0, -1, " " ; есть ли среди типов файлов знак умножить?
PrintT 0,0, "Обрабатываю файл:"
WORK GetEl @0, @FL, "\00", $1
JmpEq @0, "", END_WORK
Jmp=N $9, -1, ALL_TYPE ; если в типах фалов есть знак умножить, то обходить проверку типа, обрабатывать все типы файлов
GetEl @5, @0, ".", -1
FindE $6, @u0, @5, 0, -1, " "
Jmp=N $6, -1, WORK_CA
ALL_TYPE PrintT 1,0, @0 ; показать какой файл мы сейчас обрабатываем
; место для вставки алгоритма обработки файлов
; необходимо не забыть что в этом месте файл ещё
; не загружен в память системы и здесь требуется
; указать команды загрузки и если надо то сохранения
; имя файла который надо обработать в регистре @0
WORK_CA Add $1, $1, 1
Jmp WORK
END_WORK PrintT 0,0, "Работу закончил успешно."
Вы можете включить на место вставки алгоритма, участок кода:
LoadF @2, @0
UCase @2, 0, -1
SaveF @0, @2
и получить алгоритм подъема регистра текста в файлах.
Включив участок кода:
LoadF @2, @0
JmpNe @2, "", NOT_DEL
DelF @0
NOT_DEL
Вы получите алгоритм уничтожения файлов без содержимого, файлов нулевой длины.
Обязательно посмотрите полный список команд HTP, наверняка вы найдёте множество полезных.
Материал получен с сайта поддержки
|
