Hallo zusammen,
ich möchte auf der unteren zeile eines lcd den minimalwert eines AD-Konverter ausgeben. auf der oberen, den aktuellen wert.
Die auskommentierten Teile des Programms (Max.Wertspeicherung)
funktionieren.
Die Minimalwertspeicherung jedoch nicht.. Kann mir jemand einen
Tip geben wo der Fehler liegt??

------------------------------------------------------------------------------
Dim W As Word
Dim Maxi As Word
Dim Mini As Word
Config Adc = Single , Prescaler = Auto , Reference = Avcc

Start Adc

Do

W = Getadc(0)

'If W > Maxi Then
'Maxi = W
'End If

If W < Mini Then
Mini = W
End If

Waitms 300
Cls

Lcd W

'Lowerline
'Lcd Maxi

Lowerline
Lcd Mini

Loop
End
Return
-----------------------------------------------------------

Es wird nur eine "0" unten dargestellt und oben der aktuelle Wert..

Grüße
Leandro