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

---
 Google/GoogleSat.zmp/GetUrlScript.txt | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/Google/GoogleSat.zmp/GetUrlScript.txt b/Google/GoogleSat.zmp/GetUrlScript.txt
index 7ab83464..7943703a 100644
--- a/Google/GoogleSat.zmp/GetUrlScript.txt
+++ b/Google/GoogleSat.zmp/GetUrlScript.txt
@@ -1,3 +1,6 @@
-begin
- ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1, Random(8));
+var
+  khm: string;
+begin 
+ khm := RegExprReplaceMatchSubStr(GetURLBase, 'khm\.google', 'khm'+inttostr( Random(4) )+'.google' );
+ ResultURL := khm + '&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1, Random(8));
 end.