diff --git a/_Genshtab/gsh_500m_new.zmp/GetUrlScript.txt b/_Genshtab/gsh_500m_new.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_Genshtab/gsh_500m_new.zmp/GetUrlScript.txt
+++ b/_Genshtab/gsh_500m_new.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_Genshtab/gsh_500m_new.zmp/params.txt b/_Genshtab/gsh_500m_new.zmp/params.txt
index 1408ade7..c2b8e9bb 100644
--- a/_Genshtab/gsh_500m_new.zmp/params.txt
+++ b/_Genshtab/gsh_500m_new.zmp/params.txt
@@ -20,4 +20,4 @@ UseDwn=1
 Sleep=0
 DefHotKey=0
 ContentType="image/jpeg"
-MaxConnectToServerCount=10
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_Genshtab/karta_ggc_500m.zmp/GetUrlScript.txt b/_Genshtab/karta_ggc_500m.zmp/GetUrlScript.txt
index 39ac51a8..32ca86ac 100644
--- a/_Genshtab/karta_ggc_500m.zmp/GetUrlScript.txt
+++ b/_Genshtab/karta_ggc_500m.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png';
+end.
diff --git a/_Genshtab/karta_ggc_500m.zmp/params.txt b/_Genshtab/karta_ggc_500m.zmp/params.txt
index 31476ee2..cdd6dd2f 100644
--- a/_Genshtab/karta_ggc_500m.zmp/params.txt
+++ b/_Genshtab/karta_ggc_500m.zmp/params.txt
@@ -20,4 +20,4 @@ UseDwn=1
 Sleep=0
 DefHotKey=0
 ContentType="image/png"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_Other/geologmap.zmp/GetUrlScript.txt b/_Other/geologmap.zmp/GetUrlScript.txt
index 93113ccc..677d8cc4 100644
--- a/_Other/geologmap.zmp/GetUrlScript.txt
+++ b/_Other/geologmap.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8082 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/1902_kuban.zmp/GetUrlScript.txt b/_historic/1902_kuban.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/1902_kuban.zmp/GetUrlScript.txt
+++ b/_historic/1902_kuban.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/1902_kuban.zmp/params.txt b/_historic/1902_kuban.zmp/params.txt
index f68804dc..d4534787 100644
--- a/_historic/1902_kuban.zmp/params.txt
+++ b/_historic/1902_kuban.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/1918_kuban_10v.zmp/GetUrlScript.txt b/_historic/1918_kuban_10v.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/1918_kuban_10v.zmp/GetUrlScript.txt
+++ b/_historic/1918_kuban_10v.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/1918_kuban_10v.zmp/params.txt b/_historic/1918_kuban_10v.zmp/params.txt
index 68d6f63b..b6405328 100644
--- a/_historic/1918_kuban_10v.zmp/params.txt
+++ b/_historic/1918_kuban_10v.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/1925_maykop.zmp/GetUrlScript.txt b/_historic/1925_maykop.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/1925_maykop.zmp/GetUrlScript.txt
+++ b/_historic/1925_maykop.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/1925_maykop.zmp/params.txt b/_historic/1925_maykop.zmp/params.txt
index c0adbc12..044b93b4 100644
--- a/_historic/1925_maykop.zmp/params.txt
+++ b/_historic/1925_maykop.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/1930_kuban.zmp/GetUrlScript.txt b/_historic/1930_kuban.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/1930_kuban.zmp/GetUrlScript.txt
+++ b/_historic/1930_kuban.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/1930_kuban.zmp/params.txt b/_historic/1930_kuban.zmp/params.txt
index da4fcfa3..8d311348 100644
--- a/_historic/1930_kuban.zmp/params.txt
+++ b/_historic/1930_kuban.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/1942_osteuropa.zmp/GetUrlScript.txt b/_historic/1942_osteuropa.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/1942_osteuropa.zmp/GetUrlScript.txt
+++ b/_historic/1942_osteuropa.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/1942_osteuropa.zmp/params.txt b/_historic/1942_osteuropa.zmp/params.txt
index 91c51429..a9e81058 100644
--- a/_historic/1942_osteuropa.zmp/params.txt
+++ b/_historic/1942_osteuropa.zmp/params.txt
@@ -20,4 +20,4 @@ ParentSubMenu=Historic
 ParentSubMenu_uk=Історичні
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/1v_krim.zmp/GetUrlScript.txt b/_historic/1v_krim.zmp/GetUrlScript.txt
index 93113ccc..677d8cc4 100644
--- a/_historic/1v_krim.zmp/GetUrlScript.txt
+++ b/_historic/1v_krim.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8082 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/1v_krim.zmp/params.txt b/_historic/1v_krim.zmp/params.txt
index 646dbf3e..74aedcdb 100644
--- a/_historic/1v_krim.zmp/params.txt
+++ b/_historic/1v_krim.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/5v_kavk_1877.zmp/GetUrlScript.txt b/_historic/5v_kavk_1877.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/5v_kavk_1877.zmp/GetUrlScript.txt
+++ b/_historic/5v_kavk_1877.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/5v_kavk_1877.zmp/params.txt b/_historic/5v_kavk_1877.zmp/params.txt
index 5f011773..e4653d6d 100644
--- a/_historic/5v_kavk_1877.zmp/params.txt
+++ b/_historic/5v_kavk_1877.zmp/params.txt
@@ -24,4 +24,4 @@ Sleep=0
 BanIfLen=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/Strelb10_1882.zmp/GetUrlScript.txt b/_historic/Strelb10_1882.zmp/GetUrlScript.txt
