Wait 5 ist ganz schlecht. Das hält das Programm 5 Sekunden lang an.
Ich rufe in meinen Programmen im sectic solche Aufgaben. sectic wird bei Bascom sekündlich angesprungen, wenn in der config dcf77 oder config clock angegeben.
Code:
dim Lichtzeit as byte
Licht alias portb.5
.
.
.
do
if messung >300 then
lichtzeit=5
set licht
end if
loop
end
sectic:
if lichtzeit>0 then
decr lichtzeit
end if
if lichtzeit=0 then reset licht
return
...
Die Sekunden bekommst du weg, indem du hinter dem lcd date$ noch ein
einsetzt
Lesezeichen