Вопрос по программированию задержки внутри прерывания

shonty

во, к примеру, как у меня сделана подстановка адреса возврата в прерывании для таймера1:

Код:

;--- Таймер1 ---
ldi R16, low(RAMEND)
out SPL, R16 
ldi R16, low(main)
push R16
ldi R16, high(main)
push R16
reti

перезаписываю вершину стека и пишу в стек адрес возврата.

Постепенно осознаю полезность приёма. :)))

В прерываниях конечно не везде зайдёт, а вот для использования какого-нибудь общего сценария без последующей проверки флагов самый раз.

Накидал дэмку для примера:

Спойлер

Код:

label_0:
ldi R16, low(RAMEND)
out SPL, R16
ldi R16, low(label_2)
push R16
ldi R16, high(label_2)
push R16
rjmp procedure

label_1:
ldi R16, low(RAMEND)
out SPL, R16
ldi R16, low(label_0)
push R16
ldi R16, high(label_0)
push R16
rjmp procedure

label_2:
ldi R16, low(RAMEND)
out SPL, R16
ldi R16, low(label_1)
push R16
ldi R16, high(label_1)
push R16
rjmp procedure

procedure:
nop
ret

То есть мы сразу обозначаем, куда нам нужно перейти после выполнения)
:beer:

Добавлено after 7 minutes:
Ну или так:

Спойлер

Код:

label_0:
tst R0
breq pc+6

ldi R16, low(label_1)
push R16
ldi R16, high(label_1)
push R16
rjmp procedure

ldi R16, low(label_2)
push R16
ldi R16, high(label_2)
push R16
rjmp procedure

label_1:
rjmp pc

label_2:
rjmp pc

procedure:
nop
ret

Добавлено after 41 minute 48 seconds:
А для тех, кто говорит, что на асм-е то ли много, то ли сложно писать :)))

:

Спойлер

Код:

.equ after =0
.MACRO first            
ldi R16, low(@2)
push R16
ldi R16, high(@2)
push R16
rjmp @0
.ENDMACRO

Код:

; сначала в процедуру, потом на метку:
first PROCEDURE, after, LABEL_2

но это изврат) я так не делаю))

Добавлено after 3 minutes 5 seconds:

shonty писал(а):

я так не делаю))

потому что нельзя совсем абстрагироваться от кода))

Реклама

Starichok51

ну, и где видно, когда твоё макро перейдет на метку LABEL_2?

Реклама

shonty

Starichok51 писал(а):

ну, и где видно, когда твоё макро перейдет на метку LABEL_2?

Код:

.equ after =0
.MACRO first            
ldi R16, low(@2)
push R16
ldi R16, high(@2)
push R16
rjmp @0
.ENDMACRO
; ----------

first PROCEDURE, after, LABEL_2

label_1:
rjmp pc

label_2:
rjmp pc

procedure:
nop
ret

Добавлено after 35 minutes 52 seconds:
redirect PROCEDURE, LABEL_2
- так более вменяемо будет..
но тогда макрос придётся немного переделать.

Starichok51

а не проще вместо rjmp @0 сразу написать ret?

Реклама

Эиком - электронные компоненты и радиодетали

shonty

ret написать проще, но работать не будет :)))

как тогда передать, что перед меткой_2 сначала нужно посетить процедуру?

Реклама

Starichok51

тогда понятно. а то я "клюнул" на то, что процедура у тебя пустая.

Реклама

shonty

тут вообще можно извратиться, передать в стёк несколько адресов, и получится по одному rjmp-у конвеерные переходы :)))

типа:
cruise label_1, label_3, label_10, label_7, label_1, label_4,...

но только это ненужно, а вот один такой переход я вполне представляю где применить.

Starichok51

ну да, конвейер - это уже извращение.

ДядяВован

Подход с манипуляцией стека с для условного возврата, в принципе, штука интересная. Хотя IMHO удобнее ICALL / IJMP.
Но зачем нам многократная переустановка указателя стека?
ldi R16, low(RAMEND)
out SPL, R16
Особенно в большом проекте, где стек обычно отнюдь не пустой.
Ну пришли в подпрограмму, хотим вернуться не туда откуда вызвали. Достанем адрес возврата посредством POP, запихнем новый адрес PUSH. Cтек на ramend единожды при старте настроить и хватит.

Реклама

Starichok51

ДядяВован, в данном случае мне НЕ НУЖЕН адрес возврата, поэтому я восстановил вершину стека и запихнул адрес начала цикла.
а shonty взялся придумывать, где еще можно применять этот прием.

ДядяВован

Понятно.

shonty

Кстати вспомнил по теме..
В обработчик прерывания же вообще можно не заходить и не обрабатывать. А вести опрос флага преывания в цикле.

На асме для 328-й для примера:

Спойлер

Код:

; init INT0 (PD2):   
   cli
   ldi R16,(1<<ISC01)      ; прерывание INT0 по ниспадающему фронту
   sts EICRA, R16
   ; ldi R16,(1<<INT0)      ; разрешение внешнего прерывания INT0   НЕ ИСПОЛЬЗУЕМ
   ; out EIMSK, R16
   ldi r16, (1<<INTF0)      ; очистить флаг прерывания
   out EIFR, r16
   sei

Проверка в цикле:

Код:

   in R16, EIFR
   sbrc R16, INTF0
   rjmp КУДА_НИБУДЬ

И уже в подпрограмме чистим флаг:

Код:

ГДЕ_НИБУДЬ:
........
........
   ldi r16, (1<<INTF0)      ; очистить флаг прерывания
   out EIFR, r16

Starichok51

вот только запаздывание обработки в цикле относительно срабатывания прерывания может оказаться недопустимым.

shonty

Согласен.. Но топикстартеру как раз это не критично было.
А мне тоже, просто чтобы импульс прерывания с Si4735 зафиксировался, не обязательно подрываться))

Код:

STC_wait:
   in R16, EIFR
   sbrs R16, INTF0
   rjmp PC-2
   out EIFR, r16

типа spi_wait или i2c_wait..

BOB51

Для обработчика кнопок/ низкоскоростных процессов запаздывание в пределах до 0,014 секунды не критично.
:roll:

akl

Замечу. Для m48...m328, да и не только справедливо такое.

Код:

STC_wait:
   SBIS EIFR,INTF0
   RJMP PC-1
   SBI EIFR,INTF0

shonty

akl писал(а):

Замечу. Для m48...m328, да и не только справедливо такое.

Спасибо. Полезный совет :beer:

COKPOWEHEU

akl писал(а):

RJMP PC-1

Плохая идея. У вас же и так метка есть

Код:

STC_wait:
  SBIS EIFR,INTF0
    RJMP STC_wait
  SBI EIFR,INTF0

shonty

COKPOWEHEU писал(а):

Плохая идея. У вас же и так метка есть

Использование PC более универсально, да и привычнее мне.
А конечный результат в данном случае в макросе оформлен будет.
С метками порой конфликты случаются, когда много своих "библиотек" подключаешь.

Starichok51

shonty, ты что, вручную вычисляешь смещения для РС?
а если нужно сделать прыжок на много адресов, то тоже руками вычисляешь смещение?
а универсально - это использование метки - пусть компилятор вычисляет смещение.

Вопрос по программированию задержки внутри прерывания

Кто сейчас на форуме