update zmp

_Genshtab/gsh_500m_new.zmp/GetUrlScript.txt

@@ -1,6 +1,3 @@
-var
-  url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) );
-  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+  ResultURL:=GetURLBase+'z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.jpg';
 end.

_Genshtab/gsh_500m_new.zmp/params.txt

@@ -5,7 +5,7 @@ name_ru=
 name=Genshtab 500m (1999-2010)
 name_uk=Ãåíøòàá 500ì (1999-2010)
 NameInCache=genshtab500m_new
-DefURLBase=http://91.237.82.95:8082/genshtab5k_new/
+DefURLBase=http://91.237.82.95:8088/pub/genshtab5k_new/
 defaultContentType=image/jpeg
 ParentSubMenu_ru=Ãåíøòàá
 ParentSubMenu=Genshtab

_Genshtab/karta_ggc_1km.zmp/GetUrlScript.txt

@@ -0,0 +1,3 @@
+begin
+  ResultURL:=GetURLBase+'z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png';
+end.

_Genshtab/karta_ggc_1km.zmp/info.txt

@@ -0,0 +1,5 @@
+Все права на карты принадлежат их авторам<br>
+Если у Вас есть что добавить или желание поделиться листами, стучимся garl@mail.ru<br>
+<br>
+Благодарности и те кто прнимал участие:<br>
+Gm, Garl <br>

_Genshtab/karta_ggc_1km.zmp/params.txt

@@ -0,0 +1,18 @@
+[PARAMS]
+pnum=245
+GUID={BF6C9C19-AD78-4F1F-96CE-6EF1F5B52EF7}
+name_ru=ÃîñÃèñÖåíòð 1 Êì
+name=GosGisCentr 1 Km
+name_uk=GosGisCentr 1 Kì
+NameInCache=ggc1km
+DefURLBase=http://91.237.82.95:8088/pub/ggc1km/
+defaultContentType=image/png
+ParentSubMenu_ru=Ãåíøòàá\ÃÃÖ
+ParentSubMenu=Genshtab\GGC
+ParentSubMenu_uk=Ãåíøòàá\GGC
+Ext=.png
+projection=1
+sradiusa=6378137
+sradiusb=6378137
+ContentType="image/png"
+MaxConnectToServerCount=1

_Genshtab/karta_ggc_500m.zmp/GetUrlScript.txt

@@ -1,6 +1,3 @@
-var
-  url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(8)) );
-  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png';
+  ResultURL:=GetURLBase+'z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png';
 end.

_Genshtab/karta_ggc_500m.zmp/params.txt

@@ -5,7 +5,7 @@ name_ru=
 name=GosGisCentr 500 m
 name_uk=GosGisCentr 500 ì
 NameInCache=ggc500m
-DefURLBase=http://91.237.82.95:8082/ggc500m/
+DefURLBase=http://91.237.82.95:8088/pub/ggc500m/
 defaultContentType=image/png
 ParentSubMenu_ru=Ãåíøòàá\ÃÃÖ
 ParentSubMenu=Genshtab\GGC

_Other/geologmap.zmp/GetUrlScript.txt

@@ -1,6 +1,3 @@
-var
-  url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) );
-  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+  ResultURL:=GetURLBase+'z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.jpg';
 end.

_Other/geologmap.zmp/params.txt

@@ -3,7 +3,7 @@ pnum=16
 GUID={FD39994C-3D2E-450C-8290-C48DD081E39B}
 name_ru=Ãåîëîãè÷åñêàÿ êàðòà ÑÑÑÐ
 name= Geologic map of USSR
-DefURLBase=http://91.237.82.95:8082/geologmap/
+DefURLBase=http://91.237.82.95:8088/pub/others/geologmap/
 projection=1
 sradiusa=6378137
 sradiusb=6378137

_water/river_kuban.zmp/GetUrlScript.txt

@@ -1,6 +1,3 @@
-var
-  url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8086 + Random(6)) );
-  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+  ResultURL:=GetURLBase+'z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.jpg';
 end.

_water/river_kuban.zmp/params.txt

@@ -5,7 +5,7 @@ name_ru=
 name=Kuban river map
 ParentSubMenu_ru=Ìîðñêèå êàðòû
 ParentSubMenu=Marine maps
-DefURLBase=http://91.237.82.95:8082/kuban_river/
+DefURLBase=http://91.237.82.95:8088/pub/water/kuban_river/
 projection=1
 sradiusa=6378137
 sradiusb=6378137