So. Bei dem Code leuchtet die LED1 sobald du den Taster T1 drückst. Wenn du ihn wieder los lässt geht die LED aus.Code:$regfile = "m32def.dat" $crystal = 16000000 $baud = 9600 Dim W As Integer Config Portc.0 = Output Config Adc = Single , Prescaler = Auto , Reference = Internal Start Adc Portc.0 = 1 Do W = Getadc(7.) Print W If W = 340 Then Portc.0 = 0 Else Portc.0 = 1 Loop End
Den "Print" Befehl kannste rausmachen. Ich hab den nur benutzt um per TeraTerm den exakten ADC Wert für die If-Abfrage zu bekommen. So kannste dann auch die Werte der anderen Taster ermitteln wenn du sie brauchen solltest.
Einfach das Board per RS232 and en PC anschließen und TeraTerm anmachen und dann einen Taster drücken. Der Zahlenwert ist der Wert der Variable "W".
Lesezeichen