AVR, ну чего шутить? Нужно вставить динамическую индикацию, попеременно показывать состояние каждого из датчиков. (асм вспомнить :) ) Потом прогнать ещё в отладчике. (+) («Телесистемы»: Конференция «Микроконтроллеры и их применение»)

Разработка, производство и продажа радиоэлектронной аппаратуры

| Карта сайта | Пишите нам | В избранное

Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс.
e-mail:jobsmp@pochta.ru

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

AVR, ну чего шутить? Нужно вставить динамическую индикацию, попеременно показывать состояние каждого из датчиков. (асм вспомнить :) ) Потом прогнать ещё в отладчике. (+)

Отправлено уни 15 апреля 2007 г. 00:56
В ответ на: А за сколько, по-твоему? отправлено =AVR= 15 апреля 2007 г. 00:44

Динамическая индикация готова уже. Выдрал из старого своего приложения (ой программы). Где-то доку посеял по этому мк, нужно рассчитать установки для таймеров. Калькуляторы есть специальные... тоже где-то пропали. Ну... никогда не грех вручную вспомнить как это делается.
Ввод допишу, попеременную индикацию приделаю и всё. Немного тестов для проверки времён и записи с портов и усё.
Доделаю завтра утром. Но это не пол часа. Это одна отладка только пол часа.

Это рыба для индикации (не тестировал пока). 2(вх)-4(вых) декодер всё-таки по заданию буду пользовать, что отразил в коде. Походу они только сдвоенные бывают.

; Обработчик прерывания от нулевого таймера
; Нулевой таймер всего 8-разрядный, поэтому больших задержек на нём
; не получить. Он у нас отвечает за быстрое переключение самих индикаторов
TIM0_OVF:
; сохраняем статус регистр
in StatReg, SREG
; Здесь мы постоянно перебираем индикаторы
; Динамическая индикация короче.
; Текущие символы находятся в регистрах r5,r6,r7
inc Dig ; переходим к следующему разряду

sbrc Dig, 2 ; обнуляем значение разряда, если превысело 3 (всего: 0,1,2)
clr Dig
Digit1:
; Первый разряд индикатора (считать слева направо ->)
cpi Dig, 0
brne Digit2

out PORTB, r5 ; вывод символа на порт

; Устанавливаем адресные выходы
sbi DDRC, DDC6
sbi DDRC, DDC7
cbi PORTC, PINC6 ; - 00
cbi PORTC, PINC7 ; /

rjmp NoDig
Digit2:
; Второй разряд
cpi Dig, 1
brne Digit3

out PORTB, r6 ; вывод символа

; Устанавливаем адресные выходы
sbi DDRC, DDC6
sbi DDRC, DDC7
cbi PORTC, PINC6 ; - 01
sbi PORTC, PINC7 ; /

rjmp NoDig
Digit3:
; Третий разряд
cpi Dig, 2
brne NoDig

out PORTB, r7 ; вывод символа

; Устанавливаем адресные выходы
sbi DDRC, DDC6
sbi DDRC, DDC7
sbi PORTC, PINC6 ; - 10
cbi PORTC, PINC7 ; /

NoDig:
; Изменяем счётчик TCNT0 таймера Timer0
ser _tmp
out TCNT0, _tmp

; Восстанавливаем статус регистр
out SREG, StatReg
reti; TIM0_OVF

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

Ответы

Некузяво, к тому же только ничтожный кусочечек. Ща чай допью, допишу каменты и выложу ПОЛНУЮ задачку - начал минут 20..25 назад, гостей дочкиных развозил :)) — =AVR= (15.04.2007 01:09:21 80.92.96.19, пустое)
- Ну, ну :) Соревноваться значит... у тя фора в день была... так низзя. Ещё я на первом асме пишу, второй не очень отличается, но неохота переделывать. — уни (15.04.2007 01:10:45 82.193.156.30, пустое)
  - Какая фора??? Я вчера по теме только с критиками пободался, и сразу забыл - даже не думал, что парень вернется к обсуждению — =AVR= (15.04.2007 01:21:23 80.92.96.19, пустое)
    - Ну ладно тогда, а то я глянул на тред, так думал там каждую инструкцию "обсосали" :) Не буду твой код смотреть, когда выложешь. Сделаю свой. Сравним. — уни (15.04.2007 01:23:50 82.193.156.30, пустое)
      - Каменты дольше писать оказалось. Смотри, не стесняйся - все равно так не напишешь :) — =AVR=   (15.04.2007 02:11:36 80.92.96.19, 6017 байт)
        
        А чего всё на инглише? Че за фигня, савсем уже неуважение. Определение таблицы мне понравилось, я просто в хексах записал. Ну вообще, где таблица векторов? (+) — уни   (15.04.2007 02:32:16 82.193.156.30, 444 байт)
        
        Я всю жизнь пишу комменты ТОЛЬКО по-английски - так не возникает проблем с кодировками и не попадают русские буквы в имена переменных/меток. Таблицы векторов нету, т.к. нету и прерываний - я так всегда использую ее место под код — =AVR=   (15.04.2007 02:45:33 80.92.96.19, пустое)
        
        Мало регистров использовано, малый код, красота да и только. AVR - ты могуч... согласен с тем, что я так не напишу на пол часа. Пару дней на вылизывание - не меньше. Но я ещё не уверен в коде, пока на железе не заработает. (+) — уни   (15.04.2007 03:10:40 82.193.156.30, 480 байт)
        
        Там же в основном цикле всего пара десятков строк - считали и раскидали по регистрам датчики, нашли больший, зарядили его номер и показали на время RATE/3 на первом индикаторе, считали из таблички цифру десятков и показали на втором на такое же время, потом то же для единичек - и все по новой. На время смены адресов/кодов индикатор касится, чтобы не было подсветки. А этюды... хз, я не программист :)) — =AVR=   (15.04.2007 03:20:47 80.92.96.19, пустое)
        
        Угу :) ассемблерист — уни   (15.04.2007 03:25:59 82.193.156.30, пустое)
        
        И с времянкой все элементарно - я слишком ленив, чтобы разбираться, пусть ассемблер разбирается. Я задал в самом начале формулу расчета цикла задержки, и константу RATE - подставляй туда частоту опроса в герцах (10..10000) и получай нужный цикл (частота индикации, разумеется, будет в 3 раза выше, чем RATE) — =AVR=   (15.04.2007 02:49:31 80.92.96.19, пустое)
        
        АВР, в вашей программе при вычислении адреса в segtab может неприятная ошибочка приключиться. — GM   (16.04.2007 02:07:16 81.77.35.44, пустое)
        
        При длине предшествующего таблице кода в 45 слов - не может, т.к. ВСЕ байтовые адреса таблицы будут лежать в диапазоне 0x005A..0x0079 — =AVR=   (16.04.2007 02:27:11 80.92.96.19, пустое)