Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Taste abfragen Kategorie: C-Control I Micro (von Max Frisch - 20.02.2006 7:09)
Max Frisch nutzt:  Micro
Hallo,
ich habe eine Frage zu meinem "Prog".
Es soll mit jedem Druck  die Variable "a " um 1 erhöht werden und entsprechend in den "Subs" angezeigt werden.Obwohl ich die Taste ordentlich abfrage und auch mit einem C (10NF) abblocke, muß ich öfter drücken damit es weitersetzt. Das ist auch in einem Terminalproramm sichtbar. Was habe ich falsch gemacht.
Ich danke Euch für Eure Hilfe
Max.
define Taste port[3]
define Led1 port [1]
define Led2 port [2]
define Led3 port [4]
define Led4 port [5]
define Led5 port [6]
define A Byte[1]
define TXD port[1]
BAUD 9600
a = 0
Led1=off:Led2=off:Led3=off:Led4=off:Led5=off

#start
if Taste = off then gosub loop1
#WAIT_Taste_losgelassen
if TASTE=off then goto wait_Taste_losgelassen
goto start

#loop1
a = a + 1
print a
if a = 1 then gosub Anzeige1
if a = 2 then gosub Anzeige2
if a = 3 then gosub Anzeige3
if a = 4 then gosub Anzeige4
if a = 5 then gosub Anzeige5
if a = 6 then gosub Reset
return

#Anzeige1
led1=on
return

#Anzeige2
led2=on
return

#Anzeige3
led3=on
return

#Anzeige4
led4=on
return

#Anzeige5
led5=on
return

#Reset
A = 0
Led1=off:Led2=off:Led3=off:Led4=off:Led5=off
return

 Antwort schreiben

Bisherige Antworten:

Re: Taste abfragen (von Max Frisch - 28.02.2006 19:52)
    Re: Taste abfragen (von Jens - 1.03.2006 16:49)
        Re: Taste abfragen (von Max Frisch - 1.03.2006 19:46)
Re: Taste abfragen (von Achim - 21.02.2006 3:37)
Re: Taste abfragen (von Jens - 20.02.2006 11:03)
Re: Taste abfragen (von Stefan Süßmann - 20.02.2006 8:48)