Некоторые подпрограммы в ULBLIB пересекаются с теми, что я портировал из RSX в RSXLIB.
Для них описание уже есть.
ULBLIB содержит следующие подпрограммы, присутствующие в RSXLIB:
- подпрограммы сохранения регистров $SAVAL, $SAVRG, $SAVVR
- подпрограммы преобразования $CBDSG, $CBDMG, $CBOSG, $CBOMG
- подпрограммы арифметики $DIV, $MUL
- - - Добавлено - - -
Другие подпрограммы преобразования (этих в RSXLIB нет).
Код:;CALL $R50AS - ПРЕОБРАЗОВАНИЯ RADIX-50 В ASCII ; КОД 034 (".") ПРЕОБРАЗУЕТСЯ В "%" ; КОД 035 ПРЕОБРАЗУЕТСЯ В "*" ; ;НА ВХОДЕ: ; R0 - СЛОВО ДЛЯ ПРЕОБРАЗОВАНИЯ ; R1 - АДРЕС БУФЕРА ; ;НА ВЫХОДЕ: ; R1 - УКАЗЫВАЕТ НА СЛЕДУЮЩИЙ БАЙТ ЗА ПОЛУЧЕННОЙ СТРОКОЙ ;CALL $ASCR5 - ПРЕОБРАЗОВАНИЕ ASCII В RADIX-50 ; ПРОВЕРОК НЕ ПРОИСХОДИТ, ЕСЛИ СТРОКА СОДЕРЖИТ ; СИМВОЛЫ, НЕ ВХОДЯЩИЕ В RADIX-50 - ПОЛУЧИТСЯ КАША ; "%" ПРЕОБРАЗУЕТСЯ В КОД 034 (".") ; "*" ПРЕОБРАЗУЕТСЯ В КОД 035 ; ;НА ВХОДЕ: ; R1 - АДРЕС СТРОКИ ; ;НА ВЫХОДЕ: ; R0 - РЕЗУЛЬТАТ В RADIX-50 ; R1 - НАЧАЛЬНЫЙ АДРЕС + 3 ;CALL $FNASC - ПРЕОБРАЗОВАНИЯ ИМЕНИ ФАЙЛА В ASCII ; ;НА ВХОДЕ: ; R0 - АДРЕС БЛОКА ИМЕНИ ФАЙЛА RT-11 ; R1 - АДРЕС БУФЕРА ; ;НА ВЫХОДЕ: ; R1 - СДРЕС СЛЕДУЮЩЕГО БАЙТА ЗА ПОЛУЧЕННОЙ СТРОКОЙ




Ответить с цитированием