Control4 KMtronic Web Temperature Monitor

Driver features

    Support for up to 4 DS18B20 sensors.
    Connection to the free Yatun software thermostat driver.
    Integration of the temperature measure as a Control4 variable.

Driver Manual:

http://c4.soft.kiwi/documents/Manual_KMtronic_Temperature_v1.0.pdf

More information:

http://c4.soft.kiwi/kmtronic.html

For complicated or long wire lines (100-200 meters), if it is necessary,
there are two variants for compensation as shown on the figure below:

First one:
To connect parallel resistor 4.7k between +5V and 1W pin of 3pin plug-in (variant 1 of the scheme).

Second one:
To make RC filter like it's shown at variant 2 of the scheme.
You can try with 470pf and 62 or 100 Ohms resistor.

You can try variant 1 first, if there's no success - variant 2.
You can combine variant 1 and 2 but connect parallel resistor before RC filter.

More information

www.maximintegrated.com/en/app-notes/index.mvp/id/148

 Control4 KMtronic WEB Relay Driver

Driver features

    Relay integration as connections.
    Support for multiple relay boards connected to the same C4 control unit.
    Trigger and toggle functions.

Driver Manual:

    http://c4.soft.kiwi/documents/Manual_KMtronic_Realys_v1.0.pdf

More information:

    http://c4.soft.kiwi/kmtronic_relay.html

Default:
IP address: 192.168.1.199
Subnet Mask: 255.255.255.0
Default Gateway: 192.168.1.1
Username: admin
Password: admin

Reset to Default Settings:
Hold Reset button for 10 seconds

Manufacturer:
KMTronic LTD

Model:
--------

Features:
• Measures Temperatures from -55°C to +125°C (-67°F to +257°F)
• Support up to 4 DS18B20 temperature sensors

Specifications:
DS18B20
http://www.maximintegrated.com/sensors-and-sensor-interface/DS18B20.html

Supply:
Requires external 12 volt DC / 600mA power supply

 Software examples:

http://www.info.kmtronic.com/temperature.html

This opto/galvanic isolated auto transmit converter, features bi-directional serial conversion from USB to RS485 in 2 wire half duplex mode using Virtual Serial COM Port.

The USB-RS485 is a complete, self powered, USB to RS485 Interface working at any baud rate up to 250k baud. It features automatic bus turn-around - any time your not transmitting the module is listening.

Uses the SN75176 tranceiver, so you can have up to 32 devices on the bus.

Manufacturer:
KMtronic LTD

Features:
- Self-powered from USB
- POWER, TX and RX LED indicators
- Automatic Bus Turnaround

USB to serial interface:
FTDI FT232RL Chip
www.ftdichip.com/Products/ICs/FT232R.htm

Power:
Fully powered from USB

Operation Range:
0°C to +80°C

Dimensions:
97 x 54 x 25 mm

Complete includes:
- One USB to RS485 module

RS485 Information:
TX−/RX− or D− as an alternative for A (low for MARK i.e. idle)
TX+/RX+ or D+ as an alternative for B (high for MARK i.e. idle)

Drivers are available to work with the following operating systems:
Windows ALL SYSTEMS,
Linux,
Mac OS X, Mac OS 9, Mac OS 8,
Windows CE.NET (Version 4.2 and greater)
Raspberry PI
Arduino ADK

The drivers listed above are all available to download for free from the FTDI website. Various 3rd Party Drivers are also available for various other operating systems - see the FTDI website for details.

Private Sub CommandButton1_Click()
Dim strTargetFile As String
Dim wb As Workbook

     Application.ScreenUpdating = False
     Application.DisplayAlerts = False
     strTargetFile = Cells(2, 1)
     Set wb = Workbooks.OpenXML(Filename:=strTargetFile, LoadOption:=xlXmlLoadImportToList)
     Application.DisplayAlerts = True

     wb.Sheets(1).UsedRange.Copy ThisWorkbook.Sheets("Sheet1").Range("A5")
     wb.Close False
     Application.ScreenUpdating = True
     
End Sub

www.KMtronic.com/Software/Temperature/KMtronic-LAN-Temperature-Excel-Example-01.zip

Private Sub CommandButton1_Click()
Dim strTargetFile As String
Dim wb As Workbook

     Application.ScreenUpdating = False
     Application.DisplayAlerts = False
     strTargetFile = "http://192.168.1.199/status.xml"
     Set wb = Workbooks.OpenXML(Filename:=strTargetFile, LoadOption:=xlXmlLoadImportToList)
     Application.DisplayAlerts = True

     wb.Sheets(1).UsedRange.Copy ThisWorkbook.Sheets("Sheet1").Range("A5")
     wb.Close False
     Application.ScreenUpdating = True
     
End Sub

All temperatures

PHP code

 <?php
        // Loading the XML file
        $xml = simplexml_load_file("http://88.87.29.196:8002/status.xml");
        echo "<h1>";
        foreach($xml->children() as $sensor)
        {
            echo $sensor->name." <br />";
            echo "Temperature : ".$sensor->temp." <br />";
            echo "<hr/>";
        }
        echo "</h1>";
    ?>

One temperature

PHP code

 <?php
        // Loading the XML file
        $xml = simplexml_load_file("http://88.87.29.196:8002/status.xml");

        echo "<h1>";

        foreach($xml->children() as $sensor)
        {
            if ($sensor->name == "Office inside" )
            {
                echo $sensor->name." <br />";
                echo $sensor->temp." <br />";
            }
        }

        echo "</h1>";

?>