Учебный стенд на базе AT90S8515

[Prevan]

Всем доброго времени суток. Разрабатываю учебный стенд на базе AT90S8515 для демонстрации возможностей микроконтроллера.

Стенд включает в себя 2 буфера входных данных (1-й от задатчика, 2-й от разъема), 2 регистра выходных данных (1-й на светодиоды, 2-й на разъем), подключенных через дешифратор; матричная клавиатура; аналоговый компаратор; ЖК дисплей (на фотографии не подключен). Для данного стенда написан ряд программ, проверенных в протеусе. Во всех программах кроме программы матричной клавиатуры возникает ошибка на шине данных порта А - на ножке PA4 (35 вывод) всегда присутствует лог. "1" (+5 В). Дорожки проверял на замыкание с другими дорожками - все в норме, проблема в самом микроконтроллере. Может быть из-за подтягивающих резисторов, хотя команды на их подключение и отключение даются на весь порт и в таком случае во всем РА были бы одинаковые значения.
В прикрепленных файлах находятся программы портов ввода-вывода (считывание значение через буфер с задатчиков и выдача их через регистр на светодиоды) и матричной клавиатуры. При записи программы портов ввода-вывода в МК пятый светодиод всегда выключен (светодиоды управляются нулем, с РА4 подходит +5 В -› светодиод не горит), программа матричной клавиатуры на стенде работает нормально.

;*************************************************  **********************
;   Программ один раз в секунду считывает данные с входов и выводит их
;без изменений на выходы.
;*************************************************  **********************
.include "8515def.inc"      ; Подключение внешней библиотеки с описанием
                     ; символических имен и определением адресов
                     ; регистров микроконтроллера

.cseg
.org   0
   rjmp    init          ; Вектор прерывания по включению питания,
.org   $0d               ; 
.include "MyLib.inc"      ; Подключение файла с описанием символических
                     ; имен портов и подпрограммами
;****** Формирование задержки 1с  **************************************
delay1:
   ldi      temp2, 25      ; 
d0:   ser      temp1         ; 
d1:   ldi      temp, 209      ; 
d2:   dec      temp         ; 
   brne   d2            ; 
   dec      temp1         ; 
   brne   d1            ; 
   dec      temp2         ; 
   brne   d0            ; 
   ret
;****** Инициализация контроллера ****************************************
; выполняется при включении питания, сбросу RESET, или от
; сторожевого таймера
;*************************************************  ************************
init:
;****** Инициализация МК **********************************
   ldi    temp, low(RAMEND) ; Инициализация указателя стека
   out    SPL, temp        ; в конце внутреннего ОЗУ
   ldi    temp, high(RAMEND);
   out    SPH, temp        ;
   rcall   Config_Port      ; Вызов подпрограммы конфигурирования портов
                  ; 
;****** Основная программа ***********************************************
main:
   clr      temp         ; Устанавливаем линии порта А как входы
   out      ddra, temp      ; 
   out      porta, temp      ; Отключаем подтягивающие резисторы
   cbi      portc, adr1      ; Устанавливаем адрес первого буфера
   sbi      portc, adr0      ; 
   cbi      portd, RD      ; Разрешение передачи данных в порт А
   in      inl, pina      ; Читаем содержимое первого буфера
   sbi      portd, RD      ; Запрет передачи данных в порт А
   cbi      portc, adr0      ; Устанавливаем адрес второго буфера
   sbi      portc, adr1      ; 
   cbi      portd, RD      ; Разрешение передачи данных в порт А
   in      inh, pina      ; Читаем содержимое второго буфера
   sbi      portd, RD      ; Запрет передачи данных в порт А
   ser      temp         ; Устанавливаем линии порта А как входы
   out      ddra, temp      ;

   mov      outh, inh      ; 
   mov      outl, inl      ; 

   cbi      portc, adr1      ; Устанавливаем адрес первого регистра
   sbi      portc, adr0      ; 
   out      porta, outl      ; Выставляем данные на линии порта А
   cbi      portd, WR      ; Стробирующий сброс команды записи
   sbi      portd, WR      ; 
   cbi      portc, adr0      ; Устанавливаем адрес второго регистра
   sbi      portc, adr1      ; 
   out      porta, outh      ; Выставляем данные на линии порта А
   cbi      portd, WR      ; Стробирующий сброс команды записи
   sbi      portd, WR      ; 
   rcall   delay1         ; Вызов подпрограммы формирования задержки 1с
   rjmp   main         ;

PVV.rar

;*************************************************  *****
.include "8515def.inc"   ;файл определений AT90S8515
.def temp=r16      ;временная переменная
.def cols=r18      ;номер сканируемого ряда
         ;клавиатуры
.def rots=r21      ;номер строки клавиатуры
.def key=r19      ;номер кнопки
.def scancode=r20   ;сканирующий код

.cseg                   ; CODE segment
.org   0
   rjmp    init          ; Вектор прерывания по включению питания,
                         ; сбросу RESET или от сторожевого таймера
   rjmp   scankeys      ; Int 0 - Прерывание от клавиатуры
.org   $0d   
;Подпрограмма обработки клавиатуры
      scankeys:
   clr key
   clr scancode
   ldi cols,2
   sec
     scan: rol scancode      ;формирование очередного скан-кода
   out PORTD,scancode   ;вывод на клавиатуру
   clc
   ldi rots,4
   in temp,PIND      ;ввод состояния клавиатуры
     mm: rol temp
   brcc nn         ;проверка замыкания кнопки
   rjmp press      ;переход при замыкании (С=0)
     nn: inc key      ;увеличение номера кнопки
   dec rots      ;уменьшение номера строки
   brne mm
   dec cols      ;уменьшение номера ряда
   brne scan
     press: cpi key,8
   breq f1         ;выход при отсутствии замыканий
   rcall outkey      ;вывод на дисплей
     f1: reti

     outkey:
   cpi key,0 
   breq case1
   cpi key,1
   breq case2 
   cpi key,2
   breq case3
   cpi key,3 
   breq case4
   cpi key,4 
   breq case5
   cpi key,5
   breq case6
   cpi key,6
   breq case7 
   cpi key,7
   breq case8

   case1:
   ldi temp,0b01111111
   out PORTA,temp
   reti

   case2:
   ldi temp,0b10111111
   out PORTA,temp
   reti

   case3:
   ldi temp,0b11011111
   out PORTA,temp
   reti

   case4:
   ldi temp,0b11101111
   out PORTA,temp
   reti

   case5:
   ldi temp,0b11110111
   out PORTA,temp
   reti

   case6:
   ldi temp,0b11111011
   out PORTA,temp
   reti

   case7:
   ldi temp,0b11111101
   out PORTA,temp
   reti

   case8:
   ldi temp,0b11111110
   out PORTA,temp
   reti
   reti
;Инициализация
init:
   ldi temp,low(RAMEND) ;Инициализация
   out spl,temp        ;указателя стека
   ldi temp,high(RAMEND)
   out sph,temp
      ;Инициализация портов
   ser temp
   out DDRA,temp        ;порт РА на вывод
   ldi temp,$03        ;линии порта PD0-PD3 на вывод,
   out DDRD,temp
   ldi temp,$F0        ;PD4-PD7 на ввод
   out PORTD,temp
      ;Инициализация таймера 0
   ldi temp,$05
   out TCCR0,temp        ;коэффициент деления 1024   
   ldi temp, (1‹‹TOIE0)
   out TIMSK, temp        ;разрешение прерываний от таймера
      
   sei           ;разрешение прерываний
      loop: rjmp loop

MatrKey.rar

[Easyrider83]

Вы опоздали на 20 лет.