From 3e0739e382801024f3b4001f3ff7d91b91296fc0 Mon Sep 17 00:00:00 2001 From: sasbot <> Date: Sat, 6 Jun 2020 12:00:00 +0000 Subject: [PATCH] update zmp --- _local/lantmateriet.se.zmp/18.bmp | Bin 1062 -> 9126 bytes _local/lantmateriet.se.zmp/24.bmp | Bin 1782 -> 9126 bytes _local/lantmateriet.se.zmp/GetUrlScript.txt | 26 ++--------- _local/lantmateriet.se.zmp/params.txt | 46 ++++++++------------ 4 files changed, 22 insertions(+), 50 deletions(-) diff --git a/_local/lantmateriet.se.zmp/18.bmp b/_local/lantmateriet.se.zmp/18.bmp index 47d65f276ee5e4851f34fe840f80f2090024fad0..cafa0416f5bb55665dde953eaab7398c8b3f2655 100644 GIT binary patch literal 9126 zcmeHMdu&tJ9X@s($9A3$F?Q@c2?;5Mk*yPLskDg>7D`%1S73v@>^KgOgs!Edn*^)a zs%h#!>o#ae0s{g`Aa5QitR0MMLX$?eE)N{P?jvy$hd>fLB(|@gza8TVqIH^dJWc(h zzWVObk^SjA=exh(IrrY*efhPvJoNZjkK00g7UOd@K6yxi+y8vDmZL^>Y;zSNLRV$X zZ}y@3J)#~hI&$E73F8t{i5V98l1nWsFB=go25AM0-j; z{_Ii(I;Z6kiAO+g)5Ww_^RXk`;y(7(u0g-A7N6Jhh|pUlJYM_MSK^o_>`TRX<+LZ= z2&>2EV`=ZUzR$WULSqq$M?l7o!Xd+LI9?r9=!{N68v1a&8pb?9exFXDKK7+1E* zpFw$+Q=HNOtE~XY(ADWO5(JPfa|OKNmlD11L$&seSr?;iw*pbp+$s@w`GEuua<;?cP4@y*}$JDC^Z%ge9GRn19znC=&$OwEI zzBT61UaWt=V$JneV~NBgAh(tC+AH{-75uL9P>b(hJFlEj-#oslvzrJzde80pxJ}#D zqC4ACeB(|AyO3gqth=zvFqbnL6zF|?b1-ij)(#B4aJ8xI<_RM42*?{dy1&!W{oRh9 z;*Orp?cLZ{>XcJ7JD~601)D~1`Jw;~`_h?3BE*;=&KQ(hyfW4$wmw2*j(FCQM?1wV zryLLF8M$W%xgtHN{_Yp`2k?kQ;t`OSGfp|}R5Gp%#)Vt#tI!lw4lF87ULvfs2G$xM z<&8X4u=ZrDBZZz(P;=Qcg=vWXb6bJBOuF7!E{qlWejGS z0JqrJGMhJb+^t}|WSE2%CQqiplROG(Rw%?TCPSbwK$ZbyBY{MVTQcTKw7HhsxQq#R zF6$x_C!Gv~)5b4n{VFyP2KFT!_aw2NOnQz8$n2Nh^U3u=Aq`R*itfScVGx_~V|*wy zX%=4+_LXIXH3J~S*O>%ql;;~p-#U{o zh31x79<4Lj^O#xm&@N-<6{f`k8lE-7%AvrD5y)XdW_A&YM?hX?1Y9gqm;jenREg@Jt`$Ag$Do5%n}kie8;_EF)SH~T)j-ZUndhL;(@@5rgN^_70e#_M-F z_{USkKRZB0Gi9bA4B4sBPGvVdfHwyyG%q}309^G=9hw%7!-l^0`q$B^YBF)6nS{w7?L`>%_>;lD zPzN8KTJ+HYap!Ik5n5_QA6BA{T6C=n9no%3?8D-A%7#Pa`h@dot>iBSzAvBCpkDl?xQ0)JvznOJI@DZ;>ec+?nyqN@ z;hGUH&Iao!kXwA{zQ5pa&XiIA%A37cx5+!+Ce|mK%ooYn*Qp<(-hHU0f(&P?d2Mf@ zhFWxN5C4d^SUAnB9d-zeF8s2ryyr&u0|k^f(;j&KFPAUx>GyCQdq;FY>Xke*#M> BEfN3# literal 1062 zcmZ9KZA_Y16vywfecXqopY~~KvaH?alDW=SYHg=3GPOl9RSFgDth`K7@Qo=-*J_cr zA|hiJ0Rgd4QIwa7Pz7;{2#U}GkBEw`PBW8kvt8H9W^CLOoSW^?Sj z@)n4m6R>^==b?Y|4e)OC{^^_1@`~(&-Pgjd?Hm`;10tM`l?N-_zh;0(0LTB_9x6I@!2R25VR|jbB+t>*;@1XMl2Sf1dTchNcka*|O$oh(RDiD6YWZ8kFJCk*r zJ?L3Q<$vft=jazaYX4%}O5An{A_48rL%TP)Fbpj&&rfgpjFDOK_C(EAAJQky+e4$A zRd;8Ob39_a_?Mj(amgZH&C8I^WV3MlM{jAIa)supOR+m6j#%l>l?l_*G8m0=_8U3B zOAuS;@+}Mdg^l-ztv%wD^>>R%^_}FaBJ?-RT3VGy%J|#Xu&u+bwjLYTN&wJHcyr9y zXUdGt-m)hH^e0;8rvB;+GfT+1iD9q_^n$bJ3p0?ouT#$~D=VLAh?{~>-69eIz167D zwWGiNaQ0_$!CDt-t-Ivco?@kdjU=+Ozs<{UIz_%lI(LbY7@yWnLvF|mA9Ih*Hzoog zOL_YN^@HVxqy=8?Qae7}ftwN$krizSk}!$dm|2m5ZOqES;_p^uLj2ri4jN)0c=e?K zbe%lp#vchXQ+@o4enEban={^m$-?A)g8444KzuZlSU|=(u4gZ_otte&Eiq0r=_T>? zN&rM(e&iseKrFmZK=AU5e63mbD``#GxKw0jdiG^@3CeXP*;$`7QI|N)NF1(?&uyZf zyg&h}!U4O>V{<)l`e#iehP4p%(Bqvm>D09qgHh;J4xZqcm~n*G!)|{l00l!U_XA7L R_0>hQ$*Ppg_6&Opz&}nENZ7D`%1S73v@>^KgOgs!Edn*^)a zs%h#!>o#ae0s{g`Aa5QitR0MMLX$?eE)N{P?jvy$hd>fLB(|@gza8TVqIH^dJWc(h zzWVObk^SjA=exh(IrrY*efhPvJoNZjkK00g7UOd@K6yxi+y8vDmZL^>Y;zSNLRV$X zZ}y@3J)#~hI&$E73F8t{i5V98l1nWsFB=go25AM0-j; z{_Ii(I;Z6kiAO+g)5Ww_^RXk`;y(7(u0g-A7N6Jhh|pUlJYM_MSK^o_>`TRX<+LZ= z2&>2EV`=ZUzR$WULSqq$M?l7o!Xd+LI9?r9=!{N68v1a&8pb?9exFXDKK7+1E* zpFw$+Q=HNOtE~XY(ADWO5(JPfa|OKNmlD11L$&seSr?;iw*pbp+$s@w`GEuua<;?cP4@y*}$JDC^Z%ge9GRn19znC=&$OwEI zzBT61UaWt=V$JneV~NBgAh(tC+AH{-75uL9P>b(hJFlEj-#oslvzrJzde80pxJ}#D zqC4ACeB(|AyO3gqth=zvFqbnL6zF|?b1-ij)(#B4aJ8xI<_RM42*?{dy1&!W{oRh9 z;*Orp?cLZ{>XcJ7JD~601)D~1`Jw;~`_h?3BE*;=&KQ(hyfW4$wmw2*j(FCQM?1wV zryLLF8M$W%xgtHN{_Yp`2k?kQ;t`OSGfp|}R5Gp%#)Vt#tI!lw4lF87ULvfs2G$xM z<&8X4u=ZrDBZZz(P;=Qcg=vWXb6bJBOuF7!E{qlWejGS z0JqrJGMhJb+^t}|WSE2%CQqiplROG(Rw%?TCPSbwK$ZbyBY{MVTQcTKw7HhsxQq#R zF6$x_C!Gv~)5b4n{VFyP2KFT!_aw2NOnQz8$n2Nh^U3u=Aq`R*itfScVGx_~V|*wy zX%=4+_LXIXH3J~S*O>%ql;;~p-#U{o zh31x79<4Lj^O#xm&@N-<6{f`k8lE-7%AvrD5y)XdW_A&YM?hX?1Y9gqm;jenREg@Jt`$Ag$Do5%n}kie8;_EF)SH~T)j-ZUndhL;(@@5rgN^_70e#_M-F z_{USkKRZB0Gi9bA4B4sBPGvVdfHwyyG%q}309^G=9hw%7!-l^0`q$B^YBF)6nS{w7?L`>%_>;lD zPzN8KTJ+HYap!Ik5n5_QA6BA{T6C=n9no%3?8D-A%7#Pa`h@dot>iBSzAvBCpkDl?xQ0)JvznOJI@DZ;>ec+?nyqN@ z;hGUH&Iao!kXwA{zQ5pa&XiIA%A37cx5+!+Ce|mK%ooYn*Qp<(-hHU0f(&P?d2Mf@ zhFWxN5C4d^SUAnB9d-zeF8s2ryyr&u0|k^f(;j&KFPAUx>GyCQdq;FY>Xke*#M> BEfN3# literal 1782 zcma)+O-NKx6o4m)u#LEI;ik3jL~KTEV}<<;rlzHi8Z8QRUYdqKjU%n1Vsv_?<-n8> zlAv#9NGpGGqQXVRm>`Lcnyn-%Q9%j{YGdE?*hTCu8qOTfyZ4;$oO|xi;ryR_Y@0s^ zI*otI)_>QgWwVWM&2KtwsSVqPrK~J3$A*KEfam?)+R5HVrcd*>Vs<{O#z6 zz-eNaqIbT>I?-=JzOP38psyJFe`ud4Vh~nC#e}cVKSh48J&8?BV*Fa@V34W#wnAu@ zHOL@I@%cS|7Js6MCG~WC7Qx_?aRdiwRBMT%4@-VKKHpw=a3%^_{SpWAd|@3eBTV6d z+mFzGlI}oJ=d?FdLDt?qLL_h?8WZUck9>>{F(@e71&ZtnWmfLZWKePN6cqYeR|F~1 zO{321W7n7!6suzis#oSN`0Wgmf|?l@!5PD^-_C6bK+v@IgB7*q6`J9$5l<TsgU*0rmxI{}93<8ySBxXgt$`-u>*+4h1Anho z;PL%?z^Rr}$t7*1)E;LdoHHp2Y`SpJJYRE>Fj}rQ5N>z-!y%5M+)$1^)uIuw(Aec$ zsfmb!U{Dee-UJL#K-60SGu$1fNHp&)F92mjW0!&ORBq>pEw3L_=1UTv#Sj|CpkYLx zjp0B#G|M!O=UGCeDnS8}mk>`3L=0x3(XrvSHhliAWXA}rL-3Rr731Z~01z3sEaMLs CO&z=d diff --git a/_local/lantmateriet.se.zmp/GetUrlScript.txt b/_local/lantmateriet.se.zmp/GetUrlScript.txt index e0df7e13..847d92ac 100644 --- a/_local/lantmateriet.se.zmp/GetUrlScript.txt +++ b/_local/lantmateriet.se.zmp/GetUrlScript.txt @@ -1,25 +1,5 @@ -var - TL, M: TDoublePoint; - BR, N: TDoublePoint; begin - TL.X := GetLLon; - TL.Y := GetTLat; - BR.X := GetRLon; - BR.Y := GetBLat; + ResultURL:=GetURLBase+RoundEx(GetLLon,8)+','+RoundEx(GetBLat,8)+','+RoundEx(GetRLon,8)+','+RoundEx(GetTLat,8)+'&WIDTH=256&HEIGHT=256'; +end. + - if Assigned(DefProjConverter) then begin - M := DefProjConverter.LonLat2XY(TL); - N := DefProjConverter.LonLat2XY(BR); - ResultURL := GetURLBase + RoundEx(M.X, 9) + ',' + RoundEx(N.Y, 9) + ',' + RoundEx(N.X, 9) + ',' + RoundEx(M.Y, 9); - end else begin - ResultURL := 'invalid_url'; - end; - RequestHead:='User-Agent: Opera/9.80 (Windows NT 6.1) Presto/2.12.388 Version/12.16' + #13#10 + - 'Accept: text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/webp, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1' + #13#10 + - 'Accept-Language: ru-RU,ru;q=0.9,en;q=0.8' + #13#10 + - 'Accept-Encoding: gzip, deflate' + #13#10 + - 'Referer: http://kso2.lantmateriet.se/' + #13#10 + - 'Host: kso.lantmateriet.se' + #13#10 + - 'Cookie: WebTrends=188.95.188.26.1392695245204688' + #13#10 + - 'Connection: keep-alive' + #13#10; -end. \ No newline at end of file diff --git a/_local/lantmateriet.se.zmp/params.txt b/_local/lantmateriet.se.zmp/params.txt index 55cbca93..59a01c73 100644 --- a/_local/lantmateriet.se.zmp/params.txt +++ b/_local/lantmateriet.se.zmp/params.txt @@ -1,32 +1,24 @@ [PARAMS] -pnum=44 -GUID={5DBB0B87-766C-41A4-A323-836385E8DF71} +pnum= +GUID={3AC94CEE-5C84-4BD2-9AB3-16109FAE713E} +name=SETopowebb +name_en=SETopowebb +name_uk=SETopowebb asLayer=0 -name=Lantmateriet.se (Sweden Map) -name_en=Lantmateriet.se (Sweden Map) -name_uk=Lantmateriet.se (Sweden Map) -NameInCache=lantmateriet.se -ParentSubMenu=Локальные карты -ParentSubMenu_en=Local maps -ParentSubMenu_uk=Локальні карти -DefURLBase=http://kso.lantmateriet.se/karta/ortofoto/wms/v1?LAYERS=orto%2Corto025&EXCEPTIONS=application%2Fvnd.ogc.se_xml&FORMAT=image%2Fpng&TRANSPARENT=TRUE&STYLES=default%2Cdefault&SERVICE=WMS&VERSION=1.1.1&REQUEST=GetMap&SRS=EPSG%3A3006&WIDTH=256&HEIGHT=256&BBOX= -ContentType=* -defaultContentType=image/png -IgnoreContentType=1 -Ext=.png -separator=0 -UseDwn=1 -Usestick=0 -UseGenPrevious=0 -Usedel=1 -Usesave=1 -UseAntiBan=0 -Sleep=0 -DefHotKey=80 -BanIfLen=0 -Enabled2=0 -RequestHead=Referer: http://kso2.lantmateriet.se/ +DefURLBase=http://vvv.sgu.se/lmvProxy/map?LAYERS=topowebbkartan&FORMAT=image%2Fjpeg&SERVICE=WMS&VERSION=1.1.1&REQUEST=GetMap&STYLES=&EXCEPTIONS=application%2Fvnd.ogc.se_inimage&SRS=EPSG%3A4326&BBOX= projection=1 sradiusa=6378137 sradiusb=6356752 -Proj4Args=+proj=utm +zone=33 +ellps=GRS80 +towgs84=0,0,0,0,0,0,0 +units=m +no_defs \ No newline at end of file +ParentSubMenu=Suede +ParentSubMenu_en=Suede +ParentSubMenu_uk=Suede +NameInCache=SETopowebb +separator=0 +ContentType=image/jpeg,image/png +MimeTypeSubst=image/png=image/jpeg +DefaultContentType=image/jpeg +Ext=.jpg +UseDwn=1 +Sleep=0 +DefHotKey= +