Hi,

ich hab hier mit einem Teil meines Progs Probleme... der Rest funktioniert ja einwandfrei. Ich will ausserhalb des AVR´s mit einem Temperaturfühler als Spannungsteiler einen Temperaturschalter bauen. Dazu habe ich die Spannung an ADC2 des AVR´s gegeben. Hier ein kleiner Ausschnitt aus dem Code:


Code:
Config Adc = Free , Prescaler = Auto
Start Adc
Dim Temp As Word

Do
Temp = Getadc(2)                                            

Temp = Temp * 5000                                          
Temp = Temp / 1024                                          

If Temp < 2.5 And Pina.4 = 0 Then                          '
 Portc.0 = 1                                                
 Else
 Portc.0 = 0
 End If

Loop
An Pina.4 gebe ich von aussen ein Signal ein, ob die Heizung überhaupt betrieben werden soll. Wo ist mein Fehler?