K8055 Analog EIngang - Digital Ausgang

OP #3183964
Lesenswert?
• ▲
▼
Hallo, ich habe  bis jetzt hier viel gelesen, kommen aber bei dem 
problem nicht mehr weiter. Ich bin gerade dabei meine staal. gepr. 
Techniker zu machen und noch im ersten Halbjahr. Wir sollen mit der 
Vellemann K8055 zwei Eingänge auslesen und min. zwei Ausgänge ansteuern. 
Die Programmierung machen wir mit Delphi. Mein Projekt sind zwei 
Lichtschranken die als Eingang dienen als Ausgang hängen zwei LED und 
ein Piepser dran. Die Lichtempfindliche Diode hängt am Analogeingang und 
dessen Wert kann ich mit einer Progressbar auslesen...
Soweit genug geschrieben, jetzt zu meiner Frage.

Wie sage ich dem Digitalen Ausgang das er schalten soll wenn die 
Lichtschranke das Signal gibt?

Wen ich das durch habe bin ich endlich fertig und kann mich an die 
Dokumentation und Präsentation machen.

Vielen Dank


 Andreas
Gast #3184397
Lesenswert?
• ▲
▼
andreas l. schrieb:
> Wen ich das durch habe bin ich endlich fertig und kann mich an die
> Dokumentation und Präsentation machen.
Scheint mir recht substanzlos wenn du nichtmal einen Ausgang schalten 
kannst...

if(analoger_Wert>Trigger)
  ausgang=1
else
  ausgang=0
end if

Geht das über eine DLL? Dann les die Doku dazu. Oder ein Delphibuch, je 
nachdem.
OP #3184468
Lesenswert?
• ▲
▼
Hallo,

ich hatte zuvor keine Ahnung von Delphi. Bin ja froh das ich das mit dem 
auslesen hin bekommen habe... Das läuft über die K8055.DLL ich denke das 
ich etwas mit dem if else machen muss bekomme das aber nicht ganz so 
hin.

Lese den Analog in mit einem timer aus

Procedure Form.timer3timer(Sender: tobjec)
Var ldr1, ldr2 : integer
Beginn
Readallanalog(ldr1,ldr2)
Progressbar1.Position := ldr1;
Progressbar2.Position :=ldr2;

End;
Gast #3184689
Lesenswert?
• ▲
▼
andreas l. schrieb:
> Hallo liebe Mitglieder,
>
> ich dachte man könnte sich hier fragen stellen und sich gegen seit
> helfen, aber scheinbar ist das nicht so.

Loeti kannst du ignorieren, der wartet nur drauf gesperrt zu werden.

Zum Thema: Pseudocode steht oben, nach Delphi musst du selbst 
übersetzen.

Antwort schreiben

Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt. Bitte hier nur auf die ursprüngliche Frage antworten, für neue Fragen einen neuen Beitrag erstellen.

Formatierung
  • [c]C-Code[/c]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] – Link zu einem Artikel
  • Verweis auf einen anderen Beitrag: Rechtsklick auf dessen Beitrags-ID (#8078628), „Adresse kopieren“, in den Text einfügen

Mehr zur Formatierung

Längeren Sourcecode als Anhang, nicht in den Text. JPG nur für Fotos und Scans; Zeichnungen und Screenshots als PNG oder GIF. Siehe Bildformate.

Schon registriert? Anmelden

Wird nicht angezeigt. Wir schicken dir einen Link; sobald du damit bestätigst, erscheint dein Beitrag.

Mit dem Abschicken legst du einen kostenlosen Account an und erkennst die Nutzungsbedingungen und die Datenschutzerklärung an.