sasgis
/
maps
2
1
Fork 5
Code Issues 0 Pull Requests 0 Releases 0 Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
960 Commits
1 Branch
46 MiB
 
Tree: 578a182e0d
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '578a182e0d'
${ noResults }
maps/GGC/karta_ggc_all.zmp/GetUrlScript.txt

11 lines
734 B
Raw Blame History 

  1. begin

  2.  if GetZ < 13 then

  3.    ResultURL := GetUrlBase+'2km.png'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'

  4.  else if getz <14 then

  5.    ResultURL := GetUrlBase+'1km.png'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'

  6.  else if getz <15 then

  7.    ResultURL := GetUrlBase+'500m.png'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'

  8.  else

  9.    ResultURL := GetUrlBase+'250m.png'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'

  10. end.