еве набрзина пример во BASIC ова е за 4 MHZ осцилатор си мислам дека ке ме сватиш
b1 var byte " променлива
trisa.1=%0 "porta.1 e izlezna
t1con=%00000001 "прескалерот е 1:1
pir1.0=0 "бришење ако се преполни TMR1
pie1=%00000001 "Oвозможи прекини на TMR1
b1=0
tmr1=0
on interrupt goto vektor "прекинувачки вектор
intcon=%11000000 "овозможи прекини
pocetok:
if b1=76 then
toggle porta.1
b1=0
endif
goto main
disable
vektor:
b1=b1+1
pir1.0=0
resume
enable
end
Со осцилатор од 4 MHz tmr1 мери време 0 до 65,536 микросекунди, со оваа програма бидејки прескалерот е поставен на 1:1 на порта.1 ке се менува состојбата на секој 5 секунди бидејки 76*65,5=5 секунди
Ако не ти за нешто нај прецизно еве несто просто
trisa.1=%0
b1 var byte
pocetok:
b1=b1+1
pause 100
if b1=10 then led 10*100=1 секунда за време од една секунда порта.1 ке ја запали ке чека 1
секунда и ке ја изгасне
goto pocetok
led:
high porta.1
pause 1000
low porta.1
b1=0
goto pocetok