Hallo,
habs jetzt geändert, nachdem ich gesehen habe, das PB5 so ohne weiteres nicht verwendbar ist.
Habe jetzt PB3, es geht zwar, aber VIEEELLLL zu langsam
Code:
$regfile = "attiny13.dat" ' Chip auswählen
$crystal = 9600000 '9,6MHz
$hwstack = 8
$swstack = 2
$framesize = 5
'
'
Ddrb = &B11111001
Buzzer Alias Portb.3
Dim S As Byte
Const Timervorgabe = 130
Config Timer0 = Timer , Prescale = 1
On Timer0 Timer_irq
Enable Timer0
Enable Interrupts
Do
Loop
Timer_irq:
'Interrupt jede Sekunde
Timer0 = Timervorgabe
Incr S
Toggle Buzzer
Return
Es togglet so etwa mit 5 Hz.
Das kann doch nicht sein, bei 9,6MHz, ohne Vorteiler (Fusebits entspr. gesetzt) ????
Ich verzweifel noch....
Wie ihr an meinen Beiträgen seht, habe ich schon mehrfach versucht kleine Projekte mit Tiny13 zu lösen - es ging noch NIE!!
10 Stk habe ich rumliegen, etwa 5mal wollte ich was damit machen - nichts ging... Echt frustrierend.
Ich werde die Dinger am besten in der Tonne versenken..
Hat keiner ne Idee?
Ursprünglich will ich einen Timer mit 60sek und 90sek bauen, je nachedem welche der zwei Tasten mann drückt...
MfG, dl1akp
Lesezeichen