Способов как минимум два:Coldheart писал(а):Способы, варианты итд.
Код: Выделить всё
Display:
clr r16
in r16,PinD; считываем порт в R16
mov r3,r16, записываем R16 в R3
sbrc r16,4; проверяем 5-ю ножку на высокий уровень
rcall InfCycle; если он там есть, то переходим на InfCycle
uu:
ldi R17,0b00001110 ; Включаем катод первого
out PortD,R17
mov R22,r23; пересылаем из регистра первого разряда в регистр адреса декодера
rcall Decoder ; конвертируем в бинарный код
out PortB,R17 ; выводим на порт
rcall Delay1 ; задержка
Далее все также с еще 3-мя разрядами
rjmp display
Decoder:
ldi ZL,Low(DcMatrix*2)
ldi ZH,High(DcMatrix*2)
ldi R18,0
;ldi R22,1
add ZL,R22
adc ZH,R18
lpm
mov R17,r0
ret
InfCycle:
clr r16
in r16,PinD
eor r16,r3
sbrs r16,4
rjmp big
clr r3
ret
big:
sts digit,r23
inc r23
cpi r23,10
breq M
ret
M:
clr r23
ret
DcMatrix:
; hgfedcba hgfedcba
.db 0b00111111,0b00000110 ;0,1
.db 0b01011011,0b01001111 ;2,3
.db 0b01100110,0b01101101 ;4,5
.db 0b01111101,0b00000111 ;6,7
.db 0b01111111,0b01101111 ;8,9
Delay1: ; задержка
ldi R20,20
ldi R21,11
d11:
dec R20
brne d11
dec R21
brne d11
ret
Нет смысла обнулять регистр перед закидыванием в него значения.Coldheart писал(а): clr r16
in r16,PinD; считываем порт в R16
R16м я там настраиваю порты. НО там еще много бредятины. Которая вылезла в процессе экспериментовGudd-Head писал(а):Нет смысла обнулять регистр перед закидыванием в него значения.
Код: Выделить всё
.include "m16def.inc" ; Используем ATMega16
; ROM ===============
.CSEG ; ROM
.org $000
jmp RESET ; External Pin, Power-on Reset, Brown-out Reset and Watchdog Reset
.org $002
jmp EXT_INT0 ; INT0 Внешнее прерывание 0
reti ; INT1 Внешнее прерывание 1
reti ; TIMER2 COMP Совпадение таймера/счетчика Т2
reti ; TIMER2 OVF Переполнение таймера/счетчика Т2
reti ; TIMER1 CAPT Захват таймера/счетчика Т1
.org $00C
jmp TMR1_COMPA ; TIMER1 COMPA Совпадение «А» таймера/счетчика Т1
.org $00E
jmp TMR1_COMPB ; TIMER1 COMPB Совпадение «В» таймера/счетчика Т1
reti ; TIMER1 OVF Переполнение таймера/счетчика Т1
reti ; TIMER0 OVF Переполнение таймера/счетчика Т0
reti ; SPI, STC Передача по SPI завершена
reti ; USART,RXC USART, прием завершен
reti ; USART,UDRE Регистр данных USART пуст
reti ; USART,TXC USART, передача завершена
reti ; ADC Преобразование АЦП завершено
reti ; EE_RDY EEPROM, готово
reti ; ANA_COMP Аналоговый компаратор
reti ; TWI Прерывание от модуля TWI
reti ; INT2 Внешнее прерывание 2
.org $026
jmp TMR0_COMP ; TIMER0 COMP Совпадение таймера/счетчика Т0
reti ; SPM_RDY Готовность SPM
INIT_ports:
ldi r16, 0b01000011
out DDRD, r16
ldi r16, 0b00111000
out PORTD, r16
ldi r16, (1<<INT1) ; Включаем прерывание INT1
out GICR,r16
ldi r16, (1<<SE)|(0<<SM2)|(1<<SM1)|(0<<SM0)|(0b10<<ISC10)
out MCUCR, r16
sei
sleep
...Видимо в строчках кода, которые здесь не приведены...zero648 писал(а):не пойму в чем проблема?
Код: Выделить всё
INIT_adc:
ldi r16, (1<<ADLAR)|(0b00111<<MUX0); ADC left, ADC7 as input (SENSOR_1)
out ADMUX, r16 ; AREF, Internal Vref turned off
ldi r16, (1<<ADEN)|(0b100<<ADPS0) ; Enable ADС, ADC Prescaler = 1:16
; 000=1:2,001=1:2,010=1:4,011=1:8,100=1:16,
; 101=1:32,110=1:64,111=1:128.
out ADCSRA, r16
INIT_variables:
ldi ZL, low(CHAR_GNR*2) ; Знакогенератор
ldi ZH,high(CHAR_GNR*2) ;
ldi YL, low(VARIABLES) ; Адрес таблицы переменных
ldi YH,high(VARIABLES) ;
ldi r17, low(SCL_TYP_EP)
ldi r18,high(SCL_TYP_EP)
call EEPROM_read
std Y+$3e, r16 ; store SCALE_TYPE
...
zero648 писал(а):У меня кнопка на INT1
нашёл я вашу ошибку кажется. Таки да, лол.Engineer_Keen писал(а):программа вначале прыгает на метку reset, а вот код, который с нее начинается как раз и не выложен.
Код: Выделить всё
.org $000
jmp RESET ; External Pin, Power-on Reset, Brown-out Reset and Watchdog Reset
.org $002
jmp EXT_INT0 ; INT0 Внешнее прерывание 0
reti ; INT1 Внешнее прерывание 1
reti ;
reti ; TIMER2 COMP Совпадение таймера/счетчика Т2
reti ;
...По большому счету это не важно, процессор все равно попадает на команду RETI, тем более перед ним стоит команда абсолютного перехода, которая занимает свои четыре байта и смещает команду на свой адрес.Gudd-Head писал(а): А ещё reti в векторе прерываний, хотя у 16-й Меги на каждое прерывание отведено по 2 слова (4 байта). Т.е. на самом деле всё выглядит так:Код: Выделить всё
.org $000 jmp RESET ; External Pin, Power-on Reset, Brown-out Reset and Watchdog Reset .org $002 jmp EXT_INT0 ; INT0 Внешнее прерывание 0 reti ; INT1 Внешнее прерывание 1 reti ; reti ; TIMER2 COMP Совпадение таймера/счетчика Т2 reti ; ...
Engineer_Keen респект и уважуха, сразу то нельзя было сказать, а то код, кодEngineer_Keen писал(а):Короче, если не нашли в даташите - из power-down выходят только по прерыванию по уровню, т.е. в ISC нужно писать "00"
Код: Выделить всё
ldi r16, (1<<SE)|(0<<SM2)|(1<<SM1)|(0<<SM0)|(0b00<<ISC10)