update zmp

belgeodesy.zmp/params.txt → _Belarus/belgeodesy.zmp/params.txt

@@ -5,9 +5,9 @@ asLayer=0
 name=Êàðòà Áåëîðóññèè (belgeodesy.by)
 name_en=Map of Belarus (belgeodesy.by)
 name_uk=Êàðòà Á³ëîðóñ³¿ (belgeodesy.by)
-ParentSubMenu=Ëîêàëüíûå êàðòû
-ParentSubMenu_en=Local maps
-ParentSubMenu_uk=Ëîêàëüí³ êàðòè
+ParentSubMenu=Ëîêàëüíûå êàðòû\Áåëàðóñü
+ParentSubMenu_en=Local maps\Belarus
+ParentSubMenu_uk=Ëîêàëüí³ êàðòè\Áåëàðóñü
 NameInCache=belgeodesy
 DefURLBase=http://belgeodesy.by/map/map/
 ContentType=image/png

etokarta.zmp/params.txt → _Belarus/etokarta.zmp/params.txt

@@ -4,9 +4,9 @@ GUID={53B841AD-B85D-40D0-BB36-FAA0C703CE91}
 asLayer=0
 name=Âèòåáñê ñïóòíèê z18 (etokarta.com)
 name_en=Vitebsk Sat z18 (etokarta.com)
-ParentSubMenu=Ëîêàëüíûå êàðòû
-ParentSubMenu_en=Local maps
-ParentSubMenu_uk=Ëîêàëüí³ êàðòè
+ParentSubMenu=Ëîêàëüíûå êàðòû\Áåëàðóñü
+ParentSubMenu_en=Local maps\Belarus
+ParentSubMenu_uk=Ëîêàëüí³ êàðòè\Áåëàðóñü
 NameInCache=etokarta
 DefURLBase=http://etokarta.com/t/dg/zz
 ContentType=image/jpeg

_Belarus/maps.by.proj4.zmp/GetUrlScript.txt

@@ -0,0 +1,17 @@
+var
+  TL, M: TDoublePoint;
+  BR, N: TDoublePoint;
+begin
+  TL.X := GetLLon;
+  TL.Y := GetTLat;
+  BR.X := GetRLon;
+  BR.Y := GetBLat;
+
+  if Assigned(DefProjConverter) then begin
+    M := DefProjConverter.LonLat2XY(TL);
+    N := DefProjConverter.LonLat2XY(BR);
+    ResultURL := GetURLBase + RoundEx(M.X, 9) + ',' + RoundEx(N.Y, 9) + ',' + RoundEx(N.X, 9) + ',' + RoundEx(M.Y, 9);
+  end else begin
+    ResultURL := 'invalid_url';
+  end;
+end.

_Belarus/maps.by.proj4.zmp/info.txt

@@ -0,0 +1 @@
+<a href="http://maps.by/map/maps">http://maps.by/map/maps</a>

_Belarus/maps.by.proj4.zmp/params.txt

@@ -0,0 +1,21 @@
+[PARAMS]
+GUID={1334AD70-75F3-476B-8D92-43BE9426C255}
+asLayer=0
+pnum=173
+name=Êàðòà Áåëàðóñè (maps.by)
+name_en=Belarus Map (maps.by)
+name_uk=Êàðòà Áåëàðóñè (maps.by)
+NameInCache=maps.by
+DefURLBase=http://maps.by:8080/geoserver/gwc/service/wms?LAYERS=gkgc%3Amaps_by&STYLES=&FORMAT=image%2Fpng8&TILESORIGIN=-20037508.34%2C-20037508.34&TILED=true&SERVICE=WMS&VERSION=1.1.1&REQUEST=GetMap&SRS=EPSG%3A900913&WIDTH=256&HEIGHT=256&BBOX=
+ContentType=image/png
+ParentSubMenu=Ëîêàëüíûå êàðòû\Áåëàðóñü
+ParentSubMenu_en=Local maps\Belarus
+ParentSubMenu_uk=Ëîêàëüí³ êàðòè\Áåëàðóñü
+Ext=.png
+projection=1
+sradiusa=6378137
+sradiusb=6356752
+separator=0
+UseDwn=1
+Proj4Args=+proj=merc +a=6378137 +b=6378137 +lat_ts=0.0 +lon_0=0.0 +x_0=0.0 +y_0=0 +k=1.0 +units=m +nadgrids=@null +no_defs
+