So ich hab hier nochmal denn Code:
Code:
$regfile = "M8def.dat"
$crystal = 8000000
Config Lcd = 20 * 4
Config Lcdbus = 4
Config Lcdpin = Pin
Dim Zehler As Long
On Int0 Int0_int
Config Timer1 = Timer , Prescale = 256
'Hier wird das Unterprogramm festgelegt, das
'in dem von ihnen eingestellten Intervall aufgerufen wird
On Timer1 Timer_irq
'Diese Vorgabe wurde berechnet um die genaue Intervallfrequenz zu erreichen
Const Timervorgabe = 34286
'Hier werden die Timer aktiviert
Enable Timer1
'Hier wird der Timer und der Teiler festgelegt
Enable Int0
Enable Interrupts
Start Timer1
Int0_int:
Incr Zehler
Return
'Dies ist der Programmteil, der in dem von ihnen gewählten
'Intervall aufgerufen wird
Timer_irq:
Timer1 = Timervorgabe
Cls
Lcd Zehler
Zehler = 0
Return
End
Das dumme is nur jetzt zeigt er wieder bloß 1 manchmal 2 an... Ich fühle mich von dem ding langsam aber sicher verschauckelt
[/quote]
Lesezeichen