From eed379105d7551ee14d25367b68efd8a8edba6e8 Mon Sep 17 00:00:00 2001
From: sasbot <>
Date: Sat, 6 Jun 2020 12:00:00 +0000
Subject: [PATCH 1/3] update zmp

---
 mail.ru/MailMap.zmp/GetUrlScript.txt | 5 ++++-
 mail.ru/MailMap.zmp/params.txt       | 2 +-
 mail.ru/MailSat.zmp/GetUrlScript.txt | 5 ++++-
 mail.ru/MailSat.zmp/params.txt       | 2 +-
 4 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/mail.ru/MailMap.zmp/GetUrlScript.txt b/mail.ru/MailMap.zmp/GetUrlScript.txt
index 630fc28d..c76f523d 100644
--- a/mail.ru/MailMap.zmp/GetUrlScript.txt
+++ b/mail.ru/MailMap.zmp/GetUrlScript.txt
@@ -1,3 +1,6 @@
+var
+  tt: string;
 begin 
- ResultURL:=GetURLBase+'&x='+inttostr(GetX-((round(intpower(2,GetZ-1))div 2)))+'&y='+inttostr(((round(intpower(2,GetZ-1))div 2)-1)-GetY)+'&z='+inttostr(GetZ-1);
+ tt := RegExprReplaceMatchSubStr(GetURLBase, 't\.maps', 't'+inttostr( Random(4) )+'maps' );
+ ResultURL := tt + inttostr(Getz-1)+'/'+inttostr(GetY)+'/'+inttostr(GetX)+'.png';
 end.
\ No newline at end of file
diff --git a/mail.ru/MailMap.zmp/params.txt b/mail.ru/MailMap.zmp/params.txt
index 8636422e..4aff959c 100644
--- a/mail.ru/MailMap.zmp/params.txt
+++ b/mail.ru/MailMap.zmp/params.txt
@@ -6,7 +6,7 @@ name=
 name_en=Map (Maps@mail)
 name_uk=Карта (Карты@Mail.Ru)
 NameInCache=mailmap
-DefURLBase=http://t2.maps.mail.ru/TileSender.aspx?ModeKey=tiles&t=maps
+DefURLBase=http://t.maps.mail.ru/tiles/scheme/
 ContentType=image/png
 ParentSubMenu=mail.ru
 ParentSubMenu_en=mail.ru
diff --git a/mail.ru/MailSat.zmp/GetUrlScript.txt b/mail.ru/MailSat.zmp/GetUrlScript.txt
index 630fc28d..c6469acb 100644
--- a/mail.ru/MailSat.zmp/GetUrlScript.txt
+++ b/mail.ru/MailSat.zmp/GetUrlScript.txt
@@ -1,3 +1,6 @@
+var
+  tt: string;
 begin 
- ResultURL:=GetURLBase+'&x='+inttostr(GetX-((round(intpower(2,GetZ-1))div 2)))+'&y='+inttostr(((round(intpower(2,GetZ-1))div 2)-1)-GetY)+'&z='+inttostr(GetZ-1);
+ tt := RegExprReplaceMatchSubStr(GetURLBase, 't\.maps', 't'+inttostr( Random(4) )+'maps' );
+ ResultURL:=tt+'&z='+inttostr(GetZ-1)+'&x='+inttostr(GetX-((round(intpower(2,GetZ-1))div 2)))+'&y='+inttostr(((round(intpower(2,GetZ-1))div 2)-1)-GetY);
 end.
\ No newline at end of file
diff --git a/mail.ru/MailSat.zmp/params.txt b/mail.ru/MailSat.zmp/params.txt
index b029657a..a747cf66 100644
--- a/mail.ru/MailSat.zmp/params.txt
+++ b/mail.ru/MailSat.zmp/params.txt
@@ -6,7 +6,7 @@ name=
 name_en=Satellite (Maps@mail)
 name_uk=Супутник (Карты@Mail.Ru)
 NameInCache=mailsat
-DefURLBase=http://t1.maps.mail.ru/TileSender.aspx?ModeKey=tiles&t=Images
+DefURLBase=http://t.maps.mail.ru/TileSender.aspx?ModeKey=tiles&t=Images
 ContentType=image/jpeg
 ParentSubMenu=mail.ru
 ParentSubMenu_en=mail.ru

From abe0dee8cff7c8b1b39427017b1f970913f5a6c8 Mon Sep 17 00:00:00 2001
From: sasbot <>
Date: Sat, 6 Jun 2020 12:00:00 +0000
Subject: [PATCH 2/3] update zmp

---
 mail.ru/MailMap.zmp/params.txt | 2 +-
 mail.ru/MailSat.zmp/params.txt | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/mail.ru/MailMap.zmp/params.txt b/mail.ru/MailMap.zmp/params.txt
index 4aff959c..810a9297 100644
--- a/mail.ru/MailMap.zmp/params.txt
+++ b/mail.ru/MailMap.zmp/params.txt
@@ -12,7 +12,7 @@ ParentSubMenu=mail.ru
 ParentSubMenu_en=mail.ru
 ParentSubMenu_uk=mail.ru
 Ext=.png
-projection=2
+projection=1
 sradiusa=6378137
 sradiusb=6356752
 separator=0
diff --git a/mail.ru/MailSat.zmp/params.txt b/mail.ru/MailSat.zmp/params.txt
index a747cf66..1c0c7124 100644
--- a/mail.ru/MailSat.zmp/params.txt
+++ b/mail.ru/MailSat.zmp/params.txt
@@ -12,7 +12,7 @@ ParentSubMenu=mail.ru
 ParentSubMenu_en=mail.ru
 ParentSubMenu_uk=mail.ru
 Ext=.jpg
-projection=2
+projection=1
 sradiusa=6378137
 sradiusb=6356752
 separator=0

From 86e4aa0b70cf055f902d691f2d5d316822d5f047 Mon Sep 17 00:00:00 2001
From: sasbot <>
Date: Sat, 6 Jun 2020 12:00:00 +0000
Subject: [PATCH 3/3] update zmp

---
 mail.ru/MailMap.zmp/params.txt | 2 +-
 mail.ru/MailSat.zmp/params.txt | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/mail.ru/MailMap.zmp/params.txt b/mail.ru/MailMap.zmp/params.txt
index 810a9297..88b4b46e 100644
--- a/mail.ru/MailMap.zmp/params.txt
+++ b/mail.ru/MailMap.zmp/params.txt
@@ -5,7 +5,7 @@ asLayer=0
 name=Карта (Карты@mail)
 name_en=Map (Maps@mail)
 name_uk=Карта (Карты@Mail.Ru)
-NameInCache=mailmap
+NameInCache=mail_map
 DefURLBase=http://t.maps.mail.ru/tiles/scheme/
 ContentType=image/png
 ParentSubMenu=mail.ru
diff --git a/mail.ru/MailSat.zmp/params.txt b/mail.ru/MailSat.zmp/params.txt
index 1c0c7124..db914fbe 100644
--- a/mail.ru/MailSat.zmp/params.txt
+++ b/mail.ru/MailSat.zmp/params.txt
@@ -5,7 +5,7 @@ asLayer=0
 name=Спутник (Карты@mail)
 name_en=Satellite (Maps@mail)
 name_uk=Супутник (Карты@Mail.Ru)
-NameInCache=mailsat
+NameInCache=mail_sat
 DefURLBase=http://t.maps.mail.ru/TileSender.aspx?ModeKey=tiles&t=Images
 ContentType=image/jpeg
 ParentSubMenu=mail.ru