Hallo nochmal!
Also irgendwie krieg ich das nicht hin.
Ich will eine LED am Port D.2 im Sec Takt Toggeln.
Ich hab auf internen 8Mhz Takt umgeschaltet damit ich das Beispiel unter "Timer im ROBONETZ" verwenden kann.
Warum taktet aber nix? Ist da was falsch?
So hab ichs gemacht:
Code:
$regfile = "m8def.dat"
$crystal = 8000000 'Interner Takt
$baud = 9600
' Ausgang
Config Pinb.2 = Output ' Pin B.2 als OUTPUT => LED
Config Timer1 = Timer , Prescale = 256 'Konfig Timer1
Enable Timer1 'schaltet den Timer1 ein
On Timer1 Timer1_isr 'Spr. bei T1 Überlauf zu "TIMER1_ISR"
Enable Interrupts
Timer1 = 34285 'T1 soll schon von 34285 wegzählen
'/// HAUPTPROGRAMM /////////
Main:
Do
Loop
Goto Main
'//// ISR TIMER1 ////////
Timer1_isr: 'ISR von Timer1
Timer1 = 34285 'Timer1 soll wieder von 34285 wegzählen
Toggle Pinb.2 'schaltet PortB.2 im Sec Takt
return
End
Lesezeichen