index 603ae32f..677d8cc4 100644
--- a/_historic/Strelb10_1882.zmp/GetUrlScript.txt
+++ b/_historic/Strelb10_1882.zmp/GetUrlScript.txt
@@ -1,4 +1,6 @@
+var
+  url : string;
 begin
-  GetURLBase[24]:=chr(ord('3')+random(8));
-  ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/Strelb10_1882.zmp/params.txt b/_historic/Strelb10_1882.zmp/params.txt
index 4aedb270..b1034eb0 100644
--- a/_historic/Strelb10_1882.zmp/params.txt
+++ b/_historic/Strelb10_1882.zmp/params.txt
@@ -24,4 +24,4 @@ Sleep=0
 BanIfLen=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/Strelb10_1919.zmp/GetUrlScript.txt b/_historic/Strelb10_1919.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/Strelb10_1919.zmp/GetUrlScript.txt
+++ b/_historic/Strelb10_1919.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/Strelb10_1919.zmp/params.txt b/_historic/Strelb10_1919.zmp/params.txt
index 15fa636e..bc1840cb 100644
--- a/_historic/Strelb10_1919.zmp/params.txt
+++ b/_historic/Strelb10_1919.zmp/params.txt
@@ -24,4 +24,4 @@ Sleep=0
 BanIfLen=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/eng_5v_kavkaz.zmp/GetUrlScript.txt b/_historic/eng_5v_kavkaz.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/eng_5v_kavkaz.zmp/GetUrlScript.txt
+++ b/_historic/eng_5v_kavkaz.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/kuban_1v.zmp/GetUrlScript.txt b/_historic/kuban_1v.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/kuban_1v.zmp/GetUrlScript.txt
+++ b/_historic/kuban_1v.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/kuban_1v.zmp/params.txt b/_historic/kuban_1v.zmp/params.txt
index 8c6e05c4..959828ab 100644
--- a/_historic/kuban_1v.zmp/params.txt
+++ b/_historic/kuban_1v.zmp/params.txt
@@ -24,4 +24,4 @@ Sleep=0
 BanIfLen=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_historic/rkka_kavkaz.zmp/GetUrlScript.txt b/_historic/rkka_kavkaz.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/rkka_kavkaz.zmp/GetUrlScript.txt
+++ b/_historic/rkka_kavkaz.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/rkka_kavkaz.zmp/params.txt b/_historic/rkka_kavkaz.zmp/params.txt
index 22e0542a..2f26b236 100644
--- a/_historic/rkka_kavkaz.zmp/params.txt
+++ b/_historic/rkka_kavkaz.zmp/params.txt
@@ -20,4 +20,3 @@ Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
 MaxConnectToServerCount=1
-
diff --git a/_historic/wwII-ug.zmp/GetUrlScript.txt b/_historic/wwII-ug.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_historic/wwII-ug.zmp/GetUrlScript.txt
+++ b/_historic/wwII-ug.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_historic/wwII-ug.zmp/params.txt b/_historic/wwII-ug.zmp/params.txt
index ac6b173c..ad5fa842 100644
--- a/_historic/wwII-ug.zmp/params.txt
+++ b/_historic/wwII-ug.zmp/params.txt
@@ -19,4 +19,5 @@ UseDwn=1
 Sleep=0
 ContentType=*
 defaultContentType=image/jpeg
