Ich probiere grade mit Timer2 über ein externes Uhrenquarz (32767Hz) einen Interrupt zu erzeugen - leider vergblich.
Nach dem folgenden Code soll meine LED an PB4 im 1Hz Takt blinken, es tut sich aber gar nichts.
Code:
$regfile = "m8def.dat"
$crystal = 1000000
On Timer2 Takt
Ddrb = &B11111111
Portb = &B00000000
Assr.as2 = 1 'asynchroner Betrieb
Tccr2 = &B00000100 'Takt: 32768Hz/64=512Hz (2Hz, da 8bit-Timer 0-255 - Overflow bei 255)
Timsk.toie2 = 1 'Timer2 Overflow-Interrupt einschalten
Sreg.7 = 1 'Interrupts freischalten
Waitms 1000
Do
Loop
Takt:
Portb.4 = Not Portb.4
Return
End
Lesezeichen