Hallo,
sorry das ich jetzt erst Antworte.
Also die Ü Eier Variante habe ich jetzt mangels geeigneter Materialien aufgegeben.
Ich habe hier im Forum einen Elektor Artikel gefunden, welcher nach der Variante wie sie Tido geschrieben hat, funktionier.
Kurzfassung:
---------------
Es wird eine Umlenkrolle mit Schwimmer und Gegengewicht an dem Brunnen Rand angebracht. An die Welle der Rolle kommt ein 10Gang Wendelpoti dann kann man den Strom messen und die Höhe umrechnen.
Problem bei der Sache ist das bei einer Umlenkrolle mit 50cm Durchmesser und bei den 10 Umdrehungen des Potis nur 157cm höhe überwunden werden können.
Also muss eine andere Lösung her.
Ich habe nun meinen Versuchsaufbau wie folgt gemacht:
ich habe eine Umlenkrolle mit Umfang 22 cm genommen und dort zwei Magnete versetzt angebracht.
An die Halterung der Rolle habe ich nun 2 Reed Kontakte angebracht.
Dadurch das die Magnete versetzt an der Rolle sind kann ich die Richtung der Rolle erkennen und kann praktisch unbegrenzt viele Umdrehungen registrieren.
Ich habe das ganze mit meiner alten C-Control Micro getestet und funktioniert wunderbar.
Ich kann nun die Brunnentiefe in 22cm Schritten registrieren.
Ein kleines Problem gibt es aber noch, die Reed Kontakte schalten beim vorbeifahren der Magnete manchmal 2 mal und damit kommt die MicroControl durcheinander. Wenn ich den Durchmesser des Magnetpoles verkleinere geht es besser.
Ich werde das ganze jetzt nochmal mit Lichtschranke oder LDR testen, damit sollte es Störunanfälliger sein.
Ich mache am WE mal eine Zeichnung und stell sie hier ein.
Hier das Programm der C-Control:
Damit man nicht immer PC angeschaltet haben muss, gibt es noch eine Ampel, welche bei zu geringen Wassestand Rot leuchtet.Code:define drehl port[5] 'erster ReedKontakt define drehr port[6] 'zweiter Reedkontakt define rot port[4] 'LED ROT define gruen port[2] 'LED Gruen define x byte 'Variable für die höhenwerte baud 9600: pause 20 x=0 'Variable auf Null setzen #start put x 'Wert senden if drehl = on then goto linksw 'ersten Reed abfragen if drehr = on then goto rechtsw 'zweiten Reed abfragen if x < 23 then goto rot 'Ampel ROT schalten bei zu geringen Stand if x >= 23 then goto gruen 'Ampel Gruen schalten bei guten Stand goto start #linksw if drehl = off then goto links 'warten Kontakt aus put x 'daten senden goto linksw #links if drehr = on then goto plus if drehl = on then goto start put x goto links #rechtsw if drehr = off then goto rechts put x goto rechtsw #rechts if drehl = on then goto minus if drehr = on then goto startre put x goto rechts #startre if drehr = off then goto start put x goto startre #startli if drehl = off then goto start put x goto startli #plus put x if drehr = off then x = x+1 else goto plus put x goto start #minus put x if drehl = off then x = x - 1 else goto minus put x goto start #gruen rot = off gruen = on goto start #rot rot = on gruen = off goto start
Die gesendeten Daten werden dann mit einen Visual Basic Programm am PC ausgewertet.
Bei Interessse kann ich den Quellcode auch Posten.
MFG
Ronny







Zitieren

Lesezeichen