Программа RENUM для BASIC для Орион-128 по журналу Радиолюбитель
Программа позволяет добавить новые функции работы с BASICом
Публиковалось в журнале Радиолюбитель №12 - 1993 год
В. ГАВРИЛЕНКО, 211440. Витебская обл., г.Новополоцк, ул.Олимпийская, 9 - 3.
УТИЛИТА RENUM для ПК "Орион-128
Пользователи ПК "Орион-128" наверняка оценили такие достоинства
интерпретатора "BASIC-ORION" [1], как графика, цвет, поддержка RAM-диска,
широкий набор операторов и функций языка BASIC. Тем не менее, интерпретатор
имеет и ряд недостатков.
Один из недостатков определен программной ошибкой и заключается в том. что
интерпретатор некорректно обрабатывает константы, записанные в формате
плавающей запятой с отрицательным значением показателя степени. Такую
ситуацию можно обойти, используя обратную величину и изменив знак показателя
степени. Например, операцию присвоения А-1.23Е-4 надо записать как А-1
/1.23К4. В более сложных выражениях можно переносить константу из числителя
в знаменатель и наоборот. При этом необходимо изменять знак показателя
степени и учитывать приоритет выполнения арифметических операций, чтобы
избежать грубых ошибок округления из-за перевыполнения разрядной сетки
компьютера.
Существенным недостатком интерпретатора является отсутствие встроенной
директивы перенумерации строк программы. Однако организация операционной
системы OR DOS {2} и особенности самого интерпретатора позволяют решить эту
проблему.
Вниманию читателей предлагается утилита RENUM, предназначенная для
перенумерации строк Basic-программы с произвольными начальным номером и
шагом нумерации. Коды программы с подстрочными контрольными суммами
приведены в табл 1.
Таблица 1
Вводить коды можно С помощью директивы MODIFY инструментального монитора "Ml28$" (3) или, что гораздо удобнее, с помощью экранного редактора памяти
{1}.
Ввод кодов производится с адреса 000011.
После ввода программа записывается в RAM-диск следующей командой ORDOS: S
RENUM$ 0.36F. Затем директивой FILE A DDR монитора "Ml28$" необходимо
установить адрес загрузки программы RENUM равным B000H.
Работа с утилитой осуществляется весьма просто. После запуска интерпретатора
и загрузки Basic-программы вызовите утилиту перенумерации директивой LOAD "RENUM".
После появления на экране дисплея соответствующих запросов введите номер
начальной строки программы и шаг перенумерации. Числа вводятся в десятичной
форме и завершаются нажатием клавиши [BK]. Через некоторое время, зависящее
от размера вашей программы, интерпретатор вернется в командный режим.
Введите директиву LIST и вы увидите результат работы утилиты RENUM.
В процессе работы утилиты возможно появление сообщения: ОШИБКА В СТРОКЕ N.
Эго означает, что в строке N имеется ссылка на несуществующую строку
Basic-программы. После нажатия на любую клавишу утилита продолжит проверку
текста программы, но исходный текст не будет изменен.
По возникшим проблемам и вопросам программного обеспечения 11К "Орион-128"
можно обращаться по адресу: 2//440, Витебская область, г.Новополоцк-11, а/я
10. При получении оплаченного конверта с обратным адресом, высылается каталог программ. Литература:
1. Сугоняко В., Сафронов В.
Бейсик "ORION". - Радио. - 1991. - N 4. -
С.32-39; N 5. - С.37-42.
2. Сугоняко В., Сафронов В. Операционная система "ORDOS" для ПРК "Орион". -
Радио. - 1990. - N 8. - С.38-45.
3. Сугоняко В., Сафронов В. Инструментальный монитор для "Орион-128". -
Радио. - 1990. - N 10. - С.44-46.
На предыдущую страницу На главную страницу На следующую страницу