www.mikrocontroller.net

Forum: Mikrocontroller und Digitale Elektronik Portb defekt?


Autor: Tobias Schlegel (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Hi,

Lang lang ist's her... .

3x IS471 Kollisionserkennung gebaut und am Robby montiert.
Die Digitalen Outputs sind über 1kohm An den 1. 3 Pins vom AVR
Gepinnt.

Da ich Portd schon als "OUTPUT" Definiert habe(BASCOM),
Habe ich Portb als "INPUT" Definiert (Config Portx = xxxput)
Den Portb liest bber nicht aus.
Ich habe das Beispiel aus "Programmieren der AVR RISC
Microcontroller mit BASCOM-AVR"
Das sieht dan so aus:

 If Portb.0 = 1 Then

'...

 End If

Was läuft falsch? Welchen Anfängerfehler habe ich gemacht?


Danke,

Tobi

Autor: MrNiemand (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
funzt die erkennung wenn du nur zwischen den input pins und gnd eine
verbindung herstellst?

Autor: NoName (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
ich kenne Bascom nicht, aber in Assembler mußt Du unterscheiden wenn Du
den Port einlesen willst. Dann ist es nicht PORTB sondern PINB!

Autor: Tobias Schlegel (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
HI,

@MrNiemand:
Die Taster auf dem STK500 stellen eine Verbindung zu GND her.
Trozdem keine reaktion.

@NoName:
Das muss ich nachschlagen...

Danke, Tobi

Autor: MrNiemand (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
'002.BAS:   Auf Tastendruck LED einschalten
'Hardware:  Taster an PD2, LED an PD3
'---------------------------------------------------
$Regfile = "2313def.dat"  'AT90S2313-Deklarationen
DDRD = &B0001000      'Pin PD3 Ausgang, Rest Eingang
'PORTD = &B0000100    'PullUp von Pin PD2 aktivieren

Do
  If PIND.2 = 0 Then  'Wenn Taster (Pin PD2) gedrückt
    PORTD.3 = 1       'Rote LED (Pin PD3) an
  Else                'Wenn Taster nicht gedrückt
    PORTD.3 = 0       'Rote LED aus
  End If
Loop
End


also so muss es glaub ich heißen ist ein beispielprog von der seite
2313 +bascom aber ka welche des no gleich ist!

Autor: crazy horse (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
"2313 +bascom aber ka welche des no gleich ist!"
Was heist das ohne Kryptografie?

Autor: Tobias Schlegel (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Hi,

Es lag tatsächlich an PROTB und PINB.
Es Funktioniert!!

Danke, TObi

Autor: MrNiemand (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
crazy horse@ ka = keine ahnung no=noch

:)

Antwort schreiben

Die Angabe einer E-Mail-Adresse ist freiwillig. Wenn Sie automatisch per E-Mail über Antworten auf Ihren Beitrag informiert werden möchten, melden Sie sich bitte an.

Wichtige Regeln - erst lesen, dann posten!

  • Groß- und Kleinschreibung verwenden
  • Längeren Sourcecode nicht im Text einfügen, sondern als Dateianhang

Formatierung (mehr Informationen...)

  • [c]C-Code[/c]
  • [avrasm]AVR-Assembler-Code[/avrasm]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] - Link zu Artikel
  • Verweis auf anderen Beitrag einfügen: Rechtsklick auf Beitragstitel,
    "Adresse kopieren", und in den Text einfügen




Bild automatisch verkleinern, falls nötig
Bitte das JPG-Format nur für Fotos und Scans verwenden!
Zeichnungen und Screenshots im PNG- oder
GIF-Format hochladen. Siehe Bildformate.
Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt.
Bitte hier nur auf die ursprüngliche Frage antworten,
für neue Fragen einen neuen Beitrag erstellen.

Mit dem Abschicken bestätigst du, die Nutzungsbedingungen anzuerkennen.