was mach ich nur falsch

[Kozmo]

hallo miteinander, kenn mich leider mit der materie noch nicht so gut aus, versuche eine led per schalter einfach ein und auszuschalten, soweit funktioniert es auch, aber wenn ich mit dem finger über die pins fahre, also nicht mal berühre, dann leuchtet die led, schalter ist auf GND geschaltet, hier noch das prog.

$regfile = "m128def.dat"
$crystal = 16000000
$baud = 19200

Config Pind.0 = Output
Config Pina.0 = Input
Pina.0 = 1

Taste Alias Pina.0
Led Alias Portd.0


Do
If Taste = 0 Then
Led = 0 : Print "LED an"
Waitms 200
Else
Led = 1
End If
Loop
End

[MeckPommER]

Hallo,

wenn du den Pull-Up einschalten willst (und das musst du ja, da du den Taster gegen GND beschaltet hast), musst du nach "config pina.0 = input" auch "Porta.0 = 1" schreiben.
Und wenn dein Ausgang auf Portd.0 ist, dann muss es "config portd.0 = output" lauten.

Gruß MeckPommER

[Andree-HB]

Pina.0 = 1

...einfach umändern auf "PortA.0=1"...ansonsten hast Du schon Alles richtig gemacht !

[Kozmo]

danke euch leute, genau das wars