PIC-микроконтроллеры. Все, что вам необходимо знать

2. Написание подпрограммы возведения в квадрат однобайтного числа, находящегося в рабочем регистре, которая возвращает двухбайтное значение в двух РОН.

3. Написание подпрограммы, вычисляющей значение корня квадратного двухбайтного числа и возвращающей результат в W.

В графическом виде процесс разработки, основанный на такой декомпозиции задачи, приведен на Рис. 8.4.

Рис. 8.4.Компоновка трех файлов с исходным кодом для реализации программы вычисления квадратного корня

Текст основной функции приведен в Программе 8.2. Программа начинается с команды goto, расположенной по адресу вектора сброса и размещенной в секции STARTUP. А, начиная с метки MAIN, код располагается в секции TEXT за счет использования директивы TEXT code. Из map-файла (генерируется компоновщиком), содержимое которого приведено в Листинге 8.6, видно, что метке MAIN соответствует адрес h’005’.

Программа 8.2. Основной перемещаемый исходный файл main. asm

           include "p16f627.inc"

           extern SQR_ROOT, SQR, SQUARE

; ---------------------------------

BANKO udata; Статические данные

NUM_1 res 1; Первое число

NUM_2 res 1; Второе число

SUM     res 2; Два байта суммы

RMS     res 1; Один байт результата

; ---------------------------------

STARTUP code

               goto MAIN; Вектор сброса

TEXT code

MAIN movf NUM_1,w; Берем 1-е число

         call SQR; Возводим его в квадрат

         movf SQUARE+1,w; Берем младший байт

         movwf SUM+1; Он становится младшим байтом суммы

         movf SQUARE,w; Берем старший байт

         movwf SUM; Он становится старшим байтом суммы

         movf NUM_2,w; Теперь берем 2-е число

         call SQR; Возводим его в квадрат

         movf SQUARE+1,w; Берем младший байт

         addwf SUM+1,f; Прибавляем к младшему байту суммы

         btfsc STATUS,С; Проверяем перенос

           incf SUM, f; Учитываем перенос

         movf SQUARE,w; Берем старший байт

         addwf SUM,f; Прибавляем к старшему байту суммы

         call SQR_ROOT; Вычисляем корень квадратный

         movwf RMS; Получаем среднеквадратичное значение

         sleep ; Прекращаем вычисления

         global SUM

         end

В основной процедуре используется четыре переменных, расположенных в секции данных BANK0. Эта секция размещается в инициализированной области ОЗУ с помощью директив udata и res (REServe). Под каждую из входных переменных NUM_1 и NUM_2 зарезервировано по одному регистру. Под переменную SUM, в которой сохраняется значение суммы NUM_1² + NUM_2², зарезервировано два байта памяти данных. Поскольку эта переменная является входной для подпрограммы SQR_ROOT, она объявлена в конце файла как глобальная с помощью директивы global. Это означает, что ее расположение общеизвестно, так что дополнительные файлы, которые компонуются вместе, могут использовать имя SUM, объявляя его как extern, т. е. внешнее по отношению к файлу. Переменные, не объявленные таким образом, «скрыты» от внешнего мира, т. е. являются локальными переменными. Таким образом, директива extern в заголовке Программы 8.2 позволяет основной процедуре вызывать подпрограммы SQR_ROOT и SQR, еще не зная, где они будут расположены. Точно таким же образом переменная SQUARE используется подпрограммой SQR для возврата квадрата байта, переданного ей в регистре W. Место под эту переменную резервируется в области РОН в подпрограмме SQR, и ее точное положение в памяти данных файлу main.asm неизвестно, оно будет распределено позже компоновщиком. Из шар-файла, текст которого приведен в Листинге 8.6, видно, что в конечном счете эта переменная была размещена в регистрах h’25’:h’26’ (старший: младший байты).

Основная часть кода выполняет перечисленные выше задачи. Значение NUM_1² помещается в регистры SUM;SUM+1, к которым впоследствии будет прибавлено значение NUM_2². Затем результат передается в подпрограмму SQR_ROOT, возвращающую в рабочем регистре значение квадратного корня. В заключение это значение сохраняется в регистре RMS, под который был зарезервирован один байт в секции данных BANK0.