Форум РадиоКот

Код: Выделить всё

;Подпрограмма обработки прерывания по получению байта по USART --------------------------------------------------------------------------
adrURXC:				;USART RX Complete Handler
	push R16			;Сохранить на стеке рег.R16
	in R16,SREG		;Сохранить на стеке
	push R16			;регистр состояния SREG
	push YL			;Сохранить на стеке
	push YH			;рег.пару Y
	push R17			;Сохранить на стеке рег.R17
	push R18			;Сохранить на стеке рег.R18

	lds R16,UDR0		;Занести принятый по USART байт в рег.R16
	lds R17,RECVBYT		;Занести в рег.R17 кол-во принятых байт пакета
	tst R17			;Кол-во принятых байт равно нулю? (это первый байт пакета?)
	brne USRXC2		;Если нет, то переход на метку USRXC2
;Принят первый байт пакета (байт адреса)
;Инициализировать таймер 2 на отсчет 5мс, за которые весь пакет должен быть принят
USRXC1:							;
;Инициализировать таймер-счетчик 2 на отсчет интервала 5 мс. По окончанию интервала - сбрасывать UASRT и обнулять счетчик принятых байт
	lds YL,FLAGS		;Занести в рег.YL содержимое ячейки FLAGS

	andi YL,~(1<<SELDELAY)	;Обнулить бит SELDELAY для того, чтобы переполнение таймера-счетчика 2 обрабатывалось как отсчет
				;времени приема пакета запроса
	sts FLAGS,YL		;Сохранить в памяти новое значение ячейки FLAGS

	ldi YL,0x9F		;Инициализировать таймер-счетчик
	sts TCNT2,YL		;на отсчет 5мс при тактовой частоте 20МГц и коэффициенте деления 1024
	ldi YL,0x07		;Запустить таймер-счетчик 2
	sts TCCR2B,YL		;с коэффициентом деления тактовой частоты 1024
	ldi YL,(1<<TOIE2)		;Разрешение прерываний
	sts TIMSK2,YL		;по переполнению таймер-счетчика 2	
	rjmp USRXC3		;Перейти на метку USRXC3 для записи принятого байта в буфер принимаемого пакета

;Принят не первый байт пакета
USRXC2:	cpi R17,0x02		;Принят третий байт пакета?
	brne USRXC3		;Если нет, то переход на метку USRXC3
;Принят третий байт пакета, откорректировать длину принимаемого пакета
	ldi YL,0x05		;В рег. YL занести кол-во служебных байт пакета (без учета длины поля данных)
	add YL,R16		;Теперь в рег.YL общая длина принимаемого пакета
	sts LONGRECV,YL		;Сохранить новое значение длины пакета в ячейке LONGRECV		

;Запись полученного по USART байта в буфер принимаемого пакета
USRXC3:	ldi YL,low(BUFRECV)		;Занести в рег.пару Y
	ldi YH,high(BUFRECV)	;адрес начала буфера принимаемого пакета
	add YL,R17		;Прибавить к адресу начала буфера смещение, 
	brcc USRXC4		;соответствующее адресу текущего
	inc YH			;принимаемого байта
USRXC4:	st Y,R16			;Сохранить текущий принятый байт в буфер принимаемого пакета
	lds R16,LONGRECV		;Занести в рег.R16 длину принимаемого пакета
	inc R17			;Инкремент кол-ва принятых байт
	cp R17,R16		;Принят весь пакет данных?
	brlo USRXC4_0		;Если кол-во принятых байт меньше длины пакета, то пакет принят не полностью,
				;переход на метку USRXC100
	rjmp USRXC4_1		;Иначе пакет принят полностью, перейти на метку USRXC4_1
USRXC4_0:	rjmp USRXC100		;Пакет принят не полностью, перейти на метку USRXC100


USRXC4_1:
;Иначе принят весь пакет, рассчитать CRC принятого пакета
	subi R17,0x02		;Вычислить длину пакета за вычетом двух байт CRC
	sts LENPAK,R17		;Занести уменьшенную на 2 длину пакета в ячейку LENPAK
	ldi YL,low(BUFRECV)		;Занести в рег.пару Y
	ldi YH,high(BUFRECV)	;адрес начала буфера принимаемого пакета
	call CRC			;Вызвать подпрограмму расчета CRC, результат в ячейках CRC_L и CRC_H
	ldi YL,low(BUFRECV)		;Занести в рег.пару Y
	ldi YH,high(BUFRECV)	;адрес начала буфера принимаемого пакета
	add YL,R17		;Прибавить к адресу начала буфера смещение, 
	brcc USRXC5		;соответствующее адресу текущего
	inc YH			;принимаемого байта