вполне можно работать с IEEE-шной плавучкой и командами сопроцессора .
таймер запускается сразу после установки нужного коэффициента предделителя. останавливается при задании CS10=CS11=CS12=0Инженер писал(а):Как таймер запустить? Или он запускается автоматически? (вместе с МК)
Артур писал(а):Здравствуйте! Помогите разобраться пожалуйста? Я хочу чтоб контроллер установил порт В в высокий уровень и через 2 сек в низкий уровень и на этом всё прекратилось! А получается что он постоянно мигаетбудто программа запускается снова и снова
Вот сам код:
Код: Выделить всё
;подключаем файл описания регистров
.include "c:/wavrasm/include/tiny2313.inc"
;задаем имена регистрам для удобства
.def temp=r17
.def temp1=r18
.def temp2=r19
;присваиваем значения temp и temp1
ldi temp,0xff
ldi temp1,0x00
;установливаем порт В на выход
out ddrb,temp
;зажигаем порт В
out portb,temp
;вызываем подпрограмму задержки 2 секунды
rcall loop
;гасим порт В
out portb,temp1
;подпрограммa задержки 2 сек
loop:
ldi R21, 0x48
loop0: ldi R22, 0xBC
loop1: ldi R23, 0xC4
loop2: dec R23
brne loop2
dec R22
brne loop1
dec R21
brne loop0
ldi R21, 0x02
loop3: dec R21
brne loop3
nop
nop
ret
В чем тут фишка? Спасибо!
Код: Выделить всё
main:
rjmp main
Код: Выделить всё
main:
rjmp mainСпасибо! А как зделать так чтоб она не начиналась заново? А я мог потом использовать задержку из любого другого места программы ну типа такARV писал(а):никакой аномалии нет - RET в конце твоего кода и заставляет программу начаться заново
Код: Выделить всё
rjmp loopКод: Выделить всё
; объявления констант, переменных и т.п.
.org 0
rjmp Start ; переход на начало основного участка программы
; тут размещаются векторы прерываний
rjmp Interrupt1 ; какой-то вектор прерываний
Start:
; тут начинается инициализация стека
; потом все подготовительные операции
; настройка портов, таймеров и т.п.
MainLoop:
; тут начинается участок основного цикла,
; т.е. тот код, который непрерывно циклически выполняется
; отсюда можно вызывать вспомогательные подпрограммы
rcall Delay
rjmp MainLoop ; переход к началу цикла
; если не надо зацикливаться, то надо как-то остановить выполнение кода в этой точке, например так:
rjmp PC ; предыдущий rjmp не нужен, разумеется
; тут начинаются вспомогательные подпрограммы
Delay:
; подпрограмма задержки
ret
OtherProc:
; еще какая-то подпрограмма
ret
Interrupt1:
; обработчик какого-то прерывания
reti
; и так далее
Код: Выделить всё
.include "C:\VMLAB\include\2313def.inc"
.def temp=r16
.def temp1=r17
.def temp2=r18
.def clear_display=r19
.def return_home=r20
.def display_on=r21
.def display_off=r22
.def function_set=r23
.def write_data=r24
.def write_command=r25
.cseg
.org 0
;векторы прерываний
rjmp RESET
RESET:
rjmp START
reti
;начало проги
START:
;настройка портов
ldi temp,0xff
ldi temp1,0b01100000
out ddrb,temp ;port b выход
out ddrd,temp1 ;port d 5 и 6 ножки выходы а остальные входы
ldi temp,0x00
ldi temp1,0x00
;порты настроены!!!
;создадим команды для дисплея
ldi clear_display ,0b00000001 ;записывать в порт b
ldi return_home ,0b00000010 ;записывать в порт b
ldi display_on ,0b00001100 ;записывать в порт b
ldi display_off ,0b00001000 ;записывать в порт b
ldi function_set ,0b00110100 ;записывать в порт b
ldi write_data ,0b00100000 ;записывать в порт D
ldi write_command ,0b00000000 ;записывать в порт D
;команды созданы
;инициализация дисплея
out portd,write_command ; переводим дисплей в режим приема команд
out portb,function_set ; устанавливаем 8 битный интерфейс
rcall E ; строб - (ВОТ ОТСЮДА МЫ ПЕРЕХОДИМ НА Е: И ЭТИМ ВСЁ ЗАКАНЧИВАЕТСЯ :( ...)
out portb,display_on ; включаем дисплей
rcall E ; строб
out portb,clear_display ; очищаем дисплей и обнуляем видеопамять
rcall E ; строб
E:
ldi temp,0b00100000
out portd,temp
nop
ldi temp1,0b00000000
out portd,temp1
ret ;(здесь по идее должна прога Е: закончиться и перейти на строчку "out portb,display_on" ,но этого не происходит)
Код: Выделить всё
.nolist
.include "tn2313def.inc"
.list
.def Temp = r16
.def Temp1 = r17
.def Temp2 = r18
.def Temp3 = r19
.def Temp4 = r20
.def Dig1 = r21
.def Dig2 = r22
.def Dig3 = r23
.def Dig4 = r24
.equ Dig1PortDdr = DDRD
.equ Dig1PortOut = PORTD
.equ Dig1PortBit = 2
.equ Dig2PortDdr = DDRD
.equ Dig2PortOut = PORTD
.equ Dig2PortBit = 3
.equ Dig3PortDdr = DDRD
.equ Dig3PortOut = PORTD
.equ Dig3PortBit = 4
.equ Dig4PortDdr = DDRD
.equ Dig4PortOut = PORTD
.equ Dig4PortBit = 5
.cseg
.org 0
; начинаем программу прямо с нулевого адреса без всяких прыжков ;)
ldi Temp, low(RAMEND)
out SPL, Temp ; инициализируем указатель стэка
ldi Temp,(1<<WDCE)|(1<<WDE)
out WDTCSR,Temp
ldi Temp,(1<<WDE)|(1<<WDP2)|(1<<WDP1)
out WDTCSR,Temp ;запускаем watchdog с интервалом 1 сек.
sbi ACSR, ACD ;отключаем аналоговый компаратор
; настраиваем порты
ldi Temp, 0xFF
out DDRB, Temp ; segments A-G + dot as outputs
sbi Dig1PortDdr, Dig1PortBit
sbi Dig2PortDdr, Dig2PortBit
sbi Dig3PortDdr, Dig3PortBit
sbi Dig4PortDdr, Dig4PortBit
; и так далее...
Brutaller писал(а):Как я смотрю многие совсем совсем начинающие не понимают про векторы прерываний и даже если их не используют делают какие то не понятные прыжки в самом начале. Зачем? Если прерывания не используются, то можно начинать прямо с нулевого адреса писать программу