source: weathercurve.appjet.net

App: weathercurve.appjet.net (by alanherod)

/* appjet:version 0.1 */

import("lib-xmldom");
import("lib-jquery");

page.head.write('<script src="http://www.cachefile.net/scripts/prototype/1.6.0.2/prototype.js"></script>');
page.head.write('<script src="http://maps.google.com/maps?file=api&v=2&key=ABQIAAAABhseQMO-uDS72b2wAN2_ExSbC0oDTiLoRq8aIlx-YBXM5Dte8BQSH55ZtgPBfuGJyysxcjObXQ5-EQ" type="text/javascript"></script>');

//print(BODY({onload:"load()", onunload:"GUnload()"},DIV({id:"map",style:"width: 500px; height: 300px"})));

if (request.method == "GET") {
    print(
        DIV({id:"page_intro"},P(SPAN({style:"font-size:18pt"},
        B("WeatherCurve!")),
        BR(SPAN({style:"font-size:8pt"},"Powered by ", link("http://www.weatherbug.com", "WeatherBug"))),
        BR(SPAN({style:"font-size:8pt"},"Submit your ", link("http://weathercurve.blogspot.com/2008/08/welcome-to-weathercurve.html", "comments"))))));

    print(DIV({id:"main"},
        DIV({id:"map_container"},DIV({id:"map",style:"width: 500px; height: 300px"})),
        DIV({id:"curve"}, "")),
        DIV({id:"mapcontrols"},
            "From:",INPUT({id:"startLoc",type:"text",name:"startLoc",value:"Atlanta,GA"}),
            " - To:",INPUT({id:"endLoc",type:"text",name:"endLoc",value:"Woodstock,GA"}),
            INPUT({id:"dirButton",type:"button",value:"Get Directions",onclick:"getDirections()"}),
            DIV({id:"statusBox"}, "Status: Waiting for user input.")
            )
        );

    print(DIV({id:"dir_steps"}, ""));
}
else {
    var stations = getWeather(eval("(" + request.params.latLons + ")"));
    page.setMode('plain');
    print(raw(stations));
}

function getWeather(geoPoints) {

  // Please be kind and register for your own Weather Bug user code.
  // They're free!
  // Thanks.
  // http://a3442904444.api.wxbug.net/getLiveCompactWeatherRSS.aspx?ACode=A3442904444&lat=33.75&long=-84.38
  var wbugUserCode = "A3442904444";
  var stations = new Array();

  for (var i = 0; i < geoPoints.length; i++) {
    params = {
      "ACode": wbugUserCode,
      "lat": geoPoints[i].lat ,
      "long": geoPoints[i].lon
    };
    g = wget("http://" + wbugUserCode + ".api.wxbug.net/getLiveCompactWeatherRSS.aspx", params);

    var feed = new XMLDoc(g);
    var stationNode = feed.selectNode("/channel/aws:weather/aws:station");

    stations[i] = {
      "lat": geoPoints[i].lat,
      "lng": geoPoints[i].lon,
      "city": stationNode.getAttribute("city"),
      "state": stationNode.getAttribute("state"),
      "zipcode": stationNode.getAttribute("zipcode"),
      "temperature": feed.selectNode("/channel/aws:weather/aws:temp").getText(),
      "wblink": feed.selectNode("/channel/aws:weather/aws:WebURL").getText(),
      "wbimage": feed.selectNode("/channel/aws:weather/aws:current-condition").getAttribute("icon")
    }
  }

  return stations;
};
/* appjet:css */
#main {
    height: 310px;
    width: 100%;
}

#map_container {
    float: left;
}

#mapcontrols {}

#status_box {}

#curve {
    float: right;
    padding: 50px;
}

#dir_steps {}

/* appjet:client */

function getDirectionsWithParams(startLoc, endLoc) {
//    alert('Directions from ' + startLoc + ' to ' + endLoc);
    map.clearOverlays();
    var gDir = new GDirections(map, document.getElementById('dir_steps'));
    GEvent.addListener(gDir, "addoverlay", function(){
//        alert("Everything should have been loaded by now!");
        var polyline = gDir.getPolyline();
        var dist = polyline.getLength();
//        alert("Polyline distance: " + dist);
        var interimPointCount = Math.min(Math.floor(dist / 100000), 8);

//        alert("Interim point count: " + interimPointCount);

        var points = new Array();

        var factor = Math.floor(dist / (interimPointCount + 1));
        for (var i = 0; i <= interimPointCount; i++) {
            points[i] = factor * i;
        }
        points[interimPointCount + 1] = dist;

//        alert("Total points: " + points.length);

        var pindex = 1;
        var pointCount = points.length;
        var vindex;
        var vertexCount = polyline.getVertexCount();
        var traversed = 0;
        var evalPoints = new Array();
        var latLons = new Array();
        // start city
        latLons.push(convertGeoPoint(polyline.getVertex(0)));

//        alert("Vertex count: " + vertexCount);
        for (vindex = 1; vindex < vertexCount - 1 && pindex < pointCount - 1; vindex++) {
//            alert("vindex:" + vindex + " pindex:" + pindex);
            var v1 = polyline.getVertex(vindex);
            var v2 = polyline.getVertex(vindex - 1);
            var legDist = v1.distanceFrom(v2);
            while (points[pindex] < traversed + legDist) {
                evalPoints.push(points[pindex]);
                pindex++;
//            alert("Yo! " + evalPoints.length + " " + pindex);
            }

            // convert point into a LatLon
            for (var i = 0; i < evalPoints.length; i++) {
                var factor = (evalPoints[i] - traversed) / legDist;
//                alert(v2.lng());
                var latlon = new GLatLng(v2.lat() + (v1.lat() - v2.lat()) * factor, v2.lng() + (v1.lng() - v2.lng()) * factor)
                latLons.push(convertGeoPoint(latlon));
                map.addOverlay(new GMarker(latlon));
//                alert(latLons.length);
            }
            evalPoints.length = 0;

            traversed += legDist;
        }

        // Ending city
        latLons.push(convertGeoPoint(polyline.getVertex(vertexCount - 1)));

//        alert("Number of lat_lons: " + latLons.length);
//        alert("latlons: " + Object.toJSON(latLons));
        var statusBox = $('statusBox');
        var parsedData = $('parsed_data');
        var curve = $('curve');
        statusBox.innerHTML = "Status: Querying for weather data.";
        curve.innerHTML = "<p>Collecting weather data for points along the route...</p>";

        new Ajax.Request('/',
        {
            method:'post',
            parameters: {"latLons":Object.toJSON(latLons)},
            onSuccess: function(transport) {
                var response = transport.responseText || "no response text";
//               alert("Success! \n\n" + response);
                statusBox.innerHTML = "Click on the red markers for current weather conditions.";
                //parsedData.innerHTML = parseCities(response);
                parseCities(response);
                curve.innerHTML = graphem(response);
            },
            onFailure: function() {
                alert('Something went wrong... Please try your request again.');
                statusBox.innerHTML = "The vast array of computing power is, sadly, asleep.";
            }
        });
     });
//     alert("Here we go!");
     gDir.load("from: " + startLoc + " to: " + endLoc);
     return false;
}

