Ultraschallsensor

SRF06 Ansicht fertig bestückte Platine (Bild robot-electronics.co.uk)

Analog

Bei SRF06 - 4-20mA Current Loop Ultrasonic Range Finder Dieser stellt je nach Messweite einen Ausgangsstrom von 4-20mA bereit. Mittels A/D Wandler (1wire, zb. DS2438) kann das Signal bequem eingelesen werden. Deutsche Distributoren sind zb:

http://www.exp-tech.de/Sensoren/SRF06-4-20mA-Current-Loop-Ultrasonic-Ranger-Finder.html

http://de.manu-systems.com/SRF06.shtml

http://www.lipoly.de/index.php?main_page=product_info&cPath=880_2631_2632&products_id=161191

http://nodna.de/Devantech-SRF06-Current-Loop-Ultraschall-Sensor

nach folgendem Plan wird der Sensor an einen A/D Wandler angeschlossen, das originale Manual ist hier nachzulesen.

Digital

Bei [1] über Ethersex/ECMD] zur Ansteuerung eines Magnetventils der Nachspeisung schalten. Damit soll ein Trockenlaufen der Pumpe vermieden werden und auch in Trockenzeiten Wasser über die Brauchwasserleitung zur Verfügung stehen.

Das Protokoll ist ziemlich einfach (5 Ziffern im Abstand von ca. 100 ms senden und die Ausgabe des Sensors seriell einlesen), sodass eine Verarbeitung mit Fhem, Nagios/Icinga oder Cacti jederzeit möglich ist.

Durch den (Mindest-)Abstand von 100 ms zwischen den Zeichen verbietet sich der Einsatz von ECMD, da dieses Modul die Zeichen immer mit der vollen Baudrate sendet und bisher kein "Pausenzeichen" (delay) dort möglich ist.

Deshalb habe ich ein kleines (aber nicht sehr elegantes) Pearl-Skript für die serielle Schnittstelle geschrieben, welches momentan zwar im Verzeichnis /usr/share/fhem/FHEM/ liegt, aber noch nicht in FHEM eingebunden ist. Ich verwende dieses aber bereits für das Statusdisplay.

#!/usr/bin/perl
#
#  Ultrasonic sensor value retrieval using Mini3-Sensor from icplan.de 
#  Copyright (C) 2011 Jens Wagner
#  
#  This program is free software: you can redistribute it and/or modify
#  it under the terms of the GNU General Public License as published by
#  the Free Software Foundation, either version 3 of the License, or
#  (at your option) any later version.
#
#  This program is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
#  GNU General Public License for more details.
#
#  You should have received a copy of the GNU General Public License
#  along with this program. If not, see <[http://www.gnu.org/licenses/ http://www.gnu.org/licenses/]>.
#
#
use strict;
use Device::SerialPort; 
#
my $seriel = Device::SerialPort->new('/dev/ttyS1') || die "Kann /dev/ttyS1 nicht öffnen! ($!)\n";
#
$seriel->baudrate(9600);
$seriel->parity("none");
$seriel->databits(8);
$seriel->stopbits(1);
#
print "Entfernung Sensor 1: ";
#
$seriel->write('1');
select(undef, undef, undef, 0.2);
$seriel->write('2');
select(undef, undef, undef, 0.2);
$seriel->write('0');
select(undef, undef, undef, 0.2);
$seriel->write('0');
select(undef, undef, undef, 0.2);
$seriel->write('0');
#
#
$|=1;
my $exit=0;
while($exit < 2000)
{
my ($cin, $sin) = $seriel->read(1);
if($cin)
{
 print $sin;
 $exit=0;
}
else
{$exit++}
}
print "\n";
#
exit(0);

Verwendet man an Stelle der Zeichenfolge '1 2 0 0 0' die Zeichenfolge '1 1 0 0 0' bekommt man die Temperatur des Sensors angezeigt.

Das Skript muss zwingend verbessert werden, da derzeit nur der Abstand in cm zum Wasserspiegel ausgegeben wird und nicht das enthaltene Volumen. Hierzu braucht man entweder (da meist liegende Zylinder oder Kugeln zum Einsatz kommen) etwas Mathematik oder man nutzt eine Tabelle in Form einer CSV-Datei. Ich habe bereits letzteres in Vorbereitung aber noch nicht in das Skript eingebaut.