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 

 My programm didn't works Kategorie: Programmierung Basic (von Hans - 28.10.2006 23:28)
Hans nutzt:  CC1-M-Unit V1.2/2.0
Hallo

I want to store 16 equation ( ON(1) or OFF(0) ) in 1 WORD
So that I can read it out later.
This program works as the equation is correct.
But if this is wrong than it does not work as it should be
Who has the sollution for this problem?


'poort
DEFINE ADin            AD[1]
DEFINE PoortA         PORT[1]
DEFINE poortB         PORT[2]
DEFINE poortC         PORT[3]
DEFINE poortD         PORT[4]

'VAR
DEFINE Ieen           BIT[1]
DEFINE Itwee         BIT[2]
DEFINE Idrie          BIT[3]
DEFINE Ivier          BIT[4]
DEFINE I              BYTE[1]
DEFINE Var1        WORD[2]
DEFINE Temp       WORD[3]

#Ingangen
 Temp=&B00000001
 FOR I=0 to 15
 PortA=Ieen   'BCD code
 PortB=Itwee
 PortC=Idrie
 PortD=Ivier
 IF AdIn>140 THEN Var1=Var1 OR Temp ELSE Var1=Var1 NOR Temp
 Temp=Temp SHL 1
NEXT


Hans

 Antwort schreiben

Bisherige Antworten:

Re: My programm didn't works (von Achim - 29.10.2006 1:22)
    Re: My programm didn't works (von Hans - 29.10.2006 13:02)
        Re: My programm didn't works (von Achim - 29.10.2006 15:42)
            Re: My programm didn't works (von Hans - 29.10.2006 17:27)