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 

 Doppelklick Auswertung - Micro - CCBASIC Kategorie: Programmierung Basic (von Roland - 25.07.2005 11:31)
Roland nutzt:  Micro
Hallo CControl Freunde !  (Entwicklungsumgebung IDE 2.0 - CCBAS)

Da die Micro ja bekanntlich nicht sehr viele Ports zur Verfügung hat, wollte ich gerne dieses Problem Softwaretechnisch lösen, um Eingänge zu sparen

Jetzt meine Frage:
Ist es möglich mit einem Taster welcher z.b. an Port[3] angeschlossen ist per Doppelklick eine andere Funktion zu Programmieren.
Im unteren Beispiel sollte wenn Led1 leuchtet nach "Doppelklick" von Taster2  Led1 sofort ausschalten.

Ich hoffe Ihr könnt mir dabei helfen !!   (Bitte bedenkt, alle anderen Ports sind schon belegt)
Wenn mir jemand mit einem Quellcode oder Lösungsvorschläge unter die Arme greifen möchte - dem wäre ich sehr dankbar !!

Danke im Voraus  m.f.g. Stotz Roland

Hier ein kleiner Ausschnitt meines Programms.     PWM - Regelung

define  taster1     port[3]   'Pullupwiderstand - 5V      
define  taster2     port[4]   'Pullupwiderstand - 5V    
define  led1         port[1]        
define  led2         port[2]    
define  led5         port[5]    
define  led6         port[6]
 
define  b              byte  
define  c              byte  
define  Var1        byte

b = 10
c = 160                      

#prog1_loop
  if not taster1 then b = b + 1 else b = b
  if not taster2 then b = b - 1 else b = b
  if not taster1 then c = c - 1 else c = c
  if not taster2 then c = c + 1 else c = c
  if  b < 10 then b = 10 : if c > 160 then c = 160
  if b = 10 then goto prog1_aus
  if b = 160 then goto prog1_ein
  led1 = 1
    for var1 = 10 to b step 1
    next
  led1 = 0
    for var1 = 10 to c step 1
    next
  goto prog1_loop

#prog1_aus
  led1 = off
  if not taster1 then goto prog1_loop
  goto prog1_aus

#prog1_ein
  led1 = on
  if not taster2 then goto prog1_loop
  goto prog1_ein




 Antwort schreiben

Bisherige Antworten:

Re: Doppelklick und klick Micro - CCBASIC (von Christoph berninger - 25.07.2005 22:58)
Re: lang kurz Auswertung - Micro - CCBASIC (von Christoph berninger - 25.07.2005 22:48)
Re: Doppelklick Auswertung - Micro - CCBASIC (von ManfredW - 25.07.2005 15:21)
    Re: Doppelklick Auswertung - Micro - CCBASIC (von Stefan Süßmann - 26.07.2005 8:32)