From c5d58904d26d92cdcf8807150c09267c0cb553ac Mon Sep 17 00:00:00 2001
From: sasgis <>
Date: Sat, 12 Dec 1970 12:00:00 +0000
Subject: [PATCH] update zmp

---
 Google/Ghyb.zmp/GetUrlScript.txt       | 2 +-
 Google/GoogleLand.zmp/GetUrlScript.txt | 2 +-
 Google/GoogleMap.zmp/GetUrlScript.txt  | 2 +-
 Google/GoogleSat.zmp/GetUrlScript.txt  | 5 ++---
 4 files changed, 5 insertions(+), 6 deletions(-)

diff --git a/Google/Ghyb.zmp/GetUrlScript.txt b/Google/Ghyb.zmp/GetUrlScript.txt
index d4d85e3c..8ba53c5b 100644
--- a/Google/Ghyb.zmp/GetUrlScript.txt
+++ b/Google/Ghyb.zmp/GetUrlScript.txt
@@ -1,3 +1,3 @@
 begin 
- ResultURL:=GetURLBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
+ ResultURL:=GetURLBase+'&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/GoogleLand.zmp/GetUrlScript.txt b/Google/GoogleLand.zmp/GetUrlScript.txt
index 2e3325c9..6a4da1ef 100644
--- a/Google/GoogleLand.zmp/GetUrlScript.txt
+++ b/Google/GoogleLand.zmp/GetUrlScript.txt
@@ -1,3 +1,3 @@
 begin 
- ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
+ ResultURL:=GetUrlBase+'&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/GoogleMap.zmp/GetUrlScript.txt b/Google/GoogleMap.zmp/GetUrlScript.txt
index b1cd7f9c..f45edba0 100644
--- a/Google/GoogleMap.zmp/GetUrlScript.txt
+++ b/Google/GoogleMap.zmp/GetUrlScript.txt
@@ -1,3 +1,3 @@
 begin 
- ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(18-GetZ)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
+ ResultURL:=GetUrlBase+'&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/GoogleSat.zmp/GetUrlScript.txt b/Google/GoogleSat.zmp/GetUrlScript.txt
index 022542d5..7ab83464 100644
--- a/Google/GoogleSat.zmp/GetUrlScript.txt
+++ b/Google/GoogleSat.zmp/GetUrlScript.txt
@@ -1,4 +1,3 @@
 begin
- //GetUrlBase[11]:=inttostr((GetX+GetY) mod 4)[1];
- ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1,(GetX*3+GetY)mod 8);
-end.
\ No newline at end of file
+ ResultURL:=GetUrlBase+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ-1)+'&s='+copy('Galileo',1, Random(8));
+end.