var frappr_url = frappr_host+"?a=mapwidget";

addToUrl('req','map');
if (typeof frappr_mapwidth == "undefined") var frappr_mapwidth = 300;
if (typeof frappr_mapheight == "undefined") var frappr_mapheight = 300;
if (typeof frappr_mapzoom == "undefined") var frappr_mapzoom = 7;
if (typeof frappr_maplat == "undefined") var frappr_maplat = 43;
if (typeof frappr_maplon == "undefined") var frappr_maplon = -97;
frappr_mapwidth = frappr_range_check(frappr_mapwidth,50,2000,300);
frappr_mapheight = frappr_range_check(frappr_mapheight,50,2000,300);
frappr_mapzoom = frappr_range_check(frappr_mapzoom,1,15,7);
frappr_maplat = frappr_range_check(frappr_maplat,-90,90,43);
frappr_maplon = frappr_range_check(frappr_maplon,-180,180,-97);

function frappr_range_check(v,min,max,defaultval) {
	if (isNaN(v)) { v = defaultval}
	else if (v > max) {v = max}
	else if (v < min) {v = min}
	return v;
}

addToUrl('width',frappr_mapwidth);
addToUrl('height',frappr_mapheight);
addToUrl('zoom',frappr_mapzoom);
addToUrl('lat',frappr_maplat);
addToUrl('lon',frappr_maplon);
if (typeof gid != "undefined") addToUrl('gid',gid);
if (typeof gname != "undefined") addToUrl('gname',gname);
if (typeof frappr_zipcode != "undefined") addToUrl('zipcode',frappr_zipcode);
if (typeof frappr_discovery != "undefined") addToUrl('discovery',1);

function quoted(str) {
  return (str != null) ? '"' + str + '"' : '""';
}

function addToUrl(name,val) {
  frappr_url+=("&"+name+"="+val);
}

document.write('<ifr' + 'ame' +
                 ' id="frappr_mapwidget_frame"' +
                 ' height=' + quoted(frappr_mapheight) +
		 ' width=' + quoted(frappr_mapwidth) +
                 ' frameborder="0"' +
                 ' src=' + quoted(frappr_url) +
                 ' marginwidth="0"' +
                 ' marginheight="0"' +
                 ' vspace="0"' +
                 ' hspace="0"' +
                 ' allowtransparency="true"' +
                 ' scrolling="no"></iframe>');
