From 4d49cc7ec30dd22eb056803218e63f53bd0b7bbb Mon Sep 17 00:00:00 2001 From: sasbot <> Date: Sat, 6 Jun 2020 12:00:00 +0000 Subject: [PATCH] update zmp --- .../Bing_Sat.zmp}/18.bmp | Bin .../Bing_Sat.zmp}/24.bmp | Bin .../Bing_Sat.zmp}/EmptyTiles/NA.png | Bin .../Bing_Sat.zmp}/GetUrlScript.txt | 74 +++++++++--------- .../Bing_Sat.zmp}/params.txt | 44 +++++------ .../Bing_Sat_BE_N.zmp}/18.bmp | Bin .../Bing_Sat_BE_N.zmp}/24.bmp | Bin .../Bing_Sat_BE_N.zmp}/EmptyTiles/NA.png | Bin .../Bing_Sat_BE_N.zmp}/GetUrlScript.txt | 74 +++++++++--------- .../Bing_Sat_BE_N.zmp}/params.txt | 52 ++++++------ .../Bing_roads.en.zmp}/18.bmp | Bin .../Bing_roads.en.zmp}/24.bmp | Bin .../Bing_roads.en.zmp}/GetUrlScript.txt | 74 +++++++++--------- .../Bing_roads.en.zmp}/params.txt | 40 +++++----- .../Bing_roads.ru.zmp}/18.bmp | Bin .../Bing_roads.ru.zmp}/24.bmp | Bin .../Bing_roads.ru.zmp}/GetUrlScript.txt | 74 +++++++++--------- .../Bing_roads.ru.zmp}/params.txt | 40 +++++----- 18 files changed, 236 insertions(+), 236 deletions(-) rename {VirtualEarth/VEMap_roads.en.zmp => Bing/Bing_Sat.zmp}/18.bmp (100%) rename {VirtualEarth/VEMap_roads.en.zmp => Bing/Bing_Sat.zmp}/24.bmp (100%) rename {VirtualEarth/VESat-N.zmp => Bing/Bing_Sat.zmp}/EmptyTiles/NA.png (100%) rename {VirtualEarth/VESat.zmp => Bing/Bing_Sat.zmp}/GetUrlScript.txt (96%) rename {VirtualEarth/VESat.zmp => Bing/Bing_Sat.zmp}/params.txt (71%) rename {VirtualEarth/VEMap_roads.ru.zmp => Bing/Bing_Sat_BE_N.zmp}/18.bmp (100%) rename {VirtualEarth/VEMap_roads.ru.zmp => Bing/Bing_Sat_BE_N.zmp}/24.bmp (100%) rename {VirtualEarth/VESat.zmp => Bing/Bing_Sat_BE_N.zmp}/EmptyTiles/NA.png (100%) rename {VirtualEarth/VESat-N.zmp => Bing/Bing_Sat_BE_N.zmp}/GetUrlScript.txt (96%) rename {VirtualEarth/VESat-N.zmp => Bing/Bing_Sat_BE_N.zmp}/params.txt (74%) rename {VirtualEarth/VESat-N.zmp => Bing/Bing_roads.en.zmp}/18.bmp (100%) rename {VirtualEarth/VESat-N.zmp => Bing/Bing_roads.en.zmp}/24.bmp (100%) rename {VirtualEarth/VEMap_roads.en.zmp => Bing/Bing_roads.en.zmp}/GetUrlScript.txt (96%) rename {VirtualEarth/VEMap_roads.en.zmp => Bing/Bing_roads.en.zmp}/params.txt (69%) rename {VirtualEarth/VESat.zmp => Bing/Bing_roads.ru.zmp}/18.bmp (100%) rename {VirtualEarth/VESat.zmp => Bing/Bing_roads.ru.zmp}/24.bmp (100%) rename {VirtualEarth/VEMap_roads.ru.zmp => Bing/Bing_roads.ru.zmp}/GetUrlScript.txt (96%) rename {VirtualEarth/VEMap_roads.ru.zmp => Bing/Bing_roads.ru.zmp}/params.txt (69%) diff --git a/VirtualEarth/VEMap_roads.en.zmp/18.bmp b/Bing/Bing_Sat.zmp/18.bmp similarity index 100% rename from VirtualEarth/VEMap_roads.en.zmp/18.bmp rename to Bing/Bing_Sat.zmp/18.bmp diff --git a/VirtualEarth/VEMap_roads.en.zmp/24.bmp b/Bing/Bing_Sat.zmp/24.bmp similarity index 100% rename from VirtualEarth/VEMap_roads.en.zmp/24.bmp rename to Bing/Bing_Sat.zmp/24.bmp diff --git a/VirtualEarth/VESat-N.zmp/EmptyTiles/NA.png b/Bing/Bing_Sat.zmp/EmptyTiles/NA.png similarity index 100% rename from VirtualEarth/VESat-N.zmp/EmptyTiles/NA.png rename to Bing/Bing_Sat.zmp/EmptyTiles/NA.png diff --git a/VirtualEarth/VESat.zmp/GetUrlScript.txt b/Bing/Bing_Sat.zmp/GetUrlScript.txt similarity index 96% rename from VirtualEarth/VESat.zmp/GetUrlScript.txt rename to Bing/Bing_Sat.zmp/GetUrlScript.txt index 8c4b590d4..156158cbd 100644 --- a/VirtualEarth/VESat.zmp/GetUrlScript.txt +++ b/Bing/Bing_Sat.zmp/GetUrlScript.txt @@ -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. \ No newline at end of file diff --git a/VirtualEarth/VESat.zmp/params.txt b/Bing/Bing_Sat.zmp/params.txt similarity index 71% rename from VirtualEarth/VESat.zmp/params.txt rename to Bing/Bing_Sat.zmp/params.txt index 7c975d6db..9548a4d3f 100644 --- a/VirtualEarth/VESat.zmp/params.txt +++ b/Bing/Bing_Sat.zmp/params.txt @@ -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 \ No newline at end of file +[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 \ No newline at end of file diff --git a/VirtualEarth/VEMap_roads.ru.zmp/18.bmp b/Bing/Bing_Sat_BE_N.zmp/18.bmp similarity index 100% rename from VirtualEarth/VEMap_roads.ru.zmp/18.bmp rename to Bing/Bing_Sat_BE_N.zmp/18.bmp diff --git a/VirtualEarth/VEMap_roads.ru.zmp/24.bmp b/Bing/Bing_Sat_BE_N.zmp/24.bmp similarity index 100% rename from VirtualEarth/VEMap_roads.ru.zmp/24.bmp rename to Bing/Bing_Sat_BE_N.zmp/24.bmp diff --git a/VirtualEarth/VESat.zmp/EmptyTiles/NA.png b/Bing/Bing_Sat_BE_N.zmp/EmptyTiles/NA.png similarity index 100% rename from VirtualEarth/VESat.zmp/EmptyTiles/NA.png rename to Bing/Bing_Sat_BE_N.zmp/EmptyTiles/NA.png diff --git a/VirtualEarth/VESat-N.zmp/GetUrlScript.txt b/Bing/Bing_Sat_BE_N.zmp/GetUrlScript.txt similarity index 96% rename from VirtualEarth/VESat-N.zmp/GetUrlScript.txt rename to Bing/Bing_Sat_BE_N.zmp/GetUrlScript.txt index 97ecfe257..73b715d52 100644 --- a/VirtualEarth/VESat-N.zmp/GetUrlScript.txt +++ b/Bing/Bing_Sat_BE_N.zmp/GetUrlScript.txt @@ -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. \ No newline at end of file diff --git a/VirtualEarth/VESat-N.zmp/params.txt b/Bing/Bing_Sat_BE_N.zmp/params.txt similarity index 74% rename from VirtualEarth/VESat-N.zmp/params.txt rename to Bing/Bing_Sat_BE_N.zmp/params.txt index cbf629534..7d4f2b54e 100644 --- a/VirtualEarth/VESat-N.zmp/params.txt +++ b/Bing/Bing_Sat_BE_N.zmp/params.txt @@ -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 \ No newline at end of file +[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 \ No newline at end of file diff --git a/VirtualEarth/VESat-N.zmp/18.bmp b/Bing/Bing_roads.en.zmp/18.bmp similarity index 100% rename from VirtualEarth/VESat-N.zmp/18.bmp rename to Bing/Bing_roads.en.zmp/18.bmp diff --git a/VirtualEarth/VESat-N.zmp/24.bmp b/Bing/Bing_roads.en.zmp/24.bmp similarity index 100% rename from VirtualEarth/VESat-N.zmp/24.bmp rename to Bing/Bing_roads.en.zmp/24.bmp diff --git a/VirtualEarth/VEMap_roads.en.zmp/GetUrlScript.txt b/Bing/Bing_roads.en.zmp/GetUrlScript.txt similarity index 96% rename from VirtualEarth/VEMap_roads.en.zmp/GetUrlScript.txt rename to Bing/Bing_roads.en.zmp/GetUrlScript.txt index a429ad249..240e88198 100644 --- a/VirtualEarth/VEMap_roads.en.zmp/GetUrlScript.txt +++ b/Bing/Bing_roads.en.zmp/GetUrlScript.txt @@ -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. \ No newline at end of file diff --git a/VirtualEarth/VEMap_roads.en.zmp/params.txt b/Bing/Bing_roads.en.zmp/params.txt similarity index 69% rename from VirtualEarth/VEMap_roads.en.zmp/params.txt rename to Bing/Bing_roads.en.zmp/params.txt index fbf1d6eb0..0fe026fba 100644 --- a/VirtualEarth/VEMap_roads.en.zmp/params.txt +++ b/Bing/Bing_roads.en.zmp/params.txt @@ -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 \ No newline at end of file diff --git a/VirtualEarth/VESat.zmp/18.bmp b/Bing/Bing_roads.ru.zmp/18.bmp similarity index 100% rename from VirtualEarth/VESat.zmp/18.bmp rename to Bing/Bing_roads.ru.zmp/18.bmp diff --git a/VirtualEarth/VESat.zmp/24.bmp b/Bing/Bing_roads.ru.zmp/24.bmp similarity index 100% rename from VirtualEarth/VESat.zmp/24.bmp rename to Bing/Bing_roads.ru.zmp/24.bmp diff --git a/VirtualEarth/VEMap_roads.ru.zmp/GetUrlScript.txt b/Bing/Bing_roads.ru.zmp/GetUrlScript.txt similarity index 96% rename from VirtualEarth/VEMap_roads.ru.zmp/GetUrlScript.txt rename to Bing/Bing_roads.ru.zmp/GetUrlScript.txt index 0b3037ebf..d68bc5e5b 100644 --- a/VirtualEarth/VEMap_roads.ru.zmp/GetUrlScript.txt +++ b/Bing/Bing_roads.ru.zmp/GetUrlScript.txt @@ -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. \ No newline at end of file diff --git a/VirtualEarth/VEMap_roads.ru.zmp/params.txt b/Bing/Bing_roads.ru.zmp/params.txt similarity index 69% rename from VirtualEarth/VEMap_roads.ru.zmp/params.txt rename to Bing/Bing_roads.ru.zmp/params.txt index 7805511a2..25edb7105 100644 --- a/VirtualEarth/VEMap_roads.ru.zmp/params.txt +++ b/Bing/Bing_roads.ru.zmp/params.txt @@ -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 \ No newline at end of file