Moto_v3x писал(а):Возможно так будет работать:
kip96 писал(а):Как занести переменную в конкретный адресс, что-бы потом не искать её?
Можно включить предделитель таймера, а если будет мало - задействовать переменную в качестве счётчика числа прерываний таймера, т. е. при каждом прерывании, увеличиваем число в переменной на 1 и если в переменной окажется требуемое число, её обнуляем и выполняем нужные действия.Gordon Shumway писал(а):Но это переполнение очень быстро происходит (у меня кварц 4 мгц, меньше нельзя).
Мурик писал(а):Можно включить предделитель таймера, а если будет мало - задействовать переменную в качестве счётчика числа прерываний таймера, т. е. при каждом прерывании, увеличиваем число в переменной на 1 и если в переменной окажется требуемое число, её обнуляем и выполняем нужные действия.Gordon Shumway писал(а):Но это переполнение очень быстро происходит (у меня кварц 4 мгц, меньше нельзя).
Gordon Shumway писал(а):Таймер где-то накапливает счет ? Как понять, что таймер переполнился ?
edm2007 писал(а):Gordon Shumway писал(а):Таймер где-то накапливает счет ? Как понять, что таймер переполнился ?
Ну разумеется накапливает. В счетном регистре. А понять можно по прерыванию при переполнении.
Код: Выделить всё
'*************************[Псевдокоманды управления]*********************
$regfile = "attiny2313.dat" ' тип МК
$crystal = 4000000 ' выбор кристала для расчета задержек
'*************************[Инициализация прерываний]*********************
Config Timer0 = Timer , Prescale = 64 ' конфигурируем таймер
On Timer0 Refresh ' обзываем прерывание
Enable Interrupts ' разрешаем все прерывания
Enable Timer0 ' и для таймера в частности
Start Timer0 ' запускаем таймер
'*************************[Начало основной программы]*********************
Do ' крутимся здесь, ожидая прерывания
Loop
'**********************[Процедуры обработки прерываний]******************
Refresh: ' прерывание таймера Т0 по переполнению
' делаем тут что нам нужно
Return ' выход из обработчика прерывания
Код: Выделить всё
do
if chot=3(или сколько надо) then....
....
chot=0
end if
loop
int0:
incr chot
return
Не ориентируюсь в скорости вспышек.
Но опять-же, не знаю всех тонкостей.