Hallo,
ich bin ja nicht unbedingt der Spezialist in Sachen Timer und also wäre ich euch dankbar, wenn ihr mir bei einem Problem behilflich sein könntet! Meine Bemühungen in Sachen Timer sind mal wieder an die Wand gefahren. Gut, ich versuche 2x2 LEDs unabhängig von einander blinken zu lassen, dazu benutze ich einen Tiny24 und Timer0 und Timer1. Bei Timer1 funktioniert alles so wie ich es möchte. Bei Timer0 oder warum auch immer bekomme ich beim Compilieren eine Fehlermeldung auf dem PC: Assignment error
$regfile = "attiny24.dat"
$crystal = 1000000 ' 1MHz int. Fuse Bits= High = 0xDF, Low = 0xE2
$hwstack = 32
$swstack = 10
$framesize = 40
Config Timer0 = Timer , Prescale = 8
Enable Timer0
On Timer0 Sec_2
Config Timer1 = Timer , Prescale = 64
Enable Timer1
On Timer1 Sec_1
Config Porta.7 = Output
Led1 Alias Porta.7
Config Porta.6 = Output
Led2 Alias Porta.6
Config Porta.5 = Output
Led3 Alias Porta.5
Config Porta.4 = Output
Led4 Alias Porta.4
Dim Mz_1 As Word
Dim Mz_2 As Word
Const T1_laden = 5 ' 65530
Const T2_laden = 100 ' 156
Enable Interrupts
Do
If Mz_1 >= 50 Then
Led1 = 1
Else
Led1 = 0
End If
If Mz_1 <= 50 Then
Led2 = 1
Else
Led2 = 0
End If
If Mz_2 >= 50 Then
Led3 = 1
Else
Led3 = 0
End If
If Mz_2 <= 50 Then
Led4 = 1
Else
Led4 = 0
End If
Waitms 10
Loop
End
Sec_1:
Timer1 = T1_laden
Toggle Mz_1
Return
Sec_2:
Timer0 = T2_laden ' Assignment error
Toggle Mz_2
Return
Als ich aber eben das Prog auf mein Notebook geladen habe und versucht habe es zu compilieren, hat es ohne Fehler funktioniert! Nach dem Übertragen in den Tiny läuft es auch ohne Probleme. Woran kann das liegen? Auf meinem PC ist die neueste Demo Version drauf und auf dem Notebook eine etwas ältere!
Gruß
Klaus
ich bin ja nicht unbedingt der Spezialist in Sachen Timer und also wäre ich euch dankbar, wenn ihr mir bei einem Problem behilflich sein könntet! Meine Bemühungen in Sachen Timer sind mal wieder an die Wand gefahren. Gut, ich versuche 2x2 LEDs unabhängig von einander blinken zu lassen, dazu benutze ich einen Tiny24 und Timer0 und Timer1. Bei Timer1 funktioniert alles so wie ich es möchte. Bei Timer0 oder warum auch immer bekomme ich beim Compilieren eine Fehlermeldung auf dem PC: Assignment error
$regfile = "attiny24.dat"
$crystal = 1000000 ' 1MHz int. Fuse Bits= High = 0xDF, Low = 0xE2
$hwstack = 32
$swstack = 10
$framesize = 40
Config Timer0 = Timer , Prescale = 8
Enable Timer0
On Timer0 Sec_2
Config Timer1 = Timer , Prescale = 64
Enable Timer1
On Timer1 Sec_1
Config Porta.7 = Output
Led1 Alias Porta.7
Config Porta.6 = Output
Led2 Alias Porta.6
Config Porta.5 = Output
Led3 Alias Porta.5
Config Porta.4 = Output
Led4 Alias Porta.4
Dim Mz_1 As Word
Dim Mz_2 As Word
Const T1_laden = 5 ' 65530
Const T2_laden = 100 ' 156
Enable Interrupts
Do
If Mz_1 >= 50 Then
Led1 = 1
Else
Led1 = 0
End If
If Mz_1 <= 50 Then
Led2 = 1
Else
Led2 = 0
End If
If Mz_2 >= 50 Then
Led3 = 1
Else
Led3 = 0
End If
If Mz_2 <= 50 Then
Led4 = 1
Else
Led4 = 0
End If
Waitms 10
Loop
End
Sec_1:
Timer1 = T1_laden
Toggle Mz_1
Return
Sec_2:
Timer0 = T2_laden ' Assignment error
Toggle Mz_2
Return
Als ich aber eben das Prog auf mein Notebook geladen habe und versucht habe es zu compilieren, hat es ohne Fehler funktioniert! Nach dem Übertragen in den Tiny läuft es auch ohne Probleme. Woran kann das liegen? Auf meinem PC ist die neueste Demo Version drauf und auf dem Notebook eine etwas ältere!
Gruß
Klaus