
|
INFO - FAQ - CC2-Forum - CCPro-Forum |
|
||
|
Tach Max... Neu hier ? Das Proble ist, das sich hier niemand so richtig mit absoluten Anfängerfragen abgeben mag. Aber wie soll man da nicht gleich den Mut verlieren ? Hier dein Code (in Basic++). Ansonsten: In Basic einarbeiten - Hilfen und Links gibt es hier genug, die Programme, die bei der Unit mitgeliefert werden oder hier zum Download stehen ausprobieren und analysieren. Hab ich auch so gemacht... define KEYCODE as byte define ADC8 as ad[8] define Relais1 port[5] define Relais2 port[6] Relais1 = OFF Relais2 = OFF LCD.init #main KEYCODE=255 if ADC8<10 then GOTO EXIT KEYCODE=1 if abs(33-ADC8)<5 then GOTO EXIT KEYCODE=2 if abs(50-ADC8)<5 then GOTO EXIT KEYCODE=4 if abs(82-ADC8)<5 then GOTO EXIT KEYCODE=5 if abs(98-ADC8)<5 then GOTO EXIT KEYCODE=255 #EXIT if KEYCODE = 1 then Relais1 = ON if KEYCODE = 2 then Relais1= OFF if KEYCODE = 4 then Relais2 = ON if KEYCODE = 5 then Relais2= OFF lcd.pos 1,1 if Relais1 = ON then lcd.print "Relais1 ist AN " else LCD.Print "Relais1 ist AUS" end if lcd.pos 2,1 if Relais2 = ON then lcd.print "Relais2 ist AN " else LCD.Print "Relais2 ist AUS" end if goto main Reinhard |
| Antwort schreiben |