Так что, я думаю, можно не заморачиваться и удалить все эти смещения.
Я изменил скрипт таким образом (это не окончательный ваиант):
- Код: Выделить всё
function addzero2(i:integer):string;
var rs:string;
begin
rs:=inttostr(i);
while length(rs)<2 do rs:='0'+rs;
result:=rs;
end;
begin
ResultURL:=GetUrlBase+'L'+addzero2(GetZ-7)+'/R'+ansilowercase(inttohex(GetY,8))+'/C'+ansilowercase(inttohex(GetX,8))+'.jpg';
end.
Всё работает, одна проблема: как найти Вильнюс?
Надо, нажать кнопку Goto, выбрать координаты, тайловые, и ввести цифры, которые видно на скриншоте:
x=1684, y=1162, z=14 (я их посчитал из адреса тайла - перевёл просто из hex в dec).
На зумах с 12 по 15 это работает, а на других зумах Вильнюс куда-то убежал, надо искать.
Когда найдёте, при желании можно в скрипт добавить смещения, разные для разных зумов, поэтому удобно использовать array.