Телесистемы
 Разработка, производство и продажа радиоэлектронной аппаратуры
На главную   | Карта сайта | Пишите нам | В избранное
Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс.
e-mail:jobsmp@pochta.ru

Телесистемы | Электроника | Конференция «Микроконтроллеры и их применение»

код

Отправлено Сергей 18 марта 2007 г. 12:24
В ответ на: Тогда меняй МК, если уверен в своем коде. Не уверен - давай код сюда, только поставь перед кожом <pre> и после кода </pre>, и отдели все "<<" от текста пробелами. То, что код работал - не абсолютный показатель его корректности отправлено =AVR= 18 марта 2007 г. 12:11


.INCLUDE "c:\Program Files\Atmel\AVR Studio\Appnotes\8535def.inc"
rjmp main
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop

rjmp main

main:
; стек
ldi r17,$3D
out spl,r17
;порт B на выход
ldi r18,255
out ddrb,r18
;пин С0 на выход - строб
ldi r18,1
out ddrc,r18

;инициализация ацп
ldi r18,0x8d
out ADCSR,r18
;А1 - аналоговый вход
ldi r18,0x01
out admux,r18
;запуск преобразования
sbi adcsr,adsc
;Ждать пока не закончится
loo0:sbic adcsr,adsc
rjmp loo0
nop

in r19,adcl
in r20,adch

;вывод результатов

;вывод adcl на порт регистр r20
;дать строб
sbi portc,0

;ждать подтверждения
loop00:
sbis pinc,1
rjmp loop00

;порт В - данные
out portb,r19

;сбросить строб
cbi portc,0

;ждать сброса подтверждения
loop01:
sbic pinc,1
rjmp loop01


;вывод adch на порт регистр r20
;дать строб
sbi portc,0

;ждать подтверждения
loop10:
sbis pinc,1
rjmp loop10

;порт В - данные
out portb,r20

;сбросить строб
cbi portc,0

;ждать сброса подтверждения
loop11:
sbic pinc,1
rjmp loop11

rjmp main



Составить ответ | Вернуться на конференцию

Ответы


Отправка ответа
Имя*: 
Пароль: 
E-mail: 
Тема*:

Сообщение:

Ссылка на URL: 
URL изображения: 

если вы незарегистрированный на форуме пользователь, то
для успешного добавления сообщения заполните поле, как указано ниже:
что получится, если сложить 4 и 4 ?

Перейти к списку ответов | Конференция | Раздел "Электроника" | Главная страница | Карта сайта

Rambler's Top100 Рейтинг@Mail.ru
 
Web telesys.ru