From 8ffa5ba274a293d7caacd23cb533f23640c668d2 Mon Sep 17 00:00:00 2001 From: sasbot <> Date: Sat, 6 Jun 2020 12:00:00 +0000 Subject: [PATCH] update zmp --- _Coverage/Megafon/megafon.2g.zmp/18.bmp | Bin 0 -> 1438 bytes _Coverage/Megafon/megafon.2g.zmp/24.bmp | Bin 0 -> 1654 bytes _Coverage/Megafon/megafon.2g.zmp/params.txt | 4 +- _Coverage/Megafon/megafon.3g.zmp/18.bmp | Bin 0 -> 1438 bytes _Coverage/Megafon/megafon.3g.zmp/24.bmp | Bin 0 -> 1654 bytes _Coverage/Megafon/megafon.3g.zmp/params.txt | 4 +- _Coverage/Megafon/megafon.4g100.zmp/18.bmp | Bin 0 -> 1438 bytes _Coverage/Megafon/megafon.4g100.zmp/24.bmp | Bin 0 -> 1654 bytes .../Megafon/megafon.4g100.zmp/params.txt | 4 +- _Coverage/Megafon/megafon.4g300.zmp/18.bmp | Bin 0 -> 1438 bytes _Coverage/Megafon/megafon.4g300.zmp/24.bmp | Bin 0 -> 1654 bytes .../Megafon/megafon.4g300.zmp/params.txt | 4 +- _Coverage/Mts/mts.2g.zmp/18.bmp | Bin 0 -> 1064 bytes _Coverage/Mts/mts.2g.zmp/24.bmp | Bin 0 -> 1784 bytes _Coverage/Mts/mts.2g.zmp/params.txt | 4 +- _Coverage/Mts/mts.3g.zmp/18.bmp | Bin 0 -> 1064 bytes _Coverage/Mts/mts.3g.zmp/24.bmp | Bin 0 -> 1784 bytes _Coverage/Mts/mts.3g.zmp/params.txt | 4 +- _Coverage/Mts/mts.4g.zmp/18.bmp | Bin 0 -> 1064 bytes _Coverage/Mts/mts.4g.zmp/24.bmp | Bin 0 -> 1784 bytes _Coverage/Mts/mts.4g.zmp/params.txt | 4 +- _Coverage/Mts/mts.4g_plan.zmp/18.bmp | Bin 0 -> 1064 bytes _Coverage/Mts/mts.4g_plan.zmp/24.bmp | Bin 0 -> 1784 bytes _Coverage/Mts/mts.4g_plan.zmp/params.txt | 4 +- .../params.txt | 2 +- {mapbox => anygis/Mapbox_Sat.zmp}/18.bmp | Bin {mapbox => anygis/Mapbox_Sat.zmp}/24.bmp | Bin anygis/Mapbox_Sat.zmp/info.txt | 9 + anygis/Mapbox_Sat.zmp/params.txt | 17 ++ anygis/Maxar_via_Facebook.zmp/18.bmp | Bin 0 -> 1062 bytes anygis/Maxar_via_Facebook.zmp/24.bmp | Bin 0 -> 1782 bytes anygis/Maxar_via_Facebook.zmp/info.txt | 9 + anygis/Maxar_via_Facebook.zmp/params.txt | 17 ++ anygis/OpenTopoMapRU.zmp/18.bmp | Bin 0 -> 1064 bytes anygis/OpenTopoMapRU.zmp/24.bmp | Bin 0 -> 1784 bytes anygis/OpenTopoMapRU.zmp/info.txt | 9 + anygis/OpenTopoMapRU.zmp/params.txt | 18 ++ anygis/RusOurdoor.zmp/18.bmp | Bin 0 -> 1062 bytes anygis/RusOurdoor.zmp/24.bmp | Bin 0 -> 1782 bytes anygis/RusOurdoor.zmp/info.txt | 9 + anygis/RusOurdoor.zmp/params.txt | 17 ++ anygis/RusOurdoor_lite.zmp/18.bmp | Bin 0 -> 1062 bytes anygis/RusOurdoor_lite.zmp/24.bmp | Bin 0 -> 1782 bytes anygis/RusOurdoor_lite.zmp/info.txt | 9 + anygis/RusOurdoor_lite.zmp/params.txt | 17 ++ anygis/Tracks_Strava_All.zmp/GetUrlScript.txt | 216 ------------------ anygis/Tracks_Strava_All.zmp/info.txt | 2 + anygis/Tracks_Strava_All.zmp/params.txt | 6 +- .../Tracks_Strava_Ride.zmp/GetUrlScript.txt | 216 ------------------ anygis/Tracks_Strava_Ride.zmp/info.txt | 2 + anygis/Tracks_Strava_Ride.zmp/params.txt | 6 +- anygis/Tracks_Strava_Run.zmp/GetUrlScript.txt | 216 ------------------ anygis/Tracks_Strava_Run.zmp/info.txt | 2 + anygis/Tracks_Strava_Run.zmp/params.txt | 6 +- .../GetUrlScript.txt | 216 ------------------ anygis/Tracks_Strava_RunAndRide.zmp/info.txt | 2 + .../Tracks_Strava_RunAndRide.zmp/params.txt | 6 +- .../Tracks_Strava_Water.zmp/GetUrlScript.txt | 216 ------------------ anygis/Tracks_Strava_Water.zmp/info.txt | 2 + anygis/Tracks_Strava_Water.zmp/params.txt | 6 +- .../Tracks_Strava_Winter.zmp/GetUrlScript.txt | 216 ------------------ anygis/Tracks_Strava_Winter.zmp/info.txt | 2 + anygis/Tracks_Strava_Winter.zmp/params.txt | 6 +- mapbox/mapbox_sat.zmp/18.bmp | Bin 1062 -> 0 bytes mapbox/mapbox_sat.zmp/24.bmp | Bin 1782 -> 0 bytes mapbox/mapbox_sat.zmp/GetUrlScript.txt | 6 - mapbox/mapbox_sat.zmp/params.txt | 15 -- mapbox/osm_mapbox_mapnik_layer.zmp/18.bmp | Bin 1062 -> 0 bytes mapbox/osm_mapbox_mapnik_layer.zmp/24.bmp | Bin 1782 -> 0 bytes .../GetUrlScript.txt | 7 - mapbox/osm_mapbox_mapnik_layer.zmp/info.txt | 7 - mapbox/osm_mapbox_mapnik_layer.zmp/params.txt | 20 -- 72 files changed, 172 insertions(+), 1392 deletions(-) create mode 100644 _Coverage/Megafon/megafon.2g.zmp/18.bmp create mode 100644 _Coverage/Megafon/megafon.2g.zmp/24.bmp create mode 100644 _Coverage/Megafon/megafon.3g.zmp/18.bmp create mode 100644 _Coverage/Megafon/megafon.3g.zmp/24.bmp create mode 100644 _Coverage/Megafon/megafon.4g100.zmp/18.bmp create mode 100644 _Coverage/Megafon/megafon.4g100.zmp/24.bmp create mode 100644 _Coverage/Megafon/megafon.4g300.zmp/18.bmp create mode 100644 _Coverage/Megafon/megafon.4g300.zmp/24.bmp create mode 100644 _Coverage/Mts/mts.2g.zmp/18.bmp create mode 100644 _Coverage/Mts/mts.2g.zmp/24.bmp create mode 100644 _Coverage/Mts/mts.3g.zmp/18.bmp create mode 100644 _Coverage/Mts/mts.3g.zmp/24.bmp create mode 100644 _Coverage/Mts/mts.4g.zmp/18.bmp create mode 100644 _Coverage/Mts/mts.4g.zmp/24.bmp create mode 100644 _Coverage/Mts/mts.4g_plan.zmp/18.bmp create mode 100644 _Coverage/Mts/mts.4g_plan.zmp/24.bmp rename {mapbox => anygis/Mapbox_Sat.zmp}/18.bmp (100%) rename {mapbox => anygis/Mapbox_Sat.zmp}/24.bmp (100%) create mode 100644 anygis/Mapbox_Sat.zmp/info.txt create mode 100644 anygis/Mapbox_Sat.zmp/params.txt create mode 100644 anygis/Maxar_via_Facebook.zmp/18.bmp create mode 100644 anygis/Maxar_via_Facebook.zmp/24.bmp create mode 100644 anygis/Maxar_via_Facebook.zmp/info.txt create mode 100644 anygis/Maxar_via_Facebook.zmp/params.txt create mode 100644 anygis/OpenTopoMapRU.zmp/18.bmp create mode 100644 anygis/OpenTopoMapRU.zmp/24.bmp create mode 100644 anygis/OpenTopoMapRU.zmp/info.txt create mode 100644 anygis/OpenTopoMapRU.zmp/params.txt create mode 100644 anygis/RusOurdoor.zmp/18.bmp create mode 100644 anygis/RusOurdoor.zmp/24.bmp create mode 100644 anygis/RusOurdoor.zmp/info.txt create mode 100644 anygis/RusOurdoor.zmp/params.txt create mode 100644 anygis/RusOurdoor_lite.zmp/18.bmp create mode 100644 anygis/RusOurdoor_lite.zmp/24.bmp create mode 100644 anygis/RusOurdoor_lite.zmp/info.txt create mode 100644 anygis/RusOurdoor_lite.zmp/params.txt delete mode 100755 anygis/Tracks_Strava_All.zmp/GetUrlScript.txt delete mode 100755 anygis/Tracks_Strava_Ride.zmp/GetUrlScript.txt delete mode 100755 anygis/Tracks_Strava_Run.zmp/GetUrlScript.txt delete mode 100755 anygis/Tracks_Strava_RunAndRide.zmp/GetUrlScript.txt delete mode 100755 anygis/Tracks_Strava_Water.zmp/GetUrlScript.txt delete mode 100755 anygis/Tracks_Strava_Winter.zmp/GetUrlScript.txt delete mode 100644 mapbox/mapbox_sat.zmp/18.bmp delete mode 100644 mapbox/mapbox_sat.zmp/24.bmp delete mode 100644 mapbox/mapbox_sat.zmp/GetUrlScript.txt delete mode 100644 mapbox/mapbox_sat.zmp/params.txt delete mode 100644 mapbox/osm_mapbox_mapnik_layer.zmp/18.bmp delete mode 100644 mapbox/osm_mapbox_mapnik_layer.zmp/24.bmp delete mode 100644 mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt delete mode 100644 mapbox/osm_mapbox_mapnik_layer.zmp/info.txt delete mode 100644 mapbox/osm_mapbox_mapnik_layer.zmp/params.txt diff --git a/_Coverage/Megafon/megafon.2g.zmp/18.bmp b/_Coverage/Megafon/megafon.2g.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..bd4ec3e3f650698dc8f0d4adabc88f77d15a2f26 GIT binary patch literal 1438 zcmXw&2~^E#6u^IxeQa4GyU-%_qViI!u zIg^;m-m%RgRHDXKw#oconS0JX-~E2)-tR8wehzNg?Pw7jT`(3by&tMW#}*!@1BT|U ziePKCgK(^TaDiX*@(?Fmv(#h)!#w)%si}#IQ=bIIG1&UWWTq}s}noRQ=0VXR*NE zk+*g4IHx&HvF0)dA6>z$*I=Tv!b$X+&l)o~s=j|jl5S6w$$0LRl`-0HC@ycFlsOblIzlXpCagc&m4)V*eOh9f6a_pmQO z#e<8bgbWm6Q|QaWzj8Tzx`3Do(=d{m<4_cb%YIiX@7<;B#&x7yBz$lD%nVI3lRNZg zO@1sdUOZ<|yB>HBHzAL}6|Ov;{0(Xmtf^QM75v?ru2hsgnUgbuSs6lBVVDS@oD zbYr(~JO;X5Srr?{#G-h1xJHs->WJ(1+4OZaps4;aB^qI_Nn%P0PT`+8`Q-&2_VFwEvza&dn?Co;0I zH4-suwlN=GH&A}`97bM)si}T}g^**ius=b|1DF#gN?)n z)wkrmy7LfwWzpO^cAm$@*LhxkkAwcpc~?_M?z|Z0$N9F@;a$9zBjL%|`HIPsMv=I0 z1vmdJC40^)-hF(}Zub~eB6m{!qEXn)!Rg3CVfW(kJseGrDw%K1|F-n}z4;sd<~I1< zE+ppG394(WX>4jFFK8_};YwUp67nOG$njo9!`CJr*FNP%RTam#?4__Uk8zPBXlQs% zgRr|b&#FkACOhUiU{^^S~`v{A}hS!b0;YRpR8fcaxXh|+q3dV|Q>(>Zk6P=l?*vxl~k zNd?wZp3rq?J4f3dioOcdEvrQ;fpxccUTB=rvHNV7HCBE`n^wsLCY?4RZhYXBxy$`` zciKMBE^35Y$h&Kp_uwQiLmRhs;kug#{iKu%%%W|2QuG4%0qghnTO!_OsuKKym2>*< z>lUksb&Jqnr@JR;t?-^){qroRL>-+;ZZj5-?leXyP>7W(GadS*t+4DcP=B4tRGC`K z)WPvfd-?iWc3EUSbE8t(+OIlTHO|a+)by|&DO#lUQz+EZ&dWwxq$Deqa^cp>6pCM@ M<^u3hYmvbI0~GNRN&o-= literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.2g.zmp/24.bmp b/_Coverage/Megafon/megafon.2g.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..fd0270b14826cb820736ddbc4297cf540c668617 GIT binary patch literal 1654 zcmaJ;c{J1s9RE~Oq)lqAN*B{LWt3}%%=k6TXfhodU2FzfqC|3(=%B(xD9Sjxv~(bT zGvmlzlp~6qkq#wlLfL2A{;)f$eQ$UF*zbFv_rCA*`CjkyWv>rV#@8@W0+uQ=t?w9z z$zOS5JfKVa28>fsV^BnQeKXQ8Uxite5kd_F5U9EV!M6S? z)J=at(gt4`EqX4;8xp>syg^<)hboF$iupkfiXY9~aSp#|y6>}%6WAhpglKeujOIHsO z*N-FS$t^6jnTPm;!7xeTgRe0Up<5kc=&6gU-gaDy7o#LA2Wt9iFbiiQ*w-J=x;jx? z{Qv2I|aQR zI%sZgf`BT-5H&{e5kQf#YwwDp~ z=2P(bkKbXFu?jH_6S?C z4%1Xrar$X7_@UNVTNjUxmR6XJn+m=;8;06T!7ADZy6+0O#|xniRj}{J;rz}(IBHX2 z-*^k%11~X+sg4NRCRE+4K#L6^K6Ng<(#wseDCRXnUJ!Z12I3b|a4 zlA=4Pudl=K@Gv4*32(9@^bn$xBQWykDEvB#(69KV^h!FI0W@f^rX#`9 z9js&m7IAds#9Tslb~+5bC>R`+WAMEkeXn|Olx2&~wl;_=6R=m8g-CrROi*}1{(ngN zq+w#QxJ2@=GKticAs`6CnUHS!hr)9u1dTqfR+V<+C4`RK-z_q6UgHsC@%RVT4~n-t z=1FDW1d-S|SnY!s5k6&F{>CHtbo*>!A(OzYi{ zw)=`*(+sOLikdh=J;+2-V-Y zqkP1q&&^n-NB2HYvw-lTi$71*Jn5Zr`WMBa3vcdC*C-b=hKx=~ws11}SzBgg_+r7bOwA|9rlX!C>%syb{K@LX!Lon@g#n literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.2g.zmp/params.txt b/_Coverage/Megafon/megafon.2g.zmp/params.txt index 604fe40c2..5a4ab980d 100644 --- a/_Coverage/Megafon/megafon.2g.zmp/params.txt +++ b/_Coverage/Megafon/megafon.2g.zmp/params.txt @@ -2,8 +2,8 @@ GUID={0b111110-866b-466e-b8d7-7b43297400c3} name_ru=Мегафон 2G GSM name=Megafon 2G GSM -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://yamap.megafon.ru/g2/ projection=2 diff --git a/_Coverage/Megafon/megafon.3g.zmp/18.bmp b/_Coverage/Megafon/megafon.3g.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..bd4ec3e3f650698dc8f0d4adabc88f77d15a2f26 GIT binary patch literal 1438 zcmXw&2~^E#6u^IxeQa4GyU-%_qViI!u zIg^;m-m%RgRHDXKw#oconS0JX-~E2)-tR8wehzNg?Pw7jT`(3by&tMW#}*!@1BT|U ziePKCgK(^TaDiX*@(?Fmv(#h)!#w)%si}#IQ=bIIG1&UWWTq}s}noRQ=0VXR*NE zk+*g4IHx&HvF0)dA6>z$*I=Tv!b$X+&l)o~s=j|jl5S6w$$0LRl`-0HC@ycFlsOblIzlXpCagc&m4)V*eOh9f6a_pmQO z#e<8bgbWm6Q|QaWzj8Tzx`3Do(=d{m<4_cb%YIiX@7<;B#&x7yBz$lD%nVI3lRNZg zO@1sdUOZ<|yB>HBHzAL}6|Ov;{0(Xmtf^QM75v?ru2hsgnUgbuSs6lBVVDS@oD zbYr(~JO;X5Srr?{#G-h1xJHs->WJ(1+4OZaps4;aB^qI_Nn%P0PT`+8`Q-&2_VFwEvza&dn?Co;0I zH4-suwlN=GH&A}`97bM)si}T}g^**ius=b|1DF#gN?)n z)wkrmy7LfwWzpO^cAm$@*LhxkkAwcpc~?_M?z|Z0$N9F@;a$9zBjL%|`HIPsMv=I0 z1vmdJC40^)-hF(}Zub~eB6m{!qEXn)!Rg3CVfW(kJseGrDw%K1|F-n}z4;sd<~I1< zE+ppG394(WX>4jFFK8_};YwUp67nOG$njo9!`CJr*FNP%RTam#?4__Uk8zPBXlQs% zgRr|b&#FkACOhUiU{^^S~`v{A}hS!b0;YRpR8fcaxXh|+q3dV|Q>(>Zk6P=l?*vxl~k zNd?wZp3rq?J4f3dioOcdEvrQ;fpxccUTB=rvHNV7HCBE`n^wsLCY?4RZhYXBxy$`` zciKMBE^35Y$h&Kp_uwQiLmRhs;kug#{iKu%%%W|2QuG4%0qghnTO!_OsuKKym2>*< z>lUksb&Jqnr@JR;t?-^){qroRL>-+;ZZj5-?leXyP>7W(GadS*t+4DcP=B4tRGC`K z)WPvfd-?iWc3EUSbE8t(+OIlTHO|a+)by|&DO#lUQz+EZ&dWwxq$Deqa^cp>6pCM@ M<^u3hYmvbI0~GNRN&o-= literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.3g.zmp/24.bmp b/_Coverage/Megafon/megafon.3g.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..fd0270b14826cb820736ddbc4297cf540c668617 GIT binary patch literal 1654 zcmaJ;c{J1s9RE~Oq)lqAN*B{LWt3}%%=k6TXfhodU2FzfqC|3(=%B(xD9Sjxv~(bT zGvmlzlp~6qkq#wlLfL2A{;)f$eQ$UF*zbFv_rCA*`CjkyWv>rV#@8@W0+uQ=t?w9z z$zOS5JfKVa28>fsV^BnQeKXQ8Uxite5kd_F5U9EV!M6S? z)J=at(gt4`EqX4;8xp>syg^<)hboF$iupkfiXY9~aSp#|y6>}%6WAhpglKeujOIHsO z*N-FS$t^6jnTPm;!7xeTgRe0Up<5kc=&6gU-gaDy7o#LA2Wt9iFbiiQ*w-J=x;jx? z{Qv2I|aQR zI%sZgf`BT-5H&{e5kQf#YwwDp~ z=2P(bkKbXFu?jH_6S?C z4%1Xrar$X7_@UNVTNjUxmR6XJn+m=;8;06T!7ADZy6+0O#|xniRj}{J;rz}(IBHX2 z-*^k%11~X+sg4NRCRE+4K#L6^K6Ng<(#wseDCRXnUJ!Z12I3b|a4 zlA=4Pudl=K@Gv4*32(9@^bn$xBQWykDEvB#(69KV^h!FI0W@f^rX#`9 z9js&m7IAds#9Tslb~+5bC>R`+WAMEkeXn|Olx2&~wl;_=6R=m8g-CrROi*}1{(ngN zq+w#QxJ2@=GKticAs`6CnUHS!hr)9u1dTqfR+V<+C4`RK-z_q6UgHsC@%RVT4~n-t z=1FDW1d-S|SnY!s5k6&F{>CHtbo*>!A(OzYi{ zw)=`*(+sOLikdh=J;+2-V-Y zqkP1q&&^n-NB2HYvw-lTi$71*Jn5Zr`WMBa3vcdC*C-b=hKx=~ws11}SzBgg_+r7bOwA|9rlX!C>%syb{K@LX!Lon@g#n literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.3g.zmp/params.txt b/_Coverage/Megafon/megafon.3g.zmp/params.txt index d22d998ac..252f5098d 100644 --- a/_Coverage/Megafon/megafon.3g.zmp/params.txt +++ b/_Coverage/Megafon/megafon.3g.zmp/params.txt @@ -2,8 +2,8 @@ GUID={0b122210-866b-466e-b8d7-7b43297400c3} name_ru=Мегафон 3G name=Megafon 3G -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://yamap.megafon.ru/g3/ projection=2 diff --git a/_Coverage/Megafon/megafon.4g100.zmp/18.bmp b/_Coverage/Megafon/megafon.4g100.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..bd4ec3e3f650698dc8f0d4adabc88f77d15a2f26 GIT binary patch literal 1438 zcmXw&2~^E#6u^IxeQa4GyU-%_qViI!u zIg^;m-m%RgRHDXKw#oconS0JX-~E2)-tR8wehzNg?Pw7jT`(3by&tMW#}*!@1BT|U ziePKCgK(^TaDiX*@(?Fmv(#h)!#w)%si}#IQ=bIIG1&UWWTq}s}noRQ=0VXR*NE zk+*g4IHx&HvF0)dA6>z$*I=Tv!b$X+&l)o~s=j|jl5S6w$$0LRl`-0HC@ycFlsOblIzlXpCagc&m4)V*eOh9f6a_pmQO z#e<8bgbWm6Q|QaWzj8Tzx`3Do(=d{m<4_cb%YIiX@7<;B#&x7yBz$lD%nVI3lRNZg zO@1sdUOZ<|yB>HBHzAL}6|Ov;{0(Xmtf^QM75v?ru2hsgnUgbuSs6lBVVDS@oD zbYr(~JO;X5Srr?{#G-h1xJHs->WJ(1+4OZaps4;aB^qI_Nn%P0PT`+8`Q-&2_VFwEvza&dn?Co;0I zH4-suwlN=GH&A}`97bM)si}T}g^**ius=b|1DF#gN?)n z)wkrmy7LfwWzpO^cAm$@*LhxkkAwcpc~?_M?z|Z0$N9F@;a$9zBjL%|`HIPsMv=I0 z1vmdJC40^)-hF(}Zub~eB6m{!qEXn)!Rg3CVfW(kJseGrDw%K1|F-n}z4;sd<~I1< zE+ppG394(WX>4jFFK8_};YwUp67nOG$njo9!`CJr*FNP%RTam#?4__Uk8zPBXlQs% zgRr|b&#FkACOhUiU{^^S~`v{A}hS!b0;YRpR8fcaxXh|+q3dV|Q>(>Zk6P=l?*vxl~k zNd?wZp3rq?J4f3dioOcdEvrQ;fpxccUTB=rvHNV7HCBE`n^wsLCY?4RZhYXBxy$`` zciKMBE^35Y$h&Kp_uwQiLmRhs;kug#{iKu%%%W|2QuG4%0qghnTO!_OsuKKym2>*< z>lUksb&Jqnr@JR;t?-^){qroRL>-+;ZZj5-?leXyP>7W(GadS*t+4DcP=B4tRGC`K z)WPvfd-?iWc3EUSbE8t(+OIlTHO|a+)by|&DO#lUQz+EZ&dWwxq$Deqa^cp>6pCM@ M<^u3hYmvbI0~GNRN&o-= literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.4g100.zmp/24.bmp b/_Coverage/Megafon/megafon.4g100.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..fd0270b14826cb820736ddbc4297cf540c668617 GIT binary patch literal 1654 zcmaJ;c{J1s9RE~Oq)lqAN*B{LWt3}%%=k6TXfhodU2FzfqC|3(=%B(xD9Sjxv~(bT zGvmlzlp~6qkq#wlLfL2A{;)f$eQ$UF*zbFv_rCA*`CjkyWv>rV#@8@W0+uQ=t?w9z z$zOS5JfKVa28>fsV^BnQeKXQ8Uxite5kd_F5U9EV!M6S? z)J=at(gt4`EqX4;8xp>syg^<)hboF$iupkfiXY9~aSp#|y6>}%6WAhpglKeujOIHsO z*N-FS$t^6jnTPm;!7xeTgRe0Up<5kc=&6gU-gaDy7o#LA2Wt9iFbiiQ*w-J=x;jx? z{Qv2I|aQR zI%sZgf`BT-5H&{e5kQf#YwwDp~ z=2P(bkKbXFu?jH_6S?C z4%1Xrar$X7_@UNVTNjUxmR6XJn+m=;8;06T!7ADZy6+0O#|xniRj}{J;rz}(IBHX2 z-*^k%11~X+sg4NRCRE+4K#L6^K6Ng<(#wseDCRXnUJ!Z12I3b|a4 zlA=4Pudl=K@Gv4*32(9@^bn$xBQWykDEvB#(69KV^h!FI0W@f^rX#`9 z9js&m7IAds#9Tslb~+5bC>R`+WAMEkeXn|Olx2&~wl;_=6R=m8g-CrROi*}1{(ngN zq+w#QxJ2@=GKticAs`6CnUHS!hr)9u1dTqfR+V<+C4`RK-z_q6UgHsC@%RVT4~n-t z=1FDW1d-S|SnY!s5k6&F{>CHtbo*>!A(OzYi{ zw)=`*(+sOLikdh=J;+2-V-Y zqkP1q&&^n-NB2HYvw-lTi$71*Jn5Zr`WMBa3vcdC*C-b=hKx=~ws11}SzBgg_+r7bOwA|9rlX!C>%syb{K@LX!Lon@g#n literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.4g100.zmp/params.txt b/_Coverage/Megafon/megafon.4g100.zmp/params.txt index e788e2db8..41be99680 100644 --- a/_Coverage/Megafon/megafon.4g100.zmp/params.txt +++ b/_Coverage/Megafon/megafon.4g100.zmp/params.txt @@ -2,8 +2,8 @@ GUID={0b133330-866b-466e-b8d7-7b43297400c3} name_ru=Мегафон 4G name=Megafon 4G -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://yamap.megafon.ru/lte/ projection=2 diff --git a/_Coverage/Megafon/megafon.4g300.zmp/18.bmp b/_Coverage/Megafon/megafon.4g300.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..bd4ec3e3f650698dc8f0d4adabc88f77d15a2f26 GIT binary patch literal 1438 zcmXw&2~^E#6u^IxeQa4GyU-%_qViI!u zIg^;m-m%RgRHDXKw#oconS0JX-~E2)-tR8wehzNg?Pw7jT`(3by&tMW#}*!@1BT|U ziePKCgK(^TaDiX*@(?Fmv(#h)!#w)%si}#IQ=bIIG1&UWWTq}s}noRQ=0VXR*NE zk+*g4IHx&HvF0)dA6>z$*I=Tv!b$X+&l)o~s=j|jl5S6w$$0LRl`-0HC@ycFlsOblIzlXpCagc&m4)V*eOh9f6a_pmQO z#e<8bgbWm6Q|QaWzj8Tzx`3Do(=d{m<4_cb%YIiX@7<;B#&x7yBz$lD%nVI3lRNZg zO@1sdUOZ<|yB>HBHzAL}6|Ov;{0(Xmtf^QM75v?ru2hsgnUgbuSs6lBVVDS@oD zbYr(~JO;X5Srr?{#G-h1xJHs->WJ(1+4OZaps4;aB^qI_Nn%P0PT`+8`Q-&2_VFwEvza&dn?Co;0I zH4-suwlN=GH&A}`97bM)si}T}g^**ius=b|1DF#gN?)n z)wkrmy7LfwWzpO^cAm$@*LhxkkAwcpc~?_M?z|Z0$N9F@;a$9zBjL%|`HIPsMv=I0 z1vmdJC40^)-hF(}Zub~eB6m{!qEXn)!Rg3CVfW(kJseGrDw%K1|F-n}z4;sd<~I1< zE+ppG394(WX>4jFFK8_};YwUp67nOG$njo9!`CJr*FNP%RTam#?4__Uk8zPBXlQs% zgRr|b&#FkACOhUiU{^^S~`v{A}hS!b0;YRpR8fcaxXh|+q3dV|Q>(>Zk6P=l?*vxl~k zNd?wZp3rq?J4f3dioOcdEvrQ;fpxccUTB=rvHNV7HCBE`n^wsLCY?4RZhYXBxy$`` zciKMBE^35Y$h&Kp_uwQiLmRhs;kug#{iKu%%%W|2QuG4%0qghnTO!_OsuKKym2>*< z>lUksb&Jqnr@JR;t?-^){qroRL>-+;ZZj5-?leXyP>7W(GadS*t+4DcP=B4tRGC`K z)WPvfd-?iWc3EUSbE8t(+OIlTHO|a+)by|&DO#lUQz+EZ&dWwxq$Deqa^cp>6pCM@ M<^u3hYmvbI0~GNRN&o-= literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.4g300.zmp/24.bmp b/_Coverage/Megafon/megafon.4g300.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..fd0270b14826cb820736ddbc4297cf540c668617 GIT binary patch literal 1654 zcmaJ;c{J1s9RE~Oq)lqAN*B{LWt3}%%=k6TXfhodU2FzfqC|3(=%B(xD9Sjxv~(bT zGvmlzlp~6qkq#wlLfL2A{;)f$eQ$UF*zbFv_rCA*`CjkyWv>rV#@8@W0+uQ=t?w9z z$zOS5JfKVa28>fsV^BnQeKXQ8Uxite5kd_F5U9EV!M6S? z)J=at(gt4`EqX4;8xp>syg^<)hboF$iupkfiXY9~aSp#|y6>}%6WAhpglKeujOIHsO z*N-FS$t^6jnTPm;!7xeTgRe0Up<5kc=&6gU-gaDy7o#LA2Wt9iFbiiQ*w-J=x;jx? z{Qv2I|aQR zI%sZgf`BT-5H&{e5kQf#YwwDp~ z=2P(bkKbXFu?jH_6S?C z4%1Xrar$X7_@UNVTNjUxmR6XJn+m=;8;06T!7ADZy6+0O#|xniRj}{J;rz}(IBHX2 z-*^k%11~X+sg4NRCRE+4K#L6^K6Ng<(#wseDCRXnUJ!Z12I3b|a4 zlA=4Pudl=K@Gv4*32(9@^bn$xBQWykDEvB#(69KV^h!FI0W@f^rX#`9 z9js&m7IAds#9Tslb~+5bC>R`+WAMEkeXn|Olx2&~wl;_=6R=m8g-CrROi*}1{(ngN zq+w#QxJ2@=GKticAs`6CnUHS!hr)9u1dTqfR+V<+C4`RK-z_q6UgHsC@%RVT4~n-t z=1FDW1d-S|SnY!s5k6&F{>CHtbo*>!A(OzYi{ zw)=`*(+sOLikdh=J;+2-V-Y zqkP1q&&^n-NB2HYvw-lTi$71*Jn5Zr`WMBa3vcdC*C-b=hKx=~ws11}SzBgg_+r7bOwA|9rlX!C>%syb{K@LX!Lon@g#n literal 0 HcmV?d00001 diff --git a/_Coverage/Megafon/megafon.4g300.zmp/params.txt b/_Coverage/Megafon/megafon.4g300.zmp/params.txt index 92147ea00..b03e6d0df 100644 --- a/_Coverage/Megafon/megafon.4g300.zmp/params.txt +++ b/_Coverage/Megafon/megafon.4g300.zmp/params.txt @@ -2,8 +2,8 @@ GUID={0b144440-866b-466e-b8d7-7b43297400c3} name_ru=Мегафон 4G+ name=Megafon 4G+ -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://yamap.megafon.ru/lte_plus/ projection=2 diff --git a/_Coverage/Mts/mts.2g.zmp/18.bmp b/_Coverage/Mts/mts.2g.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..6de3b7c69fe721c93e601cf883fc400adb4c135c GIT binary patch literal 1064 zcmaizyH5f^5XSc&aEOT}7HXo277#EY+S&Ptg^$95giik#Dhdb?swmBXO>wmZtJcJKF1jAcsBH7sqH}jcA%}w69^az4rRiz zNU1om%owm#3bKT2k!x#v$)m#t9W|(2(h6R|5Sf)?Aq=E(92yL0J}2Mj`1qvJh&+$! z$cBkJmsP*vf0)Wu!=}@z&MKK69vMnrvNR_sEQs+~qmzlQBdQQK#Mha8N244RXthGMD(`{F UKrkojjL<;V1fZlI&G}#d54EW;t^fc4 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.2g.zmp/24.bmp b/_Coverage/Mts/mts.2g.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..1366510ae626d56c1be5283fd1677129188275d6 GIT binary patch literal 1784 zcmbu9OD_Xa6vt<#4{eA=l~j<3gjf(=G(Ld6AT}h#8ehSq5mHI*ZR~Z^1$!3OYDL&% zg)|`=kE8WJb0(8v?%a-;oO^R}&bhz)zpt5?e2W|QH;#T7E#oxP_6*|;`BbYkyAWMG zN_vY$2&S(=HexC)YLa274Jq{yi=sXg$mj^IEK{LCy9HWZq3oDL_SY*TfOMp&RH8=X zx0TD3>1LX8pf`w`&NSWKJA|(WQJoErU>_c+x3>w(wD;t^!b4=Zzenowia99u3h?^K zPERqU9?U@s1@m)(l0?kWu}+N01Lx$FIWVsb@ezzzbbA+y^H`;1B9N2mqW8~G97r1I z59IXq&O(`F$85Ah@|A;_V#|D1hT*HtVl0LII=oS ty0-411hT!ukftm0>U2@rEaf+8D^I!HpCK*~*GvRRulaGgL;mj=#y1 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.2g.zmp/params.txt b/_Coverage/Mts/mts.2g.zmp/params.txt index 1a3f4379f..fe5c34c1a 100644 --- a/_Coverage/Mts/mts.2g.zmp/params.txt +++ b/_Coverage/Mts/mts.2g.zmp/params.txt @@ -2,8 +2,8 @@ GUID={0bffa4e0-852b-4bee-b8d7-7b43297400c3} name_ru=МТС 2G name=MTS 2G -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://tiles.mts.ru/G2_New/ projection=2 diff --git a/_Coverage/Mts/mts.3g.zmp/18.bmp b/_Coverage/Mts/mts.3g.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..6de3b7c69fe721c93e601cf883fc400adb4c135c GIT binary patch literal 1064 zcmaizyH5f^5XSc&aEOT}7HXo277#EY+S&Ptg^$95giik#Dhdb?swmBXO>wmZtJcJKF1jAcsBH7sqH}jcA%}w69^az4rRiz zNU1om%owm#3bKT2k!x#v$)m#t9W|(2(h6R|5Sf)?Aq=E(92yL0J}2Mj`1qvJh&+$! z$cBkJmsP*vf0)Wu!=}@z&MKK69vMnrvNR_sEQs+~qmzlQBdQQK#Mha8N244RXthGMD(`{F UKrkojjL<;V1fZlI&G}#d54EW;t^fc4 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.3g.zmp/24.bmp b/_Coverage/Mts/mts.3g.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..1366510ae626d56c1be5283fd1677129188275d6 GIT binary patch literal 1784 zcmbu9OD_Xa6vt<#4{eA=l~j<3gjf(=G(Ld6AT}h#8ehSq5mHI*ZR~Z^1$!3OYDL&% zg)|`=kE8WJb0(8v?%a-;oO^R}&bhz)zpt5?e2W|QH;#T7E#oxP_6*|;`BbYkyAWMG zN_vY$2&S(=HexC)YLa274Jq{yi=sXg$mj^IEK{LCy9HWZq3oDL_SY*TfOMp&RH8=X zx0TD3>1LX8pf`w`&NSWKJA|(WQJoErU>_c+x3>w(wD;t^!b4=Zzenowia99u3h?^K zPERqU9?U@s1@m)(l0?kWu}+N01Lx$FIWVsb@ezzzbbA+y^H`;1B9N2mqW8~G97r1I z59IXq&O(`F$85Ah@|A;_V#|D1hT*HtVl0LII=oS ty0-411hT!ukftm0>U2@rEaf+8D^I!HpCK*~*GvRRulaGgL;mj=#y1 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.3g.zmp/params.txt b/_Coverage/Mts/mts.3g.zmp/params.txt index e50643321..b14ff6565 100644 --- a/_Coverage/Mts/mts.3g.zmp/params.txt +++ b/_Coverage/Mts/mts.3g.zmp/params.txt @@ -2,8 +2,8 @@ GUID={ce276b7a-a0e3-47a4-bb66-af84b817801d} name_ru=МТС 3G name=MTS 3G -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://tiles.mts.ru/G3_New/ projection=2 diff --git a/_Coverage/Mts/mts.4g.zmp/18.bmp b/_Coverage/Mts/mts.4g.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..6de3b7c69fe721c93e601cf883fc400adb4c135c GIT binary patch literal 1064 zcmaizyH5f^5XSc&aEOT}7HXo277#EY+S&Ptg^$95giik#Dhdb?swmBXO>wmZtJcJKF1jAcsBH7sqH}jcA%}w69^az4rRiz zNU1om%owm#3bKT2k!x#v$)m#t9W|(2(h6R|5Sf)?Aq=E(92yL0J}2Mj`1qvJh&+$! z$cBkJmsP*vf0)Wu!=}@z&MKK69vMnrvNR_sEQs+~qmzlQBdQQK#Mha8N244RXthGMD(`{F UKrkojjL<;V1fZlI&G}#d54EW;t^fc4 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.4g.zmp/24.bmp b/_Coverage/Mts/mts.4g.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..1366510ae626d56c1be5283fd1677129188275d6 GIT binary patch literal 1784 zcmbu9OD_Xa6vt<#4{eA=l~j<3gjf(=G(Ld6AT}h#8ehSq5mHI*ZR~Z^1$!3OYDL&% zg)|`=kE8WJb0(8v?%a-;oO^R}&bhz)zpt5?e2W|QH;#T7E#oxP_6*|;`BbYkyAWMG zN_vY$2&S(=HexC)YLa274Jq{yi=sXg$mj^IEK{LCy9HWZq3oDL_SY*TfOMp&RH8=X zx0TD3>1LX8pf`w`&NSWKJA|(WQJoErU>_c+x3>w(wD;t^!b4=Zzenowia99u3h?^K zPERqU9?U@s1@m)(l0?kWu}+N01Lx$FIWVsb@ezzzbbA+y^H`;1B9N2mqW8~G97r1I z59IXq&O(`F$85Ah@|A;_V#|D1hT*HtVl0LII=oS ty0-411hT!ukftm0>U2@rEaf+8D^I!HpCK*~*GvRRulaGgL;mj=#y1 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.4g.zmp/params.txt b/_Coverage/Mts/mts.4g.zmp/params.txt index c9cf96450..413805717 100644 --- a/_Coverage/Mts/mts.4g.zmp/params.txt +++ b/_Coverage/Mts/mts.4g.zmp/params.txt @@ -2,8 +2,8 @@ GUID={dc5600ae-2507-4a2b-a6e4-4b2270575020} name_ru=МТС 4G name=MTS 4G -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://tiles.mts.ru/LTE_New/ projection=2 diff --git a/_Coverage/Mts/mts.4g_plan.zmp/18.bmp b/_Coverage/Mts/mts.4g_plan.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..6de3b7c69fe721c93e601cf883fc400adb4c135c GIT binary patch literal 1064 zcmaizyH5f^5XSc&aEOT}7HXo277#EY+S&Ptg^$95giik#Dhdb?swmBXO>wmZtJcJKF1jAcsBH7sqH}jcA%}w69^az4rRiz zNU1om%owm#3bKT2k!x#v$)m#t9W|(2(h6R|5Sf)?Aq=E(92yL0J}2Mj`1qvJh&+$! z$cBkJmsP*vf0)Wu!=}@z&MKK69vMnrvNR_sEQs+~qmzlQBdQQK#Mha8N244RXthGMD(`{F UKrkojjL<;V1fZlI&G}#d54EW;t^fc4 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.4g_plan.zmp/24.bmp b/_Coverage/Mts/mts.4g_plan.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..1366510ae626d56c1be5283fd1677129188275d6 GIT binary patch literal 1784 zcmbu9OD_Xa6vt<#4{eA=l~j<3gjf(=G(Ld6AT}h#8ehSq5mHI*ZR~Z^1$!3OYDL&% zg)|`=kE8WJb0(8v?%a-;oO^R}&bhz)zpt5?e2W|QH;#T7E#oxP_6*|;`BbYkyAWMG zN_vY$2&S(=HexC)YLa274Jq{yi=sXg$mj^IEK{LCy9HWZq3oDL_SY*TfOMp&RH8=X zx0TD3>1LX8pf`w`&NSWKJA|(WQJoErU>_c+x3>w(wD;t^!b4=Zzenowia99u3h?^K zPERqU9?U@s1@m)(l0?kWu}+N01Lx$FIWVsb@ezzzbbA+y^H`;1B9N2mqW8~G97r1I z59IXq&O(`F$85Ah@|A;_V#|D1hT*HtVl0LII=oS ty0-411hT!ukftm0>U2@rEaf+8D^I!HpCK*~*GvRRulaGgL;mj=#y1 literal 0 HcmV?d00001 diff --git a/_Coverage/Mts/mts.4g_plan.zmp/params.txt b/_Coverage/Mts/mts.4g_plan.zmp/params.txt index db60ab369..683d14085 100644 --- a/_Coverage/Mts/mts.4g_plan.zmp/params.txt +++ b/_Coverage/Mts/mts.4g_plan.zmp/params.txt @@ -2,8 +2,8 @@ GUID={ffe20781-25e6-42c8-bf8e-2879789477b2} name_ru=МТС 4G планируемое name=MTS 4G planned -ParentSubMenu_ru=Cотовые сети -ParentSubMenu=Mobile coverage area +ParentSubMenu_ru=Сломанные карты\Cотовые сети +ParentSubMenu=Not working\Mobile coverage area asLayer=1 DefURLBase=http://tiles.mts.ru/LTE_Plan_New/ projection=2 diff --git a/_OSM/osm_WayMarkeredTrails_Hiking.zmp/params.txt b/_OSM/osm_WayMarkeredTrails_Hiking.zmp/params.txt index b914c1a6c..7df63a945 100644 --- a/_OSM/osm_WayMarkeredTrails_Hiking.zmp/params.txt +++ b/_OSM/osm_WayMarkeredTrails_Hiking.zmp/params.txt @@ -3,7 +3,7 @@ GUID={1123ADB1-4561-4280-9225-D4690321117E} ParentSubMenu_ru=Маршруты и GPS-Треки ParentSubMenu_uk=Маршруты и GPS-Треки ParentSubMenu=Ways and GPS-Tracks -name=WayMarkeredTrails iking +name=WayMarkeredTrails Hiking asLayer=1 NameInCache=waymarkedtrails_hiking DefURLBase=https://tile.waymarkedtrails.org/hiking diff --git a/mapbox/18.bmp b/anygis/Mapbox_Sat.zmp/18.bmp similarity index 100% rename from mapbox/18.bmp rename to anygis/Mapbox_Sat.zmp/18.bmp diff --git a/mapbox/24.bmp b/anygis/Mapbox_Sat.zmp/24.bmp similarity index 100% rename from mapbox/24.bmp rename to anygis/Mapbox_Sat.zmp/24.bmp diff --git a/anygis/Mapbox_Sat.zmp/info.txt b/anygis/Mapbox_Sat.zmp/info.txt new file mode 100644 index 000000000..94ae5cdcb --- /dev/null +++ b/anygis/Mapbox_Sat.zmp/info.txt @@ -0,0 +1,9 @@ +Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее + +Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: + +https://t.me/anygis +https://vk.com/anygis +anygis@bk.ru \ No newline at end of file diff --git a/anygis/Mapbox_Sat.zmp/params.txt b/anygis/Mapbox_Sat.zmp/params.txt new file mode 100644 index 000000000..0e30b9966 --- /dev/null +++ b/anygis/Mapbox_Sat.zmp/params.txt @@ -0,0 +1,17 @@ +п»ї +[PARAMS] +GUID={16BBE393-814C-4A37-BF28-F7362EC5FB9F} +ParentSubMenu_ru=Спутниковые +ParentSubMenu_uk=Спутниковые +ParentSubMenu=Satellite +name_ru=Mapbox satellite v4 +name_uk=Mapbox satellite v4 +name=Mapbox satellite v4 +NameInCache=Mapbox_Sat +asLayer=0 +EPSG=3785 +DefURLBase=http://api.tiles.mapbox.com/v4/mapbox.satellite/{z}/{x}/{y}.png?access_token=pk.eyJ1IjoienZlcmlrIiwiYSI6IjVLMGxwbGsifQ.pdb83NbjTrfl9ibbdjPSsg +RequestHead=Connection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 +ContentType=image/jpeg,image/png +Ext=.png +License= В© Mapbox diff --git a/anygis/Maxar_via_Facebook.zmp/18.bmp b/anygis/Maxar_via_Facebook.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..a942fa46b182b5cd2656dbd3325f8791ca73cf61 GIT binary patch literal 1062 zcmZXReM}Q)9LLXWf4P4avn6K!v6!eK5n`rse<>KvWGZYknQ>VnQ9=}j02z%_I*3H$ zgdmI;3!PeQVY~>H)`Ean2h>ubwe+3RSApxbD~y-YYwoVk_0EUubf~}lp5OEK{p9!D zeGg~v`WWHkYgkj@*z(`lgly%{S3lyXcM6Aa@1=RT9j5nTA3eFhmIJJ&7#QvWXFuT`Us+uuX)5fuMon_Y)XZs$7h4ZZDQc1^&%rmi zs?*|6^Jr}~H7TV{y_8)ZS;9GvqggKCvn>DJ7$2)kpcjIoeHK&-QJ&M?II$*8CkF*2 zdNZc3jg7S|p$!YO4whvT08jwTxnAN!wO~j?GkLC~^hb9^>RNmDa%bU6uV7g& zj3|Y^?%x(L599!dGXTKG^9~&*%O|>i!fx#}D()jl_s`pADpM94j?anDV6Eo^vhyBk zLBMNcSdM`RjwOricy>@8kkJG;99B2JWb59lQ zz{DvKr(q|GVVuv}jLm0V^`|`L2mOz42g6|m>B;!qn3L+fmSt@`V{1BRugWrrE)o<4 z36|r60k5U6-Y86;s`}Pkkzo-R#W^lYPzWOX{wr<%F~_Z3izwgPn5Vn`jeGE}ciP~y zXx+~rsVg#Hl}VA}KjL@@uZ6Nnn-=ry6rTWAcAjSDtq@ zjEYMK&V7j%r#%zwAO0mxU9?A)v(2wl;tPvBH{9JhT6f*ucH7of?V41lDjN7D}_z7a(O;CTIZG|2iMA@jpRq&i2Bo{>!Bj znPip9?9}q@pJ@738#vGO^z4ic+6BFat}!rpy9pX#Ry{t6dX=)~9}a0cWDwfGC3gWF zj}TG#)OBpVBmzMnKJO1NE~s1YO$-etWgl?xVBBO_C888blO!1<3D+xQFoZ>-#9Jb{ GK#B7mJ7 zq@*B-6gApNNhXZKVN%hNK+&O{{_+by20=-&l1hqV`!BnxWF&dv(-N+v$cl2rn3T1m zz=`fIkz!lv;$(wlYZMtx)<@~6tjGrw9cn=b+CZE;$%qb8n9#IKiaU*V|iBao1ol;B0Pw&SuGIL-G;8 zy%?hKfc+NP7YT7B z(4G?wj`ef^%V?*`z(z0yQEDlCTsB7?-qskqF)=ELbrWXk)g*u^@)!$}8Se{zm}BHH z2;pU2W$U#wIEhvH(9I9u*%!K@G%p1#A6uUtA8Pc_(+xeUFE7cEgIAW}Ydq;AoDlui zigT`79rJ1DGH*MXLO2{n?ghyYKe*2^Mpm{-ZaSLO$g@K$#$Is#Dax#0hm@kpkw%2) z4ngg05<#|!%h*wE5@SXL`(lF-DR8t4_ckz>+%J(rhZ`rcHZ9_ix&CnE>eZT((79!A zUsLt}zKa@64yuiUwhMuY$eBmrYgS&E-i6#$CRzZKDzvd$%uh8gq$c8N4zs~a)yZ`_I literal 0 HcmV?d00001 diff --git a/anygis/Maxar_via_Facebook.zmp/info.txt b/anygis/Maxar_via_Facebook.zmp/info.txt new file mode 100644 index 000000000..94ae5cdcb --- /dev/null +++ b/anygis/Maxar_via_Facebook.zmp/info.txt @@ -0,0 +1,9 @@ +Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее + +Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: + +https://t.me/anygis +https://vk.com/anygis +anygis@bk.ru \ No newline at end of file diff --git a/anygis/Maxar_via_Facebook.zmp/params.txt b/anygis/Maxar_via_Facebook.zmp/params.txt new file mode 100644 index 000000000..e39a71712 --- /dev/null +++ b/anygis/Maxar_via_Facebook.zmp/params.txt @@ -0,0 +1,17 @@ +п»ї +[PARAMS] +GUID={F224BE12-F871-4F9A-8109-9FFDD6592261} +ParentSubMenu_ru=Спутниковые +ParentSubMenu_uk=Спутниковые +ParentSubMenu=Satellite +name_ru=Maxar (via Facebook) zoom 11-18 +name_uk=Maxar (via Facebook) zoom 11-18 +name=Maxar (via Facebook) zoom 11-18 +NameInCache=Maxar_via_Facebook +asLayer=0 +EPSG=3785 +DefURLBase=https://www.facebook.com/maps/ml_roads?theme=ml_road_vector&collaborator=fbid&token=ASZUVdYpCkd3M6ZrzjXdQzHulqRMnxdlkeBJWEKOeTUoY_Gwm9fuEd2YObLrClgDB_xfavizBsh0oDfTWTF7Zb4C&hash=ASYM8LPNy8k1XoJiI7A&result_type=satellite_raster_tile&materialize=true&x={x}&y={y}&z={z} +RequestHead=Referer:https://mapwith.ai/rapid\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 +ContentType=image/jpeg,image/png +Ext=.jpg +License= В© Maxar diff --git a/anygis/OpenTopoMapRU.zmp/18.bmp b/anygis/OpenTopoMapRU.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..a0fe7dc75720249097c9f70bffeb2b05ea7f915b GIT binary patch literal 1064 zcmbWzNoW&c6ae5zJqV%{MN|rEPZsqodJ+Wjq!&e`)PtZP7RBWvTDwqDD6~}5q}0;d zEZxk~#KbgB+AK|HvNcO5>m*~QolG)`Nt!WfVolZGF?FC`ME&{S`yUU!$Im-^pT)utX7=WFqLrdct5*zgBpSxbSg!$d5_;;r*+24`25Lmn0`smofBZulwj84fF zw7*UFrfuT&12O-WwDZ2IYtpY-1}H<>eKMsOHwv6;$9n4Kv&YvvUNoFKedgN5zPH@D zMV%{TF}kPa3UP;`9|0Kav<0sqWgUo^g(#$1fmcB~VAbs4a3)2((${og)#uB)Rx5e% zdHtoZhomXiDN8m<+BO`}4TtUeqF+HR40GEBU5@}LX(`x}_BfM^cGBT56QEKuxPGpt z`cKJsSV%$AWv?Irk0fVCDAVW|49gh&b;1 zdb#q>4GLdh30LCiS}OL1icmqwfN5oMwKO1N9rNlzc$!93iI5_`#3kptmE2q=o~@(_ z8qd&)F9j-;^J@u{$|F^HCbl>cZ5<=ce8}>KfHcMEP|&E*h&I4CEFZ<`I94RkVi;P1 zW(=d|oOX*7Y|Ib1;Q`F3p?#7hB&4*RdcJ91T`pu|xhO&+7>R^}`d(!}gIG5WeB9Lh ztFT21>_!k3l_4Ra<|Sk;@KB#cY$kNJv`K)Dy>tv&4dfQ50!~XIw%Pb|M%}Bd<8Xce Dz1PYa literal 0 HcmV?d00001 diff --git a/anygis/OpenTopoMapRU.zmp/24.bmp b/anygis/OpenTopoMapRU.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..52c0bbf3670a7b4f20e960bb5d7ece6dc7105ad5 GIT binary patch literal 1784 zcmb`{S!@(_90&0FVq!=Xkq1-)NQxp#5o-t`CMb#e+mq`=s~&FcJ)8TPCtX{cp*7#NV`D$Lu~nLF&Hs0$W3fy;^&ibbYGH8R^zk?6 zM;;93kZ20Wo(8koJRFN)7`9qnetOzE0nwm9uRVWfsBOp213O>5dG7{0WSmtCEr1zA z&;%4yTJ%#!slY5{+XW*=E?vdt=!HhNy;iAg2W6<4>gFD3KXB-|SK9X<-1qLGUgI=( zJ=Sj)4|7=)Y7xaJ=Von&gi2Yp52VH2j)Cuhfs2ygRDRWV$C`1@R189oqT|@n_ScTQ z-4fe(Ut^Cv#1l-!!e4MnYat7wSK&r=BhnjYbvb^&0y4TnLt}pab|+TBD6rVl%<`h9 zWAD7t`Fh9kw>tLid8vEoPhK%9Nf>~jTobc#Q4c>C<7Qm9{j_U7%8wxRik_A)GX~f7~($Y-Z3lUyKT}A%4U|1r)!UCvUn3uY$uj z?GxT0u-);IQB}q+z^&G1T9x*nI(6!U&Xb4s9z1>K6Hho`Si%NC&3zN6hc|iYA@y5+ z|2bjL59<4LNbCrhmaDZbiXU-|Bn`7MEyFKV6R;%cc(1eL{j*W8Cw8CK(tzSkN7Ej)ljSIv2axuT*5c$HCUq{0YQ+a^ulZ|V*x_W|(d-#y^ z>$9KldSTc8BX81KG^`N7a$YRw&K1H)IH(nKdYFCuIMDbf4}>JfAnOe27>2cDkcFS~ zD&hu&1e=fXq03!+cRw#=Q`goBxC#Mz7m%}utKs^i)wQ+8!?|&*+q|;4QYK5SNG=Rw zCaiNs$0#&E5im2-9^HbEgK3d8aN)C$sC_>*n?(x&XtQ<`;QfQvA!bnxV3uqY>7;Dr&T7sNhfNC7W6QfD88;lYz=#>h z0M?AB@Q8@wA-Pnt;h0I7o-?ycUN-Jy1{^bKdoMJ_S}+VrXfDOeI6YR#qtE~dBzK)B%L5pF&TPQvDH|2QSVqRGZ>+PP*rR7!zF z0j{LLO59lsn<`#i(yzB9)Lcv?hzj{~#zvmvYE3|Rp#G;m~>#uH}$MHd2RyD5zB@jNV*dYAodzN@$Txka@I`M@xCggy=+wRD_6xcD7O}+{n|a?s`I84DgFiK^~+B zT&yfGQ}j+mbyWTsL1M|3Y@&uo7UHEPVsW{UYGBSvK$kQry#lsm+zwc_98(Dyjq4w# z4HSoF$Yx>|ZM=e4v!1#or^%G8MzfBV;#fJ3kSJ76K;>|l^yx!topp}Op%qDT%aP}O z4AMjgtpgrCD{YdMf+Es8h0oJ)dCzR0#wdQgR2A-$tqzcZlpyxLQ+FdO7AF#rWG@KhbDr$61We54Pq;gDjJ*$ z{_8*Hti-99b}VI|h}gwZFW5kVDz2QMh~CA6lTB1m@aDlG3@=WQZVa`0bRyH?b{K3E z)Qbnbif6qDrv8hHZo`{`JJ~O_*0vxTG(eiiN zdsCARs{hS4-JhmDpp9W#AEwn&QofQp#2r=txI>!`;~@zM)VdKL8M|(<-}+j2AKz|Z zIWqP-Ymt;egQSE>9pRM$S{|Zb(==H-nL}-t4sM}4+}a@RetTlrS3D95z38G6BjLQv zrnW;({lH^9B-tkO+E{<(DP`f3R2~?4ZlwX zyqa5z{^WIw-poU7>iHCv8aRkzo?$#B0ii+PyQD{CZT>_ahw`cOvfrB$7CBfzj^(YKY=8l#N?pn iGry1mTxJ4?@yU}0qQ^%IuJgj3{l{K(o%i^XM1KLXaaTG3 literal 0 HcmV?d00001 diff --git a/anygis/RusOurdoor.zmp/24.bmp b/anygis/RusOurdoor.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..13c1446856ea568d0f9a95aee4dc7592513732c2 GIT binary patch literal 1782 zcmbu9T}V@57{{M!nQJ!Pav$h9XZ8Uqc5NS&(uW8|T}2_$?52V~poU3N7t^6>s3l5y zAKjI76-5`#Hs_||g@uA-Rus7NZfEN_vpMzc+0GQP@wW8kyl3yu`|P*>^Z&n`BPV}l zL1L8Sy#%K@IaP@jfD`xKT4g2*@%E|aoV2Hx0^Q&xmA!QKfTtb4p0F)tENz75X#;N) zcpiYO8^$glj0l74qkTJGhmb)B_#7~BAKZ^%s4;8$K=*&sR1}pU1X0T6Yl8kZaCgGw z8EY&jm_BgqQUxkm;UsA&uN7QfFls9fmAp!a7U71moi!Z%>T3kA9lXup?f`Eqd_QKV znNc=ys39BOUO^$D|27QVgOLtn|DE{S>wt+TaK6^Mz&s@W{g2U;WJitQu7}|G3%Wd{ z@!k&(xOJ*dl}9^uvusIdtl~EQdvN^uG9&pZ%M@UK2S+#yVRI%=UqEBABhOuwo?=uV z4)OUUR}h^VmP;{B2-ES|VWi!Vf?lS@1lwlgkV!wF3Ps+GNQKg;?vwY7AkYzT5E+o ziV^b$g2w99BDRA{5Q5AvQwwVFTR2k62Ur}Si$J?{v%EmGLOdNb7Ck}EjjQt1=LJMn z?vn%~$r1dc>KGfP?7r7Ts|!My4jPM|AZn}1k4D+9$#I1oIcpB5!%=E}Zd$C*pV1bH z=n1xiN|e-;1F(*_=riqH86VIHepI3~YvRRbeI$KJt1CZd$7;-BY}S~NXR!R^0IdFP figgBU(MOCH5iHYhG`~|6Fkdf!*T2<7Z6^5-dX6V^ literal 0 HcmV?d00001 diff --git a/anygis/RusOurdoor.zmp/info.txt b/anygis/RusOurdoor.zmp/info.txt new file mode 100644 index 000000000..94ae5cdcb --- /dev/null +++ b/anygis/RusOurdoor.zmp/info.txt @@ -0,0 +1,9 @@ +Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее + +Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: + +https://t.me/anygis +https://vk.com/anygis +anygis@bk.ru \ No newline at end of file diff --git a/anygis/RusOurdoor.zmp/params.txt b/anygis/RusOurdoor.zmp/params.txt new file mode 100644 index 000000000..566460296 --- /dev/null +++ b/anygis/RusOurdoor.zmp/params.txt @@ -0,0 +1,17 @@ +п»ї +[PARAMS] +GUID={41B5F6BE-6108-4158-AD04-9317E841AE92} +ParentSubMenu_ru=Туристические\Многослойные +ParentSubMenu_uk=Туристические\Многослойные +ParentSubMenu=Tourism\Karelia +name_ru=RusOutdoor maps +name_uk=RusOutdoor maps +name=RusOutdoor maps +NameInCache=RusOurdoor +asLayer=0 +EPSG=3785 +DefURLBase=https://anygis.ru/api/v1/Combo_RusOutdoor/{x}/{y}/{z} +RequestHead=Referer:http://www.sasgis.org/ +ContentType=image/jpeg,image/png +Ext=.jpg + diff --git a/anygis/RusOurdoor_lite.zmp/18.bmp b/anygis/RusOurdoor_lite.zmp/18.bmp new file mode 100644 index 0000000000000000000000000000000000000000..584dfd410d894d3629a032428147daad7177b07f GIT binary patch literal 1062 zcmb8uPe|Kf7zXgSSV(ADTvKg@Hp>QMh~CA6lTB1m@aDlG3@=WQZVa`0bRyH?b{K3E z)Qbnbif6qDrv8hHZo`{`JJ~O_*0vxTG(eiiN zdsCARs{hS4-JhmDpp9W#AEwn&QofQp#2r=txI>!`;~@zM)VdKL8M|(<-}+j2AKz|Z zIWqP-Ymt;egQSE>9pRM$S{|Zb(==H-nL}-t4sM}4+}a@RetTlrS3D95z38G6BjLQv zrnW;({lH^9B-tkO+E{<(DP`f3R2~?4ZlwX zyqa5z{^WIw-poU7>iHCv8aRkzo?$#B0ii+PyQD{CZT>_ahw`cOvfrB$7CBfzj^(YKY=8l#N?pn iGry1mTxJ4?@yU}0qQ^%IuJgj3{l{K(o%i^XM1KLXaaTG3 literal 0 HcmV?d00001 diff --git a/anygis/RusOurdoor_lite.zmp/24.bmp b/anygis/RusOurdoor_lite.zmp/24.bmp new file mode 100644 index 0000000000000000000000000000000000000000..13c1446856ea568d0f9a95aee4dc7592513732c2 GIT binary patch literal 1782 zcmbu9T}V@57{{M!nQJ!Pav$h9XZ8Uqc5NS&(uW8|T}2_$?52V~poU3N7t^6>s3l5y zAKjI76-5`#Hs_||g@uA-Rus7NZfEN_vpMzc+0GQP@wW8kyl3yu`|P*>^Z&n`BPV}l zL1L8Sy#%K@IaP@jfD`xKT4g2*@%E|aoV2Hx0^Q&xmA!QKfTtb4p0F)tENz75X#;N) zcpiYO8^$glj0l74qkTJGhmb)B_#7~BAKZ^%s4;8$K=*&sR1}pU1X0T6Yl8kZaCgGw z8EY&jm_BgqQUxkm;UsA&uN7QfFls9fmAp!a7U71moi!Z%>T3kA9lXup?f`Eqd_QKV znNc=ys39BOUO^$D|27QVgOLtn|DE{S>wt+TaK6^Mz&s@W{g2U;WJitQu7}|G3%Wd{ z@!k&(xOJ*dl}9^uvusIdtl~EQdvN^uG9&pZ%M@UK2S+#yVRI%=UqEBABhOuwo?=uV z4)OUUR}h^VmP;{B2-ES|VWi!Vf?lS@1lwlgkV!wF3Ps+GNQKg;?vwY7AkYzT5E+o ziV^b$g2w99BDRA{5Q5AvQwwVFTR2k62Ur}Si$J?{v%EmGLOdNb7Ck}EjjQt1=LJMn z?vn%~$r1dc>KGfP?7r7Ts|!My4jPM|AZn}1k4D+9$#I1oIcpB5!%=E}Zd$C*pV1bH z=n1xiN|e-;1F(*_=riqH86VIHepI3~YvRRbeI$KJt1CZd$7;-BY}S~NXR!R^0IdFP figgBU(MOCH5iHYhG`~|6Fkdf!*T2<7Z6^5-dX6V^ literal 0 HcmV?d00001 diff --git a/anygis/RusOurdoor_lite.zmp/info.txt b/anygis/RusOurdoor_lite.zmp/info.txt new file mode 100644 index 000000000..94ae5cdcb --- /dev/null +++ b/anygis/RusOurdoor_lite.zmp/info.txt @@ -0,0 +1,9 @@ +Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее + +Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: + +https://t.me/anygis +https://vk.com/anygis +anygis@bk.ru \ No newline at end of file diff --git a/anygis/RusOurdoor_lite.zmp/params.txt b/anygis/RusOurdoor_lite.zmp/params.txt new file mode 100644 index 000000000..8cb333d85 --- /dev/null +++ b/anygis/RusOurdoor_lite.zmp/params.txt @@ -0,0 +1,17 @@ +п»ї +[PARAMS] +GUID={A4694424-B8C8-4469-B80F-2470A8209BA5} +ParentSubMenu_ru=Туристические\Многослойные +ParentSubMenu_uk=Туристические\Многослойные +ParentSubMenu=Tourism\Karelia +name_ru=RusOutdoor maps iite +name_uk=RusOutdoor maps iite +name=RusOutdoor maps iite +NameInCache=RusOurdoor_lite +asLayer=0 +EPSG=3785 +DefURLBase=https://anygis.ru/api/v1/Combo_RusOutdoor_lite/{x}/{y}/{z} +RequestHead=Referer:http://www.sasgis.org/ +ContentType=image/jpeg,image/png +Ext=.jpg + diff --git a/anygis/Tracks_Strava_All.zmp/GetUrlScript.txt b/anygis/Tracks_Strava_All.zmp/GetUrlScript.txt deleted file mode 100755 index 73a86cecf..000000000 --- a/anygis/Tracks_Strava_All.zmp/GetUrlScript.txt +++ /dev/null @@ -1,216 +0,0 @@ -// ----------------------------------------------------------------------------- -// --- Универсальный адаптер от AnyGIS -// ----------------------------------------------------------------------------- - -// Этот скрипт призван упростить добавление новых карт в SasPlanet. -// Он избавит начинающих пользователей от необходимости программировать на Pascal, -// чтобы вносить изменения в файл GetUrlScript.txt при добавлении каждой новой карты. -// Теперь можно просто вставлять привычный URL с заглушками типа {x}, {y}, {z} -// в поле DefURLBase из файла params.txt. На пример, так: -// -// DefURLBase=http://{s:a,b,c}.tile.openstreetmap.org/{z}/{x}/{y}.png - - -// Скрипт разрабатывали Nnngrach и Erelen - - - - -// --- Список доступных параметров для автозамены: - -// {x} Номер тайла по оси X. (Как в картах OpenStreetMaps) -// {y} Номер тайла по оси Y. (Как в картах OpenStreetMaps) -// {z} Уровень приближения/зума. (Как в картах OpenStreetMaps) -// {q} Номер тайла в системе QuadKey. (Как в картах Bing) -// {-y} Инвертированный номер тайла по оси Y. (Как на сайте Nakarte) -// {bbox} Координаты границ тайла. (Для WMS серверов) -// {timeStamp} Текущее время в формате UnixTime. (Для карт с пробками) -// {z+1} Уровень зума. (Для карт, хранящихся в формате SasPlanet) -// {x/1024} Номер первой подпапки (Для карт, в формате SasPlanet) -// {y/1024} Номер второй подпапки (Для карт, в формате SasPlanet) -// {s:a,b,c} Буква или цифра с номером зеркала сервера. -// В данном случае - одна из букв (A,B,C), выбранная рандомно. - - - -// Совет для начинающих: если хотите разобраться в этом коде, -// то удобнее всего читать его с конца. - -// Еще один совет: если будете писать свои скрипты, -// то вывод в консоль (а точнее, в окно Debug Output ) делается так: -// -// writeLn('Hello Sas.Planet!'); - - - - - - - - -// ----------------------------------------------------------------------------- -// --- 4. Вспомогательные функции -// ----------------------------------------------------------------------------- - -// --- Проверить, содержит ли одна строка другую? -function isContains(findingText: string; inSourceText: string) : boolean; -begin - result := pos(findingText, inSourceText) <> 0; -end; - - -// --- Округление до нужного количества знаков после запятой -// --- (стандартные функции округления у меня почему-то не заработали) -function roundFor(sourceNumber: Double ; digitAfterComma: integer) : string; -var - intPart, floatPart : integer; -begin - intPart := floor(sourceNumber); - floatPart := floor( (sourceNumber - intPart) * round(intPower(10, digitAfterComma)) ) - result := intToStr(intPart) + '.' + intToStr(floatPart) -end; - - -// --- Вычислить номер тайла в системе Quadkey (используется в картах Bing) -function getQuadkeyText(x: integer; y: integer; z: integer) : string; -var - i, q : byte; -begin - result:=''; - for i:=1 to z do begin - q:=0; - if x mod 2 = 1 then q := q + 1; - if y mod 2 = 1 then q := q + 2; - x := x div 2; - y := y div 2; - result := intToStr(q) + result; - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 3. Если требуется, то подставить имя для зеркала сервера -// --- на место заглушки типа {s: a,b,c} -// ----------------------------------------------------------------------------- -type - TSubst = record - mask, val : string; - end; - TSubsts = record - count : integer; - s : array [0..15] of TSubst; - end; - - -function replaceServerName(url: string) : string; -var - s, ss : string; - sarr : array [0..9] of string; - sarr_l, p : integer; - -begin - s := RegExprGetMatchSubStr(url, '\{[sS]:([^}]+)\}', 0); - if s <> '' then begin - ss := s; - ss := StringReplace(ss, '{s:', '', [rfIgnoreCase]); - ss := StringReplace(ss, '}', '', [rfIgnoreCase]); - ss := ss + ','; - sarr_l := 0; - while ss <> '' do begin - p := pos(',', ss); - if p = 0 then p := length(ss); - sarr[sarr_l] := copy(ss, 1, p-1); - sarr_l := sarr_l + 1; - delete(ss, 1, p); - end; - url := StringReplace(url, s, sarr[random(sarr_l)], []); - end; - Result := url; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 2. Если требуется, то вычислить и подставить в шаблон URL адреса -// --- нужные значения на место заглушек типа {x}, {y}, {z}. -// ----------------------------------------------------------------------------- -function replaceLeafletPlaceholders(urlTemplate: string; x: integer; y: integer; z: integer) : string; -var - options: tReplaceFlags; - calculatedValue: string; - -begin - options := [rfReplaceAll, rfIgnoreCase]; - result := urlTemplate; - - if isContains('{x}', result) then begin - calculatedValue := intToStr(x); - result := stringReplace( result, '{x}', calculatedValue, options) - end; - - if isContains('{y}', result) then begin - calculatedValue := intToStr(y); - result := stringReplace( result, '{y}', calculatedValue, options) - end; - - if isContains('{z}', result) then begin - calculatedValue := intToStr(z-1); - result := stringReplace( result, '{z}', calculatedValue, options) - end; - - if isContains('{z+1}', result) then begin - calculatedValue := intToStr(z); - result := stringReplace( result, '{z+1}', calculatedValue, options) - end; - - if isContains('{x/1024}', result) then begin - calculatedValue := intToStr(x div 1024); - result := stringReplace( result, '{x/1024}', calculatedValue, options) - end; - - if isContains('{y/1024}', result) then begin - calculatedValue := intToStr(y div 1024); - result := stringReplace( result, '{y/1024}', calculatedValue, options) - end; - - if isContains('{-y}', result) then begin - calculatedValue := intToStr( round(intPower(2, z-1)) - 1 - y); - result := stringReplace( result, '{-y}', calculatedValue, options) - end; - - if isContains('{q}', result) then begin - calculatedValue := getQuadkeyText(x, y, z); - result := stringReplace( result, '{q}', calculatedValue, options) - end; - - if isContains('{bbox}', result) then begin - result := stringReplace( result, '{bbox}', '{Left},{Bottom},{Right},{Top}', options) - result := stringReplace( result, '{Left}', roundFor(GetLMetr,8), options) - result := stringReplace( result, '{Bottom}', roundFor(GetBMetr,8), options) - result := stringReplace( result, '{Right}', roundFor(GetRMetr,8), options) - result := stringReplace( result, '{Top}', roundFor(GetTMetr,8), options) - // Делаю замену в пять операций потому, что при попытке - // сделать все одной строкой возникает ошибка. - // Возможно какое-то ограничение на память. - end; - - if isContains('{timeStamp}', result) then begin - calculatedValue := IntToStr(GetUnixTime); - result := stringReplace( result, '{timeStamp}', calculatedValue, options) - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 1. Старт скрипта. Запустить вычисление URL-адреса тайла. -// --- Скачать тайл по полученному URL. -// ----------------------------------------------------------------------------- -begin - resultURL := replaceLeafletPlaceholders(getURLBase, getX, getY, getZ); - resultURL := replaceServerName(resultURL); -end. diff --git a/anygis/Tracks_Strava_All.zmp/info.txt b/anygis/Tracks_Strava_All.zmp/info.txt index 615f451d0..94ae5cdcb 100644 --- a/anygis/Tracks_Strava_All.zmp/info.txt +++ b/anygis/Tracks_Strava_All.zmp/info.txt @@ -1,4 +1,6 @@ Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: diff --git a/anygis/Tracks_Strava_All.zmp/params.txt b/anygis/Tracks_Strava_All.zmp/params.txt index 5d2262f15..80fb7acce 100644 --- a/anygis/Tracks_Strava_All.zmp/params.txt +++ b/anygis/Tracks_Strava_All.zmp/params.txt @@ -1,6 +1,6 @@ п»ї [PARAMS] -GUID={7E330845-C966-4B63-B909-5214A016BDB1} +GUID={A26CA77D-E37A-42FF-AB59-A6211163C2BB} ParentSubMenu_ru=Маршруты Рё GPS-Треки ParentSubMenu_uk=Маршруты Рё GPS-Треки ParentSubMenu=Ways and GPS-Tracks @@ -9,9 +9,7 @@ name_uk=Strava Heatmap - Р’СЃРµ слои name=Strava Heatmap - All layers NameInCache=Tracks_Strava_All asLayer=1 -projection=1 -sradiusa=6378137 -sradiusb=6378137 +EPSG=3785 DefURLBase=https://anygis.ru/api/v1/Tracks_Strava_All/{x}/{y}/{z} RequestHead=Referer:https://www.strava.com/heatmap\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 ContentType=image/jpeg,image/png diff --git a/anygis/Tracks_Strava_Ride.zmp/GetUrlScript.txt b/anygis/Tracks_Strava_Ride.zmp/GetUrlScript.txt deleted file mode 100755 index 73a86cecf..000000000 --- a/anygis/Tracks_Strava_Ride.zmp/GetUrlScript.txt +++ /dev/null @@ -1,216 +0,0 @@ -// ----------------------------------------------------------------------------- -// --- Универсальный адаптер от AnyGIS -// ----------------------------------------------------------------------------- - -// Этот скрипт призван упростить добавление новых карт в SasPlanet. -// Он избавит начинающих пользователей от необходимости программировать на Pascal, -// чтобы вносить изменения в файл GetUrlScript.txt при добавлении каждой новой карты. -// Теперь можно просто вставлять привычный URL с заглушками типа {x}, {y}, {z} -// в поле DefURLBase из файла params.txt. На пример, так: -// -// DefURLBase=http://{s:a,b,c}.tile.openstreetmap.org/{z}/{x}/{y}.png - - -// Скрипт разрабатывали Nnngrach и Erelen - - - - -// --- Список доступных параметров для автозамены: - -// {x} Номер тайла по оси X. (Как в картах OpenStreetMaps) -// {y} Номер тайла по оси Y. (Как в картах OpenStreetMaps) -// {z} Уровень приближения/зума. (Как в картах OpenStreetMaps) -// {q} Номер тайла в системе QuadKey. (Как в картах Bing) -// {-y} Инвертированный номер тайла по оси Y. (Как на сайте Nakarte) -// {bbox} Координаты границ тайла. (Для WMS серверов) -// {timeStamp} Текущее время в формате UnixTime. (Для карт с пробками) -// {z+1} Уровень зума. (Для карт, хранящихся в формате SasPlanet) -// {x/1024} Номер первой подпапки (Для карт, в формате SasPlanet) -// {y/1024} Номер второй подпапки (Для карт, в формате SasPlanet) -// {s:a,b,c} Буква или цифра с номером зеркала сервера. -// В данном случае - одна из букв (A,B,C), выбранная рандомно. - - - -// Совет для начинающих: если хотите разобраться в этом коде, -// то удобнее всего читать его с конца. - -// Еще один совет: если будете писать свои скрипты, -// то вывод в консоль (а точнее, в окно Debug Output ) делается так: -// -// writeLn('Hello Sas.Planet!'); - - - - - - - - -// ----------------------------------------------------------------------------- -// --- 4. Вспомогательные функции -// ----------------------------------------------------------------------------- - -// --- Проверить, содержит ли одна строка другую? -function isContains(findingText: string; inSourceText: string) : boolean; -begin - result := pos(findingText, inSourceText) <> 0; -end; - - -// --- Округление до нужного количества знаков после запятой -// --- (стандартные функции округления у меня почему-то не заработали) -function roundFor(sourceNumber: Double ; digitAfterComma: integer) : string; -var - intPart, floatPart : integer; -begin - intPart := floor(sourceNumber); - floatPart := floor( (sourceNumber - intPart) * round(intPower(10, digitAfterComma)) ) - result := intToStr(intPart) + '.' + intToStr(floatPart) -end; - - -// --- Вычислить номер тайла в системе Quadkey (используется в картах Bing) -function getQuadkeyText(x: integer; y: integer; z: integer) : string; -var - i, q : byte; -begin - result:=''; - for i:=1 to z do begin - q:=0; - if x mod 2 = 1 then q := q + 1; - if y mod 2 = 1 then q := q + 2; - x := x div 2; - y := y div 2; - result := intToStr(q) + result; - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 3. Если требуется, то подставить имя для зеркала сервера -// --- на место заглушки типа {s: a,b,c} -// ----------------------------------------------------------------------------- -type - TSubst = record - mask, val : string; - end; - TSubsts = record - count : integer; - s : array [0..15] of TSubst; - end; - - -function replaceServerName(url: string) : string; -var - s, ss : string; - sarr : array [0..9] of string; - sarr_l, p : integer; - -begin - s := RegExprGetMatchSubStr(url, '\{[sS]:([^}]+)\}', 0); - if s <> '' then begin - ss := s; - ss := StringReplace(ss, '{s:', '', [rfIgnoreCase]); - ss := StringReplace(ss, '}', '', [rfIgnoreCase]); - ss := ss + ','; - sarr_l := 0; - while ss <> '' do begin - p := pos(',', ss); - if p = 0 then p := length(ss); - sarr[sarr_l] := copy(ss, 1, p-1); - sarr_l := sarr_l + 1; - delete(ss, 1, p); - end; - url := StringReplace(url, s, sarr[random(sarr_l)], []); - end; - Result := url; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 2. Если требуется, то вычислить и подставить в шаблон URL адреса -// --- нужные значения на место заглушек типа {x}, {y}, {z}. -// ----------------------------------------------------------------------------- -function replaceLeafletPlaceholders(urlTemplate: string; x: integer; y: integer; z: integer) : string; -var - options: tReplaceFlags; - calculatedValue: string; - -begin - options := [rfReplaceAll, rfIgnoreCase]; - result := urlTemplate; - - if isContains('{x}', result) then begin - calculatedValue := intToStr(x); - result := stringReplace( result, '{x}', calculatedValue, options) - end; - - if isContains('{y}', result) then begin - calculatedValue := intToStr(y); - result := stringReplace( result, '{y}', calculatedValue, options) - end; - - if isContains('{z}', result) then begin - calculatedValue := intToStr(z-1); - result := stringReplace( result, '{z}', calculatedValue, options) - end; - - if isContains('{z+1}', result) then begin - calculatedValue := intToStr(z); - result := stringReplace( result, '{z+1}', calculatedValue, options) - end; - - if isContains('{x/1024}', result) then begin - calculatedValue := intToStr(x div 1024); - result := stringReplace( result, '{x/1024}', calculatedValue, options) - end; - - if isContains('{y/1024}', result) then begin - calculatedValue := intToStr(y div 1024); - result := stringReplace( result, '{y/1024}', calculatedValue, options) - end; - - if isContains('{-y}', result) then begin - calculatedValue := intToStr( round(intPower(2, z-1)) - 1 - y); - result := stringReplace( result, '{-y}', calculatedValue, options) - end; - - if isContains('{q}', result) then begin - calculatedValue := getQuadkeyText(x, y, z); - result := stringReplace( result, '{q}', calculatedValue, options) - end; - - if isContains('{bbox}', result) then begin - result := stringReplace( result, '{bbox}', '{Left},{Bottom},{Right},{Top}', options) - result := stringReplace( result, '{Left}', roundFor(GetLMetr,8), options) - result := stringReplace( result, '{Bottom}', roundFor(GetBMetr,8), options) - result := stringReplace( result, '{Right}', roundFor(GetRMetr,8), options) - result := stringReplace( result, '{Top}', roundFor(GetTMetr,8), options) - // Делаю замену в пять операций потому, что при попытке - // сделать все одной строкой возникает ошибка. - // Возможно какое-то ограничение на память. - end; - - if isContains('{timeStamp}', result) then begin - calculatedValue := IntToStr(GetUnixTime); - result := stringReplace( result, '{timeStamp}', calculatedValue, options) - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 1. Старт скрипта. Запустить вычисление URL-адреса тайла. -// --- Скачать тайл по полученному URL. -// ----------------------------------------------------------------------------- -begin - resultURL := replaceLeafletPlaceholders(getURLBase, getX, getY, getZ); - resultURL := replaceServerName(resultURL); -end. diff --git a/anygis/Tracks_Strava_Ride.zmp/info.txt b/anygis/Tracks_Strava_Ride.zmp/info.txt index 615f451d0..94ae5cdcb 100644 --- a/anygis/Tracks_Strava_Ride.zmp/info.txt +++ b/anygis/Tracks_Strava_Ride.zmp/info.txt @@ -1,4 +1,6 @@ Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: diff --git a/anygis/Tracks_Strava_Ride.zmp/params.txt b/anygis/Tracks_Strava_Ride.zmp/params.txt index 4d351c42c..f4f1812a0 100644 --- a/anygis/Tracks_Strava_Ride.zmp/params.txt +++ b/anygis/Tracks_Strava_Ride.zmp/params.txt @@ -1,6 +1,6 @@ п»ї [PARAMS] -GUID={B71DF157-F075-4F01-9A69-DF344D69DF2D} +GUID={9442ADAB-F5FD-4184-BAE5-8FBABC507E9F} ParentSubMenu_ru=Маршруты Рё GPS-Треки ParentSubMenu_uk=Маршруты Рё GPS-Треки ParentSubMenu=Ways and GPS-Tracks @@ -9,9 +9,7 @@ name_uk=Strava Heatmap - Велоспорт name=Strava Heatmap - Ride NameInCache=Tracks_Strava_Ride asLayer=1 -projection=1 -sradiusa=6378137 -sradiusb=6378137 +EPSG=3785 DefURLBase=https://anygis.ru/api/v1/Tracks_Strava_Ride/{x}/{y}/{z} RequestHead=Referer:https://www.strava.com/heatmap\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 ContentType=image/jpeg,image/png diff --git a/anygis/Tracks_Strava_Run.zmp/GetUrlScript.txt b/anygis/Tracks_Strava_Run.zmp/GetUrlScript.txt deleted file mode 100755 index 73a86cecf..000000000 --- a/anygis/Tracks_Strava_Run.zmp/GetUrlScript.txt +++ /dev/null @@ -1,216 +0,0 @@ -// ----------------------------------------------------------------------------- -// --- Универсальный адаптер от AnyGIS -// ----------------------------------------------------------------------------- - -// Этот скрипт призван упростить добавление новых карт в SasPlanet. -// Он избавит начинающих пользователей от необходимости программировать на Pascal, -// чтобы вносить изменения в файл GetUrlScript.txt при добавлении каждой новой карты. -// Теперь можно просто вставлять привычный URL с заглушками типа {x}, {y}, {z} -// в поле DefURLBase из файла params.txt. На пример, так: -// -// DefURLBase=http://{s:a,b,c}.tile.openstreetmap.org/{z}/{x}/{y}.png - - -// Скрипт разрабатывали Nnngrach и Erelen - - - - -// --- Список доступных параметров для автозамены: - -// {x} Номер тайла по оси X. (Как в картах OpenStreetMaps) -// {y} Номер тайла по оси Y. (Как в картах OpenStreetMaps) -// {z} Уровень приближения/зума. (Как в картах OpenStreetMaps) -// {q} Номер тайла в системе QuadKey. (Как в картах Bing) -// {-y} Инвертированный номер тайла по оси Y. (Как на сайте Nakarte) -// {bbox} Координаты границ тайла. (Для WMS серверов) -// {timeStamp} Текущее время в формате UnixTime. (Для карт с пробками) -// {z+1} Уровень зума. (Для карт, хранящихся в формате SasPlanet) -// {x/1024} Номер первой подпапки (Для карт, в формате SasPlanet) -// {y/1024} Номер второй подпапки (Для карт, в формате SasPlanet) -// {s:a,b,c} Буква или цифра с номером зеркала сервера. -// В данном случае - одна из букв (A,B,C), выбранная рандомно. - - - -// Совет для начинающих: если хотите разобраться в этом коде, -// то удобнее всего читать его с конца. - -// Еще один совет: если будете писать свои скрипты, -// то вывод в консоль (а точнее, в окно Debug Output ) делается так: -// -// writeLn('Hello Sas.Planet!'); - - - - - - - - -// ----------------------------------------------------------------------------- -// --- 4. Вспомогательные функции -// ----------------------------------------------------------------------------- - -// --- Проверить, содержит ли одна строка другую? -function isContains(findingText: string; inSourceText: string) : boolean; -begin - result := pos(findingText, inSourceText) <> 0; -end; - - -// --- Округление до нужного количества знаков после запятой -// --- (стандартные функции округления у меня почему-то не заработали) -function roundFor(sourceNumber: Double ; digitAfterComma: integer) : string; -var - intPart, floatPart : integer; -begin - intPart := floor(sourceNumber); - floatPart := floor( (sourceNumber - intPart) * round(intPower(10, digitAfterComma)) ) - result := intToStr(intPart) + '.' + intToStr(floatPart) -end; - - -// --- Вычислить номер тайла в системе Quadkey (используется в картах Bing) -function getQuadkeyText(x: integer; y: integer; z: integer) : string; -var - i, q : byte; -begin - result:=''; - for i:=1 to z do begin - q:=0; - if x mod 2 = 1 then q := q + 1; - if y mod 2 = 1 then q := q + 2; - x := x div 2; - y := y div 2; - result := intToStr(q) + result; - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 3. Если требуется, то подставить имя для зеркала сервера -// --- на место заглушки типа {s: a,b,c} -// ----------------------------------------------------------------------------- -type - TSubst = record - mask, val : string; - end; - TSubsts = record - count : integer; - s : array [0..15] of TSubst; - end; - - -function replaceServerName(url: string) : string; -var - s, ss : string; - sarr : array [0..9] of string; - sarr_l, p : integer; - -begin - s := RegExprGetMatchSubStr(url, '\{[sS]:([^}]+)\}', 0); - if s <> '' then begin - ss := s; - ss := StringReplace(ss, '{s:', '', [rfIgnoreCase]); - ss := StringReplace(ss, '}', '', [rfIgnoreCase]); - ss := ss + ','; - sarr_l := 0; - while ss <> '' do begin - p := pos(',', ss); - if p = 0 then p := length(ss); - sarr[sarr_l] := copy(ss, 1, p-1); - sarr_l := sarr_l + 1; - delete(ss, 1, p); - end; - url := StringReplace(url, s, sarr[random(sarr_l)], []); - end; - Result := url; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 2. Если требуется, то вычислить и подставить в шаблон URL адреса -// --- нужные значения на место заглушек типа {x}, {y}, {z}. -// ----------------------------------------------------------------------------- -function replaceLeafletPlaceholders(urlTemplate: string; x: integer; y: integer; z: integer) : string; -var - options: tReplaceFlags; - calculatedValue: string; - -begin - options := [rfReplaceAll, rfIgnoreCase]; - result := urlTemplate; - - if isContains('{x}', result) then begin - calculatedValue := intToStr(x); - result := stringReplace( result, '{x}', calculatedValue, options) - end; - - if isContains('{y}', result) then begin - calculatedValue := intToStr(y); - result := stringReplace( result, '{y}', calculatedValue, options) - end; - - if isContains('{z}', result) then begin - calculatedValue := intToStr(z-1); - result := stringReplace( result, '{z}', calculatedValue, options) - end; - - if isContains('{z+1}', result) then begin - calculatedValue := intToStr(z); - result := stringReplace( result, '{z+1}', calculatedValue, options) - end; - - if isContains('{x/1024}', result) then begin - calculatedValue := intToStr(x div 1024); - result := stringReplace( result, '{x/1024}', calculatedValue, options) - end; - - if isContains('{y/1024}', result) then begin - calculatedValue := intToStr(y div 1024); - result := stringReplace( result, '{y/1024}', calculatedValue, options) - end; - - if isContains('{-y}', result) then begin - calculatedValue := intToStr( round(intPower(2, z-1)) - 1 - y); - result := stringReplace( result, '{-y}', calculatedValue, options) - end; - - if isContains('{q}', result) then begin - calculatedValue := getQuadkeyText(x, y, z); - result := stringReplace( result, '{q}', calculatedValue, options) - end; - - if isContains('{bbox}', result) then begin - result := stringReplace( result, '{bbox}', '{Left},{Bottom},{Right},{Top}', options) - result := stringReplace( result, '{Left}', roundFor(GetLMetr,8), options) - result := stringReplace( result, '{Bottom}', roundFor(GetBMetr,8), options) - result := stringReplace( result, '{Right}', roundFor(GetRMetr,8), options) - result := stringReplace( result, '{Top}', roundFor(GetTMetr,8), options) - // Делаю замену в пять операций потому, что при попытке - // сделать все одной строкой возникает ошибка. - // Возможно какое-то ограничение на память. - end; - - if isContains('{timeStamp}', result) then begin - calculatedValue := IntToStr(GetUnixTime); - result := stringReplace( result, '{timeStamp}', calculatedValue, options) - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 1. Старт скрипта. Запустить вычисление URL-адреса тайла. -// --- Скачать тайл по полученному URL. -// ----------------------------------------------------------------------------- -begin - resultURL := replaceLeafletPlaceholders(getURLBase, getX, getY, getZ); - resultURL := replaceServerName(resultURL); -end. diff --git a/anygis/Tracks_Strava_Run.zmp/info.txt b/anygis/Tracks_Strava_Run.zmp/info.txt index 615f451d0..94ae5cdcb 100644 --- a/anygis/Tracks_Strava_Run.zmp/info.txt +++ b/anygis/Tracks_Strava_Run.zmp/info.txt @@ -1,4 +1,6 @@ Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: diff --git a/anygis/Tracks_Strava_Run.zmp/params.txt b/anygis/Tracks_Strava_Run.zmp/params.txt index 634e28945..0115da22c 100644 --- a/anygis/Tracks_Strava_Run.zmp/params.txt +++ b/anygis/Tracks_Strava_Run.zmp/params.txt @@ -1,6 +1,6 @@ п»ї [PARAMS] -GUID={BF69A930-3739-454A-A833-DED4C0841297} +GUID={89BA4332-E79A-40F0-9BC1-AF05BCFE52FC} ParentSubMenu_ru=Маршруты Рё GPS-Треки ParentSubMenu_uk=Маршруты Рё GPS-Треки ParentSubMenu=Ways and GPS-Tracks @@ -9,9 +9,7 @@ name_uk=Strava Heatmap - Бег name=Strava Heatmap - Run NameInCache=Tracks_Strava_Run asLayer=1 -projection=1 -sradiusa=6378137 -sradiusb=6378137 +EPSG=3785 DefURLBase=https://anygis.ru/api/v1/Tracks_Strava_Run/{x}/{y}/{z} RequestHead=Referer:https://www.strava.com/heatmap\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 ContentType=image/jpeg,image/png diff --git a/anygis/Tracks_Strava_RunAndRide.zmp/GetUrlScript.txt b/anygis/Tracks_Strava_RunAndRide.zmp/GetUrlScript.txt deleted file mode 100755 index 73a86cecf..000000000 --- a/anygis/Tracks_Strava_RunAndRide.zmp/GetUrlScript.txt +++ /dev/null @@ -1,216 +0,0 @@ -// ----------------------------------------------------------------------------- -// --- Универсальный адаптер от AnyGIS -// ----------------------------------------------------------------------------- - -// Этот скрипт призван упростить добавление новых карт в SasPlanet. -// Он избавит начинающих пользователей от необходимости программировать на Pascal, -// чтобы вносить изменения в файл GetUrlScript.txt при добавлении каждой новой карты. -// Теперь можно просто вставлять привычный URL с заглушками типа {x}, {y}, {z} -// в поле DefURLBase из файла params.txt. На пример, так: -// -// DefURLBase=http://{s:a,b,c}.tile.openstreetmap.org/{z}/{x}/{y}.png - - -// Скрипт разрабатывали Nnngrach и Erelen - - - - -// --- Список доступных параметров для автозамены: - -// {x} Номер тайла по оси X. (Как в картах OpenStreetMaps) -// {y} Номер тайла по оси Y. (Как в картах OpenStreetMaps) -// {z} Уровень приближения/зума. (Как в картах OpenStreetMaps) -// {q} Номер тайла в системе QuadKey. (Как в картах Bing) -// {-y} Инвертированный номер тайла по оси Y. (Как на сайте Nakarte) -// {bbox} Координаты границ тайла. (Для WMS серверов) -// {timeStamp} Текущее время в формате UnixTime. (Для карт с пробками) -// {z+1} Уровень зума. (Для карт, хранящихся в формате SasPlanet) -// {x/1024} Номер первой подпапки (Для карт, в формате SasPlanet) -// {y/1024} Номер второй подпапки (Для карт, в формате SasPlanet) -// {s:a,b,c} Буква или цифра с номером зеркала сервера. -// В данном случае - одна из букв (A,B,C), выбранная рандомно. - - - -// Совет для начинающих: если хотите разобраться в этом коде, -// то удобнее всего читать его с конца. - -// Еще один совет: если будете писать свои скрипты, -// то вывод в консоль (а точнее, в окно Debug Output ) делается так: -// -// writeLn('Hello Sas.Planet!'); - - - - - - - - -// ----------------------------------------------------------------------------- -// --- 4. Вспомогательные функции -// ----------------------------------------------------------------------------- - -// --- Проверить, содержит ли одна строка другую? -function isContains(findingText: string; inSourceText: string) : boolean; -begin - result := pos(findingText, inSourceText) <> 0; -end; - - -// --- Округление до нужного количества знаков после запятой -// --- (стандартные функции округления у меня почему-то не заработали) -function roundFor(sourceNumber: Double ; digitAfterComma: integer) : string; -var - intPart, floatPart : integer; -begin - intPart := floor(sourceNumber); - floatPart := floor( (sourceNumber - intPart) * round(intPower(10, digitAfterComma)) ) - result := intToStr(intPart) + '.' + intToStr(floatPart) -end; - - -// --- Вычислить номер тайла в системе Quadkey (используется в картах Bing) -function getQuadkeyText(x: integer; y: integer; z: integer) : string; -var - i, q : byte; -begin - result:=''; - for i:=1 to z do begin - q:=0; - if x mod 2 = 1 then q := q + 1; - if y mod 2 = 1 then q := q + 2; - x := x div 2; - y := y div 2; - result := intToStr(q) + result; - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 3. Если требуется, то подставить имя для зеркала сервера -// --- на место заглушки типа {s: a,b,c} -// ----------------------------------------------------------------------------- -type - TSubst = record - mask, val : string; - end; - TSubsts = record - count : integer; - s : array [0..15] of TSubst; - end; - - -function replaceServerName(url: string) : string; -var - s, ss : string; - sarr : array [0..9] of string; - sarr_l, p : integer; - -begin - s := RegExprGetMatchSubStr(url, '\{[sS]:([^}]+)\}', 0); - if s <> '' then begin - ss := s; - ss := StringReplace(ss, '{s:', '', [rfIgnoreCase]); - ss := StringReplace(ss, '}', '', [rfIgnoreCase]); - ss := ss + ','; - sarr_l := 0; - while ss <> '' do begin - p := pos(',', ss); - if p = 0 then p := length(ss); - sarr[sarr_l] := copy(ss, 1, p-1); - sarr_l := sarr_l + 1; - delete(ss, 1, p); - end; - url := StringReplace(url, s, sarr[random(sarr_l)], []); - end; - Result := url; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 2. Если требуется, то вычислить и подставить в шаблон URL адреса -// --- нужные значения на место заглушек типа {x}, {y}, {z}. -// ----------------------------------------------------------------------------- -function replaceLeafletPlaceholders(urlTemplate: string; x: integer; y: integer; z: integer) : string; -var - options: tReplaceFlags; - calculatedValue: string; - -begin - options := [rfReplaceAll, rfIgnoreCase]; - result := urlTemplate; - - if isContains('{x}', result) then begin - calculatedValue := intToStr(x); - result := stringReplace( result, '{x}', calculatedValue, options) - end; - - if isContains('{y}', result) then begin - calculatedValue := intToStr(y); - result := stringReplace( result, '{y}', calculatedValue, options) - end; - - if isContains('{z}', result) then begin - calculatedValue := intToStr(z-1); - result := stringReplace( result, '{z}', calculatedValue, options) - end; - - if isContains('{z+1}', result) then begin - calculatedValue := intToStr(z); - result := stringReplace( result, '{z+1}', calculatedValue, options) - end; - - if isContains('{x/1024}', result) then begin - calculatedValue := intToStr(x div 1024); - result := stringReplace( result, '{x/1024}', calculatedValue, options) - end; - - if isContains('{y/1024}', result) then begin - calculatedValue := intToStr(y div 1024); - result := stringReplace( result, '{y/1024}', calculatedValue, options) - end; - - if isContains('{-y}', result) then begin - calculatedValue := intToStr( round(intPower(2, z-1)) - 1 - y); - result := stringReplace( result, '{-y}', calculatedValue, options) - end; - - if isContains('{q}', result) then begin - calculatedValue := getQuadkeyText(x, y, z); - result := stringReplace( result, '{q}', calculatedValue, options) - end; - - if isContains('{bbox}', result) then begin - result := stringReplace( result, '{bbox}', '{Left},{Bottom},{Right},{Top}', options) - result := stringReplace( result, '{Left}', roundFor(GetLMetr,8), options) - result := stringReplace( result, '{Bottom}', roundFor(GetBMetr,8), options) - result := stringReplace( result, '{Right}', roundFor(GetRMetr,8), options) - result := stringReplace( result, '{Top}', roundFor(GetTMetr,8), options) - // Делаю замену в пять операций потому, что при попытке - // сделать все одной строкой возникает ошибка. - // Возможно какое-то ограничение на память. - end; - - if isContains('{timeStamp}', result) then begin - calculatedValue := IntToStr(GetUnixTime); - result := stringReplace( result, '{timeStamp}', calculatedValue, options) - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 1. Старт скрипта. Запустить вычисление URL-адреса тайла. -// --- Скачать тайл по полученному URL. -// ----------------------------------------------------------------------------- -begin - resultURL := replaceLeafletPlaceholders(getURLBase, getX, getY, getZ); - resultURL := replaceServerName(resultURL); -end. diff --git a/anygis/Tracks_Strava_RunAndRide.zmp/info.txt b/anygis/Tracks_Strava_RunAndRide.zmp/info.txt index 615f451d0..94ae5cdcb 100644 --- a/anygis/Tracks_Strava_RunAndRide.zmp/info.txt +++ b/anygis/Tracks_Strava_RunAndRide.zmp/info.txt @@ -1,4 +1,6 @@ Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: diff --git a/anygis/Tracks_Strava_RunAndRide.zmp/params.txt b/anygis/Tracks_Strava_RunAndRide.zmp/params.txt index 544126d0e..4c42b2524 100644 --- a/anygis/Tracks_Strava_RunAndRide.zmp/params.txt +++ b/anygis/Tracks_Strava_RunAndRide.zmp/params.txt @@ -1,6 +1,6 @@ п»ї [PARAMS] -GUID={B5C2127C-56AC-4630-94A1-34E17F5B183F} +GUID={C9F9F3BD-4BBD-4AFE-ABBF-171AA57F5D06} ParentSubMenu_ru=Маршруты Рё GPS-Треки ParentSubMenu_uk=Маршруты Рё GPS-Треки ParentSubMenu=Ways and GPS-Tracks @@ -9,9 +9,7 @@ name_uk=Strava Heatmap - Велоспорт Рё Бег (beta) name=Strava Heatmap - RunAndRide (beta) NameInCache=Tracks_Strava_RunAndRide asLayer=1 -projection=1 -sradiusa=6378137 -sradiusb=6378137 +EPSG=3785 DefURLBase=https://anygis.ru/api/v1/Tracks_Strava_RunAndRide/{x}/{y}/{z} RequestHead=Referer:https://www.strava.com/heatmap\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 ContentType=image/jpeg,image/png diff --git a/anygis/Tracks_Strava_Water.zmp/GetUrlScript.txt b/anygis/Tracks_Strava_Water.zmp/GetUrlScript.txt deleted file mode 100755 index 73a86cecf..000000000 --- a/anygis/Tracks_Strava_Water.zmp/GetUrlScript.txt +++ /dev/null @@ -1,216 +0,0 @@ -// ----------------------------------------------------------------------------- -// --- Универсальный адаптер от AnyGIS -// ----------------------------------------------------------------------------- - -// Этот скрипт призван упростить добавление новых карт в SasPlanet. -// Он избавит начинающих пользователей от необходимости программировать на Pascal, -// чтобы вносить изменения в файл GetUrlScript.txt при добавлении каждой новой карты. -// Теперь можно просто вставлять привычный URL с заглушками типа {x}, {y}, {z} -// в поле DefURLBase из файла params.txt. На пример, так: -// -// DefURLBase=http://{s:a,b,c}.tile.openstreetmap.org/{z}/{x}/{y}.png - - -// Скрипт разрабатывали Nnngrach и Erelen - - - - -// --- Список доступных параметров для автозамены: - -// {x} Номер тайла по оси X. (Как в картах OpenStreetMaps) -// {y} Номер тайла по оси Y. (Как в картах OpenStreetMaps) -// {z} Уровень приближения/зума. (Как в картах OpenStreetMaps) -// {q} Номер тайла в системе QuadKey. (Как в картах Bing) -// {-y} Инвертированный номер тайла по оси Y. (Как на сайте Nakarte) -// {bbox} Координаты границ тайла. (Для WMS серверов) -// {timeStamp} Текущее время в формате UnixTime. (Для карт с пробками) -// {z+1} Уровень зума. (Для карт, хранящихся в формате SasPlanet) -// {x/1024} Номер первой подпапки (Для карт, в формате SasPlanet) -// {y/1024} Номер второй подпапки (Для карт, в формате SasPlanet) -// {s:a,b,c} Буква или цифра с номером зеркала сервера. -// В данном случае - одна из букв (A,B,C), выбранная рандомно. - - - -// Совет для начинающих: если хотите разобраться в этом коде, -// то удобнее всего читать его с конца. - -// Еще один совет: если будете писать свои скрипты, -// то вывод в консоль (а точнее, в окно Debug Output ) делается так: -// -// writeLn('Hello Sas.Planet!'); - - - - - - - - -// ----------------------------------------------------------------------------- -// --- 4. Вспомогательные функции -// ----------------------------------------------------------------------------- - -// --- Проверить, содержит ли одна строка другую? -function isContains(findingText: string; inSourceText: string) : boolean; -begin - result := pos(findingText, inSourceText) <> 0; -end; - - -// --- Округление до нужного количества знаков после запятой -// --- (стандартные функции округления у меня почему-то не заработали) -function roundFor(sourceNumber: Double ; digitAfterComma: integer) : string; -var - intPart, floatPart : integer; -begin - intPart := floor(sourceNumber); - floatPart := floor( (sourceNumber - intPart) * round(intPower(10, digitAfterComma)) ) - result := intToStr(intPart) + '.' + intToStr(floatPart) -end; - - -// --- Вычислить номер тайла в системе Quadkey (используется в картах Bing) -function getQuadkeyText(x: integer; y: integer; z: integer) : string; -var - i, q : byte; -begin - result:=''; - for i:=1 to z do begin - q:=0; - if x mod 2 = 1 then q := q + 1; - if y mod 2 = 1 then q := q + 2; - x := x div 2; - y := y div 2; - result := intToStr(q) + result; - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 3. Если требуется, то подставить имя для зеркала сервера -// --- на место заглушки типа {s: a,b,c} -// ----------------------------------------------------------------------------- -type - TSubst = record - mask, val : string; - end; - TSubsts = record - count : integer; - s : array [0..15] of TSubst; - end; - - -function replaceServerName(url: string) : string; -var - s, ss : string; - sarr : array [0..9] of string; - sarr_l, p : integer; - -begin - s := RegExprGetMatchSubStr(url, '\{[sS]:([^}]+)\}', 0); - if s <> '' then begin - ss := s; - ss := StringReplace(ss, '{s:', '', [rfIgnoreCase]); - ss := StringReplace(ss, '}', '', [rfIgnoreCase]); - ss := ss + ','; - sarr_l := 0; - while ss <> '' do begin - p := pos(',', ss); - if p = 0 then p := length(ss); - sarr[sarr_l] := copy(ss, 1, p-1); - sarr_l := sarr_l + 1; - delete(ss, 1, p); - end; - url := StringReplace(url, s, sarr[random(sarr_l)], []); - end; - Result := url; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 2. Если требуется, то вычислить и подставить в шаблон URL адреса -// --- нужные значения на место заглушек типа {x}, {y}, {z}. -// ----------------------------------------------------------------------------- -function replaceLeafletPlaceholders(urlTemplate: string; x: integer; y: integer; z: integer) : string; -var - options: tReplaceFlags; - calculatedValue: string; - -begin - options := [rfReplaceAll, rfIgnoreCase]; - result := urlTemplate; - - if isContains('{x}', result) then begin - calculatedValue := intToStr(x); - result := stringReplace( result, '{x}', calculatedValue, options) - end; - - if isContains('{y}', result) then begin - calculatedValue := intToStr(y); - result := stringReplace( result, '{y}', calculatedValue, options) - end; - - if isContains('{z}', result) then begin - calculatedValue := intToStr(z-1); - result := stringReplace( result, '{z}', calculatedValue, options) - end; - - if isContains('{z+1}', result) then begin - calculatedValue := intToStr(z); - result := stringReplace( result, '{z+1}', calculatedValue, options) - end; - - if isContains('{x/1024}', result) then begin - calculatedValue := intToStr(x div 1024); - result := stringReplace( result, '{x/1024}', calculatedValue, options) - end; - - if isContains('{y/1024}', result) then begin - calculatedValue := intToStr(y div 1024); - result := stringReplace( result, '{y/1024}', calculatedValue, options) - end; - - if isContains('{-y}', result) then begin - calculatedValue := intToStr( round(intPower(2, z-1)) - 1 - y); - result := stringReplace( result, '{-y}', calculatedValue, options) - end; - - if isContains('{q}', result) then begin - calculatedValue := getQuadkeyText(x, y, z); - result := stringReplace( result, '{q}', calculatedValue, options) - end; - - if isContains('{bbox}', result) then begin - result := stringReplace( result, '{bbox}', '{Left},{Bottom},{Right},{Top}', options) - result := stringReplace( result, '{Left}', roundFor(GetLMetr,8), options) - result := stringReplace( result, '{Bottom}', roundFor(GetBMetr,8), options) - result := stringReplace( result, '{Right}', roundFor(GetRMetr,8), options) - result := stringReplace( result, '{Top}', roundFor(GetTMetr,8), options) - // Делаю замену в пять операций потому, что при попытке - // сделать все одной строкой возникает ошибка. - // Возможно какое-то ограничение на память. - end; - - if isContains('{timeStamp}', result) then begin - calculatedValue := IntToStr(GetUnixTime); - result := stringReplace( result, '{timeStamp}', calculatedValue, options) - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 1. Старт скрипта. Запустить вычисление URL-адреса тайла. -// --- Скачать тайл по полученному URL. -// ----------------------------------------------------------------------------- -begin - resultURL := replaceLeafletPlaceholders(getURLBase, getX, getY, getZ); - resultURL := replaceServerName(resultURL); -end. diff --git a/anygis/Tracks_Strava_Water.zmp/info.txt b/anygis/Tracks_Strava_Water.zmp/info.txt index 615f451d0..94ae5cdcb 100644 --- a/anygis/Tracks_Strava_Water.zmp/info.txt +++ b/anygis/Tracks_Strava_Water.zmp/info.txt @@ -1,4 +1,6 @@ Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: diff --git a/anygis/Tracks_Strava_Water.zmp/params.txt b/anygis/Tracks_Strava_Water.zmp/params.txt index 681d7f8ee..352d95512 100644 --- a/anygis/Tracks_Strava_Water.zmp/params.txt +++ b/anygis/Tracks_Strava_Water.zmp/params.txt @@ -1,6 +1,6 @@ п»ї [PARAMS] -GUID={542841FD-209E-4C96-9714-BC4F337371CA} +GUID={0D15104A-781C-4881-B705-72AA33E745C7} ParentSubMenu_ru=Маршруты Рё GPS-Треки ParentSubMenu_uk=Маршруты Рё GPS-Треки ParentSubMenu=Ways and GPS-Tracks @@ -9,9 +9,7 @@ name_uk=Strava Heatmap - Водный СЃРїРѕСЂС‚ name=Strava Heatmap - Water NameInCache=Tracks_Strava_Water asLayer=1 -projection=1 -sradiusa=6378137 -sradiusb=6378137 +EPSG=3785 DefURLBase=https://anygis.ru/api/v1/Tracks_Strava_Water/{x}/{y}/{z} RequestHead=Referer:https://www.strava.com/heatmap\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 ContentType=image/jpeg,image/png diff --git a/anygis/Tracks_Strava_Winter.zmp/GetUrlScript.txt b/anygis/Tracks_Strava_Winter.zmp/GetUrlScript.txt deleted file mode 100755 index 73a86cecf..000000000 --- a/anygis/Tracks_Strava_Winter.zmp/GetUrlScript.txt +++ /dev/null @@ -1,216 +0,0 @@ -// ----------------------------------------------------------------------------- -// --- Универсальный адаптер от AnyGIS -// ----------------------------------------------------------------------------- - -// Этот скрипт призван упростить добавление новых карт в SasPlanet. -// Он избавит начинающих пользователей от необходимости программировать на Pascal, -// чтобы вносить изменения в файл GetUrlScript.txt при добавлении каждой новой карты. -// Теперь можно просто вставлять привычный URL с заглушками типа {x}, {y}, {z} -// в поле DefURLBase из файла params.txt. На пример, так: -// -// DefURLBase=http://{s:a,b,c}.tile.openstreetmap.org/{z}/{x}/{y}.png - - -// Скрипт разрабатывали Nnngrach и Erelen - - - - -// --- Список доступных параметров для автозамены: - -// {x} Номер тайла по оси X. (Как в картах OpenStreetMaps) -// {y} Номер тайла по оси Y. (Как в картах OpenStreetMaps) -// {z} Уровень приближения/зума. (Как в картах OpenStreetMaps) -// {q} Номер тайла в системе QuadKey. (Как в картах Bing) -// {-y} Инвертированный номер тайла по оси Y. (Как на сайте Nakarte) -// {bbox} Координаты границ тайла. (Для WMS серверов) -// {timeStamp} Текущее время в формате UnixTime. (Для карт с пробками) -// {z+1} Уровень зума. (Для карт, хранящихся в формате SasPlanet) -// {x/1024} Номер первой подпапки (Для карт, в формате SasPlanet) -// {y/1024} Номер второй подпапки (Для карт, в формате SasPlanet) -// {s:a,b,c} Буква или цифра с номером зеркала сервера. -// В данном случае - одна из букв (A,B,C), выбранная рандомно. - - - -// Совет для начинающих: если хотите разобраться в этом коде, -// то удобнее всего читать его с конца. - -// Еще один совет: если будете писать свои скрипты, -// то вывод в консоль (а точнее, в окно Debug Output ) делается так: -// -// writeLn('Hello Sas.Planet!'); - - - - - - - - -// ----------------------------------------------------------------------------- -// --- 4. Вспомогательные функции -// ----------------------------------------------------------------------------- - -// --- Проверить, содержит ли одна строка другую? -function isContains(findingText: string; inSourceText: string) : boolean; -begin - result := pos(findingText, inSourceText) <> 0; -end; - - -// --- Округление до нужного количества знаков после запятой -// --- (стандартные функции округления у меня почему-то не заработали) -function roundFor(sourceNumber: Double ; digitAfterComma: integer) : string; -var - intPart, floatPart : integer; -begin - intPart := floor(sourceNumber); - floatPart := floor( (sourceNumber - intPart) * round(intPower(10, digitAfterComma)) ) - result := intToStr(intPart) + '.' + intToStr(floatPart) -end; - - -// --- Вычислить номер тайла в системе Quadkey (используется в картах Bing) -function getQuadkeyText(x: integer; y: integer; z: integer) : string; -var - i, q : byte; -begin - result:=''; - for i:=1 to z do begin - q:=0; - if x mod 2 = 1 then q := q + 1; - if y mod 2 = 1 then q := q + 2; - x := x div 2; - y := y div 2; - result := intToStr(q) + result; - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 3. Если требуется, то подставить имя для зеркала сервера -// --- на место заглушки типа {s: a,b,c} -// ----------------------------------------------------------------------------- -type - TSubst = record - mask, val : string; - end; - TSubsts = record - count : integer; - s : array [0..15] of TSubst; - end; - - -function replaceServerName(url: string) : string; -var - s, ss : string; - sarr : array [0..9] of string; - sarr_l, p : integer; - -begin - s := RegExprGetMatchSubStr(url, '\{[sS]:([^}]+)\}', 0); - if s <> '' then begin - ss := s; - ss := StringReplace(ss, '{s:', '', [rfIgnoreCase]); - ss := StringReplace(ss, '}', '', [rfIgnoreCase]); - ss := ss + ','; - sarr_l := 0; - while ss <> '' do begin - p := pos(',', ss); - if p = 0 then p := length(ss); - sarr[sarr_l] := copy(ss, 1, p-1); - sarr_l := sarr_l + 1; - delete(ss, 1, p); - end; - url := StringReplace(url, s, sarr[random(sarr_l)], []); - end; - Result := url; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 2. Если требуется, то вычислить и подставить в шаблон URL адреса -// --- нужные значения на место заглушек типа {x}, {y}, {z}. -// ----------------------------------------------------------------------------- -function replaceLeafletPlaceholders(urlTemplate: string; x: integer; y: integer; z: integer) : string; -var - options: tReplaceFlags; - calculatedValue: string; - -begin - options := [rfReplaceAll, rfIgnoreCase]; - result := urlTemplate; - - if isContains('{x}', result) then begin - calculatedValue := intToStr(x); - result := stringReplace( result, '{x}', calculatedValue, options) - end; - - if isContains('{y}', result) then begin - calculatedValue := intToStr(y); - result := stringReplace( result, '{y}', calculatedValue, options) - end; - - if isContains('{z}', result) then begin - calculatedValue := intToStr(z-1); - result := stringReplace( result, '{z}', calculatedValue, options) - end; - - if isContains('{z+1}', result) then begin - calculatedValue := intToStr(z); - result := stringReplace( result, '{z+1}', calculatedValue, options) - end; - - if isContains('{x/1024}', result) then begin - calculatedValue := intToStr(x div 1024); - result := stringReplace( result, '{x/1024}', calculatedValue, options) - end; - - if isContains('{y/1024}', result) then begin - calculatedValue := intToStr(y div 1024); - result := stringReplace( result, '{y/1024}', calculatedValue, options) - end; - - if isContains('{-y}', result) then begin - calculatedValue := intToStr( round(intPower(2, z-1)) - 1 - y); - result := stringReplace( result, '{-y}', calculatedValue, options) - end; - - if isContains('{q}', result) then begin - calculatedValue := getQuadkeyText(x, y, z); - result := stringReplace( result, '{q}', calculatedValue, options) - end; - - if isContains('{bbox}', result) then begin - result := stringReplace( result, '{bbox}', '{Left},{Bottom},{Right},{Top}', options) - result := stringReplace( result, '{Left}', roundFor(GetLMetr,8), options) - result := stringReplace( result, '{Bottom}', roundFor(GetBMetr,8), options) - result := stringReplace( result, '{Right}', roundFor(GetRMetr,8), options) - result := stringReplace( result, '{Top}', roundFor(GetTMetr,8), options) - // Делаю замену в пять операций потому, что при попытке - // сделать все одной строкой возникает ошибка. - // Возможно какое-то ограничение на память. - end; - - if isContains('{timeStamp}', result) then begin - calculatedValue := IntToStr(GetUnixTime); - result := stringReplace( result, '{timeStamp}', calculatedValue, options) - end; -end; - - - - -// ----------------------------------------------------------------------------- -// --- 1. Старт скрипта. Запустить вычисление URL-адреса тайла. -// --- Скачать тайл по полученному URL. -// ----------------------------------------------------------------------------- -begin - resultURL := replaceLeafletPlaceholders(getURLBase, getX, getY, getZ); - resultURL := replaceServerName(resultURL); -end. diff --git a/anygis/Tracks_Strava_Winter.zmp/info.txt b/anygis/Tracks_Strava_Winter.zmp/info.txt index 615f451d0..94ae5cdcb 100644 --- a/anygis/Tracks_Strava_Winter.zmp/info.txt +++ b/anygis/Tracks_Strava_Winter.zmp/info.txt @@ -1,4 +1,6 @@ Этот файл был создан автоматически с помощью файло-генератора AnyGIS.ru + +Он должен работать с SasPlanet версии 200127.10112 и новее Если вы заметили ошибку, свяжитесь со мной и сообщите о ней: diff --git a/anygis/Tracks_Strava_Winter.zmp/params.txt b/anygis/Tracks_Strava_Winter.zmp/params.txt index 7f9b7eb01..8b3ec7bd9 100644 --- a/anygis/Tracks_Strava_Winter.zmp/params.txt +++ b/anygis/Tracks_Strava_Winter.zmp/params.txt @@ -1,6 +1,6 @@ п»ї [PARAMS] -GUID={051E9432-9EBD-4CB0-B21E-E209209A28C7} +GUID={723A4141-C185-406A-9F74-3E12311B7E2A} ParentSubMenu_ru=Маршруты Рё GPS-Треки ParentSubMenu_uk=Маршруты Рё GPS-Треки ParentSubMenu=Ways and GPS-Tracks @@ -9,9 +9,7 @@ name_uk=Strava Heatmap - Р—РёРјРЅРёР№ СЃРїРѕСЂС‚ name=Strava Heatmap - Winter NameInCache=Tracks_Strava_Winter asLayer=1 -projection=1 -sradiusa=6378137 -sradiusb=6378137 +EPSG=3785 DefURLBase=https://anygis.ru/api/v1/Tracks_Strava_Winter/{x}/{y}/{z} RequestHead=Referer:https://www.strava.com/heatmap\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.94 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8 ContentType=image/jpeg,image/png diff --git a/mapbox/mapbox_sat.zmp/18.bmp b/mapbox/mapbox_sat.zmp/18.bmp deleted file mode 100644 index a90c7c2752c6b381c062d7e858b7ab0008c9a8a1..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1062 zcmZvbOK4L;6hI@2o8m?gTKds6>BkQ=we4#@FKwFUpC)ZSFKP4o(n_fmL=Xg}2qLaj zbRm^Ob<;|5p+XmK+_`h>rVB-(Ma54=aG~qtOkR9Vg2SER&VBd1J9F=yV5<9&tuhp` z_KJD5IuF>IEB0Rpg{{e)6@yr?(I}ZTmK3zAUhmexMN7=LqB$@IDMpwMksl%3L%EGH zqxSc;oF|82Cl{g+AU8r`3_Xkszw-cXTis~Thq7-H} zN=cxtxRNGnasiEeGm}0Rrr6r#pBk(ilIBzl(AlT_vUpRKycp)=4RZ*Us~e2CTaM@Kz>hw1>GgT8ltTPWPh)@pZEC zppN^zix6{s+9i0Ji6OE9i<=HJ6O!Dm@n+LHmrUaJtooMDWZM6ezhOw&u=!@BqaK8?g;HGwVW$WO58al z(-G;DH@mXP+CA>yl;xI@Mljk?vR1#C@x&Skkv@jurko9`wN57aX$b6 diff --git a/mapbox/mapbox_sat.zmp/24.bmp b/mapbox/mapbox_sat.zmp/24.bmp deleted file mode 100644 index 11f1e9e1be644959ccc5a865fb66da2508a45f57..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1782 zcma)+NoZ416o%u*g}M?HyU;pyLOZ2x(x%OvG)dbGO*1r2EOo#cYaxp&y08`maiMNp z)wK)JRZ$VEA_}4)-KbzeMZp2J1Eo%t-~YV#nwYd!ALl*pJ@4M{p6MQke`cvpc?|rP z@?E37OO%mLcZdI1E>~Y=AwSSzF$sha^&!%NkROrW#a7Pe1pDBvhNB!Eb?CAp=0e;IJUxXgfIPXU|Sv942V0>>6CAtP#Lwsrx%%TKt^LLLx)8pbP}bAFy}-aCtL`b z(6D}Cl(|UG;+k+HT58~_g0~8-HE1^>ZWq`7v@PL8#0q^uK8g??K?whbo3P!FeNpU* zqNf$XdRU6kP>ALVF^mMwJSPH1xGS=#kIMXvV#p_&S4MvzVR5%rst&;qDC# zoyFb=OzVY~Y!=^1>vF?hmgTt05w(ih%mq>0yWm6e@MZClk?C@2sIXb`qDI(KrYV`M zZC*@GEQryRljBJ5fN?F7ZpA?-EG5EeJBXNGbJ=eYQ^!9q#!>(6?hua{PkQ04MeI1* zd`MY^Lrtgw?TvW*I-fK43@7?>lrNq_@~cE6Zbl%9m=|#cOBD64tr&fjvxSqh16ZxY z=;IuHZwl^mIlbEe-yBCvr9<+2{i?S9=MOx%jlncpYb8xF8!nv2*mLdgxsxz$5KhX7 z)+GEsBo*^i6mxNYP+Q6Db6mOt_EPK&qH-0QHsRLr9A^NH3MXnoup5DX1gZtA3X{ll zNyt2JUSd}W#mjK!7`}hYsBtJMMzYTR4e%Y6l$lGkDkX|3s4c*yq3n8&Mut&SkfUMb zS>)y-MCIFM@6yh zt;MqD!@HclnaQbssY8}Dw;0xDA*3;bp6VDyaCh3vB!36Qpqx*5}fZTmsiR6wN3X4AznT%iRpuSMmVNR8%Ak>568pD`x6}1L?GO$%wlW;m&+_@=Q{vVV4+Y lFGpC99!fO=dYSra5cK{RArIT0M)PjC_aM@b*u_N%zXAH&W#<3@ diff --git a/mapbox/mapbox_sat.zmp/GetUrlScript.txt b/mapbox/mapbox_sat.zmp/GetUrlScript.txt deleted file mode 100644 index a6d341965..000000000 --- a/mapbox/mapbox_sat.zmp/GetUrlScript.txt +++ /dev/null @@ -1,6 +0,0 @@ -var - tile: string; -begin - GetURLBase[9]:=chr(ord('a')+random(2)); - ResultURL:=GetUrlBase+inttostr(GetZ-1)+'/'+inttostr(GetX)+'/'+inttostr(GetY)+'.png'; -end. \ No newline at end of file diff --git a/mapbox/mapbox_sat.zmp/params.txt b/mapbox/mapbox_sat.zmp/params.txt deleted file mode 100644 index bb7d4f09f..000000000 --- a/mapbox/mapbox_sat.zmp/params.txt +++ /dev/null @@ -1,15 +0,0 @@ -[PARAMS] -pnum=170 -GUID={01BDC3A9-D0C0-4B84-BFB5-94AAF9D100F7} -name=Mapbox satellite -NameInCache=Mapbox_sat -DefURLBase=https://a.tiles.mapbox.com/v3/tmcw.map-j5fsp01s/ -Ext=.jpg -defaultContentType=image/jpeg -ContentType="image/jpeg" -projection=1 -sradiusa=6378137 -sradiusb=6378137 -ParentSubMenu_ru=Другие карты -ParentSubMenu=Other maps -ParentSubMenu_uk=Інші карти diff --git a/mapbox/osm_mapbox_mapnik_layer.zmp/18.bmp b/mapbox/osm_mapbox_mapnik_layer.zmp/18.bmp deleted file mode 100644 index a90c7c2752c6b381c062d7e858b7ab0008c9a8a1..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1062 zcmZvbOK4L;6hI@2o8m?gTKds6>BkQ=we4#@FKwFUpC)ZSFKP4o(n_fmL=Xg}2qLaj zbRm^Ob<;|5p+XmK+_`h>rVB-(Ma54=aG~qtOkR9Vg2SER&VBd1J9F=yV5<9&tuhp` z_KJD5IuF>IEB0Rpg{{e)6@yr?(I}ZTmK3zAUhmexMN7=LqB$@IDMpwMksl%3L%EGH zqxSc;oF|82Cl{g+AU8r`3_Xkszw-cXTis~Thq7-H} zN=cxtxRNGnasiEeGm}0Rrr6r#pBk(ilIBzl(AlT_vUpRKycp)=4RZ*Us~e2CTaM@Kz>hw1>GgT8ltTPWPh)@pZEC zppN^zix6{s+9i0Ji6OE9i<=HJ6O!Dm@n+LHmrUaJtooMDWZM6ezhOw&u=!@BqaK8?g;HGwVW$WO58al z(-G;DH@mXP+CA>yl;xI@Mljk?vR1#C@x&Skkv@jurko9`wN57aX$b6 diff --git a/mapbox/osm_mapbox_mapnik_layer.zmp/24.bmp b/mapbox/osm_mapbox_mapnik_layer.zmp/24.bmp deleted file mode 100644 index 11f1e9e1be644959ccc5a865fb66da2508a45f57..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 1782 zcma)+NoZ416o%u*g}M?HyU;pyLOZ2x(x%OvG)dbGO*1r2EOo#cYaxp&y08`maiMNp z)wK)JRZ$VEA_}4)-KbzeMZp2J1Eo%t-~YV#nwYd!ALl*pJ@4M{p6MQke`cvpc?|rP z@?E37OO%mLcZdI1E>~Y=AwSSzF$sha^&!%NkROrW#a7Pe1pDBvhNB!Eb?CAp=0e;IJUxXgfIPXU|Sv942V0>>6CAtP#Lwsrx%%TKt^LLLx)8pbP}bAFy}-aCtL`b z(6D}Cl(|UG;+k+HT58~_g0~8-HE1^>ZWq`7v@PL8#0q^uK8g??K?whbo3P!FeNpU* zqNf$XdRU6kP>ALVF^mMwJSPH1xGS=#kIMXvV#p_&S4MvzVR5%rst&;qDC# zoyFb=OzVY~Y!=^1>vF?hmgTt05w(ih%mq>0yWm6e@MZClk?C@2sIXb`qDI(KrYV`M zZC*@GEQryRljBJ5fN?F7ZpA?-EG5EeJBXNGbJ=eYQ^!9q#!>(6?hua{PkQ04MeI1* zd`MY^Lrtgw?TvW*I-fK43@7?>lrNq_@~cE6Zbl%9m=|#cOBD64tr&fjvxSqh16ZxY z=;IuHZwl^mIlbEe-yBCvr9<+2{i?S9=MOx%jlncpYb8xF8!nv2*mLdgxsxz$5KhX7 z)+GEsBo*^i6mxNYP+Q6Db6mOt_EPK&qH-0QHsRLr9A^NH3MXnoup5DX1gZtA3X{ll zNyt2JUSd}W#mjK!7`}hYsBtJMMzYTR4e%Y6l$lGkDkX|3s4c*yq3n8&Mut&SkfUMb zS>)y-MCIFM@6yh zt;MqD!@HclnaQbssY8}Dw;0xDA*3;bp6VDyaCh3vB!36Qpqx*5}fZTmsiR6wN3X4AznT%iRpuSMmVNR8%Ak>568pD`x6}1L?GO$%wlW;m&+_@=Q{vVV4+Y lFGpC99!fO=dYSra5cK{RArIT0M)PjC_aM@b*u_N%zXAH&W#<3@ diff --git a/mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt b/mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt deleted file mode 100644 index c59972464..000000000 --- a/mapbox/osm_mapbox_mapnik_layer.zmp/GetUrlScript.txt +++ /dev/null @@ -1,7 +0,0 @@ -begin - ResultURL:= GetUrlBase + inttostr(GetX) + '/' + inttostr(GetY) + '/' + inttostr(GetZ - 1); -end. - - - - diff --git a/mapbox/osm_mapbox_mapnik_layer.zmp/info.txt b/mapbox/osm_mapbox_mapnik_layer.zmp/info.txt deleted file mode 100644 index 4754eee74..000000000 --- a/mapbox/osm_mapbox_mapnik_layer.zmp/info.txt +++ /dev/null @@ -1,7 +0,0 @@ -От составителя: -Данный слой предназначен для дополнения OSM - Mapnik. -Манера отрисовки рельефа подобрана максимально мягкая и ненавязчивая, -чтобы не затруднять чтение тропинок и мелких надписей. - -В качестве источника использовался сайт Mapbox.com - diff --git a/mapbox/osm_mapbox_mapnik_layer.zmp/params.txt b/mapbox/osm_mapbox_mapnik_layer.zmp/params.txt deleted file mode 100644 index 632e58d6c..000000000 --- a/mapbox/osm_mapbox_mapnik_layer.zmp/params.txt +++ /dev/null @@ -1,20 +0,0 @@ -п»ї[PARAMS] -pnum=118 -GUID={AB8A8685-AEC6-4E16-80DA-DF4AC37E4777} -asLayer=1 -name_ru=Mapbox.com (mapnik layer) -name=Mapbox.com (mapnik layer) -name_uk=Mapbox.com (mapnik layer) -ParentSubMenu_ru=Рельеф Рё тополинии -ParentSubMenu=Hillshade -ParentSubMenu_uk=Рельєф С– тополинии -NameInCache=OSM_mapbox_mapnik -DefURLBase=https://anygis.herokuapp.com/Osm_Mapnik_Mapbox_Hillshades/ -ContentType=image/png -Ext=.png -projection=1 -sradiusa=6378137 -sradiusb=6378137 -RequestHead=User-Agent: SAS.Planet -IteratorSubRectSize=8,8 -License=Map data В© OpenStreetMap contributors, rendering GIScience Research Group @ University of Heidelberg