GetUrlScript.txt 185 B

pirms 4 gadiem
12345678
  1. var
  2. InvertedY: integer;
  3. begin
  4. InvertedY := round(intpower(2,GetZ-1)) - 1 - GetY;
  5. ResultURL:=GetURLBase+'/'+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(InvertedY);
  6. end.