В строке 100 использован условный оператор, который в случае выполнения условия передает управление на начало программы (строка 30). В противном случае будет выполнен оператор STOP, прекращающий выполнение программы и переводящий интерпретатор в непосредственный режим работы.

Мы уже говорили, что интерпретатор реализует также функции редактора текстов и отладчика. Перед вводом текста новой программы необходимо сначала стереть в памяти микро-ЭВМ старую программу, воспользовавшись директивой NEW, а затем с клавиатуры набрать программу (не забывая набирать в начале каждой строки ее номер). Для исправления неверно набранных символов служит клавиша "ß" (так же, как и в Мониторе), а клавиша "à" - для стирания всей неверно набранной строки. Ввод каждой строки заканчивают нажатием на клавишу "ВК". Если случайно будет нажата клавиша "СТР", то управление передается программе Монитор и для повторного запуска интерпретатора в работу необходимо воспользоваться директивой Монитора "J0". Перезапуск интерпретатора не приводят к потере текста ранее набранной программы.

И, наконец, еще один оператор, имеющийся в языке Бейсик.

Оператор CLEAR Х предназначен для очистки памяти от переменных. Если параметр Х не указан, то после выполнения оператора всем числовым переменным присваивается значение 0, а всем символьным - значение "пустая строка". Если же параметр Х указывается, то в памяти выделяется область размером Х байт, предназначенная для хранения символьных переменных. Например, CLEAR 500 отводит 500 байт памяти под буфер для символьных переменных. По умолчанию размер этого буфера равен 50 байтам.

В языке Бейсик имеется ряд встроенных функций, которые позволяют значительно упростить написание некоторых программ. Название встроенная означает, что в интерпретаторе есть программа обработки данной функции. Существуют функции, работающие с числовыми и символьными данными, функции преобразования типов данных, а также функции обращения к таким машинным ресурсам, как содержимое ячеек памяти и портов ввода-вывода. В этом порядке мы и будем их рассматривать.

В выражениях обращение к функции должно находиться в правой части, например:

Таким образом, для вызова функции достаточно указать ее имя в выражении. В круглых скобках указывают аргумент. Результат работы функции (в данном случае значение синуса X) используется в дальнейшем в выражении для вычисления окончательного результата и присвоения полученного значения левой части выражения. Во всех описываемых ниже функциях в качестве аргумента могут выступать константы, имена переменных и выражения, содержащие, в свою очередь, обращения к встроенным функциям.

Таблица 5.

В табл. 5 перечислены встроенные функции языка Бейсик. Почти все они хорошо знакомы читателю по курсу математики средней школы и только две последние требуют дополнительных разъяснений.

Например,

Тригонометрические функции в Бейсике требуют, чтобы аргумент был указан в радианах. Если необходимо указать угол в градусах, то перевод угла из одной меры в другую легко произвести в программе, воспользовавшись известной формулой Х=С*p/180, где С - значение угла в градусах, Х - значение его в радианах.

Как Вы, наверное, уже заметили, в языке реализованы не все тригонометрические функции, однако это не должно вызывать осложнений, так как всегда можно воспользоваться известными тригонометрическими выражениями для определения одних функций через другие.

Язык Бейсик имеет развитые встроенные средства для обработки текстов, что выгодно отличает его от других языков программирования высокого уровня. Рассмотрим встроенные функции для работы с символьной информацией.

Функция LEN(Х$). Результатом ее работы является число, равное количеству символов (длине) переменной Х$. Например, если Х$="ПАРОХОД", то LEN (Х$) равно 7.

Функция LEFT(X$,Y) позволяет вывести на экран строку символов долиной Y, начиная с крайнего левого символа. Например, LEFT$(Х$,3) равно "ПАР".

Функция RIGHTS(Х$,Y) проделывает тоже самое, но начиная с крайнего правого символа. Например, RIGHT$(Х$,3) равно "ХОД".

Функция MID$(Х$,Y,Z) позволяет вывести строку символов длиной L. начиная с позиции Y. Отсчет позиций ведется слева направо. Например. MID$(Х$,3,4) равно "РОХО". В программах на Бейсике часто возникает необходимость перевода данных из числового вида в символьный и наоборот. Этой цели служат две специальные встроенные функции.

