реклама на сайте
подробности

 
 
> Assembler uart
KIG
сообщение Jan 11 2009, 17:02
Сообщение #1


Частый гость
**

Группа: Участник
Сообщений: 115
Регистрация: 25-12-06
Пользователь №: 23 884



Здравствуйте.
Написал программу для передачи символа через UART на Ассемблере. Прошил МК, а символ получить не могу. Подскажите, пожалуйста, что не так?
Программа следующая (Atmega164P, кварц 7,3728МГц):

include <m164def.inc>
#include <iomacros.inc>

.def dummy=R19
.cseg

ldi R24, low(RAMEND) ; SP = RAMEND
ldi R25, high(RAMEND)
out SPL, R24
out SPH, R25

; ---------------------------------- init UART ------------------------------------------

ldi R24, 23 ; Baud rate = 19.2 bps
sts UBRR0L, R24

ldi R24,0
sts UBRR0H, R24

ldi R24,(1<<RXEN0)|(1<<TXEN0) ; Enable receiver & transmitter, 8-bit mode
sts UCSR0B,R24

rcall uartSend ; send the read character via the UART

uartSend:
SKBS UCSR0A,UDRE0,dummy ; wait for empty transmit buffer (until UDRE==1)
rjmp uartSend
ldi R16, 48
STORE UDR0,R16 ; UDR = R16, start transmission

Delay:
ldi R16,10
rjmp Delay
Go to the top of the page
 
+Quote Post
 
Start new topic
Ответов
Goodefine
сообщение Jan 11 2009, 18:27
Сообщение #2


Местный
***

Группа: Свой
Сообщений: 211
Регистрация: 6-08-07
Из: Приднестровье, Тирасполь
Пользователь №: 29 581



Цитата
Код
; ---------------------------------- init UART ------------------------------------------

ldi R24, 23; Baud rate = 19.2 bps
sts UBRR0L, R24

ldi R24,0
sts UBRR0H, R24

Команда sts выполняет непосредственную запись в ОЗУ. Вам же нужно переслать значение из регистра общего назначения в регистр ввода-вывода. Кроме того, сначала производится запись в старший байт, затем в младший. Этим обычно занимается команда out:
Код
; ---------------------------------- init UART ------------------------------------------
ldi R24, 0
ldi R25, 0x17
...
out UBRR0H, R24; Baud rate = 19.2 bps
out UBRR0L, R25
...
ldi R24,(1<<RXEN0)|(1<<TXEN0); Enable receiver & transmitter, 8-bit mode
out UCSR0B,R24


Сообщение отредактировал Goodefine - Jan 11 2009, 19:01


--------------------
Любой, заслуживающий внимания, опыт приобретается себе в убыток...
Go to the top of the page
 
+Quote Post



Reply to this topicStart new topic
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 


RSS Текстовая версия Сейчас: 31st July 2025 - 15:51
Рейтинг@Mail.ru


Страница сгенерированна за 0.01358 секунд с 7
ELECTRONIX ©2004-2016