только быстрый опрос порта, выделение 2х бит (к которым подключены 2 входа) и их анализ.
Вариантов больше нет ))

вроде тут я выкладывал частотомер для низких частот (у меня 50 Герц сети измеряло).
Но для Вашей задачи еще проще:

  On Int0 Encoder_schitaem Save      ' импульсы
  Config Int0 = Falling       ' Установка прерывания INT0
  Enable Int0                 ' Прерывание

  Enable Interrupts           ' Обязательно

do
Ваш код
loop

---
Encoder_schitaem:             ' обработчик прерываний импульсов
    Incr Linejka_impulsy
Return

Странно. Подтяжки портов включены. Но подтяжка как я понял только на INT1 есть. INT0 не поддтянут.
Неужели порт спалил. Блин. Настройки все правильно сделаны.
config PORTD.2 = input    ' R
config PORTD.3 = input    ' L
PORTD.2 = 1               'Подтяжка порта на U+
PORTD.3 = 1               'Подтяжка порта на U+

Enable Interrupts
Config INT0 = Falling   'R
Config INT1 = Falling   'L
On Int0 rcount
On Int1 lcount
Enable Int0
Enable Int1

Дополню. Железо проверил.
Загадка. После сброса контроллера, все работает. Потом после начала/остановки счета, перестает считать.
Может GIFR = 64 не стоит использовать?

lcount:
incr countl
Gifr = 64                ' сбрасываем регистр хранения прерывания INT1
return

rcount:
incr countr
Gifr = 64                ' сбрасываем регистр хранения прерывания INT0
return

Делаю так. Вроде все правильно, просто в главном цикле показываю countl и countr.

Отредактировано Payatel (2024-10-31 15:46:42)

Справедливости ради, во многих чипах есть еще PCINT (pin change interrupt).
Отличие в том, что Вам нужно настроить маски, а также, поскольку реакция будет и на подъем, и на спад, хранить в битовой переменной прошлое состояние пина.

Есть также возможность использовать таймер в режиме счетчика.
Я делала так в стабилизаторе оборотов холостого хода для старой машины (штатная схема в бортовом компе вышла из строя).
Замеряется не частота, а длительность импульса. Это для относительно низких частот дает более быстрое/точное измерение при известной скважности.
То есть либо вы считаете число импульсов за какое-то время, либо измеряете интервал их следования (можно сделать несколько замеров и усреднить для повышения точности).
Первое точнее, но занимает какое-то время, и не чувствительно к скважности. Второе быстрее, но менее точно и чувствительно к периодичности, и она должна быть известна наперед.

Отредактировано Cirno_9 (2024-10-31 16:16:44)

Организуйте внешнюю подтяжку.
Почти во всех случаях вряд ли стоит экономить один резистор.
Мало того, что так надежнее, так еще и безопаснее.
Допустим, у вас пин как вход и подтянут внутри МК. Снаружи пин подключен к кнопке на массу.
Если ошибочно или в результате какого-нибудь сбоя пин окажется сконфигурирован как выход, при нажатии кнопки вы сожжете МК.

Гораздо безопаснее, при наличии возможности, подтянуть пин извне резистором 10...50 кОм к плюсу питания, а последовательно с кнопкой включить резистор 100...300 Ом.
Так при любых ошибках, что случается при отладке, МК останется цел невредим. Да и искать проблемы проще.

Отредактировано Cirno_9 (2024-10-31 16:29:44)

Да я уже паяльную станцию включил. В коде уберу обе подтяжки и запаяю пару резисторов.
А то вся эта мистика мне не по душе. Спасибо что отвечаете.
И спасибо что форум ваш работает.
Утверждается что время форумов прошло с появлением мессенджеров. Но по мне так лучше форума ничего не может быть.
К сожалению очень много сайтов с полезной информацией по BASCOM давно не работают.
Форумы так же либо не работают совсем, либо их в интернете уже и в помине нет.

Добавляю. В общем убрал в прошивке подтяжку портов с этими прерываниями.
Все заработало как нужно! В первые такое честно говоря. Но и с прерываниями я
работаю впервые. Бесценный опыт, скажем так. Благодарю вас за ответы и советы еще раз!)))

Отредактировано Payatel (2024-10-31 16:35:36)

Да, действительно. Что то я запарился.
Весь день воюю с прошивкой, аппаратной частью, с отладкой.
Благо хоть что то уже удалось нормально реализовать)

У меня еще и микроконтроллер походу оказался с побитыми портами. Перешел на атмега16. Что не напишешь, память улетает только в путь. Вот опять сейчас приколы подьехали. Записываю в память 24lc32 4 различных значения. Записывается судя по протеусу все правильно, там можно таблицу памяти при отладке глянуть. А вот читается какая то ерунда. Первое число 2 а потом последние три цыфры правильно... При отключении питания, и включении, почему то в память записывается какой то мусор... Во блин цирк.... Такого еще у меня не было...

For Adres_w = 0 To 8191 Step 32       ' Очистка EEPROM
        H_adr_eeprom = High(adres_w)
        L_adr_eeprom = Low(adres_w)       'adress of EEPROM

        I2cstart                                   ' repeated start           
        I2cwbyte Cmd_eeprom_w
        I2cwbyte H_adr_eeprom        ' Задаём адрес, куда писать
        I2cwbyte L_adr_eeprom

        For Temp = 0 To 31  ' Всю страницу, все 32 байта
          I2cwbyte 255         
        Next
        I2cstop                     ' generate stop

        Waitms 2              ' Обязательно!
      Next
Return

'--------------------------------------------------------------------------------------------------
Chitaem_zapisi_loga:
  H_adr_eeprom = High(adres_w)
  L_adr_eeprom = Low(adres_w) 'adress of EEPROM

  I2cstart
  I2cwbyte Cmd_eeprom_w
  I2cwbyte H_adr_eeprom          ' Задаём адрес, откуда читать
  I2cwbyte L_adr_eeprom

  I2cstart                    ' repeated start
  I2cwbyte Cmd_eeprom_r       ' address R

  I2crbyte Flag_sost , Ack
  I2crbyte Flag_trevogi , Ack
  I2crbyte Temp_3 , Ack

  I2crbyte Hour , Ack
  I2crbyte Mine , Ack
  I2crbyte Seco , Ack
  I2crbyte Dat , Ack
  I2crbyte Month , Nack
  I2cstop                     ' generate stop
Return

Отредактировано Александр Д. (2024-11-06 12:52:27)

В некоторых МК нет  GIFR, а в некоторых прерывания находятся совсем на других битах.
Что у вас за МК не ясно, но GIFR=64 это единственное что есть в интернете, или чаще всего встречается, и в полне вероятно у вас стоит так, потому, что в нете так.
Сбрасывать флаг имеет смысл только если на прерывании контакт и есть дребезг.

Потом
64=&b0100 0000
Как вы одним битом сбрасываете то инт0, то инт1?

Ну и т.д. , можно на лекцию расписать
По этому, начните с изучения даташита мк. Есть на русском языке вполне доходчиво всё

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

Отредактировано kip (2024-11-07 11:46:02)