Digitaleingang auswerten funzt nicht ... Anfängerproblem RN

[Steffen44]

Ein Hallo an alle

ich habe versucht mal eine Abfrage vom Digitaleingang zu machen. Ich benutze das RN-Controll mit dem ATMega32.


Ich versteh´s einfach nicht warum funktioniert das nicht das Programm ist so klein und am Digitaleingang lege ich 5 Volt an und es zuckt sich nichts.

Hier ist mein Programm Code :

   ' ------------- Hier die üblichen RN-Control Anweisungen --------------
$regfile = "m32def.dat"
$crystal = 16000000                                         'Quarzfrequenz
$baud = 38400




Do


Config Pind.2 = Input

If Pind.2 = 1 Then
Print "Digitaleingang gesetzt"
Else
Print "Nicht gesetzt"
End If



Waitms 500

Loop

Vielen Dank schonmal vorab für eure Hilfe

[Steffen44]

oh ha ... problem gefunden wenn ich den Digitaleingang gegen Masse schalte dann erkennt er es.