Taster mit LED Anzeige

Hier wollen wir jetzt
einmal eine LED aufleuchten lassen , sobald der Taster1
gedrückt wurde.
An Pin B.0 sitzt also unsere LED und an Pin B.1 unser Taster1.
Unser Code
würde dann wie folgt aussehen :
$regfile
= "m8def.dat"
$crystal
= 8000000
$hwstack
= 32
$swstack
= 32
$framesize
= 32
config
Portb.0 = output
LED
alias Portb.0
config Portb.1 = input
Taster1 alias pinb.1
do
If Taster1 = 1 then
LED = 1
else
LED = 0
endif
loop
end
Am Anfang
wie gehabt unser "Kopf".
Danach konfigurieren wir den Portb.0 als Ausgang und den Portb.1 als
Eingang.
Auch hier nutzen wir wieder die ALIAS - Funktion um mit sinnigen Namen
arbeiten zu können.
Wichtig !
Wenn es sich um Ausgänge handelt , wird immer mit PORT
gearbeitet.
Wenn es sich allerdings um einen Eingang handelt , den man abfragen
möchte , wird dies nicht mit
PORT sondern ganz wichtig mit PIN gemacht !
Der eigentliche Code selber ist wieder ganz einfach.
Wir erstellen uns eine Endlosschleife.
In dieser Endlosschleife ist eine IF-Abfrage.
Und zwar :
Ist der Taster gedrückt ( =1 ) dann schalte die LED an.
Ansonsten wenn der Taster nicht gedrückt ist ( else )
dann schalte LED aus.