Есть первые результаты прилагаю фото.
Короче получилось! Отследил я итот импульс и после 30 импульса делаю что хочу.
Ну правда это все на одной частоте. Так вот что я думаю сделать дальше измереть значения самого длиного импульса во всем диапазоне частоты, собрать это все в таблицу с диапазонами длины этого импульса. И по этой таблицы сравнивать длину импульсов! @ device pic16F84A, xt_osc, wdt_off, protect_off, pwrt_on
INCLUDE "MODEDEFS.BAS"
DEFINE OSC 4
trisb.0 = 1 '
time var byte 'время (период) который будем мерять
czet var byte
time=0 '
option_reg.6=0 'прерывание по фронту portb.0
option_reg.5=0 'приращение таймера от внутреннего генератора
option_reg.3=0 'предделитель включен перед таймером
on interrupt goto te
INTCON=%10010000 ' разрешение прерывания
loop:
if time > 10 then czet = 0
if czet = 30 then pulsout portb.1, 200
goto loop
disable
te:
time=tmr0 'переносим значение таймера
' в переменную
czet = czet + 1
tmr0=0 ' обнуляем таймер
intcon.1=0
resume
enable
end