5 行
198 B

  1. begin
  2. insert(inttostr((GetX mod 4)+(GetY mod 4)*4),GetURLBase,9);
  3. ResultURL:=GetURLBase+'x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&zoom='+inttostr(GetZ-1)+'&r=764397&type=hybrid&lng=1';
  4. end.