diff --git a/Bing/Bing_Sat.zmp/GetUrlScript.txt b/Bing/Bing_Sat.zmp/GetUrlScript.txt index 156158cb..37252df7 100644 --- a/Bing/Bing_Sat.zmp/GetUrlScript.txt +++ b/Bing/Bing_Sat.zmp/GetUrlScript.txt @@ -1,38 +1,38 @@ -var res:string; - i:byte; - osX,osY,prX,prY:integer; -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