update zmp

Genshtab/karta_gsh_10km.zmp/GetUrlScript.txt

@@ -1,6 +1,6 @@
 var
   url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
   ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
 end.

Genshtab/karta_gsh_1km.zmp/GetUrlScript.txt

@@ -1,6 +1,6 @@
 var
   url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
   ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
 end.

Genshtab/karta_gsh_250m.zmp/GetUrlScript.txt

@@ -1,6 +1,6 @@
 var
   url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
   ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
 end.

Genshtab/karta_gsh_2km.zmp/GetUrlScript.txt

@@ -1,6 +1,6 @@
 var
   url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
   ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
 end.

Genshtab/karta_gsh_500m.zmp/GetUrlScript.txt

@@ -1,6 +1,6 @@
 var
   url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
   ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
 end.

Genshtab/karta_gsh_5km.zmp/GetUrlScript.txt

@@ -1,6 +1,6 @@
 var
   url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(4)) );
   ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
 end.

history/5v_kavkaz.zmp/GetUrlScript.txt

@@ -1,6 +1,6 @@
 var
   url : string;
 begin
-  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8084 + Random(6)) );
   ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
 end.