diff --git a/_Genshtab/gsh_500m_new.zmp/GetUrlScript.txt b/_Genshtab/gsh_500m_new.zmp/GetUrlScript.txt index bc1dc9263..677d8cc4d 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 1408ade74..c2b8e9bb7 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 39ac51a89..32ca86acb 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 31476ee24..cdd6dd2fe 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 93113ccc2..677d8cc4d 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 bc1dc9263..677d8cc4d 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 f68804dc2..d4534787a 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 bc1dc9263..677d8cc4d 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 68d6f63b2..b64053285 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 bc1dc9263..677d8cc4d 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 c0adbc126..044b93b4e 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 bc1dc9263..677d8cc4d 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 da4fcfa3d..8d311348a 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 bc1dc9263..677d8cc4d 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 91c51429a..a9e810585 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 93113ccc2..677d8cc4d 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 646dbf3e8..74aedcdb1 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 bc1dc9263..677d8cc4d 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 5f0117734..e4653d6df 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 603ae32fc..677d8cc4d 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 4aedb2708..b1034eb0f 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 bc1dc9263..677d8cc4d 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 15fa636ec..bc1840cbd 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 bc1dc9263..677d8cc4d 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 bc1dc9263..677d8cc4d 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 8c6e05c45..959828ab6 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 bc1dc9263..677d8cc4d 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 22e0542a3..2f26b236b 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 bc1dc9263..677d8cc4d 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 ac6b173cd..ad5fa8429 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 bc1dc9263..677d8cc4d 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 bb09aa7ba..fa166e93c 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 bc1dc9263..677d8cc4d 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 71dbfc8a8..72bf22bb4 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 bc1dc9263..677d8cc4d 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 2079594f1..993e3d220 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 bc1dc9263..677d8cc4d 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 d181d139d..7d3de3cb5 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 bc1dc9263..677d8cc4d 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 26c5853b4..cf603b296 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 bc1dc9263..677d8cc4d 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 4ce7aae40..4417de295 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 bc1dc9263..677d8cc4d 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 d6844b196..39070662e 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 bc1dc9263..677d8cc4d 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 f0ab5f809..fb2f5e9be 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 bc1dc9263..677d8cc4d 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 75aa0762f..5e11bdb6e 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 bc1dc9263..677d8cc4d 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 708cbe808..4f90dffeb 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 8623163c3..32ca86acb 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 f7e1871ad..1ec62ab86 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 bc1dc9263..677d8cc4d 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 533d6d935..eae706df4 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 bc1dc9263..677d8cc4d 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 f2e94b57d..6f46fa30d 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 bc1dc9263..677d8cc4d 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 6a1142a76..9212b6681 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