Source: site.view [edit]
Function name: distance
Arguments: fromAddr,toAddr
Description: Calculates the distance in miles fromAddr toAddr
Page type: webl
Render function:   distanceRender
Module: global

Page source:

var fromA = WubCall("global.parseAddress", [fromAddr]);
var toA = WubCall("global.parseAddress", [toAddr]);

if (Objectp(fromA) and Objectp(toA)) then
   var P = GetURL(`http://www.mapquest.com/directions/main.adp`,
   [. "go"="1", "do"="nw", "rmm"="1","un"="m", "cl"="EN", "ct"="NA", "rsres"="1",
     "1a"=fromA["address"], "1c"=fromA["city"], "1s"=fromA["state"], "1z"=fromA["zip"], 
     "2a"=toA["address"], "2c"=toA["city"], "2s"=toA["state"], "2z"=toA["zip"]
    .]);

     var Q = Pat(P, `(\d+.\d+) miles`);
     Markup(P);   
     // Q[0][1]
else
   "Error: argument(s) not parsed as addresses"
end;