diff --git a/Google/Ghyb.zmp/GetUrlScript.txt b/Google/Ghyb.zmp/GetUrlScript.txt index 8ba53c5b..6be28f2d 100644 --- a/Google/Ghyb.zmp/GetUrlScript.txt +++ b/Google/Ghyb.zmp/GetUrlScript.txt @@ -1,3 +1,6 @@ +var + mt: string; begin - ResultURL:=GetURLBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1, Random(8)); + mt := RegExprReplaceMatchSubStr(GetURLBase, 'mt\.google', 'mt'+inttostr( Random(4) )+'.google' ); + ResultURL := mt+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1, Random(8)); end. \ No newline at end of file diff --git a/Google/Ghyb.zmp/params.txt b/Google/Ghyb.zmp/params.txt index 49804ac6..bec11da9 100644 --- a/Google/Ghyb.zmp/params.txt +++ b/Google/Ghyb.zmp/params.txt @@ -9,7 +9,7 @@ ParentSubMenu=Google ParentSubMenu_en=Google ParentSubMenu_uk=Google NameInCache=Both -DefURLBase=http://mt0.google.com/vt/lyrs=h@159000000&hl=ru +DefURLBase=http://mt.google.com/vt/lyrs=h@169000000&hl=ru ContentType=image/png Ext=.png projection=1 diff --git a/Google/GoogleLand.zmp/GetUrlScript.txt b/Google/GoogleLand.zmp/GetUrlScript.txt index 0d7c576e..666d2fb9 100644 --- a/Google/GoogleLand.zmp/GetUrlScript.txt +++ b/Google/GoogleLand.zmp/GetUrlScript.txt @@ -1,4 +1,7 @@ +var + mt: string; begin if (GetZ < 17) then - ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1, Random(8)); + mt := RegExprReplaceMatchSubStr(GetURLBase, 'mt\.google', 'mt'+inttostr( Random(4) )+'.google' ); + ResultURL := mt+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1, Random(8)); end. \ No newline at end of file diff --git a/Google/GoogleLand.zmp/params.txt b/Google/GoogleLand.zmp/params.txt index 16e91f75..1957b0ba 100644 --- a/Google/GoogleLand.zmp/params.txt +++ b/Google/GoogleLand.zmp/params.txt @@ -8,7 +8,7 @@ ParentSubMenu=Google ParentSubMenu_en=Google ParentSubMenu_uk=Google asLayer=0 -DefURLBase=http://mt.google.com/vt/lyrs=t@127,r@159000000&hl=ru +DefURLBase=http://mt.google.com/vt/lyrs=t@128,r@169000000&hl=ru projection=1 sradiusa=6378137 sradiusb=6378137 diff --git a/Google/GoogleMap.zmp/GetUrlScript.txt b/Google/GoogleMap.zmp/GetUrlScript.txt index f45edba0..6be28f2d 100644 --- a/Google/GoogleMap.zmp/GetUrlScript.txt +++ b/Google/GoogleMap.zmp/GetUrlScript.txt @@ -1,3 +1,6 @@ +var + mt: string; begin - ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1, Random(8)); + mt := RegExprReplaceMatchSubStr(GetURLBase, 'mt\.google', 'mt'+inttostr( Random(4) )+'.google' ); + ResultURL := mt+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1, Random(8)); end. \ No newline at end of file diff --git a/Google/GoogleMap.zmp/params.txt b/Google/GoogleMap.zmp/params.txt index a48a3b7a..100e056f 100644 --- a/Google/GoogleMap.zmp/params.txt +++ b/Google/GoogleMap.zmp/params.txt @@ -8,7 +8,7 @@ ParentSubMenu=Google ParentSubMenu_en=Google ParentSubMenu_uk=Google asLayer=0 -DefURLBase=http://mt0.google.com/vt/lyrs=m@159000000&hl=ru +DefURLBase=http://mt.google.com/vt/lyrs=m@169000000&hl=ru projection=1 sradiusa=6378137 sradiusb=6378137