function convertGeoPoint(geoPoint) {
    return {lat:geoPoint.y, lon:geoPoint.x};
}

function parseCities(weatherData) {
    var resp = "";
    var weather = weatherData.evalJSON();
    for (var i=0; i < weather.length; i++) {
        resp += "<p>" + weather[i].city + ": " + weather[i].temperature + "</p>";
        map.addOverlay(populateMarker(weather[i]));
    }
    return resp;
}

function populateMarker(locwx) {
    var point = new GLatLng(locwx.lat, locwx.lng);
    var htmlString = "<table><tr><td>"
    htmlString += locwx.city + ", " + locwx.state + "<br />Temp: " + locwx.temperature;
    htmlString += "</td><td>";
    htmlString += "<a href=\"" + locwx.wblink + "\" target=\"_blank\"><img src=\"" + locwx.wbimage + "\"></a>";
    htmlString += "</td></tr></table>";
    var marker = new GMarker(point);
    GEvent.addListener(marker, "click", function() {
        marker.openInfoWindowHtml(htmlString);
    });

    return marker;
}

function graphem(weatherData) {
    var weather = weatherData.evalJSON();
    var lowerBound = parseInt(weather[0].temperature);
    var upperBound = lowerBound;
    for (var i=1; i < weather.length; i++) {
        var tempInt = parseInt(weather[i].temperature);
        if (tempInt < lowerBound) {
            lowerBound = tempInt;
        }
        if (tempInt > upperBound) {
            upperBound = tempInt;
        }
    }

    lowerBound = Math.floor((lowerBound - 1) / 5) * 5;
    upperBound = Math.ceil((upperBound + 1) / 5) * 5;

    var resp = simpleEncode(weather, lowerBound, upperBound);
    var imageSrc = "http://chart.apis.google.com/chart?cht=lc&chd=" + resp + "&chs=350x140&chtt=Temperature";
    imageSrc += "&chxt=x,y&chxl=0:|" + weather[0].city + "|" + weather[weather.length - 1].city + "|1:|" + lowerBound + "|" + upperBound;
    return "<img src=\"" + imageSrc + "\">";
}

var simpleEncoding = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789';

function simpleEncode(stationArray, minValue, maxValue) {
  var chartData = ['s:'];
  //alert(stationArray.length);
  //alert("Range: " + minValue + " to " + maxValue);
  for (var i = 0; i < stationArray.length; i++) {
    var currentValue = stationArray[i].temperature;
    if (!isNaN(currentValue)) {
      //alert(currentValue);
      chartData.push(simpleEncoding.charAt(Math.round((simpleEncoding.length-1) * (currentValue - minValue) / (maxValue - minValue))));
    }
    else {
      chartData.push('_');
    }
  }
  return chartData.join('');
}

function init() {
    startupKey = 'Wake up!';
//    alert('weathercurve is up and running: ' + startupKey);
//    alert('startup the mapping functionality');

    if (GBrowserIsCompatible()) {
        map = new GMap2(document.getElementById("map"));
//        map.setCenter(new GLatLng(33.75, -84.38), 7);
        map.setCenter(new GLatLng(37.0625, -95.677068), 3);
    }
}

function shutdown() {
//    alert('shutting down the mapping functionality');
    GUnload();
//    alert('Going away... un' + startupKey);
}

function getDirections() {
    var startLoc = $('startLoc');
//    alert(startLoc.value);
    var endLoc = $('endLoc');
    var dirSteps = $('dir_steps');
    dirSteps.innerHTML = "";
    getDirectionsWithParams(startLoc.value, endLoc.value);
    return false;
}

//var simpleEncoding = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789';
var map;
var startupKey;
//var statusBox = $('statusBox');

window.onload= init;
window.onunload = shutdown;