Функция STR$(X) служит для преобразования числовых величин в символьный вид. Аргумент Х - число или арифметическое выражение, а результат работы функции - строка, являющаяся символьным представлением данного числа. Например, пусть Х=10⁶, тогда STR$(X) равно "1Е+07"; если Х=-3,15, то STR$(X) равно "-3.15".

Функция VAL(X$) предназначена для обратного преобразования данных из символьного вида в числовой, начиная с крайнего левого символа переменной Х$. Если в строке встречается недопустимый символ (не цифра и не знак числа), то преобразование прекращается. Если уже первый символ является недопустимым, то результат работы равен 0. Например, если Х$="13 ШТУК", то VAL(Х$) равно 13; если Х$="ШТУК 13", то VAL(Х$) равно 0.

Как известно, каждому символу соответствует определенный семиразрядный код (см. табл. 2 в "Радио", 1983, № 8, с. 26). В Бейсике есть две встроенные функции для работы с колами символов.

Функция ASC(Х$) переводит код первого символа Х$ в десятичный вид. Например, если X$ = "D", то ASC(Х$) равно 68.

Функция CHR$(X) позволяет вывести на экран символ, код которого равен Х (аргумент функции не должен превышать 255). Например, CHR$(68) равно "D". Эту функцию удобно использовать для выдачи на экран дисплея различных управляющих символов. Например, PRINT CHR$(12) приведет к перемещению курсора в левый верхний угол экрана.

Для управления форматом печати результатов на экране дисплея служат следующие три функции.

Функция POS(1), результатом работы которой является целое число, равное номеру позиции последнего отпечатанного символа в текущей строке. Например: PRINT "ABCDK". В этом случае POS(1) равно 5.

Функция SPC(X) позволяет вставлять в печатаемую строку Х пробелов (аргумент Х не должен превышать 255). Например, в результате обработки строки PRINT "Транзистор"; SPC(5): "КТ315Г", будет напечатано:

ТРАНЗИСТОР _________КТ315Г (пробел).

Функция TAB(X) - это функция горизонтальной табуляции, которая позволяет переместить курсор в заданную позицию в строке. Аргумент Х и в этом случае не должен превышать 255. Он указывает, сколько позиций необходимо отступить от левого края строки. Например, после выполнения операторов PRINT TAB(5): "A"; TAB(10): "В" символ "А" будет напечатан в 6-м знакоместе, а "В" - в 11-м.

При разработке больших программ, а также программ обработки текстов необходимо иметь представление об объеме свободной памяти, не занятой текстом программы и переменными. Для этих целей в языке Бейсик предусмотрена функция FRE(X). Если аргумент этой функции число, то результатом будут число свободных байтов в памяти. Если аргумент - символьное выражение, то результат - число свободных байтов в буфере для символьных переменных. Например, после выполнения оператора PRINT FRE(0) на экран будет выведено число свободных байтов в памяти.

Выше уже отмечалось, что интерпретатор позволяет разрабатывать программы управления различными объектами. Управляющие программы обычно содержат критичные по времени выполнения фрагменты и требуют также возможности непосредственного манипулирования с содержимым ячеек памяти и портов ввода-вывода. Следующее встроенные функции Бейсика и служат для этих целей.

Результат работы функции РЕЕК(Х) - десятичное число, равное содержимому ячейки памяти, адрес которой определен аргументом X. Например, в результате выполнения оператора PRINT PEEK(0) будет напечатано 49.

Обратившись к функции INP(X), получим десятичное число, равное содержимому порта ввода с номером Х(Х<255), например, A = INP(1). Переменной А в этом случае будет присвоено значение, равное содержимому порта номер 1.

Функция USR(X) предназначена для организации связи программ, написанных на Бейсике, с подпрограммами, написанными на ассемблере или в машинных кодах. Аргумент Х - это адрес ячейки памяти, начиная с которой записана программа в машинных кодах. Поэтому, если в выражении встретится обращение к функции USR(X), то управление будет передано подпрограмме, расположенной по адресу X.

