Таймер на pic16f676

[sciff]

Здравствуйте. Есть ли где? И на кнопке или реостат?

[mike-y-k]

sciff, Вам нужен аналог 555 или как-то еще?
Экран/индикатор?
Может энкодер использовать?
Интервал, разрешение, точность?
Что-то еще полезное для вразумительного ответа на вопрос…

[sciff]

#include "p16f676.inc"
_config _MCLRE_OFF&_HS_OSC&_CP_OFF&_WDT_OFF&_PWRTE_ON&_BODEN_ON
d equ 21
m equ 23
Reg equ 22
org0
goto start
org4
bcf INTCON, T0IF
incf d,1
btfsc d,7
clrf d
retfie
start
banksel OSCCAL
call 3FFh
clrf ANSEL
movwf OSCCAL
banksel PORTC
clrf PORTC
movlw 7
movwf CMCON
banksel TRISC
movlw h'04'
movwf TRISC
banksel OPTION_REG
movlw h'D7'
movwf OPTION_REG
banksel WPU
clrf WPU
banksel INTCON
bsf INTCON,GIE
bsf INTCON,T0IE
bcf INTCON,T0IF
banksel PORTC
loop
clrf Reg
bsf Reg,0
bcf Reg,1
bsf Reg,2
movf Reg,0
movwf PORTC
wait
movf PORTC,1
btfsc PORTC,2
goto wait
clrf Reg
bcf Reg,0
bsf Reg,1
bsf Reg,2
movf Reg,0
movwf PORTC
incf m
call delay
goto loop
delay
clrf d
del
btfss d,6
goto del
retlw
end

Вот продолжение

#include "p16f676.inc"
_config _MCLRE_OFF&_HS_OSC&_CP_OFF&_WDT_OFF&_PWRTE_ON&_BODEN_ON
lo equ 20
d equ 21
m equ 22
Reg equ 23
flag equ 24
del equ 25
adover equ 0
org0
goto start
org4
bcf INTCON, T0IF
decf d,1
btfss PIR1,ADIF
retfie
movf ADRESL,0
movwf m
movf ADRESH,0
movwf lo
bsf flag,adover
bcf PIR1,ADIF
retfie
start
banksel OSCCAL
call 3FFh
movwf OSCCAL
clrf ANSEL
bsf ANSEL,0
bsf ansel,1
clrf ADCON1
bsf PIE1,6
banksel PORTC
clrf PORTC
clrf PIR1
movlw C1h
movwf ADCON0
movlw 7
movwf CMCON
banksel TRISC
movlw h'04'
movwf TRISC
movlw h'03'
movwf trisa
banksel OPTION_REG
movlw h'D7'
movwf OPTION_REG
banksel WPU
clrf WPU
banksel INTCON
bsf INTCON,GIE
bsf INTCON,PEIE
bsf INTCON,T0IE
bcf INTCON,T0IF
banksel PORTC
bsf T1CON,T1OSCEN
bcf PIR1, ADIf
loop
movlw 0Ch
movwf del
clrf Reg
bsf Reg,0
bcf Reg,1
bsf Reg,2
movf Reg,0
movwf PORTC
wait
movf PORTC,1
btfsc PORTC,2
goto wait
clrf Reg
bcf Reg,0
bsf Reg,1
bsf Reg,2
movf Reg,0
movwf PORTC
call sample_adc
call delay
goto loop
delay
movlw ffh
movwf d
del
btfsc d,7
goto del
decfsz m,1
goto delay
movlw h'ff'
movwf m
decfsz lo,1
goto delay
return
sample_adc
bcf flag, adover
call sample_delay
bsf ADCON0,GO/DONE
loop_adc
btfss flag,adover
goto loop_adc
clrf flag
return
sample_delay
decfsz del,1
goto sample_delay
return
end

на частоте 4 мгц. считает до 20 минут . Реостат времени подключен на 13, vref-12 пин. Должен выдать сигнал на 10 пин. Кнопка на 8 пине подключена на +5в. Замыкается на 0в. Сигнал выдает зуммер

[mtit]

В приличном обществе принято пояснять - откуда код.
sciff, ??

[sciff]

Здрасьте. Для 16х715 был даташеет. Код половина в инете, половина даташит с казуса. Проверят думал. Если конфиг на внутренний генератор может заробить