Взял себе плату BeagleBone с процессором AM335x. У него на борту есть два реал-тайм ядра PRU (PRU0 и PRU1). Хочу через GPIO научить их обмениваться данными. Данный кодируются в манчестерском коде. У прушек свой компилятор - pasm.
Проблема:
Понятно, что алгоритм передачи написать не так сложно: сначала переводит байт в МК(манчестерский код), потом передаем бит за битом. Проблема в двух вещах: приеме и синхронизации. Бог с ней, с синхронизацией, её я домучаю позже. У меня замылились глаза на приеме. Вот код:
Код
LISEN: // прослушка линии
QBEQ START, r9, 15 // если принято 16 бит, то выход
MOV r2, 0 // обнуляем счетчик бит
QBBC CLR0, IN // проверка на 0-ь.
QBBS SET1, IN // проверка на 1-цу
CLR0: // метка установки 0
ADD r2, r2, 1 // счетчик длительности
QBBC CLR0, IN // проверяет текущий уровень
QBGE CLR10, r2, 50 // считаем, что половина периода - 150 нс. Тогда переход на CLR10, если 0 уже больше 150
CLR r5.t16 // устанавливаем 0
LSR r5, r5, 1 // сдвигаем
ADD r9, r9, 1 // счетчик принятых бит
QBA LISEN // возвращаемся на прослушку
CLR10: // пришло два нуля
CLR r5.t16 // устанавливаем и сдвигаем
LSR r5, r5, 1
CLR r5.t16
LSR r5, r5, 1
ADD r9, r9, 2 // принято 2 бита
QBA LISEN // возврат на прослушку
//--------------------------------------------------------------------------
SET1: // метка установки 1
ADD r2, r2, 1 // счетчик длительности
QBBS SET1, IN // проверяет текущий уровень
QBGE SET01, r2, 50 // считаем, что период 150 нс.
SET r5.t16 // устанавливаем 1
LSR r5, r5, 1 // сдвигаем
ADD r9, r9, 1 // счетчик принятых бит
QBA LISEN // возвращаемся на прослушку
SET01: // пришло две 1-ы
SET r5.t16 // устанавливаем и сдвигаем
LSR r5, r5, 1
SET r5.t16
LSR r5, r5, 1
ADD r9, r9, 2 // принято 2 бита
QBA LISEN // возврат на прослушку
QBEQ START, r9, 15 // если принято 16 бит, то выход
MOV r2, 0 // обнуляем счетчик бит
QBBC CLR0, IN // проверка на 0-ь.
QBBS SET1, IN // проверка на 1-цу
CLR0: // метка установки 0
ADD r2, r2, 1 // счетчик длительности
QBBC CLR0, IN // проверяет текущий уровень
QBGE CLR10, r2, 50 // считаем, что половина периода - 150 нс. Тогда переход на CLR10, если 0 уже больше 150
CLR r5.t16 // устанавливаем 0
LSR r5, r5, 1 // сдвигаем
ADD r9, r9, 1 // счетчик принятых бит
QBA LISEN // возвращаемся на прослушку
CLR10: // пришло два нуля
CLR r5.t16 // устанавливаем и сдвигаем
LSR r5, r5, 1
CLR r5.t16
LSR r5, r5, 1
ADD r9, r9, 2 // принято 2 бита
QBA LISEN // возврат на прослушку
//--------------------------------------------------------------------------
SET1: // метка установки 1
ADD r2, r2, 1 // счетчик длительности
QBBS SET1, IN // проверяет текущий уровень
QBGE SET01, r2, 50 // считаем, что период 150 нс.
SET r5.t16 // устанавливаем 1
LSR r5, r5, 1 // сдвигаем
ADD r9, r9, 1 // счетчик принятых бит
QBA LISEN // возвращаемся на прослушку
SET01: // пришло две 1-ы
SET r5.t16 // устанавливаем и сдвигаем
LSR r5, r5, 1
SET r5.t16
LSR r5, r5, 1
ADD r9, r9, 2 // принято 2 бита
QBA LISEN // возврат на прослушку
Приходит конечно не то, что нужно. Возможно я написал неправильный алгоритм посылки, но вроде проверял осцилографом (но там он показывает выборку в случайном месте).
Глоссарии:
SBCO - команда записи данных в память
QBBS, QBBC - команды перехода на метку, если 1 или 0
QBNE - переход на метку, пока не ровно.
QBGE - переход на метку, если больше.
