Taster-Spannung auslesen mit RN-Control und BASIC

[Torrentula]

Gut gut!

und.. zusammengefasst in einen Code sähe das dann wie aus?

Zum Vorwiderstand:

welchen vorwiderstand müsste ich verwenden?

[Kampi]

Vorwiderstand bei 5V ist bei einer roten LED 330 Ohm.
LED verträgt 15mA also
R=U/I
R=5V/15x10^-3A
R=333
Als Widerstand nimmst du dann einen 330er.

Der Code ist dann auch recht einfach.
$regfile ="m32def.dat"
$Crystal= 16000000

Config PortD.1 = Output
Config PinD.0 = Input

Do
If PinD.0 = 1 then PortD.1 = 1 else PortD.1 = 0
Waitms 1000
Loop

End

So der Code dürfte eigentlich funktionieren (bin auf der Arbeit und kann es nicht testen ).
Denke die Zeilen dürften sich von selbst erklären, falls nicht einfach sagen.

[Torrentula]

Mit

Dim Portc.1 = Output    'Ich möchte die auf die LEDs auf dem Board benutzen
Dim PinD.0 = Input

Sagt BASCOM: "AS exspected [PORTC.1]" und "AS exspected [PIND.0]"

Müsste anstatt "Dim" nicht "Config" stehen?

Torrentula

[Kampi]

Ahhhh sorry......ja hast recht muss Config sein

[Torrentula]

Jo, funzt! Danke an alle die mir geholfen haben!

Gruß

Torrentula