und
Und genau das habe ich noch nie begriffen. Keine Ahnung was diese Dinger bedeuten.
Bin gerade bei Oktett. Dabei ist mir aufgefallen, dass du die obige Binärzahl in Dezimal 90 angegeben hast.
Das hört sich ja erstmal garnicht so schlecht an, aber die Dokumentation finde ich auch – ähm – ziemlich dürftig. Wenn es nicht auf Anhieb läuft, hat man eher schlechte Karten.
Das war mir schon klar. Bascom wird aber wohl deswegen gerne von Anfängern benutzt, weil man das eben grade nicht tun muß,
Dann wird also der I2C-Chip vor dem LCD initialisiert, so wie es sein sollte.
Ich habe das jetzt hin un her (mit den einzelnen Wiki Erlärungen) durchgearbeitet. Wie ich jetzt ein Protokoll, zu einem mir noch unbekannten Bus aufbauen kann, ist mir immer noch ein Rätsel. Das eine ist das Bussystem, das mehrere Leitungen verwaltet. Und dann noch, wer ist der Master und wer Slave?
Natürlich, Du kanst den Taster ja lang oder kurz betätigen - einfach-/doppel-/dreifachklicken oder sowas. Daß die Bedienung einfach sein soll, hast Du ja nicht gefordert...
Am sinnigsten wäre bei dem Ziel, erstmal einfach im Sekundentakt ... ähm ... die Sekunden seit dem Start ausgeben zu lassen.
Das ist eine gute Lösung. Aber kannst du mir erklären, wie das im Code geschrieben wird, dass der Taster kurz oder lang gedrückt ist. Wie wird das vom µC erkannt und ausgewertet.
Den Sekundentakt, so wie du mir es Anfang beigebracht hast? Wenn ja, ist das ja ein sehr vielseitig Anwendbarer Code und kann diesen als Grundgerüst für jegliche Anwendungen, die mit Sekundentakt arbeiten, festlegen.
Du musst dir kein Protokoll ausdenken, I2C ist quasi schon das Protokoll.
Vorsicht!!!
Bisher schaust Du ja immer nur einmal auf den Taster, also ob er high oder low ist. Wenn Du eine lange Beätigung erkennen willst, mußt Du halt oft schauen, und nur wenn der Taster bei zwanzigmal(*) schauen jedesmal low war, reagieren.
Auf der Suche, wie man das im Code schreibt, bin ich auf etwas gestoßen, was mich stutzig macht.
'Debouncetimer
'V1.0.0
'22.09.2012
'BASCOM 2.0.7.5
'---------
'-
'---------
'Tasterentprellung mit Debounce-Befehl und Zeitauswertung
'Bei Erkennung eines Tastendruckes wird 5ms gewartet, bleibt der Taster gedrückt
'wird D0_active angesprungen. Dort wird ein Flag gesetzt und wieder zur Hauptschleife
'zurückgekehrt. Der Timer0 erzeugt ca. alle 10ms einen Interrupt; wenn das Flag
'gesetzt ist wird die Variable Count hochgezählt. Wird der Taster losgelassen
'und Count hat den Wert 51 noch nicht erreicht, wird ein kurzer Tastendruck gezählt.
'Erreicht Count den Wert 51 wird ein langer Tastendruck gezählt.
'Kurzer Tastendruck: <500ms
'Langer Tastendruck: 510ms
'---------
$regfile = "m32def.dat"
$crystal = 1000000
$hwstack = 32
$swstack = 8
$framesize = 32
'KONFIGURATION PORTS
Config Pind.0 = Input
Portd.0 = 1
'KONFIGURATION TIMER0 (10ms)
Config Timer0 = Timer , Prescale = 64
On Timer0 Isr_timer0
Timer0 = 100
Enable Timer0
Start Timer0
'KONFIGURATION DEBOUNCE
Config Debounce = 5 '5ms Auswertedauer des Tasters
'VARIABLEN
Dim Flag As Bit
Dim Count As Byte
Dim Pressed_short As Byte 'Zähler für kurze Tastendrücke
Dim Pressed_long As Byte 'Zähler für lange Tastendrücke
Enable Interrupts
'### HAUPTSCHLEIFE ###
Do
Debounce Pind.0 , 0 , D0_active , Sub
If Flag = 1 Then
If Pind.0 = 1 And Count < 50 Then 'Auswertung des kurzen Tastendrucks
Pressed_short = Pressed_short + 1 'Zählen des kurzen Tastendrucks
Flag = 0
Count = 0
End If
If Count > 50 Then 'Auswertung des langen Tastendrucks
Pressed_long = Pressed_long + 1 'Zählen des langen Tastendrucks
Flag = 0
Count = 0
End If
End If
Loop
'### ISR ###
Isr_timer0:
Timer0 = 100
If Flag = 1 Then Count = Count + 1
Return
'### SUB ###
D0_active:
Set Flag
Return
End