2005ǯ07��14��

Movable Type�� ���֥ץ饰����

Google Maps�������Ͽ��б��ˤʤä���������ܺ١�
���䡼���������Ǥ���

�Ȥ����櫓�ǡ�Google Maps API�ʤɤΰ��־���ġ����Movable Type��Ĥʤ��ץ饰��������������ȥ꡼�˴ޤޤ����ٷ��٤��֤��ޤ���
��2005-07-15 01:00 ����ä��ѹ���
locations.pl
��¬�Ϸ��Ѵ���Nowral�����Υ����ɤ���Ѥ����Ƥ��������ޤ��������꤬�Ȥ��������ޤ�����

���󥹥ȡ��롧
locations.pl��plugins�ǥ��쥯�ȥ���֤�
Image::Info
HTML::Parser�˴ޤޤ��HTML::LinkExtor
��ɬ�ס�HTML::Parser��¿���Υ����Ф˺ǽ餫�饤�󥹥ȡ��뤵��Ƥ���褦������Image::Info���ʤ�������������

�б�������־���
������ȥ꡼��ʸ��img�����Ȥ��Ƶ��Ҥ��졢Ʊ�������Ф��֤���Ƥ��������Exif GPS����
������ȥ꡼��ʸ�˴ޤޤ���Ͽޥ����ӥ���URL ( walk.eznavi.jp / www.gpspowered.jp / mapfan.com / www.mapion.co.jp )

���������㡧

<MTEntries> <MTLocations> <$MTLocation coordinate="latitude" datum="1"$><br /> </MTLocations> </MTEntries>

�ѥ�᡼����

coordinate ���٤����٤��λ��ꡣ̵����ξ��ְ���,���١פȥ���ޤǶ��ڤä��֤� latitude ���� longitude ���� datum ¬�Ϸϡ�̵����ξ��WGS84 0 WGS84 1 Tokyo97 format ���ٷ��٤�ɽ����ˡ��̵�������ñ�̡� dms ��.ʬ.��

���㡧
���Σ�-����Individual Entry Archive�ƥ�ץ졼�Ȥ�

<MTLocations> <a href="http://maps.google.com/maps?q=<$MTLocation datum="1"$>+(HERE)&spn=0.004588,0.006136&hl=ja">Google Maps</a><br /> </MTLocations>
�ȵ��Ҥ���ȡ����־��󤬴ޤޤ�륨��ȥ꡼�ξ��Google Maps�γ���������֤ؤΥ�󥯤���������롣����ʴ�����

���Σ�-����Individual Entry Archive�ƥ�ץ졼�Ȥ�

<MTLocations> <a href="http://www.mapfan.com/index.cgi?MAP=E<$MTLocation coordinate="longitude" datum="1" format="dms"$>N<$MTLocation coordinate="latitude" datum="1" format="dms"$>&ZM=12">Mapfan</a><br /> </MTLocations>
�ȵ��Ҥ���ȡ����־��󤬴ޤޤ�륨��ȥ꡼�ξ��Mapfan�γ���������֤ؤΥ�󥯤����������

���Σ�-�������Ȥ������Τ褦��CGI��Movable Type��CGI��Ʊ���ǥ��쥯�ȥ���֤���Individual Entry Archive�ƥ�ץ졼�Ȥ�

<MTLocations> <a href="<$MTCGIPath$>red2map.cgi?ll=<$MTLocation$>&entry_id=<$MTEntryID$>">Map</a><br /> </MTLocations>
�Ƚ񤯤ȡ��Ͽޥ����ӥ������򤷤ƥ�󥯤��뤳�Ȥ��Ǥ��롣Google Maps�����֤�����ʴ�����

���Σ���data.xml�Ȥ������ϥե�����̾�Υ���ǥå������ƥ�ץ졼�Ȥ��롣��Ȥϰʲ���

<markers> <MTEntries lastn="100"><MTLocations> <marker lat="<$MTLocation datum="1" coordinate="latitude"$>" lng="<$MTLocation datum="1" coordinate="longitude"$>" permalink="<$MTEntryPermalink$>"/> </MTLocations></MTEntries> </markers>

