update zmp

Other/Navitel.zmp/GetUrlScript.txt

@@ -1,10 +1,12 @@
 var xx,yy,zz:string;
 begin
+GetURLBase[10]:=chr(ord('1')+random(2));
 xx:=inttostr(GetX);
 yy:=inttostr(round(intpower(2,getz-1)-GetY)-1);
 zz:=inttostr(GetZ-1);
 while length(xx)<8 do xx:='0'+xx;
 while length(yy)<8 do yy:='0'+yy;
 while length(zz)<2 do zz:='0'+zz;
-ResultURL:=GetUrlBase+xx+','+yy+','+zz;
+ResultURL:=GetUrlBase+xx+','+yy+','+zz+'&hl=ru';
+RequestHead:='Referer: http://map.navitel.su/' + #13#10;
 end.

Other/Navitel.zmp/params.txt

@@ -8,7 +8,7 @@ ParentSubMenu=
 ParentSubMenu_en=Other maps
 ParentSubMenu_uk=²íø³ êàðòè
 asLayer=0
-DefURLBase=http://maps.navitel.su/2.0/navitms.fcgi?t=
+DefURLBase=http://m01.navitel.su/navitms.fcgi?t=
 projection=1
 sradiusa=6378137
 sradiusb=6378137