Relais mit Taster schalten

[hellraider]

Config Portc.0 = Output
Relaisvor Alias Portc.0

Config Pind.1 = Input
Tasterd1 Alias Pind.1
Portd.1 = 1

Do
If Tasterd1 = 0 Then
Relaisvor = 1

Else
Relaisvor = 0

End If
Waitms 100

Loop


Bitte helft mir Dennis

Wow,
das sind ja gigantische Vorschläge.

Also ich würde vorschlagen :

Config Portc.0=Output
Config portd.1=Input

main:
do
if pind.1=1 then
goto schalten
waitms 100 "Tastenentprellung auf einfache Art"
end if
loop

schalten:
toogle Portc.0
goto main

Gruß