update zmp

master
sasbot 2020-06-06 12:00:00 +00:00
parent 09952e502b
commit 6a28185c80
30 changed files with 30 additions and 30 deletions
_Genshtab
gsh_500m_new.zmp
karta_ggc_500m.zmp
_Other/geologmap.zmp
_historic
1902_kuban.zmp
1918_kuban_10v.zmp
1925_maykop.zmp
1930_kuban.zmp
1942_osteuropa.zmp
1v_krim.zmp
5v_kavk_1877.zmp
Strelb10_1882.zmp
Strelb10_1919.zmp
eng_5v_kavkaz.zmp
kuban_1v.zmp
rkka_kavkaz.zmp
wwII-ug.zmp
_tourism
TyanShan
TyanShan.zmp
tyan_shan.zmp
cencaumap.zmp
ergaki_aradan.zmp
fgup_sk_agp/fgu_sk_agp_all.zmp
gosgeodesia/tourism1991.zmp
hrebtovka_elbrus.zmp
kazbegi.zmp
slazav.map_hr.zmp
westcaumap.zmp
wkavkaz_kot.zmp
_water/river_kuban.zmp

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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