Hallo,
ich glaub, da brauchen wir mind. einen Ausschnitt aus deinem Programm, denn am AND alleine liegts wohl nicht.
Hallo Leutz,
ich möchte eine Warneinrichtung für Licht AN bei meinem Auto bauen.
Die elektronik steht und funktioniert richtig gut nur ein Problem mit dem Programm hab ich noch.
Und zwar will ich eine Logisch UND (in Bascom ja AND) Verknüpfung machen Aber wenn ich dan einen der Eingänge schalte, summt mein summer los. Obwohl er erst summen soll wenn beide belegt sind.
Für die Hilfe danke ich schonmal im vorraus.
Mirko
Hallo,
ich glaub, da brauchen wir mind. einen Ausschnitt aus deinem Programm, denn am AND alleine liegts wohl nicht.
Kannst du den Code auch posten, den du dazu verwendest?
EDIT: mist, zu langsam
Das Programm is noch nich ganz fertig.
$regfile = "4433def.dat"
$crystal = 3686400
Config Portd.3 = Output 'Relaisausgang
Config Portd.4 = Output 'Signalgeber
Config Portc = Output 'LED Anzeige
Config Pind.6 = Input 'Türkontakt
Config Pind.7 = Input 'Lichtschalter
Config Pinb.0 = Input 'Fernbedienung
Portd.6 = 0
Portd.7 = 0
Portb.0 = 0
'Config Adc = Single , Prescaler = Auto , Reference = on
'Start Adc
Signal Alias Portd.4
Relais Alias Portd.3
Rot Alias Portc.4
Gruen Alias Portc.5
Gelb Alias Portc.3
'Dim A As Integer
Do
'A = Getadc(1)
if Pind.7 and Pind.6 then
set Signal
end IF
Loop
Werter Kollege, irgendwie fehlt da wasif Pind.7 and Pind.6 then..
wäre zum Beispiel möglichif Pind.7 = 1 and Pind.6 = 1 then..
mfg robert
Wer glaubt zu wissen, muß wissen, er glaubt.
upps muss ich woll vergessen haben, verdammt weil ich zwei pc hab wo das porg drauf is...
es muss so heißen
if Pind.7 = 0 and Pind.6 = 0 then
mfg Mirko
Pullups nicht eingebaut/eingeschaltet und Brumm auf der Leitung?
Also ich hab alles noch einmal überprüft und ich bekomme super saubere Signale.
Wenn ich die Eingänge einzel abfrage funktioniert es aber sobald ich die AND funktion einbinde geht es nich mehr.
Woran kann es noch liegen... Oder gibt es eine zweite lösung ohne umzulöten.
if pind.7=0 then
if pind.6=0 then
set signal
end if
end if
so müßts auch gehen
Gruß Daniel
Lesezeichen