Computergestüzte Alarmanlage

[robinWie]

Hallo,
ich habe mal ein Tutorial für Überwachungsfreaks geschrieben :mrgreen: . Ist mein erstes. Darin wird erklärt wie eine ganz simple Schaltung mit dem RS232 Port verbindet und abfragt ob ein Kontakt besteht
Leider hat es nicht geklappt eine .zip und den Alarmton hochzuladen (TimeOut) :cry:

[s.h.a.r.k]

Hm...

Was wäre aber wenn der PC sich aufhängt??? :mrgreen:

PS: Hast Modem oder warum hast nen TimeOut???


mfg shark

[joachimd]

Zitat:

Zitat von robinWie

Darin wird erklärt wie eine ganz simple Schaltung mit dem RS232 Port verbindet und abfragt ob ein Kontakt besteht

RS232.pas kommt mir aber stark bekannt vor...Du solltest die soweit bereinigen, dass nicht so unsinnige Funktionen wie 'GetSissyLevel' drin sind. Die kennt eh keiner ohne weitere Erklärung...

[robinWie]

Zitat:

PS: Hast Modem oder warum hast nen TimeOut???

DSL 2000. Aber ich habe bei .zip Dateien fast immer ein Timeout.

Zitat:

Was wäre aber wenn der PC sich aufhängt???

In dem Tutorial ist ja nur eine art Grundgerüst. Man könnte es ja so machen, dass man in dem Timer noch eine Speicherfunktion einbaut aber das ist dir überlassen :wink:

Edit:

Zitat:

RS232.pas kommt mir aber stark bekannt vor...Du solltest die soweit bereinigen, dass nicht so unsinnige Funktionen wie 'GetSissyLevel' drin sind. Die kennt eh keiner ohne weitere Erklärung...

Es wäre ja möglich, dass die funktionen doch jemand kennt. Und ich hatte nicht vor die Funktionsbandbreite zu verkleinern. Und ich denke die paar Byte, die das Programm größer wird, machen den Braten auch nicht Fett :mrgreen:

[Evian]

Ich finde das Tut echt cool! Schlicht und einfach, aber macht Lust auf mehr.. werd mir nachher gleich mal nen wenig Klingeldrat kaufen!

[robinWie]

Es ist nur ein ziemliches gefummel den Klingeldraht an die Pins von der Schnittstelle zu Fummeln :x . Sonst kann man einfach einen Stecker von einer alten Maus nehmen :wink:

[Agent159]

Hey, ich habs ausprobiert und find es einfach super :-D

Mach mich gleich mal dran aus meiner Testkonstruktion eine Eltern-Warnungsanlage zu bauen:
Denn merk ich immer, wenn meine Eltern die Treppe hochkommen :mrgreen:

Beim ersten Testen ist mir aber ein Fehler aufgefallen:

Delphi-Quellcode:

if Alarmanlage.InitCom( 'COM1', CBR_9600, NOPARITY, ONESTOPBIT) then

Da fehlt ein Parameter :-(

Aber so muss es richtig sein:

Delphi-Quellcode:

if Alarmanlage.InitCom( 'COM1', CBR_9600, 8, NOPARITY, ONESTOPBIT) then

MfG euer Nico alias Agent159 :coder:

[any_key]

aHoyHoy
finds auch doll...^^
aber ich glaub beim zweiten button fehlt noch das der erste button wieder auf enabled true gesetzt wird
also einfach das noch dazu packen

Code:

button1.enabled := true;

ach ja und natürlich den zweiten button wieder deaktivieren...

hab noch was lustiges beobachtet
ich hab einfach mal ne led in die schaltung eingelötet
wenn der stromkreis geschlossen ist aber das programm nicht aktiviert ist leuchtet diese orange
wenn man dann die überwachung aktiviert leuchtet sie grün :shock:

[robinWie]

Zitat:

wenn der stromkreis geschlossen ist aber das programm nicht aktiviert ist leuchtet diese orange
wenn man dann die überwachung aktiviert leuchtet sie grün

Entweder hat du eine LED mit 2 Farben (was mir nicht vorstellen kann) oder du hast bei aktivierter Anlage andere Spannungswerte als bei Deaktivierter. Dann kann das schonmal passieren.

Zitat:

Da fehlt ein Parameter

:oops: Den habe ich ja ganz vergessen :oops:
Ich hoffe ihr verzeiht mir

[Agent159]

ja bei mir klappt es super xD
habs vor nen paar wochen gemacht und musst erstma den fehler finden, naja kP ^^

aber super idee und jetzt seh ich immer, wenns zuhause klingel :D


PS:War das ne fummelei, den draht an den pins festzubekommen ;D

[Aljoscha]

Ich schreib die Frage einfach mal kurz hier rein weil es ganz gut passt denke ich :)
Also über die Pins 7 und 8 kann ich abfragen ob eine Verbindung besteht.
Wie sind die einfachen Gegenstücke dazu, die ich mit ein paar Zeilen Code unter Spannung setzen kann.
Beispiel: Ich klicke auf den Button und eine LED fängt an zu leuchten.
Ich hoffe ihr versteht was ich meine, ich habe wirklich 30 min gesucht aber nichts brauchbares (simples) gefunden!

[robinWie]

So viel ich weiss geht das nicht. Aber RS232 ist auch nicht als Stromquelle gedacht :stupid:

Wenn du irgendwelche Sachen vom Computer aus steuern willst empfehle ich dir das hier
dafür gibt es sogar einen Thread im Forum ;)

[filip95]

Ziemlich alter Thread, ich weiss, aber ich krieg das Ding mit Delphi 2005 Personal einfach nicht kompiliert. Wäre nett, wenn jemand das kompilierte Prog hochladen oder mir per E-Mail an fbrozovic[at]gmail[dot]com schicken würde :) Danke.

EDIT: Ich hab nur noch folgendes, das ich kompilieren muss, alles andere (auch den deaktivieren-button) hab ich schon gemacht...:

http://www.filipbrozovic.com/images/delphi.jpg
Meine Ausgabe:
http://www.filipbrozovic.com/images/delphi.txt

Was mach ich bloss falsch?

edit2:

nevermind, habs nun geschafft, aber wenn ich die beiden pins verbinde, alarmanlage einschalte und dann die verbindung trenne, geht der alarm nicht an?!