-IgnoreContentType=1
\ No newline at end of file
+IgnoreContentType=1
+MaxConnectToServerCount=1
diff --git a/_tourism/TyanShan/TyanShan.zmp/GetUrlScript.txt b/_tourism/TyanShan/TyanShan.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/TyanShan/TyanShan.zmp/GetUrlScript.txt
+++ b/_tourism/TyanShan/TyanShan.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/TyanShan/TyanShan.zmp/params.txt b/_tourism/TyanShan/TyanShan.zmp/params.txt
index bb09aa7b..fa166e93 100644
--- a/_tourism/TyanShan/TyanShan.zmp/params.txt
+++ b/_tourism/TyanShan/TyanShan.zmp/params.txt
@@ -20,4 +20,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/TyanShan/tyan_shan.zmp/GetUrlScript.txt b/_tourism/TyanShan/tyan_shan.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/TyanShan/tyan_shan.zmp/GetUrlScript.txt
+++ b/_tourism/TyanShan/tyan_shan.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/TyanShan/tyan_shan.zmp/params.txt b/_tourism/TyanShan/tyan_shan.zmp/params.txt
index 71dbfc8a..72bf22bb 100644
--- a/_tourism/TyanShan/tyan_shan.zmp/params.txt
+++ b/_tourism/TyanShan/tyan_shan.zmp/params.txt
@@ -20,4 +20,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/cencaumap.zmp/GetUrlScript.txt b/_tourism/cencaumap.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/cencaumap.zmp/GetUrlScript.txt
+++ b/_tourism/cencaumap.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/cencaumap.zmp/params.txt b/_tourism/cencaumap.zmp/params.txt
index 2079594f..993e3d22 100644
--- a/_tourism/cencaumap.zmp/params.txt
+++ b/_tourism/cencaumap.zmp/params.txt
@@ -20,4 +20,4 @@ Sleep=0
 License=© Михаила Голубев, caucatalog.narod.ru
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/ergaki_aradan.zmp/GetUrlScript.txt b/_tourism/ergaki_aradan.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/ergaki_aradan.zmp/GetUrlScript.txt
+++ b/_tourism/ergaki_aradan.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/ergaki_aradan.zmp/params.txt b/_tourism/ergaki_aradan.zmp/params.txt
index d181d139..7d3de3cb 100644
--- a/_tourism/ergaki_aradan.zmp/params.txt
+++ b/_tourism/ergaki_aradan.zmp/params.txt
@@ -21,4 +21,3 @@ Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
 MaxConnectToServerCount=1
-
diff --git a/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/GetUrlScript.txt b/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/GetUrlScript.txt
+++ b/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/params.txt b/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/params.txt
index 26c5853b..cf603b29 100644
--- a/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/params.txt
+++ b/_tourism/fgup_sk_agp/fgu_sk_agp_all.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/gosgeodesia/tourism1991.zmp/GetUrlScript.txt b/_tourism/gosgeodesia/tourism1991.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/gosgeodesia/tourism1991.zmp/GetUrlScript.txt
+++ b/_tourism/gosgeodesia/tourism1991.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/gosgeodesia/tourism1991.zmp/params.txt b/_tourism/gosgeodesia/tourism1991.zmp/params.txt
index 4ce7aae4..4417de29 100644
--- a/_tourism/gosgeodesia/tourism1991.zmp/params.txt
+++ b/_tourism/gosgeodesia/tourism1991.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/hrebtovka_elbrus.zmp/GetUrlScript.txt b/_tourism/hrebtovka_elbrus.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/hrebtovka_elbrus.zmp/GetUrlScript.txt
+++ b/_tourism/hrebtovka_elbrus.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/hrebtovka_elbrus.zmp/params.txt b/_tourism/hrebtovka_elbrus.zmp/params.txt
index d6844b19..39070662 100644
--- a/_tourism/hrebtovka_elbrus.zmp/params.txt
+++ b/_tourism/hrebtovka_elbrus.zmp/params.txt
@@ -21,4 +21,4 @@ Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
 MaxConnectToServerCount=1
