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

 
 
> Прошу помощи
Maks448
сообщение Feb 13 2007, 13:23
Сообщение #1





Группа: Новичок
Сообщений: 2
Регистрация: 13-02-07
Пользователь №: 25 298



Уважаемые форумчане, объясните, пожалуйста, "чайнику" в чем прикол (или прокол?). Программка простая, как два пальца, по идее должна вывести в порт RS232 удвоенное количество байтов от числа, находящегося в счетчике (регистр Z). Реально же выводится 4608, т.е. четвертая часть. Где я допустил ошибку? Пробовал также на Mega8 - результат тот же.

.include "2333def.inc"
.def Tmp =r16
.cseg
.org 0
reset:
clr Tmp
out UBRRH,Tmp
ldi Tmp,$19
out UBRRL,Tmp ;Настройка скорости СОМ-порта

clr Tmp
out UCSRA,Tmp
ldi Tmp,$18
out UCSRB,Tmp ;Настройка UART

in Tmp,WDTCR
ori Tmp,$18
out WDTCR,Tmp
clr Tmp
out WDTCR,Tmp ;Отключение WDT

ldi Tmp,$20
out DDRC,Tmp ;Определение линии порта С как выход
cbi PortC,5 ;Включить светодиод
ldi ZL,Low(9216)
ldi ZH,high(9216) ;Загрузка счетчика байтов
Loop:
subi ZL,1
sbci ZH,0 ;Декремент счетчика
Wait1:
sbis UCSRA,UDRE ;Ожидание готовности UART
rjmp Wait1
out UDR,ZH ;Вывод старшего байта счетчика
Wait2:
sbis UCSRA,UDRE ;Ожидание готовности UART
rjmp Wait2
out UDR,ZL ;Вывод младшего байта
cpi ZL,0
ldi Tmp,0
cpc ZH,Tmp ;Проверка счетчика на 0
brne Loop ;Не 0 - возврат
sbi PortC,5 ;Иначе - выключить светодиод и
Cycle:
rjmp Cycle ;зациклить программу
Go to the top of the page
 
+Quote Post
 
Start new topic
Ответов
Leen
сообщение Feb 13 2007, 14:42
Сообщение #2


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

Группа: Свой
Сообщений: 172
Регистрация: 5-08-06
Из: Владивосток
Пользователь №: 19 343



2 Maks448:
Цитата
ldi ZL,Low(9216)
ldi ZH,high(9216) ;Загрузка счетчика байтов: Z = 9216 (0x2400);
Loop:
subi ZL,1
sbci ZH,0 ;Декремент счетчика: Z = 9215 (0x23FF)
Wait1
out UDR,ZH ;Вывод старшего байта счетчика (0x23)
Wait2
out UDR,ZL ;Вывод младшего байта (0xFF)
brne Loop ;Не 0 - возврат

Т.е. первым выведенным числом будет 9215, так??? Или у мну глюки?
А как Вы тогда ожидаете, что прога выведет удвоенное содержимое Z?
Объясните, пожалуйста.
И по-прежнему вопрос: а чем смотрите?
2 rx3apf:
Нда, че-то я гоню...
Go to the top of the page
 
+Quote Post



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

 


RSS Текстовая версия Сейчас: 30th July 2025 - 07:42
Рейтинг@Mail.ru


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