G6KIZ Watson W-8681 W8681 Wireless Weather Station

G6KIZ Weather Station

G6KIZ Weather station
I am currently using a Watson W-8681 (reviewed in the equipment section of DigitalHam) to feed UIVIEW. I have replaced my old Kedit/Rexx script with a Python script to create the UIView data file - EasyWeather to UIView script

My original intention was build a page to display the history on this site and the code shown further down the page was a first draft which simply produced a table. Graphs and long term history were to follow but after I found the excellent DB0ANF weather page I decided to simply use that in the short term.

UIweather - a UIview add on produces some nice graphs for local use and also provides the facility to upload the image shown below using FTP for use on the web.

UIweather generated charts from the G6KIZ weather station

This snippet of PHP scripting shows how I transferred the data using FTP and produced the table for the first cut of this page. I use FTP to retrieve the UIweather picture from home.

echo "Last 4 hours data 
 This data is produced by the script I use to send data to UIVIEW. As my beacon interval
 is 30 minutes the most recent data can be up to 30 minutes old. 
<center>
 <table width=\"85%\" cellpadding=2 border=1>
 <tr>
 <td width \"18%\">Timestamp</td>
 <td width \"13%\">Temp</td>
 <td width \"13%\">Pressure</td>
 <td width \"17%\">Wind</td>
 <td width \"13%\">Gusting</td>
 <td width \"13%\">Humidity</td>
 <td width \"13%\">Rainfall hour/24hrs</td>
 </tr>";

$fname = tempnam("foo","bar") or die ("tempnam failed");
 $file = @fopen("$fname","w+") or die ("can't open temp");

$conn = ftp_connect("<home ftp server>") or die("ftp_connect failed");
 ftp_login ($conn,"<user>","<password>") or die("ftp_login error");
 ftp_chdir ($conn,"PUBLIC") or die("ftp_chdir PUBLIC failed");
 ftp_chdir ($conn,"weather") or die("ftp_chdir weatherdata failed");
 ftp_fget ($conn,$file,"latest.dat",FTP_ASCII) or die("ftp_fget failed");
 ftp_close ($conn);

$fd = fopen("$fname","r");

$i = 0;
 while (!feof($fd))
  {
   $data_line[$i] = fgets($fd,1024);
   $i++;
  }
 $i--;

while ($i > 0)
  {
   $i--;
   $data = explode(",",$data_line[$i]);
   $date_time = trim($data[2]);
   $date_time = explode(" ",$date_time);
     $today = date("D j M");
     $the_time = trim($date_time[1]);
     $humidity   = trim($data[6]);
     $humidity   = $humidity."%";
     $temp       = trim($data[7]);
     $temp       = $temp."°C";
     $pressure   = trim($data[11]);
     $pressure   = $pressure."hpa";
     $wind_speed = trim($data[12]);
     $wind_speed = $wind_speed * 2.2369;
     $wind_speed = sprintf("%.1f",$wind_speed)."mph";
     $gust       = trim($data[14]);
     $gust = $gust * 2.2369;
     $gust = sprintf("%.1f",$gust)."mph";
     $wind_dir   = trim($data[16]);
     $wind_deg   = $wind_dir * 22.5;
     $wind_deg   = round($wind_deg,0)."°";
     if ($wind_dir == "0")  $wind_dir = "N";
     if ($wind_dir == "1")  $wind_dir = "NNE";
     if ($wind_dir == "2")  $wind_dir = "NE";
     if ($wind_dir == "3")  $wind_dir = "ENE";
     if ($wind_dir == "4")  $wind_dir = "E";
     if ($wind_dir == "5")  $wind_dir = "ESE";
     if ($wind_dir == "6")  $wind_dir = "SE";
     if ($wind_dir == "7")  $wind_dir = "SSE";
     if ($wind_dir == "8")  $wind_dir = "S";
     if ($wind_dir == "9")  $wind_dir = "SSW";
     if ($wind_dir == "10") $wind_dir = "SW";
     if ($wind_dir == "11") $wind_dir = "WSW";
     if ($wind_dir == "12") $wind_dir = "W";
     if ($wind_dir == "13") $wind_dir = "WNW";
     if ($wind_dir == "14") $wind_dir = "NW";
     if ($wind_dir == "15") $wind_dir = "NNW";

$rain_h = trim($data[21]);
     $rain_h = $rain_h * 0.03937;
     $rain_h = sprintf("%.2f",$rain_h);
     $rain_d = trim($data[22]);
     $rain_d = $rain_d * 0.03937;
     $rain_d = sprintf("%.2f",$rain_d);

echo "<tr><td>$today $the_time</td>\n";
 echo "<td>$temp</td>\n";
 echo "<td>$pressure</td>\n";
 echo "<td>$wind_speed $wind_deg $wind_dir</td>\n";
 echo "<td>$gust</td>\n";
 echo "<td>$humidity</td>\n";
 echo "<td>$rain_h\" $rain_d\"</td>\n";
 }
 fclose($fd);
 unlink($fname);