Код:
Внимание! В данной версии TPA режим терминала - VT52
Входная строка:
RU SY:TPA DEV:FILNAM.EXT/ключи,FILE2,...,FILE6/ключи OUTFILES/ключи
%u -1111111111111111111111111111111111111111111111111111111*
%f -11111111*
%d -11*
%n -1111*
%e -1*
%s -11111111111111111111*
%o -111111111111*
%# -1111111111111111111111111111111111111111111111111111111*
Формальные параметры:
%u - командная строка пользователя (при входе - копия входной);
%f - уст:имя (входной файл);
%d - уст:; %n - имя; %e - расширение;
%s - строка доп. арг.;
%o - часть вх. строки, отделенная пробелом (выходной файл);
%# - переопр. строка (при входе - копия входной.);
%j - рабочая строка, используется системой;
%0...%9 - переопределяемые параметры (до 128 символов)
В турборежиме:
%y - номер ошибочной строки в листинге трансляции;
%x - позиция ош. в строке (при работе с модулем M2 всегда 0);
Встроенные функции:
f_menu [Y,X]"[Шапка]"
{M строка1}
{N строкаN}* - генератор меню
Управление передается на метки:
|M: команда1
....
|N: команда2
....
f_block [Y,X]"[Шапка]"
{строка1}
{строкаN}* - блокирующее меню.
Управление передается на следующую строку "Да", либо переход к меню
верхнего уровня "Нет", либо выход без выполнения команд "Quit".
f_r[un] - в начало секции, флажки установленные по f_set
не теряются.
f_ret[urn] - возврат к предыдущему меню.
f_rest[art] - перезапуск TPA с командной строкой %u.
Все параметры переопрелеояются заново.
f_reset - очистка буфера команд
f_set ;=Ff: - задать условие
f_let %p="строка" - присвоить параметру %p значение "строка".
f_let %p+"строка" - добавить к параметру %p значение "строка".
9 (p - один из формальных параметров: 0...9,#,u,j,s,o).
f_test "строка" КОМАНДА - выполнить, если строка не пустая,
f_test ,N"строка" КОМАНДА - выполнить, если в строке символов больше, чем N.
f_delkey - очистка буфера клавиатуры.
f_keyboard "строка" - пересылка строки в буфер клавиатуры в требуемом
месте командной последовательности. (В строке:
$=<АР2>, _=<ВК>, @=<ЗБ>,^=<СУ+>, }- игнорирует
значение перечисленных символов).
f_input [Y,X]"Промпт" %p - ввод в %p строки с терминала (с использ. SL).
f_edit [Y,X]"Промпт" %p - редактирование %p (с использ. SL).
(p - один из формальных параметров: 0...9,#,u,j,s,o).
f_print [Y,X]"Строка" - вывод строки на экран.
f_#[Знач. по умолч.]"Подсказка" - ввод в %# строки с терминала (без SL).
f_ask
f_cls - очистка экрана.
f_color "стр." - Установка атрибутов (цвета) выводимых символов.
(стр.= 0-нормальный,1-дополнительный,7-инверсн.,5-мигающ.,4-подчерк.)
Строка условного коментария (;=СИМВОЛсимвол...:) открыта, если:
(СИМВОЛ - Условие)
T - Режим трассировки
R - Циклическая трансляция
L - Найден листинг трансляции или имеется сообщение от драйвера
K - Определен номер ошибочной строки
C,E,I,H - Установлен соотв. ключ
на нижнем регистре - обратное условие (r равно NOT R)
Возврат в требуемую позицию при работе с процессором RC:
;=G: RU SY:RC.SYS %d,[Уст2:] %n[.EXT]
Ндя