| @@ -1,38 +1,38 @@ | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'.jpeg?g='+version; | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'.jpeg?g='+version; | |||
| end. | |||
| @@ -1,22 +1,22 @@ | |||
| [PARAMS] | |||
| pnum=10 | |||
| GUID={9A360A54-7A70-402D-8A11-D570BD759B5B} | |||
| name=Bing maps - ñïóòíèê | |||
| name_en=Bing maps - satellite | |||
| name_uk=Bing maps - ñóïóòíèê | |||
| ParentSubMenu=Bing (Virtual Earth) | |||
| ParentSubMenu_en=Bing (Virtual Earth) | |||
| ParentSubMenu_uk=Bing (Virtual Earth) | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.t0.tiles.virtualearth.net/tiles/a | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=vesat | |||
| separator=0 | |||
| Ext=.jpg | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=86 | |||
| ContentType=image/jpeg; image/png | |||
| version=1135 | |||
| [PARAMS] | |||
| pnum=10 | |||
| GUID={9A360A54-7A70-402D-8A11-D570BD759B5B} | |||
| name=Bing maps - ñïóòíèê | |||
| name_en=Bing maps - satellite | |||
| name_uk=Bing maps - ñóïóòíèê | |||
| ParentSubMenu=Bing | |||
| ParentSubMenu_en=Bing | |||
| ParentSubMenu_uk=Bing | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.t0.tiles.virtualearth.net/tiles/a | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=vesat | |||
| separator=0 | |||
| Ext=.jpg | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=86 | |||
| ContentType=image/jpeg; image/png | |||
| version=0 | |||
| @@ -1,38 +1,38 @@ | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'.jpeg?g='+version+'&dir=dir_n'; | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'.jpeg?g='+version+'&dir=dir_n'; | |||
| end. | |||
| @@ -1,26 +1,26 @@ | |||
| [PARAMS] | |||
| pnum=11 | |||
| GUID={9A360A5D-7A70-402D-8A11-D670BD739B7B} | |||
| name=Bing Maps - Bird's Eye N | |||
| name_en=Bing Maps - Bird's Eye N | |||
| name_uk=Bing Maps - Bird's Eye N | |||
| ParentSubMenu=Bing (Virtual Earth) | |||
| ParentSubMenu_en=Bing (Virtual Earth) | |||
| ParentSubMenu_uk=Bing (Virtual Earth) | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.t3.tiles.virtualearth.net/tiles/svi | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=vesatbird_N | |||
| separator=0 | |||
| Ext=.jpg | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=86 | |||
| ContentType=image/jpeg; image/png | |||
| TILERLEFT=0 | |||
| TILERRIGHT=256 | |||
| TILERTOP=0 | |||
| TILERBOTTOM=180 | |||
| Version=1126 | |||
| [PARAMS] | |||
| pnum=11 | |||
| GUID={9A360A5D-7A70-402D-8A11-D670BD739B7B} | |||
| name=Bing Maps - Bird's Eye N | |||
| name_en=Bing Maps - Bird's Eye N | |||
| name_uk=Bing Maps - Bird's Eye N | |||
| ParentSubMenu=Bing | |||
| ParentSubMenu_en=Bing | |||
| ParentSubMenu_uk=Bing | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.t3.tiles.virtualearth.net/tiles/svi | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=vesatbird_N | |||
| separator=0 | |||
| Ext=.jpg | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=86 | |||
| ContentType=image/jpeg; image/png | |||
| TILERLEFT=0 | |||
| TILERRIGHT=256 | |||
| TILERTOP=0 | |||
| TILERBOTTOM=180 | |||
| Version=0 | |||
| @@ -1,38 +1,38 @@ | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'?mkt=en-us&it=G,VE,BX,L,LA&shading=hill'; | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'?mkt=en-us&it=G,VE,BX,L,LA&shading=hill'; | |||
| end. | |||
| @@ -1,21 +1,21 @@ | |||
| [PARAMS] | |||
| pnum=8 | |||
| GUID={36cfd00c-ad02-4d3a-bd3e-acf4075115fe} | |||
| name=Bing Maps - äîðîãè (en) | |||
| name_en=Bing Maps - roads (en) | |||
| name_uk=Bing Maps - äîðîãè (en) | |||
| ParentSubMenu=Bing (Virtual Earth) | |||
| ParentSubMenu_en=Bing (Virtual Earth) | |||
| ParentSubMenu_uk=Bing (Virtual Earth) | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.dynamic.t0.tiles.virtualearth.net/comp/CompositionHandler/ | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=bing_roads_en | |||
| separator=0 | |||
| Ext=.png | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=16470 | |||
| [PARAMS] | |||
| pnum=8 | |||
| GUID={36cfd00c-ad02-4d3a-bd3e-acf4075115fe} | |||
| name=Bing Maps - äîðîãè (en) | |||
| name_en=Bing Maps - roads (en) | |||
| name_uk=Bing Maps - äîðîãè (en) | |||
| ParentSubMenu=Bing | |||
| ParentSubMenu_en=Bing | |||
| ParentSubMenu_uk=Bing | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.dynamic.t0.tiles.virtualearth.net/comp/CompositionHandler/ | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=bing_roads_en | |||
| separator=0 | |||
| Ext=.png | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=16470 | |||
| ContentType=image/jpeg;image/png | |||
| @@ -1,38 +1,38 @@ | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'?mkt=ru-ru&it=G,VE,BX,L,LA&shading=hill'; | |||
| var res:string; | |||
| i:byte; | |||
| osX,osY,prX,prY:integer; | |||
| begin | |||
| res:=''; | |||
| osX:=round(intpower(2,GetZ-1)) div 2; | |||
| osY:=round(intpower(2,GetZ-1)) div 2; | |||
| prX:=osX; prY:=osY; | |||
| for i:=2 to GetZ do | |||
| begin | |||
| prX:=prX div 2; | |||
| prY:=prY div 2; | |||
| if GetX<osX | |||
| then begin | |||
| osX:=osX-prX; | |||
| if GetY<osY then begin | |||
| osY:=osY-prY; | |||
| res:=res+'0'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'2'; | |||
| end; | |||
| end | |||
| else begin | |||
| osX:=osX+prX; | |||
| if Gety<osy then begin | |||
| osY:=osY-prY; | |||
| res:=res+'1'; | |||
| end | |||
| else begin | |||
| osY:=osY+prY; | |||
| res:=res+'3'; | |||
| end; | |||
| end; | |||
| end; | |||
| ResultURL:=GetURLBase+res+'?mkt=ru-ru&it=G,VE,BX,L,LA&shading=hill'; | |||
| end. | |||
| @@ -1,21 +1,21 @@ | |||
| [PARAMS] | |||
| pnum=9 | |||
| GUID={11772221-1ec8-42ca-bc48-8f6e1d9f6cfc} | |||
| name=Bing Maps - äîðîãè (ru) | |||
| name_en=Bing Maps - roads (ru) | |||
| name_uk=Bing Maps - äîðîãè (ru) | |||
| ParentSubMenu=Bing (Virtual Earth) | |||
| ParentSubMenu_en=Bing (Virtual Earth) | |||
| ParentSubMenu_uk=Bing (Virtual Earth) | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.dynamic.t0.tiles.virtualearth.net/comp/CompositionHandler/ | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=bing_roads_ru | |||
| separator=0 | |||
| Ext=.png | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=16470 | |||
| [PARAMS] | |||
| pnum=9 | |||
| GUID={11772221-1ec8-42ca-bc48-8f6e1d9f6cfc} | |||
| name=Bing Maps - äîðîãè (ru) | |||
| name_en=Bing Maps - roads (ru) | |||
| name_uk=Bing Maps - äîðîãè (ru) | |||
| ParentSubMenu=Bing | |||
| ParentSubMenu_en=Bing | |||
| ParentSubMenu_uk=Bing | |||
| asLayer=0 | |||
| DefURLBase=http://ecn.dynamic.t0.tiles.virtualearth.net/comp/CompositionHandler/ | |||
| projection=1 | |||
| sradiusa=6378137 | |||
| sradiusb=6378137 | |||
| NameInCache=bing_roads_ru | |||
| separator=0 | |||
| Ext=.png | |||
| UseDwn=1 | |||
| Sleep=0 | |||
| DefHotKey=16470 | |||
| ContentType=image/jpeg;image/png | |||