Google Maps API�������򻲹ͤˡ�

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" xmlns:v="urn:schemas-microsoft-com:vml"> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"/> <title>My Blog with Google Maps</title> <style type="text/css"> v?:* { behavior:url(#default#VML); } </style> <script src="http://maps.google.com/maps?file=api&v=1&key=abcdefg" type="text/javascript"></script> </head> <body> <div id="map" style="width: 640px; height: 640px"></div> <script type="text/javascript"> //<![CDATA[ var map = new GMap(document.getElementById("map")); map.addControl(new GSmallMapControl()); map.addControl(new GMapTypeControl()); map.centerAndZoom(new GPoint(139.741308333333,35.6553083333333), 4); function createMarker(point, permalink) { // Create a lettered icon for this point using our icon class from above var icon = new GIcon(); icon.image = "http://labs.google.com/ridefinder/images/mm_20_red.png"; icon.shadow = "http://labs.google.com/ridefinder/images/mm_20_shadow.png"; icon.iconSize = new GSize(12, 20); icon.shadowSize = new GSize(22, 20); icon.iconAnchor = new GPoint(6, 20); icon.infoWindowAnchor = new GPoint(5, 1); var marker = new GMarker(point, icon); var html = "<a href=?"" + permalink + "?">" + permalink + "</a>"; GEvent.addListener(marker, "click", function() { marker.openInfoWindowHtml(html); }); return marker; } var request = GXmlHttp.create(); request.open("GET", "data.xml", true); request.onreadystatechange = function() { if (request.readyState == 4) { var xmlDoc = request.responseXML; var markers = xmlDoc.documentElement.getElementsByTagName("marker"); for (var i = 0; i < markers.length; i++) { var point = new GPoint(parseFloat(markers[i].getAttribute("lng")), parseFloat(markers[i].getAttribute("lat"))); var marker = createMarker(point, markers[i].getAttribute("permalink")); map.addOverlay(marker); } } } request.send(null); //]]> </script> </body> </html>
�Ȥ���html����ȡ��Ͽ޾�˺Ƕ�100��Υ���ȥ꡼�ΰ��֤��ޥåפ���롣����ʴ����� Posted by jiro at 2005ǯ07��14�� 18:46 | �ȥ�å��Хå� (24)
������

���򤤵������꤬�Ȥ��������ޤ���
���ε����򻲹ͤˡ��������ȤǤ���Ͽ޾�˺Ƕ�100��Υ���ȥ꡼�ΰ��֤��ޥåפ����פ褦�ˤ������ΤǤ�����IE���Ȳ���ɽ�����줺�����ޤ�ɽ������ޤ���Firefox���ͥ�����Opera����ɽ������ޤ���

Posted by: �ڤ� at 2005ǯ07��26�� 21:45

�����ۤ�ȤǤ��͡�IE�ϤۤȤ�ɻȤäƤ��ʤ��Τǵ��դ��ޤ���Ǥ���������Ŧ���꤬�Ȥ��������ޤ���
http://www.google.com/apis/maps/documentation/#XHTML_and_VML
�򻲹ͤ�ư���褦�ˤ��ޤ�����

Posted by: motonaga at 2005ǯ07��27�� 01:07

�ɣŤǤ⸫���褦�ˤʤ�ޤ�����
���б������������꤬�Ȥ��������ޤ�����

Posted by: �ڤ� at 2005ǯ07��27�� 08:16

���Ф餷���ץ饰���󤢤꤬�Ȥ��������ޤ����Ȥ����ǡ����åץ����ɤǣţأɣƲ����򥵥�ͥ��벽������硢��ʸ�˰��ֺ�ɸ�����Ҥ���ޤ��󤬡��б���ͽ�ꤵ��Ƥ��ޤ�����

Posted by: foxhound at 2005ǯ08��25�� 16:48

���Ф餷���ץ饰���󤢤꤬�Ȥ��������ޤ����Ȥ����ǡ����åץ����ɤǣţأɣƲ����򥵥�ͥ��벽������硢��ʸ�˰��ֺ�ɸ�����Ҥ���ޤ��󤬡��б���ͽ�ꤵ��Ƥ��ޤ�����

Posted by: foxhound at 2005ǯ08��25�� 16:49

���Ф餷���ץ饰���󤢤꤬�Ȥ��������ޤ����Ȥ����ǡ����åץ����ɤǣţأɣƲ����򥵥�ͥ��벽������硢��ʸ�˰��ֺ�ɸ�����Ҥ���ޤ��󤬡��б���ͽ�ꤵ��Ƥ��ޤ�����

Posted by: foxhound at 2005ǯ08��25�� 16:50

����ͥ��벽������硢htmlŪ�ˤ�ñ�ʤ���Ū���������줿html�ե�����ؤΡ֥�󥯡פˤʤꡢ���줬����ͥ���ΤĤ��ǵ��Ҥ��줿��ΤʤΤ���Ʊ�쥵������ؤΥ�󥯤Ȥ���Ǥ�դ˵��Ҥ��줿��ΤʤΤ���̩�˸�ʬ������ˡ�Ϥ���ޤ���
�������������դ����Ƚ�̲�ǽ���Ȥϻפ��ޤ������ºݤ˱��Ѥ���ݤ���������������ޤ���

����ͥ���Υ���褬�֤��Υ���ȥ꡼�˵��Ҥ��줿���֡פʤΤ��ɤ������¤��Ȥ����Ǥ������֤����򤽤��ޤDZ�Ф��ȡ���blog����ȥ꡼�ΰ��־���פȤ����������ɤ餰���⤷�ޤ���

�Ȥ����櫓�Ǻ��ΤȤ����б���ͽ��Ϥ���ޤ���

Posted by: jm at 2005ǯ10��15�� 19:31

�Ϥ���ޤ������򤤥ץ饰���󤢤꤬�Ȥ��������ޤ�������ɬ���MT�Υ���ȥ꡼��Map�˥�󥯤���褦�˺�Ȥ��Ƥ�ΤǤ������ɤ����Ƥ⥨��ȥ꡼�β�����ȴ���Ф���ʬ�ε��������狼��ޤ���
MTCollect����Ѥ�����ˡ�ǻ�Ƥߤ��ΤǤ������ޤ��Ԥ����Ԥ��ͤޤ�ξ��֤Ǥ���
�ɤ������������������ʤ��Ǥ��礦����
����������ꤤ���ޤ���

Posted by: Shou at 2005ǯ10��29�� 14:46

����ȥ꡼�β����򿧡���ơ�ɽ����������Ǥ��ޤ������������碌���ޤ�����

Posted by: Shou at 2005ǯ10��30�� 00:51

���٤⥳���ȼ����פ��ޤ���
���־��󤬴ޤޤ�륨��ȥ꡼��ɽ������
�ϿޤΥ��URL��ʬ���Ͽޤ˥��URL������ϤǤ��ʤ��ΤǤ��礦����
�Ƥ�����
�����Υ֥����褦�˥�󥯤Ǥ��ʤ��Ǥ��礦����
�ɤ��������������ꤤ�Ǥ��ʤ��Ǥ��礦����
����������ꤤ���ޤ���

Posted by: Shou at 2005ǯ10��30�� 05:59

�����ϥ���ͥ���Υ����Ȥ��Ф���������꤬�Ȥ��������ޤ������Ȥ����ǡ�GoogleMap��12�������¬�Ϸ��ˤʤäƤ��ޤ��ߤ����Ǥ�����location.pl�Ϻ��ΤޤޤǤ�Ȥ���ΤǤ��礦��������Ȥ������ɬ�פˤʤ�ΤǤ��礦����

Posted by: foxhound at 2005ǯ11��27�� 23:37

���Υڡ����Ρ֥ѥ�᡼�����פ���ʬ�ˤ⵭�ܤ��Ƥ��ޤ�����datum="1"�ˤʤäƤ�����ʬ���ά���������¬�ϷϤˤʤ�ޤ���datum="0"���������Ƥ⹽���ޤ���

Posted by: jm at 2005ǯ11��27�� 23:45

���ߤޤ���
���Σ�-����red2map.cgi��Ȥä���硢GoogleMap��WGS84������¬�Ϸϡˤˤ���ˤϤɤ�����Ф褤�ΤǤ��礦����

Posted by: ����� at 2005ǯ12��11�� 22:01

cgi��309����
} elsif ($map_service eq 'Google Maps') {
($lon, $lat) = geoconv($lon, $lat, 1);
��
} elsif ($map_service eq 'Google Maps') {
($lon, $lat) = geoconv($lon, $lat, 0);
�ˤ���Ф褤�Ǥ���

Posted by: jm at 2005ǯ12��12�� 10:45

��®�Τ��������꤬�Ȥ��������ޤ�����
cgi�γ�����ʬ���ѹ����ư���ɽ�����Ƥߤޤ�����

���η�̤Ǥ�����Google Map�Τ߰��֤��㤤�ޤ���¾��NAVITIME��MapFan Web��livedoor MAP�Σ��Ĥ�Ʊ������ؤ��ޤ�����Google Map�Τ߰㤤�ޤ���

���ˡ����Σ�-������ˡ��datum="0"�ˤ�ɽ��������Google Map�ΰ��֤Ȥ�㤤�ޤ���datum="0"�ξ�硢��ۤɤ�NAVITIME��MapFan Web��livedoor MAP��Ʊ���֤Ǥ���

�ɤ�����С�cgi��Google Map�Ǥ�¾���Ͽޤ�Ʊ�����֤�ɽ�����뤳�Ȥ��Ǥ���ΤǤ��礦����

Posted by: ����� at 2005ǯ12��12�� 22:31

���餷�ޤ������Ϥ������ٷ��٤Ϥ��Ǥ�����¬�ϷϤˤʤäƤ���Ϥ��Ǥ��Τǡ�¬�Ϸ��Ѵ��ιԤ򥳥��ȥ����Ȥ�������Ǥ�����
} elsif ($map_service eq 'Google Maps') {
#($lon, $lat) = geoconv($lon, $lat, 1);

Posted by: jm at 2005ǯ12��12�� 22:58

�����餷���ץ饰����򤢤꤬�Ȥ��������ޤ���

���ޤ�ͭ���񤯻��Ѥ�����ĺ���Ƥ����ΤǤ�����MT Version 3.2-ja-2��ʣ���Υ֥�����������Ƥ�����֤ΤȤ�����Ƴ�������顢�䤬�����Фʤ��ʤäƤ��ޤ��ޤ�����

����ޤǤ��̡���MT�Ǵ������Ƥ����֥������Ĥ�MT�Ǵ�������褦�ˤ����ΤǤ��������Υץ饰�����ʣ���Υ֥���������Ķ����б����Ƥ���ޤ��Ǥ��礦����
���顼��Фޤ��󤷡������ˤ�GPS���󤬤��ä��ꤢ��ʰ������Ϥ����ȽФƤ���ΡˤΤǤ�����MAP�ؤΥ�󥯤��Фʤ����֤Ǥ���
��������������ʬ����ޤ���

Posted by: ���� at 2005ǯ12��14�� 15:37

�����ޤ��󡣥�����ȴ���ޤ�����
��<MTLocations>��<$MTLocation$>���פȽ񤭤ޤ�����

Posted by: ���� at 2005ǯ12��14�� 15:39

�������֤��Ƥ���Τ�BLOG�ǥ��쥯�ȥ겼�Ǥʤ��ä��Τ������Ǥ�����
���꤬�Ȥ��������ޤ�����

Posted by: ���� at 2005ǯ12��16�� 09:29

������񤤤��鲿�������ä������ѥॳ���Ȱ�������Ƥ��ޤä��ΤǤ��������
��褷�ޤ��������꤬�Ȥ��������ޤ�����

Posted by: ���� at 2005ǯ12��16�� 09:31

�������ɥ���ǣУӷ��Ӥ��б����������ơ�location.pl����ɤ��Ƥ���ΤǤ������ޤ��Ǥ��ޤ��󡣤����http://www.gpspowered.jp/gpsmenu.cgi?pos=N35.41.30.71E139.43.57.82&geo=wgs84&X-acc=1
�������http://docomo.ne.jp/cp/map.cgi?lat=%2B35.41.32.995&lon=%2B139.43.41.976&geo=wgs84&x-acc=1
���ؤ��褦�Ȥ��Ƥ��ޤ�������ʴ�����
/http:\/\/docomo\.ne\.jp\/cp\/.*?lat=%2B([0-9]+)\.([0-9]+)\.([0-9]+)\.([0-9]+)&lon=%2B([0-9]+)\.([0-9]+)\.([0-9]+)\.([0-9]+).*/) {
$lat = (/http:\/\/docomo\.ne\.jp\/cp\/.*?lat=%2B([0-9]+)\.([0-9]+)\.([0-9]+)\.([0-9]+).*/) ? $1 + $2/60 + ($3 + $4/100)/3600 : undef;
$lon = (/http:\/\/docomo\.ne\.jp\/cp\/.*?lat=.*&lon=%2B([0-9]+)\.([0-9]+)\.([0-9]+)\.([0-9]+).*/) ? $1 + $2/60 + ($3 + $4/100)/3600 : undef;�Ȥޤ��ߤ褦���ޤͤǤ���ʴ����ˤ����ΤǤ�����perl���褯�狼��ʤ��ΤǤ�äѤ���Ǥ������������������н�����ޤ���

Posted by: foxhound at 2006ǯ01��16�� 19:42

���������Ȥ�������ɽ����ʬ�������Ф��ơ��ƥ��Ȥ��Ƥߤ�Τ���ü���ᤤ�Ǥ����㤨��

#!/usr/bin/perl
$_ = 'http://hogehoge/gps/no/value';
if (/kono/moji/wo/mitsuketara/) {
$lat = (/hoge(foo)(bar)/) ? $1 + $2/60 : 0;
print $lat;
}

�ߤ����ʥƥ��ȥ����ɤ�񤤤ơ��������
$ perl test.pl

Posted by: jm at 2006ǯ01��22�� 18:42

���꤬�Ȥ��������ޤ������ä����¹Ԥ��ޤ���

Posted by: foxhound at 2006ǯ01��23�� 14:28
�����Ȥ���









̾�������ɥ쥹����Ͽ���ޤ���?