-License=© Ляпин В.Г.
\ No newline at end of file
+License=© Ляпин В.Г.
diff --git a/_tourism/kazbegi.zmp/GetUrlScript.txt b/_tourism/kazbegi.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/kazbegi.zmp/GetUrlScript.txt
+++ b/_tourism/kazbegi.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/kazbegi.zmp/params.txt b/_tourism/kazbegi.zmp/params.txt
index f0ab5f80..fb2f5e9b 100644
--- a/_tourism/kazbegi.zmp/params.txt
+++ b/_tourism/kazbegi.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/krim.zmp/GetUrlScript.txt b/_tourism/krim.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/krim.zmp/GetUrlScript.txt
+++ b/_tourism/krim.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/krim.zmp/params.txt b/_tourism/krim.zmp/params.txt
index 75aa0762..5e11bdb6 100644
--- a/_tourism/krim.zmp/params.txt
+++ b/_tourism/krim.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/lcarta.zmp/GetUrlScript.txt b/_tourism/lcarta.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/lcarta.zmp/GetUrlScript.txt
+++ b/_tourism/lcarta.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/lcarta.zmp/params.txt b/_tourism/lcarta.zmp/params.txt
index 708cbe80..4f90dffe 100644
--- a/_tourism/lcarta.zmp/params.txt
+++ b/_tourism/lcarta.zmp/params.txt
@@ -21,4 +21,4 @@ Sleep=0
 License=© Ляпин В.Г. 2013
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/slazav.map_hr.zmp/GetUrlScript.txt b/_tourism/slazav.map_hr.zmp/GetUrlScript.txt
index 8623163c..32ca86ac 100644
--- a/_tourism/slazav.map_hr.zmp/GetUrlScript.txt
+++ b/_tourism/slazav.map_hr.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(4) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png';
+end.
diff --git a/_tourism/slazav.map_hr.zmp/params.txt b/_tourism/slazav.map_hr.zmp/params.txt
index f7e1871a..1ec62ab8 100644
--- a/_tourism/slazav.map_hr.zmp/params.txt
+++ b/_tourism/slazav.map_hr.zmp/params.txt
@@ -17,4 +17,5 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/png
 ContentType="image/png"
-License=© Владислав Завьялов, slazav.livejournal.com
\ No newline at end of file
+License=© Владислав Завьялов, slazav.livejournal.com
+MaxConnectToServerCount=1
diff --git a/_tourism/westcaumap.zmp/GetUrlScript.txt b/_tourism/westcaumap.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/westcaumap.zmp/GetUrlScript.txt
+++ b/_tourism/westcaumap.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/westcaumap.zmp/params.txt b/_tourism/westcaumap.zmp/params.txt
index 533d6d93..eae706df 100644
--- a/_tourism/westcaumap.zmp/params.txt
+++ b/_tourism/westcaumap.zmp/params.txt
@@ -20,4 +20,4 @@ Sleep=0
 License=© Михаила Голубев, caucatalog.narod.ru
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1
diff --git a/_tourism/wkavkaz_kot.zmp/GetUrlScript.txt b/_tourism/wkavkaz_kot.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_tourism/wkavkaz_kot.zmp/GetUrlScript.txt
+++ b/_tourism/wkavkaz_kot.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_tourism/wkavkaz_kot.zmp/params.txt b/_tourism/wkavkaz_kot.zmp/params.txt
index f2e94b57..6f46fa30 100644
--- a/_tourism/wkavkaz_kot.zmp/params.txt
+++ b/_tourism/wkavkaz_kot.zmp/params.txt
@@ -21,4 +21,3 @@ Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
 MaxConnectToServerCount=1
-
diff --git a/_water/river_kuban.zmp/GetUrlScript.txt b/_water/river_kuban.zmp/GetUrlScript.txt
index bc1dc926..677d8cc4 100644
--- a/_water/river_kuban.zmp/GetUrlScript.txt
+++ b/_water/river_kuban.zmp/GetUrlScript.txt
@@ -1,6 +1,6 @@
 var
-url: string;
+  url : string;
 begin
-  url := RegExprReplaceMatchSubStr(GetURLBase, '8082', inttostr(8084 + Random(8) ));
-  ResultURL:=URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
-end.
\ No newline at end of file
+  url := RegExprReplaceMatchSubStr( GetURLBase, '8082', inttostr(8082 + Random(10)) );
+  ResultURL := URL+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.jpg';
+end.
diff --git a/_water/river_kuban.zmp/params.txt b/_water/river_kuban.zmp/params.txt
index 6a1142a7..9212b668 100644
--- a/_water/river_kuban.zmp/params.txt
+++ b/_water/river_kuban.zmp/params.txt
@@ -19,4 +19,4 @@ UseDwn=1
 Sleep=0
 defaultContentType=image/jpeg
 ContentType="image/jpeg"
-MaxConnectToServerCount=1
\ No newline at end of file
+MaxConnectToServerCount=1