В конце подпрограммы обязательно должна стоять команда RET, после выполнения, которой управление возвращается программе на Бейсике. Результат работы подпрограммы (в виде одного байта) перед возвратом из нее помещается в аккумулятор. Функция USR(X) позволяет критичные по времени н специфике работы фрагменты алгоритма реализовывать на ассемблере, а основную программу писать на языке Бейсик. Для передачи параметров для подпрограмм и результатов в программу на Бейсике можно воспользоваться оператором POKEX,Y и функцией РЕЕК(Х).

Подпрограммы целесообразно размещать в "защищенной" области памяти (т. е. в той, которую заведомо не использует интерпретатор). Если в функциях в операторах, работающих с адресами памяти, адрес превышает значение 32767 (7FFFH), то он должен указываться в виде отрицательного числа. Адресу FFFFH будет соответствовать -1, адресу FFFEH - -2 и т. д.

Рассмотрим пример.

Пусть микроЭВМ "Микро-80" используется для обучения детей таблице умножения. Очередной вопрос появляется на экране в виде текстового сообщения. Обучаемый отвечает на вопрос, нажимая соответствующие клавиши на клавиатуре дисплея. Если ответ верен, то в качестве поощрения микро-ЭВМ "исполняет" несколько первых тактов популярной детской песенки. "Исполняет" мелодию подпрограмма, написанная на языке ассемблера, генерирующая соответствующую последовательность импульсов. Сделать это в программе на Бейсике не представляется возможным из-за временных ограничений, присущих интерпретатору. Вызов подпрограммы происходит с помощью функции USR(X) в соответствующем месте основной программы, написанной на Бейсике. Таким образом, разумно сочетая возможности программирования на ассемблере и на языке высокого уровня, можно получить требуемый результат.

Определим, например, функцию FNCT(X) следующим образом:

В соответствии с этим определением функция FNCT - это тригонометрическая функция котангенс, не реализованная в виде встроенной в интерпретаторе.

Оператор DEF можно использовать только в программном режиме. Кроме того, допускается определение функций только от одного числового аргумента. Параметр X, стоящий в операторе определения, является формальным, необходимым для обозначения функциональной зависимости. При обращении к функции вместо него указывается фактический аргумент, который заменяет формальный параметр, стоящий в правой части оператора присваивания. Например, после выполнения строки программы

на экране будет напечатано значение котангенса для угла, равного 2 радианам.

Использование возможности определения функций самим программистом позволяет сократить текст программ и значительно улучшить их читаемость.

Интерпретатор языка Бейсик позволяет в процессе выполнения программы обнаруживать и анализировать ошибки. Интерпретатор, естественно, не может обнаружить логические ошибки. Это под силу только программисту, так как только он знает, что должна делать программа. О каких же ошибках тогда идет речь? Это будет ясно из дальнейшего.

Если ошибка обнаружена в непосредственном режиме, то на экран выводится сообщение

Если ошибка обнаружена в программном режиме, то выводится сообщение

После сообщения об ошибке появляется символ ">", означающий, что интерпретатор готов к приему директив, и программист может внести изменения в программу и продолжить отладку.

Рассмотрим, какие ошибки обнаруживает интерпретатор.

• велик текст программы:
• слишком длинны массивы данных:
• вложенность подпрограмм и циклов больше нормы;
• слишком много переменных.

Кроме описанных, интерпретатор выдает еще три сообщения об ошибках в случае неверного набора данных при выполнении оператора INPUT:

Вместо числа набрана строка символов и наоборот.

<? ЛИШНИЕ ДАННЫЕ" - дачных набрано больше, чем переменных в операторе INPUT. Лишние данные просто игнорируются.

<??" - данных набрано меньше, чем переменных в операторе INPUT.

Необходимо ввести недостающие данные.

В дальнейшем предполагается опубликовать несколько программ. Их анализ поможет Вам разобраться в методике написания программ на языке Бейсик.

Г. ЗЕЛЕНКО. В. ПАНОВ, С. ПОПОВ

г. Москва