Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren INFO - FAQ - CC2-Forum - CCPro-Forum

Re: Programmierhilfe Kategorie: Programmierung CC-Plus (von Max - 28.04.2005 16:55)

Als Antwort auf Re: Programmierhilfe von ReinhardB - 28.04.2005 10:53

Max nutzt:  CC1-M-Unit V1.2/2.0

vielen Dank Reinhard, ich werds testen. Ãœbrigens schön von Ihnen, dass Sie sich mit  absoluten Anfängerfragen beschäftigen wollen. > 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

Bisherige Antworten: