diff --git a/Bing/Bing_Sat_BE_H.zmp/18.bmp b/Bing/Bing_Sat_BE_H.zmp/18.bmp new file mode 100644 index 00000000..b0e87b95 Binary files /dev/null and b/Bing/Bing_Sat_BE_H.zmp/18.bmp differ diff --git a/Bing/Bing_Sat_BE_H.zmp/24.bmp b/Bing/Bing_Sat_BE_H.zmp/24.bmp new file mode 100644 index 00000000..64fc99ce Binary files /dev/null and b/Bing/Bing_Sat_BE_H.zmp/24.bmp differ diff --git a/Bing/Bing_Sat_BE_H.zmp/EmptyTiles/NA.png b/Bing/Bing_Sat_BE_H.zmp/EmptyTiles/NA.png new file mode 100644 index 00000000..fa081a52 Binary files /dev/null and b/Bing/Bing_Sat_BE_H.zmp/EmptyTiles/NA.png differ diff --git a/Bing/Bing_Sat_BE_H.zmp/GetUrlScript.txt b/Bing/Bing_Sat_BE_H.zmp/GetUrlScript.txt new file mode 100644 index 00000000..25d7a684 --- /dev/null +++ b/Bing/Bing_Sat_BE_H.zmp/GetUrlScript.txt @@ -0,0 +1,42 @@ +var res:string; + i:byte; + osX,osY,prX,prY:integer; + processedUrlBase: string; +begin + res:=''; + osX:=round(intpower(2,GetZ-1)) div 2; + osY:=round(intpower(2,GetZ-1)) div 2; + prX:=osX; prY:=osY; + for i:=2 to GetZ do + begin + prX:=prX div 2; + prY:=prY div 2; + if GetX