Produkte: Entwickeln Sie Ihre eigene Software

Die Temptrax Geräte können frei programmiert werden, was besonders wichtig ist, wenn Sie anwendereigene Software verwenden. Schliessen Sie einfach das TemptraxGerät an sdie serielle Schnittstelle Ihres Computers an und lesen Sie Daten mit Ihrer eigenen Software aus. Hierfür haben Sie die Auswahl an verschiedenen Programmiersprachen, wie zum Beispiel Visual Basic, C++, Pearl oder Excel. Sobald das Temptrax-Gerät am seriellen Port Ihres PCs angeschlossen ist (und Sie natürlich Zugang zu diesem Anschluss haben), können Sie Temperaturen auslesen.

Um Temperaturen aus dem Temptrax Gerät F auszulesen benutzen Sie die folgenden Einstellungen für die RS232 serielle Schnittstelle:

  • 9600 Baud
  • No Parity
  • 8 Data Bits
  • 1 Stop Bit
  • No Flow Control
  • DTR On (Logic "1" or high)

Nachdem Sie den Comport und DTR auf ’High’ gesetzt haben, können Sie ein beliebiges Zeichen and den seriellen Port Ihres Computers senden. Dies veranlasst das Temptrax Gerät eine Messung vorzunehmen und eine Zeichenfolge zurückzusenden, die zum Beispiel so aussehen kann:

25.9
11.2
Bat Ok

Die erste Zeile ist die gemessene Temperatur in Celcius (oder wahlweise in Fahrenheit) vom ersten Messfühler, die 2. Zeile die vom zweiten Messfühler etc. Und die letzte Zeile gibt Auskunft über den Stand der Batterie.

Nur vier serielle Ports werden von der Temptrax F Produktfamilie verwendet: Transmit, Receive, DTR und Ground.

Falls Sie weitere Informationen benötigen oder Fragen haben, schicken Sie uns einfach eine Email an die folgende Adresse support@openxtra.co.uk.

Visual Basic (Version 6.0) Beispiel Code:

Verwenden Sie die folgende VB Routine, um die Temperaturdaten Ihres Temptrax Gerätes auszulesen.

’NAME: GetData()
’ZWECK: Sendet ein Zeichen an den Comport des Computers. Dieses veranlasst das Temptrax-Gerät eine Temperaturmessung vorzunehmen und das Ergebnis zurück an den Computer zu schicken.
’CommCtrlG ist der Standard MSComm Kontroller integriert in Visual Basic.

Private Function GetData() As String
   Dim str As String

   CommCtrlG.DTREnable = True      ’DTR Signal versorgt das TempTrax Gerät mit Energie

   Rest (0.5)      ’Benutzerdefinierte Funktion um 0,5 Sekunden Wartezeit auszulösen

   CommCtrlG.Output = " "      ’Sendet ein Zeichen an den Comport (serieller Anschluss), um Temperaturdaten zu erhalten

   Rest (1)      ’1 Sekunde Wartezeit bevor der Return-String abgefragt wird

   str = CommCtrlG.Input      ’str enthält nun die Temperaturdaten

   If (Not Len(str) > 10) Then
      GetData = ""
   Else
      GetData = str
   End If

   CommCtrlG.DTREnable = False
End Function

Perl Beispielkode:

Dieses Perl Script kann verwendet werden, um Temperaturdaten aus dem Temptrax Gerät auszulesen (auch als zip Datei erhältlich).

#!/usr/bin/perl -w

# Requires Device-Serial per module.
use Device::SerialPort 0.05;
use strict;

my $Temptrax = "/dev/ttyS1";
my $pass;
my $return;

# Constructor & Basic Values

my $ob = Device::SerialPort->new ($Temptrax) || die "Can’t open $Temptrax:$!";

$ob->baudrate (9600) || die "fail setting baudrate";
$ob->parity ("none") || die "fail setting parity";
$ob->databits (8) || die "fail setting databits";
$ob->stopbits (1) || die "fail setting stopbits";
$ob->handshake ("none") || die "fail setting handshake";
$ob->dtr_active (1) || die "fail setting dtr_active";

$ob->write_settings || die "no settings";

sleep 1;

#send a dummy character to the TempTrax device to "wake it up"
#The temperature will be returned

$pass = $ob->write("a") or die ("Could not write to Temptrax: $!");

sleep 1;

if (($return = $ob->input) ne "")
{
   $ob->write ($return);
   print "$return";
}
else
{
   print "ERROR!! Did not receive a temperature reading from TempTrax.\n";
}

undef $ob