
function latlongdms(data)
{
  var f = document.LatLongDMS;
  var distance12 = 0;
  var point1 = "";
  var point2 = "";
  var lad1 = 0;
  var lad2 = 0;
  var lam1 = 0;
  var lam2 = 0;
  var las1 = 0;
  var las2 = 0;
  var lod1 = 0;
  var lod2 = 0;
  var lom1 = 0;
  var lom2 = 0;
  var los1 = 0;
  var los2 = 0; 

  if (data=="noexample")
  {
    point1 = f.point1.value;
    point2 = f.point2.value;
    lad1 = Input(f.lad1.value);
    lad2 = Input(f.lad2.value);
    lam1 = Input(f.lam1.value);
    lam2 = Input(f.lam2.value);
    las1 = Input(f.las1.value);
    las2 = Input(f.las2.value);
    lod1 = Input(f.lod1.value);
    lod2 = Input(f.lod2.value);
    lom1 = Input(f.lom1.value);
    lom2 = Input(f.lom2.value);
    los1 = Input(f.los1.value);
    los2 = Input(f.los2.value);
    
  }
  if (data=="example")
  {
    point1 = "point 1";
    point2 = "point 2";
    lad1 = 30;
    lad2 = 31;
    lod1 = 86;
    lod2 = 86;
  }

  if (data=="example"  ||  data=="restore" )
  {
    f.point1.value = point1;
    f.point2.value = point2;
    f.lad1.value = lad1;
    f.lad2.value = lad2;
    f.lod1.value = lod1;
    f.lod2.value = lod2;
    f.lam1.value = lam1;
    f.lam2.value = lam2;
    f.lom1.value = lom1;
    f.lom2.value = lom2;
    f.las1.value = las1;
    f.las2.value = las2;
    f.los1.value = los1;
    f.los2.value = los2;
    f.unit1.selectedIndex = 3;
  }


  if (data=="clear") {clearAll(f); return;}


  //get unit selections
  var unitout = f.unit1.options[f.unit1.selectedIndex].value

  ucf = 1.;
  //convert units
  if (unitout=="kilometers") ucf = 1.;
  if (unitout=="miles") ucf = 1000./5280./0.3048;
  if (unitout=="nautical miles") ucf = 1000./6076.1/0.3048;
  if (unitout=="meters") ucf = 1000.;
  if (unitout=="feet") ucf = 1000./0.3048;

  //calculate distance between the two points
  p1=new point(new dms(lad1,lam1,las1),new dms(lod1,lom1,los1));
  p2=new point(new dms(lad2,lam2,las2),new dms(lod2,lom2,los2));
  distance12 = distance(p1,p2) * ucf;
 

  f.distance12.value=Num2String(distance12,6,-15,15,-5,5); 


}
<!-- end ll-dms_1.js -->