Bascom Debounce ISR in Assembler - Versionsgeschichte

-tomas- am 23. Dezember 2008 um 19:00 Uhr

2008-12-23T19:00:14Z

-tomas-: /* Warum eine ISR in Assembler programmieren? */

2008-09-03T23:25:24Z

‎Warum eine ISR in Assembler programmieren?

-tomas-: /* Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung */

2008-09-03T23:24:10Z

‎Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung

-tomas-: /* Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung */

2008-09-03T23:20:57Z

‎Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung

-tomas-: /* Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung */

2008-09-03T23:09:35Z

‎Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung

-tomas-: /* Beispiel 1: Entprellung einer 3 Tasten Uhr in Bascom */

2008-09-03T23:04:56Z

‎Beispiel 1: Entprellung einer 3 Tasten Uhr in Bascom

-tomas- am 3. September 2008 um 23:00 Uhr

2008-09-03T23:00:31Z

-tomas- am 3. September 2008 um 22:49 Uhr

2008-09-03T22:49:54Z

-tomas-: /* Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung */

2008-09-03T22:35:33Z

‎Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung

-tomas-: /* Beispiel 1: Entprellung einer 3 Tasten Uhr in Bascom */

2008-09-03T22:24:39Z

‎Beispiel 1: Entprellung einer 3 Tasten Uhr in Bascom

