Как написать код на ассемблере AVR-на "С"-понятно. Опции

[serj32]

Здравствуйте.Подскажите пожалуйста.Вот код на Си -здесь всё понятно.

if (u > 256) // 1.25V
PORTD = 0b00000011;
if (u > 384) // 1.875V
PORTD = 0b00000111

А вот как реализовать на ассемблере,дело в том ,что переменная-"u"-это двухбайтное число(10 разрядов)
у меня это регистры АЦП-ADCL , ADCH.
И если не трудно подскажите ,что сделал автор в 23 строке своей программы u = (ADCL|ADCH << 8);-взято отсюда http://radioparty.ru/index.php/prog-avr/pr...adc-avr?start=1
Если можно то подробнее.Спасибо.

[zombi]

Ход примерно правильный.
Но!!!
Я же уже писал что сперва нужно старшие байты сравнивать, а младшие только в случае равенства старших!
Для сравнения регистра с константой команда CPI

Да действительно">" так должно-это я пытаюсь отсюда ...

Cыль не открывается
Т.е. если значение АЦП больше 384 то пин D2 , за время выполнения этого кода, поменяет свое состояние дважды.

[_Pasha]

Ход примерно правильный.
Но!!!
Я же уже писал что сперва нужно старшие байты сравнивать, а младшие только в случае равенства старших!

Не учите людей плохому

Код

ldi zL,low(constant1) ; загрузки по нормальному оформляют в виде макроса
ldi zH,high(constant1);

in temp1,ADCL
in temp2,ADCH
cp temp1,zL
cpc temp2,zH
brge kakaya_to_metka; или brlo или что там еще

Итд в таком же духе
Авровский асм имеет много псевдонимов у команд, но они хорошо отражают смысл того, что происходит, поэтому можно не стесняться

[serj32]

Не учите людей плохому

Код

ldi zL,low(constant1); загрузки по нормальному оформляют в виде макроса
ldi zH,high(constant1);

in temp1,ADCL
in temp2,ADCH
cp temp1,zL
cpc temp2,zH
brge kakaya_to_metka; или brlo или что там еще

Итд в таком же духе
Авровский асм имеет много псевдонимов у команд, но они хорошо отражают смысл того, что происходит, поэтому можно не стесняться

Здравствуйте Pasha,интересный код сейчас буду разбираться.
По рекомендации zombi написал код,если не трудно проверьте пожалуйста.
И сомневаюсь там где NOP нодо ли мне это делать.Спасибо.

Код

.include "m8def.inc"
.def temp1 = R16
.def temp2 = R17

.equ cons1 = 256
.equ cons2 = 384

;----вершина стека , инициализация портов,АЦП и т.д

in temp1,ADCL             ;младший байт результата АЦП
in temp2,ADCH             ;старший.................АЦП

         cpi temp2,high(cons1)  ;сравниваем ADCH с старшим байтом константы 256
         breq  metka1        ;если temp2 = high(cons1) флаг Z будет установлен и произойдёт переход на metka1

         brcs  metka2        ;если старший байт ADCH > старшего байта константы 256-high(cons1) то флага C не будет и
         out PORTD,0b00000011;перехода на metka2 не будет и включим 2 крайних светодиода

         rimp step2             ;никчему проверять младшие байты-надо перепрыгнуть на проверку следующей константы

metka1:  cpi temp1,low(cons1);в связи с тем ,что старшие байты равны - сравниваем младшие,если байт в ADCL >младшего
         breq  metka3        ;байта константы то и перехода на metka3 не будет и соответственно
         out PORTD,0b00000011;включим два крайних светодиода

metka2:  nop
metka3:  nop

step2:   cpi temp2,high(cons2)  ;сравниваем ADCH с старшим байтом константы 384
         breq  setka1            

         brcs  setka2            
         out PORTD,0b00000111;включим три крайних светодиода

         rimp step3              

setka1:  cpi temp1,low(cons2)    
         breq  setka3            
         out PORTD,0b00000111;включим три крайних светодиода

setka2:  nop
setka3:  nop

step3:;и так далее в конце надо будет ещё задержку на таймере думать

Сообщение отредактировал serj32 - Sep 21 2013, 20:39