AVR - Port einlesen/ausgeben

[Neuling (Gast)]

Hi,

ich bin gerade dabei, mich ein bisschen in die AVR Architektur 
einzuarbeiten und möchte dazu mal mit einem einfachen Assembler Programm 
starten.
Folgendes hätte ich mir überlegt: Am Port PA hängen 4 LEDs (PA4 - PA7) 
und 4 Taster (PA0 - PA3). Wenn nun Taster 1 oder Taster 2 gedrückt wird, 
dann soll die an PA7 angeschlossene LED leuchten.

Mein Programm sieht folgendermaßen aus:

     
    .equ temp, 0x10 ;Register r16
     
    .section .text ;in den Flash Speicher
     
     
    jmp main
     
    upro:
    in temp, PINA ;lese von A
    andi temp, ((1<<0) | (1<<1)) ;maskiere A mit 0x03
    breq led_aus ;wenn Zero-Flag gesetzt (also UND Verknuepfung 0 ist)
    sbi PORTA, 7 ;aktiviere LED7
    jmp return
    led_aus: cbi PORTA, 7 ;deaktivere LED7
     
    return: ret
     
    main:
    ;###########Stack Pointer initialisieren#########
    ldi r16, lo8(RAMEND)
    out SPL, r16
    
    ldi temp, hi8(RAMEND)
    out SPH, temp
    ;################################################ 
 
    ;PA0 - PA3 als Input (=Taster) und PA4 - PA7 als Output (=LEDs)
    ldi temp, 0b11110000
    out DDRA, temp
     
    ;Pullup für PA0 - PA3 aktivieren
    ldi temp, 0b00001111
    out PORTA, temp
     
    loop:
    rcall upro
    jmp loop

Doch leider funktioniert mein Programm nicht. Egal ob ich Taster 1 oder 
Taster 2 drücke (oder nicht drücke), der Zustand der LED ändert sich 
nicht.
Ich würde mich freuen, wenn sich hier jemand die Mühe machen würde, 
einen Blick auf den Sourcecode zu werfen, um mich auf meine(n) Fehler 
aufmerksam zu machen.

Ich danke euch!

[holger (Gast)]

>einzuarbeiten und möchte dazu mal mit einem einfachen Assembler Programm
>starten.

Dann mach die LED einfach nur an und vergiss die Taster.

[Andreax (Gast)]

Vielleicht hast du eine Powerled benutzt. Das geht nicht. Der Avr kann 
nur 20 mA Strom liefern sonst geht was kaputt.

[Neuling (Gast)]

holger schrieb:
> Dann mach die LED einfach nur an und vergiss die Taster.

Damit hab ich gestartet. Als nächstes hab ich ein Lauflicht probiert. 
Das hat auch funktioniert. Nur hier haperts etwas mit der Umsetzung.

@Andreax: Das kann ich ausschließen. Wenn ich den kompletten Port als 
Ausgang konfiguriere und 0xFF rausschreibe, dann leuchten alle LEDs.

[MWS (Gast)]

Die Led leuchtet solange bis Du Taste 1 & 2 gleichzeitig drückst.

[Neuling (Gast)]

MWS schrieb:
> Die Led leuchtet solange bis Du Taste 1 & 2 gleichzeitig drückst.

Ach, stimmt an den Kopf klatsch. Ich glaub ich steh gerade etwas auf 
dem Schlauch: Aber wie kann man das denn eine Oder-Verknüpfung der 
Schalter realisieren? Also das die LED, wenn PA0, PA1 oder beide 
gedrueckt sind, leuchtet. In C wäre das ja ein Einzeiler, aber wie mach 
ich das in Assembler am elegantesten? Alle Lösungen, die mir einfallen, 
sind nicht gerade sehr elegant. Ich glaub ich denk einfach viel zu 
kompliziert..

[MWS (Gast)]

Nach dem Maskieren ein CPI, hier mit 3. Bei ungleich 3 wurde eine Taste 
gedrückt, somit kann alles andere bleiben wie's ist.

[Bernd S. (Firma: Anscheinend Corner-Cases ;-)) (bernd_stein)]

Neuling schrieb:
> ...
> Wenn nun Taster 1 oder Taster 2 gedrückt wird,
> dann soll die an PA7 angeschlossene LED leuchten.
>
>

>     in temp, PINA ;lese von A
>     andi temp, ((1<<0) | (1<<1)) ;maskiere A mit 0x03
>     breq led_aus ;wenn Zero-Flag gesetzt (also UND Verknuepfung 0 ist)
>     sbi PORTA, 7 ;aktiviere LED7
>     jmp return
>     led_aus: cbi PORTA, 7 ;deaktivere LED7
> 
>     return: ret
>

>
>
Nun, ein unbetätigter Taster erzeugt wegen dem Einschalten der 
internen Pullup Widerstände ein 1-Signal. Also High an dem jeweiligen 
Pin.

Wenn Du also nach dem Einlesen des Ports A ( in temp,PINA ) alle 
eingelesenen Bits invertierst ( com temp ) erhälst Du für jeden nicht 
betätigten Taster ein 0-Signal. Also Low.
Jetzt passt auch die Maskierung ( andi temp, 1<<0 | 1<<1 ), da ein 
betätigter Taster ein 0-Signal ergibt, aber durch die Invertierung 
durch den com-Befehl zu einer 1 gemacht wird.

Das war jetzt nur theoretisch durchdacht.
Spiel das ganze mal im Simulator durch oder lass das durch den
com-Befehl ergänzte Programm einfach mal laufen.

Bernd_Stein

[MWS (Gast)]

Bernd Stein schrieb:

> Jetzt passt auch die Maskierung ( andi temp, 1<<0 | 1<<1 ), da ein
> betätigter Taster ein 0-Signal ergibt, aber durch die Invertierung
> durch den com-Befehl zu einer 1 gemacht wird.

Die Maskierung passt unabhängig davon ob da nun etwas invertiert wird 
oder nicht und hat nichts mit dem Problem zu tun, da sie in jedem Fall 
notwendig ist um die Tastenpins herauszufiltern.

[Neuling (Gast)]

MWS schrieb:
> Nach dem Maskieren ein CPI, hier mit 3. Bei ungleich 3 wurde eine Taste
> gedrückt, somit kann alles andere bleiben wie's ist.

Danke, das hat hervorragend funktioniert!

[Bernd S. (Firma: Anscheinend Corner-Cases ;-)) (bernd_stein)]

Wozu dient das Konstrukt das mit WPx ( WRITE PINx REGISTER ) erzeugt 
wird ?


Bernd_Stein

[guess (Gast)]

Bernd S. schrieb:
> Wozu dient das Konstrukt das mit WPx ( WRITE PINx REGISTER ) erzeugt
> wird ?

Zum toggeln des I/O wenn das PIN Register mit 1 beschrieben wird.

[Bernd S. (Firma: Anscheinend Corner-Cases ;-)) (bernd_stein)]

guess schrieb:
> Zum toggeln des I/O wenn das PIN Register mit 1 beschrieben wird.
>
Danke, jetzt sehe ich es auch ganz klar und deutlich.


Bernd_Stein