最寄検索・ルート検索＠十日町市庁舎

fullscreen

Tetsuro_Toyoda

最寄りの新潟県十日町市庁舎へのルート検索です。スマホで現在地情報をオンにして使ってください。

Rating

useful

Application

Play
JavaScript
CSS
HTML
ReadMe
Snapshots

// Created by Tetsuro Toyoda. Ver.2014.12.26.0

navigator.geolocation.getCurrentPosition(function(pos) {
    	var lat = pos.coords.latitude;
    	var long = pos.coords.longitude;
		if ( ruteToHitPoint != "" )
		{
			$('#result').empty();
			$('#result').append( list + "<hr><h4>現在地から目的地までのルートを表示します。</h4>");
			parent.location.href = ruteToHitPoint + "&saddr=" + lat + "," + long; // リダイレクト
		}
		else
		{
			$('#result').empty();
			$('#result').append( list + "<hr><h4>現在地から近い順にリスト表示します。</h4>");
    		$.each(prefs, function(i, p) {
      			p[3] = Distance(long, lat, p[2], p[1]);
    		});
    		prefs.sort(function(p1, p2) {
      			return p1[3] - p2[3];
    		});
	   		$.each(prefs, function(i, p) {
      			$('#result').append(p[0]);
     			$('#result').append(" <a target=\"_top\" href=\"http://www.google.com/maps/?saddr=" + lat + "," + long + "&daddr=" + p[1] + "," + p[2] + "\">【ここから目的地へのルートを表示】</a>");
      			$('#result').append("<br>ここから目的地までの直線距離は"+Math.floor(p[3])+"mです<br>");
			});
		}
	}, function(error) {
		$('#result').empty();
		$('#result').append( list + "<hr><h4>現在地情報が取得できないため、登録順にリスト表示します。</h4>");
	   	$.each(prefs, function(i, p) {
      		$('#result').append(p[0]);
		});
	});
};

// Get a parameter value in URL (e.g. ?paramString=value )
function getParameterFromURL( paramString )
{			
	var value = "";
	var topWindow = top.window.location.search;
	if( topWindow ){
		var q = decodeURIComponent(topWindow.substring(1,topWindow.length)).split("&");
		for ( var i = 0; i < q.length; i++ ){
			var r = q[i].split("=");
			if ( r[0] ==  paramString )
				value = r[1];
		}
	}
 	return value;
}

// Highlight keyword in the string
function highlight( string, keyword )
{
	if ( keyword.length > 0 ) {
		var ss = string.split(keyword);
		var len = ss.length;
		if ( len > 1 ) {
			string = ss[0];
			for ( i = 1; i < len; i++ )
//				string += "<font color=\"red\">"+keyword+"</font>"+ss[i];
				string += "<span class=\"highlight\">"+keyword+"</span>"+ss[i];
		}
	}
	return string;
}

// get the last name of the string separated with # and /
function getLastName( string )
{
	string = decodeURIComponent(string);
	var sharp = string.split("#");
	var slash = sharp[sharp.length-1].split("/");
	var lastName = slash[slash.length-1];
	return lastName;
}

// return a link to Google map search
function addLinkToMap( latitude, longitude )
{
	var s = "<br><a target=\"_top\" href=\"http://www.google.com/maps/?q=" + latitude + "," + longitude + "\">【地図表示】</a>";
	return s;
}

// shortening URL e.g. http://.../123.jpg
function shortenURL( url )
{
	url = decodeURIComponent(url);
	var slash = url.split("/");
	var lastName = slash[slash.length-1];
	return url.split(":")[0]+"://.../"+lastName;
}

function Distance( long1, lat1, long2, lat2 )
{
	var r = 6378137; //地球の半径(m)
	var d = r * Math.acos( Math.sin(lat1/180*Math.PI)*Math.sin(lat2/180*Math.PI) + Math.cos(lat1/180*Math.PI)*Math.cos(lat2/180*Math.PI)*Math.cos((long2-long1)/180*Math.PI) );
	return d;
}

Fork this app as your new one download

Web Search

Contributor Send Message	Tetsuro_Toyoda
Run count	164
Website
License
Fork count	0
Created date	Dec 26, 2014
Last update date	Dec 27, 2014

Input Data
Related Ideas

LinkData work list used as input data in this application.
You can change input data and execute application if you change the checkbox.

十日町市庁舎、出張所、支所 Contributor: 新潟県十日町市 Update: Feb 8, 2018
129 Downloads
,

1 Applications

cityoffice_facilities
Add New Data

News Feed

linkdata.org に関するツイート

Publish your application as JavaScript

that mashes up the Linked Open Data

Application Information

最寄検索・ルート検索＠十日町市庁舎

Application

News Feed