@@ Zeile 526: / Zeile 526: @@
   * [http://www.mikrocontroller.net/articles/AVR-Tutorial:_Tasten]  - AVR-Tutorial: Tasten
   * [http://www.mikrocontroller.net/articles/Entprellung] - Entprellung
-  * [http://www.mikrocontroller.net/topic/6492] - Tasten entprellen - Bulletproof|
+  * [http://www.mikrocontroller.net/topic/6492] - Tasten entprellen - Bulletproof

@@ Zeile 485: / Zeile 485: @@
   POP     R24              Pop register from stack
-  OUT     0x3F,SREG         Out to I/O location
+  OUT     SREG,R24         Out to I/O location
   POP     R31              Pop register from stack

@@ Zeile 148: / Zeile 148: @@
 * wird eine Taste gedrückt, friert der AVR nicht ein
 * Debounce besitzt jetzt ein '''Autorepeat''', d.h. langes drücken einer Taste bewirkt nach ca. 1sec eine Impulsfolge von 8Hz (beliebig einstellbar)
-* kein zusätzlicher Timer erforderlich - das Unterprogramm Debounce wird an einem vorhandenen Timer rangehangen
+* kein zusätzlicher Timer erforderlich - das Unterprogramm Debounce_port wird '''an einem vorhandenen Timer rangehangen'''
-* Bis zu 8 Tasten können gleichzeitig (parallel) abgearbeitet werden.  Diese müssen aber am gleichen Port hängen. Falls das nicht möglich ist, muss das UP Debounce_port geringfügig erweitert werden, so dass am Anfang bis zu 8 Pins gesammelt und in einem Register zusammengeführt werden.
+* Bis zu '''8 Tasten können gleichzeitig (parallel) abgearbeitet''' werden.  Diese müssen aber am gleichen Port hängen. Falls das nicht möglich ist, muss das UP Debounce_port geringfügig erweitert werden, so dass am Anfang bis zu 8 Pins gesammelt und in einem Register zusammengeführt werden.
 Die Entprellzeit beträgt übrigens im Beispiel wie bei Bascom ca. 30ms.

@@ Zeile 347: / Zeile 347: @@
 '            Key_rep      Wiederholungszähler für Autorepeat
 '            Key_ct0 / Key_ct1  2-Bit-Zähler für Entprellung
-'Result:     Key_press:   wechselt zu 1 bei Erkennung einer gedrückten Taste
+'Result:     Key_press:   Bit des Pins wechselt zu 1 bei Erkennung einer gedrückten Taste
 '                         Status von Key_press in Main nach Auslesen zurücksetzen!
 'Thanks to Peter Dannegger

@@ Zeile 145: / Zeile 145: @@
 Der Code beseitigt die Schwächen des Bascom Befehls DEBOUNCE:
-* der AVR liegt '''zu 99,9% der Zeit Powersave-Modus''' (nur wenige µA Stromverbrauch)
+* der AVR verbringt über '''99,9% der Zeit im Powersave-Modus''' (nur wenige µA Stromverbrauch)
 * wird eine Taste gedrückt, friert der AVR nicht ein
 * Debounce besitzt jetzt ein '''Autorepeat''', d.h. langes drücken einer Taste bewirkt nach ca. 1sec eine Impulsfolge von 8Hz (beliebig einstellbar)
 * kein zusätzlicher Timer erforderlich - das Unterprogramm Debounce wird an einem vorhandenen Timer rangehangen
 Die Entprellzeit beträgt übrigens im Beispiel wie bei Bascom ca. 30ms.

@@ Zeile 47: / Zeile 47: @@
 '********* input key and debounce ***************************************************
-'Zuordnung der Tasten zu den Pins - diese müssen alle am selben Port hängen!
+'Zuordnung der Tasten zu den Pins
 Const Key_plus = &B0000_1000                                '1=BUTTON_INPUT
 Const Key_minus = &B0001_0000

@@ Zeile 16: / Zeile 16: @@
 == Beispiel 1: Entprellung einer 3 Tasten Uhr in Bascom ==
-Der nachfolgende Code verwendet noch kein Assembler und dient als Vorlage.
+Der nachfolgende Code verwendet noch kein Assembler und dient als Vorlage für Beispiel 2.
 <pre>
 $regfile = "m8def.dat"
@@ Zeile 121: / Zeile 125: @@
 Data " " , "Sec " , "Min " , "Hour" , "Day " , "Mon " , "Year"
 </pre>
-Der Code wurde bereits auf Länge optimiert (im Rahmen einer geboteten Übersichtlichkeit des Quelltextes).
+Der Code wurde bereits etwas auf Länge optimiert (im Rahmen einer geboteten Übersichtlichkeit des Quelltextes).
 Getestet mit Bascom Version BASCOM 1.11.9.1 [Codelänge 1376 Byte]
@@ Zeile 446: / Zeile 450: @@
 Stehen nach einem Interrupt größere Sachen an (Print, LCD etc), dann setzt man in der ISR nur ein Flag und bearbeitet das Problem in der Main. Im Beispiel 2 wurde das Flag flagRTC_Changed gesetzt, um jede Sekunde das LCD zu aktualisieren. In der Variablen Key_press wird nach jedem Interrupt-Ereignis (Aufwachen aus Powersave) nachgesehen, ob eine neue Taste erkannt wurde.
-Wird in Bascom eine ISR ohne dem Zusatz NOSAVE programmiert, sichert fast Bascom alle Register auf den Stack. Das kostet Zeit und führt zu Stacküberläufen, wenn man den Stackbereich nicht deutlich anhebt. Hier ein Bascom-Code Schnipsel einer solchen ISR.
+Wird in Bascom eine ISR ohne dem Zusatz NOSAVE programmiert, sichert Bascom fast alle Register auf den Stack. Das kostet Zeit und führt zu Stacküberläufen, wenn man den Stackbereich nicht deutlich anhebt. Hier ein Bascom-Code Schnipsel einer solchen ISR.
 <pre>
   PUSH    R0               Push register on stack

@@ Zeile 439: / Zeile 439: @@
   andi    r16,128-1                                   'if _tick128 is not an 128 multiple
 </pre>
 ==Siehe auch==

@@ Zeile 16: / Zeile 16: @@
 == Beispiel 1: Entprellung einer 3 Tasten Uhr in Bascom ==
-Der nachfolgende Code verwendet kein Assembler. Es wurde zur Entprellung der Tasten der Bascom Befehl DEBONCE verwendet.
+Der nachfolgende Code verwendet noch kein Assembler und dient als Vorlage.
 <pre>
 $regfile = "m8def.dat"
@@ Zeile 123: / Zeile 125: @@
 Trotzdem besitzt das Beispiel einige Schwächen:
-* Debounce muss ständig gepollt werden, d.h. der AVR ist zu 100% beschäftigt
+* der Befehl DEBONCE muss ständig gepollt werden, d.h. '''der AVR ist zu 100% beschäftigt (Batteriebetrieb!''')
-* wird eine Taste gedrückt, friert der AVR für 30ms ein (andere Unterprogramme können inn der Zeit nicht angesprungen werden)
+* wird eine Taste gedrückt, '''friert der AVR für 30ms ein''' (andere Unterprogramme können in der Zeit nicht angesprungen werden)
-* Debounce besitzt kein Autorepeat, d.h. langes drücken einer Taste bewirkt keine Impulse
+* der Bascom Befehl Debounce kann '''kein Autorepeat''', d.h. langes Drücken einer Taste bewirkt keine zusätzlichen Impulse
-−
 == Beispiel 2: Entprellung einer 3 Tasten Uhr in einer Bascom-ISR mit Assembler-Unterstützung ==