Digitalni sat sa 16F84A problem

[Momak]

Pozdrav forumasima, odlucio sam da napravim jedan digitalni sat medjutim imam problem da mi sat kasni oko 2,3 sekunde po minutu, sto je mnogo. Kod izgleda ovako

Code: Select all

define lcd_bits 4   
define lcd_dreg portb
define lcd_dbit 0   
DEFINE LCD_rsreg porta
DEFINE LCD_rsbit 3
define lcd_ereg porta
define lcd_ebit 2
define lcd_liines 2
output portb.5
symbol Rx=portb.5
pause 300

intcon=%00100000
option_reg=%10000100

brojac var word
sek var byte
minut var byte

minut=0
sek=0

on interrupt goto isr
intcon=%10100000
brojac=0
tmr0=131

main:

if brojac=250 then

lcdout $fe,1, dec minut dig 1,dec minut dig 0,":",dec sek dig 1, dec sek dig 0 

sek=sek+1
if sek=60 then 
sek=0
minut=minut+1
endif

brojac=0
endif

goto main
disable

isr:
brojac=brojac+1
tmr0=131
intcon.2=0

resume
enable
end
 

Kristal je 4MHz, prescaler je postavljen na 32, a TMR0 je 96. Racun: 4MHZ/4=1MHz, 1MHz/32 = 31250 Hz, 1/31250Hz=32us, 32us*(256-131)=4000us=4ms 4ms*250=1s
Molim pomoc, ne znam gde je probelem. Hvala unapred!

[pedja089]

Jako je los interupt u picbasicu. Predji na asemblerki...
http://darreltaylor.com/DT_INTS-14/elapsed.html

[Momak]

Oh...milina.. Svakako sam planirao u skorije vreme da krenem da ucim asemblerski program, a sad sam i primoran na to Samo jos jedno malo pitanje. Koji program i kompajler da skinem pa da krenem sa ucenjem?

[pedja089]

Ovo sto sam ti poslao radi pod picbasicom.
Kompajler za asembler ne treba. Posao kompajlera je da pretvori tvoj kod u asembler.
Asm kod mozes kucati i u picbasicu, bez ikakvih problema.