update zmp

geogarage.com.zmp/GetUrlScript.txt

@@ -38,13 +38,13 @@ begin
  if GetY <7 then insert('10',GetURLBase,13) else insert('8',GetURLBase,13);
 
  case GetY of
- 7: ResultURL:=GetURLBase+res+'/'+res+'.png';
- 8: ResultURL:=GetURLBase+res+'/'+res+'.png';
- 9: ResultURL:=GetURLBase+res+'/'+res+'.png';
- 10: ResultURL:=GetURLBase+res+'/'+res+'.png';
- 11: ResultURL:=GetURLBase+res+'/'+res+'.png';
- 12: ResultURL:=GetURLBase+res+'/'+res+'.png';
- 13: ResultURL:=GetURLBase+res+'/'+res+'.png';
+ 7: ResultURL:=GetURLBase+COPY(res,1,6)+'/'+res+'.png';
+ 8: ResultURL:=GetURLBase+COPY(res,1,6)+'/'+res+'.png';
+ 9: ResultURL:=GetURLBase+COPY(res,1,6)+'/'+res+'.png';
+ 10: ResultURL:=GetURLBase+COPY(res,1,6)+'/'+res+'.png';
+ 11: ResultURL:=GetURLBase+COPY(res,1,6)+'/'+res+'.png';
+ 12: ResultURL:=GetURLBase+COPY(res,1,6)+'/'+res+'.png';
+ 13: ResultURL:=GetURLBase+COPY(res,1,6)+'/'+res+'.png';
  else
  ResultURL:=GetURLBase+res+'.png';
  end

magnitog_ru.zmp/GetUrlScript.txt

@@ -0,0 +1,22 @@
+var
+z:integer;
+
+begin
+
+ case getZ of
+ 0:z:=120000;
+ 1:z:=120000;
+ 2:z:=120000;
+ 3:z:=120000;
+ 4:z:=90000;
+ 5:z:=60000;
+ 6:z:=30000;
+ 7:z:=15000;
+ 8:z:=10000;
+ 9:z:=5000;
+ 10:z:=2000;
+ end;
+
+ ResultURL:=GetURLBase+inttostr(z)+'/MainLayer/'+inttostr(GetX)+'_'+inttostr(round(intpower(2,GetZ-1)-GetY-1))+'.png';
+
+end.

magnitog_ru.zmp/info.txt

@@ -0,0 +1,5 @@
+Локальная карта города Магнитогорск (magnitog.ru)
+
+Отображается на 1..8 уровне зума
+
+Первоисточник: http://map.magnitog.ru/mgnfreelots/mgn.htm

magnitog_ru.zmp/params.txt

@@ -0,0 +1,26 @@
+[PARAMS]
+pnum=114
+GUID={F12A0864-E8F1-45E4-834D-5A8C7E118DE6}
+asLayer=0
+name=Ìàãíèòîãîðñê (magnitog.ru)
+name_9=Magnitogorsk (magnitog.ru)
+NameInCache=magnitog_ru
+DefURLBase=http://map.magnitog.ru/mgnfreelots/images/
+DefaultContentType=image/png
+ContentType="image/png"
+Ext=.png
+projection=1
+sradiusa=6378137
+sradiusb=6378137
+separator=0
+UseDwn=1
+Usestick=1
+UseGenPrevious=1
+Usedel=1
+Usesave=1
+UseAntiBan=0
+Sleep=0
+DefHotKey=0
+BanIfLen=0
+ParentSubMenu=Ëîêàëüíûå êàðòû
+ParentSubMenu_9=Local maps