Portb defekt?

[Tobias Schlegel (Gast)]

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

[MrNiemand (Gast)]

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

[NoName (Gast)]

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

[Tobias Schlegel (Gast)]

HI,

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

@NoName:
Das muss ich nachschlagen...

Danke, Tobi

[MrNiemand (Gast)]

'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!

[crazy horse (Gast)]

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

[Tobias Schlegel (Gast)]

Hi,

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

Danke, TObi

[MrNiemand (Gast)]

crazy horse@ ka = keine ahnung no=noch

:)