sasgis
/
maps
2
0
Fork 4
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.
181 Commits
1 Branch
15 MiB
 
Tree: fc32449f60
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'fc32449f60'
${ noResults }
maps/_Ukraine/odessa.ua.zmp/GetUrlScript.txt

18 lines
461 B
Raw Blame History 

  1. var

  2. sh_x:array[0..24] of integer;

  3. sh_y:array[0..24] of integer;

  4. 

  5. begin

  6. sh_x[0]:=301; sh_y[0]:=589;

  7. sh_x[1]:=301; sh_y[1]:=589;

  8. sh_x[2]:=301; sh_y[2]:=589;

  9. sh_x[3]:=301; sh_y[3]:=589;

  10. sh_x[4]:=0; sh_y[4]:=0;

  11. sh_x[5]:=0; sh_y[5]:=0;

  12. sh_x[6]:=0; sh_y[6]:=0;

  13. sh_x[7]:=0; sh_y[7]:=0;

  14. sh_x[8]:=0; sh_y[8]:=0;

  15. sh_x[9]:=0; sh_y[9]:=0;

  16. 

  17.  ResultURL:=GetUrlBase+'/'+inttostr(Getz-3)+'/'+inttostr(GetY+sh_y[getz])+'/'+inttostr(GetX+sh_x[getz])+'.png';

  18. end.