Nie bardzo wiem dlaczego wogóle to nie chce wykonać podprogramu po otrzymaniu na noge ICP1 czyli portb.0 opadajacego zbocza. Nic się nie dzieje, co robię nie tak?
Mój program:
Mój program:
$regfile = "m8def.DAT"
$crystal = 8000000
$baud = 9600
Config Portc = Output
Set Portc.2
Reset Portc.1
Reset Portc.0
Config Pinb.0 = Input
Config Timer1 = Counter , Edge = Falling , Capture Edge = Falling
On Capture1 C1
Enable Interrupts
Enable Timer1
Do
Loop
End
C1:
Set Portc.0
Wait 1
Return