From 7d169acebc91ad777dddea9b628936ec5a199748 Mon Sep 17 00:00:00 2001
From: Andy <88590076+AAndyProgram@users.noreply.github.com>
Date: Sun, 23 Oct 2022 16:39:01 +0300
Subject: [PATCH] 2022.10.23.0

PluginProvider: added 'DoNotUse' attribute.
Channels: copying a channel to the 'ChannelsDeleted' folder before deleting.
Twitter: updated status codes.
AutoDownloader: removed base parameters initialization; updated 'ToEContainer' function; 'StartupDelay' default value = 1; added IIndexable; fixed NextExecutionDate; added task delay based on index and tasks count; updated user selections algorithms.
MainFrame: coloring the button 'Download All' depending on the pause; updated user selections algorithms.
DownloadGroups: added LabelsExcluded, Sites and SitesExcluded; updated initialization; updated ToEContainer function; updated user selections algorithms
IGroup, GroupParameters: added LabelsExcluded, Sites and SitesExcluded; added Import and Export functions
Removed TrayIcon notifications. All notifications are now ToastNotifications.
SettingsHost: 'DoNotUse' attribute
Settings: added 'GetUsers' predicate function
---
 Changelog.md                                  |  19 +++
 ProgramScreenshots/GroupCreating.png          | Bin 7626 -> 9394 bytes
 ProgramScreenshots/SettingsAutoDownloader.png | Bin 16336 -> 18120 bytes
 ProgramScreenshots/SettingsSiteRedGifs.png    | Bin 14501 -> 14475 bytes
 .../Attributes/Attributes.vb                  |   3 +
 .../My Project/AssemblyInfo.vb                |   4 +-
 SCrawler/API/Base/UserDataBase.vb             |   5 +-
 SCrawler/API/Instagram/UserData.vb            |   2 +-
 SCrawler/API/Reddit/Channel.vb                |  15 +-
 SCrawler/API/Reddit/ChannelsCollection.vb     |   5 +
 SCrawler/API/Reddit/SiteSettings.vb           |  13 +-
 SCrawler/API/Reddit/UserData.vb               |  31 ++--
 SCrawler/API/Redgifs/SiteSettings.vb          |  75 +++++++++-
 SCrawler/API/Redgifs/UserData.vb              |  48 ++++--
 SCrawler/API/Twitter/UserData.vb              |  26 ++--
 SCrawler/Channels/ChannelsStatsForm.vb        |   1 +
 SCrawler/Content/Icons/TagIcon_32.ico         | Bin 0 -> 5430 bytes
 .../Download/Automation/AutoDownloader.vb     | 116 ++++++++-------
 .../AutoDownloaderEditorForm.Designer.vb      |  48 +++---
 .../Automation/AutoDownloaderEditorForm.vb    |   4 +-
 .../Automation/AutoDownloaderPauseButtons.vb  |  13 +-
 SCrawler/Download/Automation/Scheduler.vb     |  26 ++--
 SCrawler/Download/Groups/DownloadGroup.vb     |  60 +++++---
 .../Groups/DownloadGroupCollection.vb         |  23 ++-
 SCrawler/Download/Groups/GroupDefaults.vb     | 140 +++++++++++++-----
 .../Groups/GroupEditorForm.Designer.vb        |  18 ++-
 SCrawler/Download/Groups/GroupParameters.vb   |  46 +++++-
 SCrawler/Editors/LabelsForm.Designer.vb       |   2 +-
 SCrawler/Editors/LabelsForm.vb                |   6 +-
 .../Editors/SiteSelectionForm.Designer.vb     |   2 +-
 SCrawler/MainFrame.Designer.vb                |   2 +-
 SCrawler/MainFrame.vb                         |  45 ++----
 SCrawler/MainFrameObjects.vb                  |  28 ++--
 SCrawler/MainMod.vb                           |   1 +
 SCrawler/My Project/AssemblyInfo.vb           |   4 +-
 SCrawler/My Project/Resources.Designer.vb     |  10 ++
 SCrawler/My Project/Resources.resx            |   3 +
 .../PluginsEnvironment/Hosts/SettingsHost.vb  |   2 +-
 SCrawler/SCrawler.vbproj                      |   1 +
 SCrawler/SettingsCLS.vb                       |  18 +++
 40 files changed, 601 insertions(+), 264 deletions(-)
 create mode 100644 SCrawler/Content/Icons/TagIcon_32.ico

diff --git a/Changelog.md b/Changelog.md
index a60e6a0..406f621 100644
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,3 +1,22 @@
+# 2022.10.23.0
+
+*2022-10-23*
+
+- Added
+  - RedGifs token Auto-Renewal
+  - Download groups: ability to select sites
+  - Download groups: ability to exclude labels and sites
+  - AutoDownloader: ability to exclude labels and sites in ```All```, ```Default``` and ```Specified``` modes
+  - The ```Download All``` button turns blue when pause is enabled
+  - Updated Twitter status codes
+  - Minor improvements
+- Fixed
+  - Updated Twitter status codes
+  - AutoDownloader: incorrect next run date in scheduler task information
+  - AutoDownloader: minor bugs
+  - (Issue #69) **RedGifs data is not downloading**. Requires token.
+  - Minor bugs
+
 # 2022.10.18.0
 
 *2022-10-18*
diff --git a/ProgramScreenshots/GroupCreating.png b/ProgramScreenshots/GroupCreating.png
index eb476e35321458b9f12ccc7503792aa033432e82..5bf6886b8356b169f97075908f60f9605cb85c4b 100644
GIT binary patch
literal 9394
zcmc(FXIN8Pv@ISBA__>AE+rscYETFWf^?7?dKFN5CzKFHL^??CIU>DEZvmtuRca^#
z5~PL}kWfOofur}l`@MU=_kO+iBgx)7bM3X)nsd!D$5=b`xw^ugTXeSw2ng;dDavUP
z5L}tVA9vlnf&cb*Sa^f~x#F&+AWKj>$gqY#xn?V)CPP3_9!-2=aUFk7<f3TcPC!7?
ze(|}|?VSIDfPh^=Nlr!wV!D|DjnNs;ILH&3FsyDYsL(PBt?ruT)Wvlt8dNLS0(ZOP
z@*Xgm5)x6~O^B%iSVkOng<lJO{bl-ZgZn~(e{uhPC_Wx|`_@ykd(Tv##4wq@c<p0h
zZvL9~iA4y9Ap88viPOA0?)%IEw(sGo*xu>f@z{62!TLP<raWn=`g|sr-{*5!Aern<
zmZMhk?H-A98kQh3S-0DrDmPhze%=jB!vFP^jZy%AHCEw)Dc+7f`Z)q`qR8}BA7KXF
z*Ch|w#G8_ltLmXPXKKsdg4+V;eeec1mA(NmcEh<8<)LQqiw4f0j5>;<2ZSiN4$yJ<
z|GB*ANGBF@Y&j1nh_pBzPu5RX#W3q)G7wz2FfIH^j#q`okzg^SW1=U;r=%=3Che6D
zE!AK43i#e0$Q7HNuSGZSs_D|my|G2Ow$@}2NTqx*p4&uKXQQ_cfYnAj^p$t;&xLB$
z_-yi_^cx>av@dW6J$iTJHb4&9FHD1C469ZO<itOjP&=g~IETkL0n&7sk(3%_4$~&C
zDq%>~abj#te7`8H^9ml5ui>}7TRpB&IOT|l*076y6un@QNa8PvEN>EU=GfRHKj+8K
zO-=;06aG$=kr3e-aQ`GZP0I0_zZkDIXVjy>v^t^k?fc}SHsd24Ona_~UEm9QCGj7R
z03b7}Q~lCC{IKGMuG5rBsROJc&EQIZxxcWB_p`~+%Z_9jna?+{v#d8vjEBnE?k{Fw
zeBZrFUm2AW?88>6jYp#;FZvEkEIko9IGxVT`gfj%4YZEk^*?<FCpVN-X*x146nX{6
z%x=cLOV&!B<uDDXQN=fmg1>C!o_C@sbD{{UZ4ozB;^JLUQvGlQQ@7*e@=HvXE~rk*
z0y%m%?H!fKb6a#VBb&yGhxU7PY}RFlfIE>_S%PA;?kAWxvd*)nVY)(zM;>^;a8Q8N
z*eCeS01j5#VqdUs4S9f88kmsUw%AWEwy7W|93>F(89-3XNX`S;n_vU#ATv0K;v7hU
z_eTgmaBhT7Y$N6fFT#*Lxwu1R*ygW)jw3E3Gp6W03V=7=z4?C;s2?Fj_$QP^g?M*{
zQQ;fi{3`f6pp8*Y5De>O#9#ZbH)@ha+-`q(JMPtq<VeOZI!xl}?!${UKpqOQ8b}qL
z4Mr+8DPNjUP?kY7(#2iJpZ{}87FJ9DAwCe&*W0@R3bwe%G5-<Lc$cWN@8RwCY-J9V
zqoZTz*EmiSYd78{o0MRb=t!L_!|{XR(2XFeMe3~K(mo?P8cX9Tafd2WF4JI(<TgMC
zM7}gn1KyP)Z0oW<##N-6Ju@+3lYkbAYYPQZ%jEM0DfVkqhuycS>AOpw1d(rm#_!x7
z72{`kU*T%_re2+m8aq6a2cZqN2xBSe;2EK6)zj6rSR2Vnbdmp}RpYyF*9T`cE%PVl
zH3iUWS6!#vZj*w3ez-kq)Z*|nBFW-ju41e*!uOF+Z#>t%hvo#_+}z(rMgn_#m2Wdk
zF?@O!DXXnbF_;NLKQ8->(v6J_dU{h~*7_ZpGhB)*F@c`OuyVn5@wmhGQw2k@ZJv;d
z*YrK;sui@f7Ha<BVuY4T4YXyvoXD{;^Nx_a4+I3dvz6j_7f9$tdQyp0nhq-G0>gne
zy%XP~gBOJ@iH!#Jp!X~Q_FSa$S&4Ov`+|A%E<I8j)t-FT^ooCVHoB&t*4^S85)x&r
znfSP<(zduEy4LkhxvPR9Lm8o*?JKrfMSA<fAKJW108^Q4ZsBQ02`}@VAFZp%GUgj3
z3?T<|ex!_yj7lR^w**Y9na3+lwGjc1OL=F;la0<9G*8)I_&YI-!DVB;y6k(kk$L0}
zVoO*Hx8H+#jJd@+`Sd-BMNbUNDn2EO&LkM@9PO<@XK3C*1WY3e4GQ`6Omea9%2|W`
zqj^%V%mUW2B$@Pe4(z!QsPy7~oNbI^C0{LR+*6Fu?RH8Ptx&Ll==N+Q4Vyw#l}*Ef
z%f0sCJC!yqLd1zvE*L)1neKAMn=Jc5i`L2=tg2Q=lXr{2HFL)m53{`B1u@AewT7a4
z&1?A`8SF!^b8L)~2V*P7;ZXjhRD47z3l((O&l!)mz+n9;!U|2xK+B`urHPd$c|Z3A
z>M~I@)v$qe1^m!ojGD++Y_U2qwT~<c66CnQ{R~B37KZjiD7O&<Zwwhy0963Jd<BLp
z2d#Ck!H{u>>9Qu+zwYhv9xv1lkz*APIH?nEPmoAo8G<`+(jbwcl3MWwWoN!0dh`V7
z-@o{3&^sCi##&EJCmK@&!ArcRuWV_<E@IH-!dWm4@HO7P!3Nc+>qqKk2kC90wO<r3
zdb!7;I}!>e8}_|k^v)si)#asNB1I0=0QE)dV2i(GF<xxsm&Zy}7i+W!_WT0QsK_zF
zH!B-=9v2`(E)9i3;R+3LrYsj=m#zQzKgmNDLykZ7VOP4qzMEh9ekYLF4m41dBZ!ij
zp)4q#8h;T$(#^w?bG=hVF|-|{toTX>L#~B#L6B=1zF?n|*s5c*@82V0seike5HrGR
zg|VR^c_F(?c+p0Fu9N;wk^yW36zVco3u0jxeMIHV8yI6-9Ly?sUK11((PN0HU=E7f
zNL#^C$k*{k<U2F6uxq<LHkC(wylENWIU5>~?hj&OxgLZ9WOuCHMd4FYHqCQml<r%8
zhKi&rSqnK!OhwEz>HDWxAu#1#d+8t-k;Hu9p!@N!U$zO2$J*AzpUdMppd8Y<^|$#|
zmh|XP?*&mN2ZkV>zw28)rev-?HU@Q#Ms-4bvLa8DGxyS)iMTAn6cK`QvY9eGZ-?j*
zUiIGd1sb<|^yThYs>F}L6@|`x;<Zb0pZiSej;m%SPrKoqwrkmkJ@pX2dOQD87|3a?
z86h|hzhWy&?aBPi>`fVw9wSSR3MK?e7qm=3^Wr((+W`hh^VMqmB@5BIjP75r7W>`C
z8~xp}DvE+J?wHiY&IcNFz*20mNE1G*R7&Qn9&DS3B*&2F^mL>h&sJ?W8zg$xH;Lrh
zw#ckZw?zg&T2;b)fMIS#&=;u_BOmNxKSrNUL;C94<b3aUvY9q9<g^sV*tz(kb)^mX
zMA1?kD>33=q6u7bLx%t0Pj0qs@dptQXji0(fE8c%&$Pp7%^Oyl+l@>DKSWy#*|I&p
z8X{8Im!5d-gn{o?Ubp2lnYudT?2?L`7>aSt6nv<gF+V`J{3C(pPE$JI^e`NGIz`3O
zDW~3DG^9`F-yK<+<c?5jTkFcIWUhXJ_D|e6Nc|hfo-N1qH>5H2HBIoA{0-?OgrcjK
z)?xx#Y(1p1Q&Kwbry*kZs1#AO;*dni1rRkQVo3>2BGW=#h916Pix>YtN9ez1Z!W=A
zaqE8z{s8nyPz>radIK+lYykquuEJY!xr&<-aq-~`L}i93u&i=;L<jl+sXAhjsd4iw
z<7L;h;lMPP`xLR#mzKK%rboDXYwL;mIyEv`@%2$Lql&{B#IQ?`??zF;cjHsgkF9ke
z5>}Q>nVuev%yc{5*=M0`mZA)DqHwmi=efwzYH4EDpct!RmrQ}I2W{3Ca!_<d(A99t
zdttz*hsQCu&6sb=)`oyp4u%z&JHckq@po^&tI_!8(r9{{I@C9~G#1SpgQT@Yo+D^u
z*IIHU&Ijs`w~;2N*zEHbK!<KPlE*};=IWH_qVE1eOw%>STWsW&GfMO=Ij=rJA5dzo
z$dN_n!x!>LVImIvw4pyerE4}o(FJ|7cG3=fk9_7R4<&Qw-Mx=p2Z8hElQ`_6+(r)H
z%DhcN-YU2U)j~w5Hw17-d78Y(dRmX;j9Zj8BQbwtGhCNmEk<~&<!&Aw|JVZmKtCOh
zEr(bW8C>JZ8pp(yvTr`|;=e&(uU~wH@~NE3%|UY^0e)v@z51#o8H&nY`5%MfZ?-!(
zKxR=O=&H=C{g0X9CYkqt2);cQJXaghJM}ZU+8w|E%@o!5@aYZM-zz7w+m@8p@Eft}
ziH6J~b*It5)rRVs?(PIZG2>`!W^{$abYt(;uE23lGv;FK;ND&p=Ocg>CQM)cvthH$
zNWu%Tn0?o=hMn~A0m_PZP|d=I&vq;Ejr>xxVAP}!4G&G?fvm_7@p`+_R>=VqVL}n~
z)c9v`q@r9x-`<BSl$tcKhBK{SJh-V7V0n~MG@AhGPD5#Ft}%AM8f_jjE-7H*r`wGr
z^lqsbLcT|_TVa${k8UV|V-q0Pp%|5ngW0@y2p(OUoB(7VPSNx36x5KW@=;9FX5jHo
zq93}cTV|=k`3@`XHMin3zI9u<CSlJx2Yi`dGtYklWC6vFP?ya^fIayjGv-*_68foN
zTml5}&%pRh(X1b?SPQ)EkpO{bAWcm7%R}fy^y-I%!bfY3zhE0B(UV{H8U9MN`%9qb
z@9x{H-H#PAVFo9R#gA*63(W(%tfZo(yn5drZ}!3{Mkv09LqNy`05Q@twV~;}u40Bg
z(z~%NyW(%GKU8rmsf@H!bpkcOJ{1n;zk$oJ?PnsJ7zx3(4fm<e(Nm|pdA6oP`^cl3
zlT8kd`$M}$j@5iK#blz_kkRj&CpWEdvo)hhEA{%_Ha<^UOpcsoeVKgd%ep+5n(KS(
znk6?!ql#W*ws41B(|h|Y^=9~$BydFIJQs5%)rK}ahUp1QSCOZ7l&}?#{NeGFTMAux
z+}t}sunFASbsF5B<z)dy_(y{6iN-Ryjt13Lt~X1?{1x{BkByzg{}bT-n@;{4T)cb9
zC4+vF{AQT^m}9j_e3?!*0{Trae^>1zJRKL6Go@5O*-+C5Q?@zVOrKypn|u?~gT|za
z+Be)erP~H0b={`&a>1b&0R9z*K!IFQ9lBPxN_39LF3WON^{1GI47rPP>fxh-@vz#X
zZ!98RmZcRsvBhapjEw=i6bzaxDNCt~+PObg7o$IY{Mf3SSvXW`i7oheQ8*{3=N6$r
z0Vm>7OyaLgG$h|RYUiPL1~b%6V%SOf^<OXB!sXE$Q<Jz~qvCb27H!USo&6-8+0Iv^
zpJ5~HV@RZgrwlZ;s-_0@^J`qG(4$1RN>!_W@6CgvTAK*a3SS@C{&bW8n8bX0diZip
zD^E%>Rsx5W4<}z&+E322?SG<rD*0>5R(yCQFfN>CairLwuDJIxr|OqH@A*hi^hD04
zHk%s=dMq-S{^+fCp1OfG>ugPpSdnp3N;1^WjdM=_+Q;YD1X~^pOjS`;I0#&h?N*#a
zC(npu@l0T6nRK)Q4~G@*J^k~&b@Gk5=Gj*i>|d|K1Hz68nL7$N;T=<7<6PB2SSP^L
zasrR5QfQs_K%m6<?c*;!ACiv`7xPO>)MoPT|E3rPzE|(JQC(4)S|2asgM~qwc13Z2
z91>RoiQX!ccOOu#5|a~zVuT?UQ^p%pO%!~5-RWX7v6Qd2i%Xv^CJVkiKN@lkIDz<=
z%K2%A*6kJKeJhAci}$dV+`VaMXQu<_dxfL?<+dBorTx(S3xSS~j{b_Co}T65&cZ!W
zJId75R2S@q0n*0?PIp=TeSKAN*ZC=w5nBQe8_Z4G$#d`f?0|jgFl8FKyvzY^)QP2J
z+0v@~mgu+D`VP0%ejU(DTss#=44jYnR685I(j6sV9lKX<Mf8EV;CQUBpA~(V?b+W5
z1VbE$T1Ak=%WwDXIe7QyhI|L4MDa^ZB;vUNZ7;9vO$E=Hhiwbb5yqPeo_@MCBvYHZ
zKJ2+O-MA?E4fpIa#r{)$vCH~2_u*F^1Z)2^unV>K_U_5iMqj>vIfFz^srP_~XaPG{
zhz_aL0mGmv4D`6PiF$>SasKdzUcpppm9vwR`eRNLIIC{T@YZDc)whJC&sqXbAG-W_
zg1}Rn)zwwS*iv(B0oO(Zxb_1)F=!E0^@1*{@bn(*$LGd1b6CB3&7eL9B_rs)HnEt?
zh4W5{0|m;JJ3Kp&=t!B@XiXp%uv&~=$e;RE>TJZ4!9FAA{0w){676NwAe)x8?>FC`
z#{=dV@OtL~{hvrs8q^Mt{<=(hLXksS*3|Z4BEuXkFB&u6lDq2E(g><B3(Z6pV!Iaa
zUDox<ZR{D4H2Ns>(F!8*8Xw7Kr?l{lZK>DmtElWH>o}cQhnbo?o6?6@rpIrCgJ#Y$
zwtw`i0Y9##+J81H-^R|AYb0hx4tc-Rfv)E)H~Ae{W~YkwsR9{DtR_EOOl*K{T7~HO
z+j4ADK8A^J0xYyYzd`M%baGTjvs&_LyLVl%L<c3n+;Z-x$w~{_^&+NrB&UrfY+OUL
zS}5=az^XDM>Aq6tbTu)f9mllmtf%YR9E5EmiuSGH(co5XOXNHk#z}jl8O`4@QR?{>
zn6J@_s4s+_pCt?1lF-r9m-`>Nq4(xko9nroMT(Q6tUkC{cA>d}NvVD0@Yz(^n&TRI
zr;HVY#Q*dMH)gAJ_B9*Y_6MooGHQpA)M8*aMci%j9H^dhO=<UJvOLN|qIsXs|Dmr4
zHJ)w0B_#RrWvt*(KfzH8Wm1+;FLaF=cH%lMb^Sx>A5u0kJL((E<1Ib}m!6*%I6;OY
z`Z|<zS&dAXVga@a2o_I=TH$vkHkAd=r9#Jx1G@MuDxY*8!vylBoS91v$F5IJ?k(#$
z6c`7wDUi1)aZ|~}IusXo9Bl{CtTZ2~InX^Kry{0#+>)`r`hjf{=*lWK?{ZbFU}{^!
zj)Nic*(kPPcz%@XN?%1Kf1H&}^C%kBy`dc^fuX+pdqEJ9Z==ijy1V2x%=d{k%+Z7i
z$`L6_;G418-%GxWLm#hiHPKKBG>1TO*!saDX$TpPDd3*&r)M86hgtnOTE=@ziPuNv
z<j_>b)D;G~g8!L>DA?ydKHcsL^r^&X4(QF79b~g6u#+-NMeL)IRzsPfQa3ddlMK<(
zedR~GaFfmr?Mp`f@R3>!q%7E2MTiD!_Ye8Z`v{p;U)Q~;o3-w-@A~qxuJix0N0^y_
zzgojnP1!COYVK!@A9O47*R4w~*?B2w{j0Gm{Zn&0Eks;ut`xr+=5Ngv-{=Cn-bK%&
z-JP?MA;@iD!37Z|CHDbgaRcfm@-1DsanA%}Y{8l?${NpicbUr|rvZ7cHOaC(2~whz
z0vB@D=yQY<r{;xFrK;{;jdGOoxEWcVT*RBej?UHSE`^_5QyBBHsb4;f=Mu+f^OrAQ
zx+LVSR~F&H<M%k%3L(+V(ovrXNzBm{8s;-&1>y+zJZ&2GuWyN||2~?s9e(U5hLt)M
zA=#SW9wXw^Jq74`yH1O2z(t7m_xIIJp2ImxN=n3icC(9AqjJ9Uj{YzA4#R6#)$p+_
z-#y&R0Ba&I$zNnrh7Dr{q_IB-o1w#5LB3j`<uzJiGHq#6D3(^es_Ms2RA-%tJvDz(
z#UK&I&f2WE)og?3E8JL!u?Ac!QrLFz$5?^3UW#IENyz{=(wf5tp4t|6A(|E6ww8Sm
zq&SwR2E70O0|qIdBk;*K-oXl64p?}YwJS_1qk69TSiq0{!d0pkvH$P!F%>T-X6Rpv
zj!YjMI%b}my@#UnvMSdACu`q@c+)_1Mm6A1_4QxJ`4iaXLmJ0;tClkTTo#&fE;6CJ
zZ6&p+wgKScs$=cKQMr|7$xr_cec7L~g;M)Ml|8=yy|QOosiAho_Ci3gzNwI9=Vc#n
z)OLrhcpatkt;S#1CyRHZKi=xYbA;+ZX8Q;IEat11LaKK13vSc9Hk<TTn4{L4XZ~1g
zoo4+gMk8dSO+zXkzvT)E;eI5xWi3pMNYilluqbE$t3_iD;AtQb$e9sWs_~()|E2fF
z<eS#FgrCe>0`7^s+@JH?26=dRuq%Nd;>PgK3Dc+i;3AuzsJgF;6kViJ@=MGqd2CQh
z!dBS#tC{f6W3bLyDF<zz4=JV}ol+Xt?+A(U(?+GLZ6DWAjVM((?%7nq&T%hmb9kz_
z3|kIB{ta%{BMx9iWZwNikjE-n@NL?_W+=|E(j?_NTpBi4+k`J;KchrL<l8Y*C2$B|
z!E~hw;ayk%30|NLU?Ba@pWskO4BS!p{A%hN!;B=8S?xgQpf~dqPY>6T-3ldcr5eYX
zU@Y?q!KPg>Pn+ZUpts9%ZrV4G0ny2_NpIZdB&W)7*Gl7sXSDX_n*0Q{22!na=}F!T
zI!r#a$MRH~r`(}A(yFBK!_qx4J)bImC+xm_sRK{qb>IOtg>u_=p)oKhxJ;wJ<E#*#
zWoLcuj&hfcgn&$}WVJob<1y8$#RfELqzUt^m{Isf^=`(jGmO4P8#S9d2}PQOl$fAn
zou9)4ecW}=&rStx2N^`f#D43J09W^f{V9h@>LP}`RLo;I;S7A?vFCEeaOTp>Ki<zK
z-`<+OBVG}3<Lt97KM8DyY=Rda%J%*gwivGz!#)(vh*qp!G@5TC{G?!oL3N5leh`qT
zW`srSPH_O{_QM)jp6+0}ne#Ta$=1UB!6k<86xl6jK_#|zZtwR_j`m7US<fG9-qu{%
zGcn*#oGRr8X4~<xNx&DlzaGySQ+XwRe2S<K!)NqWa`w4T3elD`M()F=AbP*K^f11J
zaF?HoD4<dft72?qLW21D>^AB<uq9NDO(Dy2L3X89n-S!84acG0u}tsug+mkvRTv2R
zH2iW}O7z&Tfz{l=YXZMF(Btjfw1Q8Kw;s%$u>8(X_c6_9({2vNzpm-E>|Cn}cwW$v
zoZ|8BzEbaOZ{%p+r>!|ZO$;i0vep@nMjXE-EZ<&uuZb^#xvBZuY<G=HHX8nxQj@DP
zZM9=bv!<)mxO2HF@l!+w#rXJ_6K^t*o_XA1|I}B5TT5woXQ5rcB>;rom|EmUj*X8S
z2%D6}Ywu6#_WviCTnjz0>#1gUAI=NDgd8`zFyv;oDd0jmeJ8_O*3Fu=CHpTfiC!Ar
zqHjU2%qf<UUF<1p@%~q~7t4OpHs~j{0wTbM1247qjJq%OQW0LTL|=j#m6z?<IpT|*
z8qhUuhtB3BqJr8dcr;ZcZKX6ScMgzU=kq^WO1gl~U)NO2sc<%7`BrEC{%*KU@w=fv
z1dM7M)>WI6#qZ{AH4v|WOWNk`?EGiq|4QOF$-;BlY)<nqzL^r&2~te=k++rn2Gu7K
z@3h2k_1B5N{lXKwvy;7-sdyL@wng=+r5R^6XqiNYSK2IuuZ_C;3^G(nVec8jPVG;Q
z+DT0|mERH5@L!B>gyLam;y}&Pk<9AhezZ$Kt73n~qwo1&XLA8nd-G>^x^vaqLv1r#
z*QP3mv3+K!N?Uj*(x^t<u{l}rYK8#fb)PaKBaU-%L?GbJtoK}KZtc9+bUgXy=H{Pq
zS~oNq?(;T7UQssZ*O4~b90=P<8ks!m?Mi&~y~3heQ-XBK%DMGW_!uJEHKendI8YfK
z2ju%mEgA>f{qa`(kt?gZMoOR;06D=4murf3UYV{wM1fn{<N-_SG6NwJ;||_^v)+pd
zgiKG`jhyR)63s=W8ggz6_c=JxM!Pp}y0uCcb2VOPF2NRsv%wVM_(~>*=`~l4YRv%b
zdqfN3jNq}^nc$h0AlZ0QQKX?&Wp*0xM3Db1Dx<caXZfd^ilR*oVS=#{3@e<jspSYB
zY1;WUy80X!dGP(Mx-POHo40LKM|gJreCK^~(R4tK<@K|lwPOfh$;1a!r70`?xE{$t
zuC>mY>1pMQV9@wNX~Z$ZOhek4Byi`3>A4`aQ=0QwvXODclBZ3|^k76cpH*Li+tLG;
zxp8_YrAMRVX<S*-I^f01SEJwD&QDkGNl??^>qoN)=IHQf$v~Bbhx}Yu%oqg!5`FsK
zGBei6VM++8<q>$OiUiCe;!F|UQH-DdgwHG%Uw^hE`(P0*rFEn&nS%ZK7zh5=)U=xh
zLvD^3r{}_pDT}&lS-Rhr6Fz)@;Q4Z0C!I;`Hcc>T_mRZbmwMPSXL{q-V-I5(Na{HH
z{ByS7P9!kUxv;{faVh_xsIou+nD}?!%G6Q~Z+DV}r%G3u*r2<BiG*dXEfV8)T8E#8
zZ{IH0#KkleZl3PxemN(;>KxVDxx^Mh2UqJr^Ju$s@S-AN*fbGglF5@G51&oLs`#YE
zjrmi?OGfE1?S#1NJnttE0M`6)tZsAHq6@x~8W;}+Xz-zYSk3uH>O5vyCsytS>aKLm
zWYai9p`gn}c}3fyqUmU6CE`;D7FoM>UGJ0<vLeG9&L?W;U*lkd@Ep-g%9*?9vF%#=
zX*bM6sn*0*YuLAs@1_6Q(QANB+HD(zYr(ofA(yFkVwdZ4c<EGWBw*_o3gq&G;7=Dx
zG<Uw3fxnZ=wL@^L%6a~s!L)}n^j0p`Q!ja;PWjqQ2<rn{=aXl=(wdDxZ8_NN=PMb?
z4UFd}Lquz5r}K;bEhpiC*<kz9)_~4diLEDl-|Lm;_tavRg-w&>ayG}qkQ%#dokn1=
z!tZFB3AAn@;AZx)sVUnue34+abnoP7N%ISjbk{_SL$y)fRO|~nGeeSwqN#>f?g87T
z+>oE8OO@w4q(p0l2F~rDEhas-n_iwCz`CUXv-4bb@?XyP&0eMg1rCA6Q^JPxjj1{6
z0`f+v{wD~oq*P)3K&%Cxd;D45Uu&|xq;{5vcJ_G=uGj@P`d}XTAE9pgiykN>?@b6q
zCek`&Zetp3zc^tG0ew1+l)K~P4JZA=t95G}NgfAS^!u=KtMbL1q;Hb;)Fj`%=xcb^
z0`e#G4}X?6eiL`+I3p9;tIoFLy&?g}(E*iawW35*`XL#Ma<DTXm`ljmZm!;)^UvJ-
z`hl?AXEi(Bbqut@DwVyi3*f7+t5eO-!rL4SW#Q7l$Oh+Ko*FmUP0Wb+i&Jy0P4JmH
z%_;&!22$Qmmed-KlxR7eB4M4Sxb52JK6|`EH(73Vxy=v42hVcN%UKU&$niO<pW>Vl
zE{$y|M}52XspcU*3Fo||w0#!UQJ?1gtUq%tpyEX+ddvDK(|Htj4)mJy;jGE`8fHGd
z>8zUkdNCnEJxwbsH#hhq6J@^U65GZe2M&wlcj}P2BoCE|YhMw4HKVnIEm5W41JOAb
zO>O6?BpshU<F;RxaHR8^cPBOVTjxsGX=|=<G}3C+`tfw%`9hD(CNvKlaQ1_qyE!yg
z3_RfaZWE^1%sRF^C?USPoOZZg+u}K%Vm$r%ieEx<+I&FciyR)EB3jAI$s_m!SUYF9
zZSCK<ptq3*kMSi&Pn7&gASIJPX_kHJIp~4OKhh{+Mn*=R+mdnxB<J!yo!M|j<R!ue
g{d{}gaZXs5<HHeI_G%vgo)LkPyt-Veta;#n0Q!rM<^TWy

literal 7626
zcmb_>cT|&Gvv;r^1d$@;Akw6_07~z@7il70s!~D?5Ws*U9i&5~Bc0HsOAMeAibmkj
zj1mYEIys1;1(9+S-gmugoo{_>-Mj9(e<ZV?dG_8jd-k5$znLfbo|!%!%}p8r06=GG
zpkoODP~ph!I_fLrf3xh21~Q=vvDDWBG>_fdAU|Asq-m-N0JLV%9=l#9KVJ<runPeI
zt`AUtRKo#v9smHRi=mFDHN<(Vgf^FXreIj?qo6dsd+@=V<ca+tIj^NL>5PjTsBbxJ
z#*h)7X9FqvB>t@{LPZAYG{Uil{IN3Syw59m?owZPuC;qJ(2M8Vb$UK_YSmB154|AQ
zGT0ezf4>VPbd%mXbsyaiwNdw~@kK<Qo+<U;wdwYs_bK;3JHo-e(#lA`<*3LCzT>Wf
zB$E2BlbZm=D|m{|PcHrMh~-}$Z?j4dw;p4l*S43G{D04lXdy{f7nA+^7OIaKnvmL(
zgxfz}8Vem3i|VgU{@EQ#7N(K@ur>PUX;kx$Y3F#V_+V6$*)0Jdh(Zq%Jt$V~8xX#_
zs#I8yp{V-go#|`NEMQJ2#8yo_?lDKisuuFOw`cZu^2?_`wAn!V)o2e%XWp*`MagC=
z@(T5i{@9wtB|husvdlVT=-OVVAK%Qn98PawRr`x#@ziALT05wSaP0a)1xQ@GK$h^g
z@M4%X!Xyz@^bPTS5%FdOWlq3J!8lbtuKIrtNe-pWuakqXDiPP$f<C$AH08b?_BD#^
zy}jw!wL~5bP@WfdekNemG$*~8yQoxX@F>N?#|=?fo9m<_gbhlElzf;@52-Kv(^Gk~
z#%DO}7I{dfh9N9wli(j}H4#L#C%JY8+q%LLj{4J`abla^T3r}(RyQNpumVU>06W=O
zcl;~1>Yga`IzMCP(q}994YgFP{`;ky|5raVUFA*q$(IucLs8eEao;kZ`@>2epZG#s
zFoa+4$p+Fe7sz|4e0yOm*_MH=>c0QSuW5*GF?7j(HnyEtpdjg_w0Y?PHiGl_URd1U
zB^NT(t61pu-jX#0BZ%sM3G2+Mn^2b6a{(U@Ay0QmjiM!zP4+X33+PPdzjNU^C;I<$
zB2EN8cukoTpg1Im3t1bZ>@knN29ivkX8fD%Q4?=d$MP7|1nnBwPP(IfRSuQN?=zXM
zN4XECus9`58LAo~$vvp?EVYmfF4b9Y9_LG%43~)1C~SOSERXYm)Mr^T1GTMzbfW$P
zugh>r(^B9Dv8$_VvekXq&l5Si5?OEoKQn1<Wi+S-7FVu$(~(yA8QND}pJw#J5-u&z
zOP(<Ehp`f|&C$G6#SjDnfsYS^?1m;)gYa?Uww_A!LbwNUT6#&hrS<KEwWNEU)4zX3
zp(iC+KTMfmt?wJ@)muJnp3?CgG&*9CBrisdKM!Ju5dR8?ixw(}H!}liU!q0D#H!Wp
zkY>Na+9B~C;EAwG2s$OT{xfN@$-zg8qV~s}DyEh~GcI}mTl?D!WnQC&x{37MHPyzj
z$-iD{d!v#Vr|0HOwzjsqmJqf`t+uSdqz@KRcHv3gZxjYQf~^W}(ZTXrhxIE}I2-k9
zRgAheAA{;Zp^fc*k0>U~d}4@Tlr$H@U@%j!T?gu_s^W&yImP0Y1HWr1GOeDBMfJ`D
zaW8=mP}Q618A$>)#Ve;$@$rp4D$L17LBpis#;^h2T?Gq_Twc?AB6EOgeT4I~>{?zu
zR4|v4nt-Fvn4x^$RrXylSd>VU1)u1!S-5*{jXtt9*z-j*9+Sh9k^I7wyZc*M*p+L4
zYBbz$s+g)Z7czuxL=#i?>u&CE;zJwI>N8N+HG~RKFDo-_;cJ5`mC#m_Ev$C7%;@#E
z+@hk7&mfGKG<O6xQ0UhWNk8U|pI@P?P=g+gOaL=t$BPx0?A0YvQ9m55(=1I};dffO
zSeZKYN`b#~zWl0%2P{IKqT?!4G5cICMJl~Ig`l3Ef?G*!nhg9d*+xhoc*NRRiOiG3
zK*dSA!~q$P5eCJh6$`11gxvu6x4Cp(EoLT31!qB>&mX31G9+4+JPC6FaUwol1vKeE
zTvcsh(SxU2bA~&6FMZ_Vy-h{X2cO-gXVQ46nMTNadm3odAARz8XZa&uwLe)@RCM_S
zhlIW{O14dpv;()LVQ!Efxn~7>@i{Bb_}x>$Gj#baTpt#6X2g;p@o{J$q<&L!Vl~r>
zC4A@5O;lnAC8js!zdwJG;z7&ClP@54eY9-ADg%Bk{q$R{dT);7cGKAJE=NW~OGbEg
zx%S~LY^{DX9YIO8#XTxbkcg7nCex3e#6X)dd~R6&xmgjC^(b`R_D0*&h*`TlqTIm3
zMkv=56u;%AK-o*`Y*C8YAD6`1XnjF5pR-~i{5ObRw5U`bvX^o_gS=(9e%`L4p*ZNF
zBs1Ba4K644zW?yIXtCL*^tp#-n&4Nnnyd7a*vM~3*!~$*vQe~@5HWXw5`X||+5FDk
zucQGyXBsh=c^;7C#-&?(wt(2nC|Zqon*U(w>fyI$8f?F;4_^cX|8XP+cz@fS=ye0^
z0XV*R!t(Ut;#)|itM+LdiT{HI<_Pd~df6J;N*#X-D$AVQgSiaw(D{O236->lIH}`G
zgyUaG={k|90CxmxPx1yiQto{Qx!6{WEn$8E*7e95Uog{5vZW%%a%n^-+kz2+BgK<6
z@ghvAuy|CY!mT^CJr&GZ1YR0__vDk=p!-GX2Od35surwtzE<9IUOS5W-hri}u+V8m
zz`7Sg7wLbZcd&5}xd3;!;Wo#zEv+OgttxU3+kq}JJlrurN~gr#D#=$a`y1)i6EZ(r
zww~FVw2rdOo#QgT6RrM9)E4w|Ma~aY82b5OspUo`I5TG15oy^>10%TXbF_|eo6M+w
zZ#=5-(e_2}s%rkY$n$171L7$(t*kImVoC6e91hv4;}oM$9Rrn2Rj12-Vkz6%pO6In
z(ij_TAh9*6)GvJ9^qmBEz3SQzZn-nl7cb}rxL{P8EWcmtjS1})Cj^K1n7oMYO_z=5
zpsSpEemoFEjNIesF~4dn7D661zo~$h8n{H0dCb^Sm~QD}V=$vw@>^Hg&Q!KR?lUG+
z;Xd`32s4|E?YrMT0Y>N%`bgl((A+pwf`7T_aMt1q)S?MHwni-FAyF|nwy_2X8h*=?
zD8{p(Ox}O27i)Ka8)^o1I=$vS?9FNQcSzI&?QP_7&8wRBH=N<b*=;APO!MWAe#GA8
zq0WW6lP75*MhZ?Y9bYOfyT0^#bdxU42m+|8IR>%15TrC%V(ypp%H^FLjeT2y#wvc4
z_2jTP+n2a=;&f`AF##O0x-jEH1t>^n17!A>_g`QTryPdsl;d^*f0^g|f6Mw{MY#e2
zBb*G9Wb&Qw-^36fS_HcSSms`D0bHU@Vte}Z`6-RY>!%PZYK4EYMhuYt{iFPxM?|uh
zJfn0Pd4T+OiIW}hFCRISbUr=lN#Knc2E{VOR{}%Z1yUDAIp`9Xdz7I##}l>h%|7y&
z{+2(%%8J`9@xdqGPk7mp>R?(YLEM)w_isu)1T;Bx0}1K3QWKzkNfpd;ADBbuVFK$9
z%8Q;s?q1ra|M>mnmBTs{QFH?bCC%^sc)J}|&KEurU%H_?oyX?T44flNux+7Vreg?5
z@Hl$3@ku?T`ScV4pVvAf(J_>;wpbyG{gm54D6xY??Nw&5uu0ZSy9~k`Q&Zo4?N^x!
zf?5+vhwSP0Tlxb>xs1lno$jA-L1s3rOaxcOmF2^G--FG%G5($IoGmf$q%fnqI-lz$
z2;+iis}8gWF+4Wi=FOp?GdA?Gvu$ucdcVlpg+T8%ziFGUbU(({!=8Ja{veFJ;$;c;
zR9J1M-D`1s7Ws|f$uJLso77^eZdm!Bx~TYvp@Jv);4WTtk6L))OYuj~90IO1v$gL+
zaA6&<l&bx-k*w`1&xRFyXD7}~9Bq#yK%B!W8A@hhtTv@>PWzE2$W4cqaSLwdYo|$=
zXs7Dl=-y_B_GqMwH*_Ej7~+uUX|-_w#{`>45hNyazX`KeM;~l7g!gQ1dzkm6w+j8S
zk*{H^4*9b&)s(Fbg%lp_dtLV^4+~VAx$lNOVn(y&?`lnF?D`DY{g~UHI}l|fY<B*<
z$dQ#KyoMRz6uu2S1#eY9hGE)&DQ98JzyH)lI%8}eeTr~$ddph)V1H?HhVA#y(}w{t
z4DmFx%tPEc9q1yt5!}WkSqY5BtsU=)ESgv2E3C_otU2m|x7$r4qzRng?8Y1D9`%Iu
zhhQ6uF`hzrvv*kh`0Z#tl#mr+AORcXjoo^;a8=kKR>Haav^mQHid5(CP9-Hi5fmc^
z=bo?29=UUS@w%tk^PfVh4)cf6Gn#IU6W$&@XqnU*IhS{<wJJSLu2FPcR<fmRRTxFp
z*{tE81bKYf!@;g&cx-frzIw)N*Qegutr4;yohOVfONi{Y*G{$dgtsKIb~DQud90D>
zE<A&jxEw}a+PH@V&Lq1R^2<$1J!0tdb>3RNzuD3Yy@J(VKg>&|y&q6i8#q1aH?ZPn
zR&3=fzY$spDVb{GOh$Yi1?^6C&Ezk2j(~dSD(BOWOP+oh=stxz*&ZY|bP&)M>Y)Ce
z_3h?0a|`m3`nZKZ;f*1>Ap72P%8bge0xoNW@7eykmoDo@dm9o1nAabo1QW=@qWtAk
znY9CN)~6Q+T24i4HAb_t3F|V#-%qH(ciI2X;))y*LHB|Jy8n{>|AOv#_HNSgliJ~=
z@DFiU$=ztEulEnPJZP;z-@^rBF&5TEDO>^+uw5mEXWpKu)K`81{OH(G|C9p2GT&Xs
zkA|G10)xe>c0B0YTUeo+v;#Zk)<4Ia9}M*eqn1Y)m0tU@fskulk>1CUNGMj$*F_Ld
z#@N;F!|C5XL5k4(cP^tEs_ScVQ|O*w%fV0H@wr1<kumkO_Q|z;(UVMu6&_{jNwDg-
zJ+60WPQ4{MKNpxfY$H;;K9~4znF~4R6F%k$)i*W0Nat1uq8}iH%!)Ht;3mT^#G%{F
zG`hm8UE_vwp#|cE5I?-<1}p6^?;4P(m_VfrOv$gJ%}pSZ0{^P+e!PzqpRXBGiah!z
z0wy*7_MS@cfya2sffhPG!gGv};!do7Ha0AyENxzkZBKg|+uAITas~;xk|^Jr#y2lN
zJz>Wos;}@-khYni1Ca{?y4yKzUiIa<#nJrKjmMF{tY=%H9Gq%TMkurSC`HV@37YPY
zi7Axz%~v>(l5j%gCS2z<;?qkjUtRU`2?*%s{DW910yL9unzI(vAE>S#BxZ@2(=}v?
zW@I-h*>m_fa1t5=&VkqDHxEAC^WQf&W@MK(w03XoopP*Lt8H9|W37!PBu2X;>ro9g
z1q1@Y`|E30YfDQlvhDLea4H0r-@3XRz1E96W(bfm;oa?nyT%FMvI!kvzMhC*aZ`nF
zra~7p?Oby8-Qdy4tp_NT1Z)cG@3lLNkd*G4X%*-4W$z@$*5br;b9z`|$fT*K){qKk
zi4jr@?jr-5>Ap+>dmDatSR^xy<j1)UW3ZgB`n%P2jk(2MHF03R>LF6B@tzOhDi!mH
zP_g+ZyQ9<H0WRnFk9}u~S(#c1zmuRks-bf8r@6@D8-;3<0gG0yN&{hLSW|nSpR$qb
zKyHVh_KmJ9|I87H8kCf=#8eQkIz6f7dnQ#p>&&jtHm;^C+n#87f>>z|EdY}Rzm6jP
zsMdUb#iC3Ny8IZX|NhZfaZpnkH=bq1mDkEQ*ZYQdg_+ifmntnUz79U_wkikd;9%MB
z+<hDfCL(Z4p*giMgLVmd`K5F8tW*TXgB0JCeaXwH(T=&P%U%4^2%EoP*f~*~Qv(aN
zOtv+Z-Ja{oNucKj>LV5dUnX2*zpdY|LbEy%$YmzGOPx39ZFZFqyU*N$7M81z&b=L6
zsMO9FFljYvDz44@lRqNTM7C(BqbAogYPI#Hj~+Q`jId1ZuKoqsssq+SZTf5I)6J?d
z@Mt5OaozRu%vR@dLs8-;z3n~$lObqcDvsMNs;j8b!flT(B{tx#27ERZSg#7{A-jU1
z@NWilZ)f7gv2wb=j1UuJ-#|Y+ODi<P*5FO!P}FoG<bkLKuv#=jvS!lK6zL|jbzhzF
z+;iFu1#nwM4c=#ki5pv-RvY_l+Z8M<H@wdXQJ~N{0|DoJAUb^ULp*b`&N3!vni^IX
zSSszF;JAI-azmt5B+kUH3$B8)8q0@hyI~t^X&utMtkfN=J7J3hHj1fMvy}3H8D0Q)
z@sI0&8K>4x*3TMtxKBXf4oCc33;pAQ+LD&ZFpGsLPpaLHcF`qJLjM#&WypoN%6OjG
zRRxmAK3cQ6H=0Abx3U-Ycq!F*LnC3*b21s`I-zvAA+8Z7a$ZxY;vx5Z|2*K8x>=Eq
z!=}8Yv2m(t?8b-=^4o>;D#c|+Nn+TQq;A^9^YaydBT0UI@uxZyIa&GeY+#!x-rcMf
zF#vMWw*ZMorkzL052@Iw=)Nhw^OR<p_WwnElyaPge=CaM<wb4*z@@2dlJ=BfeGlMA
z^OsgpB#<(KnHuqR2O4z4(wvH1xqEs+lg*(|(qC&+1i3q=eBR*#;%hM)-w&)AnWKKe
zsh<C%ciXv8!Tq*s`zbpd+J3)bWuYQ<eJ_oD`sZlC<b*-oY50;JR;@&SIPKMv{JhR1
zR$vu9f#5{A^lW!+T$`c*^}3rC8qb;P{q3l_qc2Ec=9aSt+Dt`nMSpnW!^Iqt*+UtL
zmZ;KC7@I@jLxETFr-%AJ(ch_*?s(G3W^fw+7Bs60|I*Z+yy*s#D2ZBTjNA?Huk02y
zuleF~R%p*1Q+(Rz`n<{co<h`tIK?{gPl0mItBqya`*fkxKXJi@!N;}WN5;}G6n>iC
z>{=tpbPyNT^P4aeBS*OD>Apl!_^P-5YP1E@Y}m;@c>Pu4`g+_|aPTC*67l=<j<xRo
zYWmI1Mx_9?V=1SXY9%-(d~e{{3Ha2uzhbL5%4#=T;C=~D(B`xVB?qOUa`H<J6R$9(
z<M7_!DA+>}Kp&&t2Tc4_m8V%`o%o*6ViChT?^+aT<%AV2ocy`KJg)}x>XXXZ#5GLW
zPvj3V-O;<rsymZ6i}SX=)0U*yS-)j;Q`TZytjx<_NYY3vanK;_Y&^zncqr{v&eG6?
z2ruSK)OIygtB>t|bCrC|E{Bp()stt8e0W;74u^2Ggv{EQ^2T@kpxi5gx+)3XE2c6g
zDS8te&HKUcW$ay<C-RNDp+Sdi8|QlkSa)l1bTGs&I2l&|5u-5>zF?rv$Tydr&@%ZH
zb`~FvB-$TY?8{D{`oBHay_n$-$<%8+Vg*Hb(yI3Vj%Z>D$(l4}_0{SNBbteYrzl2P
zFyXVd{K+booutjiS({(oD20-@R^m&Me{UWz3Cb3iYxjl?WkAZ~K7Lx0f{0=jFDK2{
z6pHCj`0-*{rvCPH*xM@3c1AWeHT~;+8u=Xa*z9)+pLm@~A*zYKGIfh$(`PG$b#*ys
zQ+3C1fqnZ3k-YwcKPu=A)6&)^)&$x2@`TPbZ^@UeVm^1zCQAl=%$M2pbo1uW)#Wpe
z3yu)u#eLeW$mMhDT)!Rpwk!WYWsiZg?<7n~HJHETWKeQ_)S_~IPBO-DZNODY^3oIk
zuTpSsm6tVFH-<i;K~@u2@qA82V5m?pgq~CB61mi%!CPK6WG>nAO+F(*=2-0HaK*Q7
ze5hglH=)mDq2Y*W{^y6<_1}5Adt>q8>z@nm?rki%Xbo{+yHmp<^Lhu}@y6%XOuD0A
z><k-g+s&0id=o3*QgS7#R7av^P=qh~p3n9n5ga_ipri~IF4>q##l1NWj$B&euAPE8
zYB~5LEsVlR$G>p&HXkSauWp54AGNjU6vYAyyz-0MZrQkP6{*54mB-XVLCN#CoQBae
z5mTw8@9&@g$G&;5*67vr)FU^H5cLP#8w(gmGmPYK8K;9{O<U_HS#G1!KI$`i3neF@
zqY;_sYDaOJ+y&l$y$De=OTDka)#gS-e6r@g+74MFMd#=Zaitbz;_Q2}ufuZh{T5O;
ztW`gdjvQD<vDp5VjrFfoA1};1GW23~9U_H<YVII1Yng~Ltgo589T8!S4em1UQ{3^P
zld0hgebE0Xs5&1J6=VLY)1~|m=U?p5$i7Ux<NF*fprmOz2^XCq*a&@^CUON@F;{LZ
ziW-l&!jil{=#L)-qp%~PHg=nXrUn5oxJ<WT&OSLmMBYnl`dTo`nik-t2mP|&C&>eC
zWQ}G98_<^61D`3mS=lVSnIz8XZJ6eHFcYpP#-tPdwBvqYWwg{(_F)IMb&ucEfoF1D
zs<c58)049%7&YSfo{02?K5()oOn2#;Q<Q{6y}d{04VSjJ!yGXTXw&HfUABoc8{4VN
zyz^7G&IOr29;s=AFphlHQ9moWt1*|}M(tPR*IVWEtrhW%syY|x^!Ps-BnbZ6!-M?%
z;>dONa)x`BOJ`X=-&TW<mch?UBe%Ro7KXa??E7OldnNVW+M1u-hPriWma(<<B4^7b
zK~n2*b@siz2GV3~=U8F`Dw}`maJmg+HM&F9AVZ1_Wh7dmx5`fZv=DC7QGp{2_TgC2
zbmRct9z63$+2ta;cMHF+%bFLho~Sz(@Y!Q(3nR)3Q}XejHIO2;g?C@ZhPe)>pVuLn
zFOXfd|6cD;Jk!x2oO^Pu7MflPa^zY0y*NnkJ#p}Br|*a7ILDqjAuiBGZhaPW?dBfL
z_wnx7zD!I*DkLK4Nd`vkLRYG7er{@{$Z`Y!-WPH>K7u#+P0oMomK?pQnBApDyws_(
zL%nr0B>y-k^T!p<7v+mJMRneIok*<jvRF0Tl*)kw?M$pnF?y^k$mi^<JW=|4z$W%u
zZDBVEd*xp~nhFZr_frB_#rOT54)sWre*CR@#j<aqMYsl?PrZ?n1vDm!wQzu!T<GkN
zk30%h-0#d3H%-`ooUh>D>wf#A;;ze~mLu6(SQW6asz?>~fdwyjm0O{ZdCgZ$Kd{<C
z;45USa}S0MfGw=d#IrJY`Onk*Tk;G2-torhg!^Yb*$KcyF6e%%nD@K(lMVL__Pw4u
zP1|X9@JZP7E8EBvQIfh5T295hA-!?Zeq^hHAFOt>x@&P@<3&SD%}d2e&`VY9!QP#i
z@$O#}`rZ!PIBTIz-I$#lh3b(qoOXz5_znI|0)dzO$wl}QxV1k1jAP^oHYn_CPN&)z
zEpsydsc)}r1~XM<dZz1p@VOe);$LNWSMZmplXGs|VfVF?!n=v-xS&5I7%Lb0$4UrC
z>Xsj~wzcUe4jcliBS`c5!*Q=A`}Qm?dwE`K9@|mMufl+HIoqD60X%D%v06__V6|+g
zO-D_nY*VA1W*$Mz`#qZWNs;pxHYc59mRAFkNR8iY5*6W?mhP=7MHeSi<@lEl`Qld_
z!3Flxv5Az!4)|*@f14afB58av&6Lkd<qZGfG}yKz{F8%*Nm51u0P1f77cV#=A<}k8
q<V6ZBa-ucH2vR;j0S@1HZ=6vjxa2?IwU=6_a13?Lbegpu#{L&o=A`cc

diff --git a/ProgramScreenshots/SettingsAutoDownloader.png b/ProgramScreenshots/SettingsAutoDownloader.png
index 755f5967b6282da8ff98ed51e815115f1e4ec297..691c7e32fdd4a47f0461e3475c766c7b6779c0f2 100644
GIT binary patch
literal 18120
zcmch<cUV*Fmo^My0|adJsvJc?dXp|Hy-SI-Akuq>5SoIhNU=~t2dPp+uK|=2gwR6~
zLJ?x9LJWi&%D2Juo0&7;yfg1tuJ?~zo1MM$)V1!l*1gt4q@Io{4HXL&85tRky4s`1
zWMt$sz{mCCdElGEFVsxHh1~nG>I1T}ezs-c=B&Mvwh|dx#XIT)t8>6TrH7h{HyIgi
z`^ksA%l)$r8JUWO`XePn2zV`>I{x}-`tjmlsa4YUoQpqyO@w}|n)r281+TZ0IF?vu
z>UZ0qd#y-!qq6*tN_+k_O7-}pM@rY}=|{%OsZz)(9iB#WeHU(je(BvD4R`NFnoGUE
zljfwuXz2oy>LW$=4)J)u=@qllx}swH#^U0@mf3A<&@{+s+H5C;G*iY=<i@$Hd<Gcg
z{d;Oy_N|Cx8sP8eHz}|u1AlN9Nex_HUW{f0E*Gyb2?3YOH-*8#h3gU21wrAqM}7$R
zq^@EL!a%H{z}IBNHpqlcYwLpc{@6;L!>+SC`diJS<3^eP@+7Zw^fEc{%Ah9p&~)Q^
zu$w;P;dHhbQMcP$JYWa@6ahSYPS-3t10SJm55@`XcYy|m?44&nbqCIb6M#W}z9X}Z
z|Fp=_h+*pTU@H*mOkPSLfLjml9_A!1gKuf=WUdMhQxs;f;;YQwIG`R`o8yz!`m!Mw
z1<oyQYM@KI-@86<OB$H#-th@&{!!cDBg3}{G^-pIvvoLo@NOvRa2^4)c$C>lP1JR1
zL<y;Le4l=Z#gQNUggPlC4{&9?BX2;Ps+f!CjPu%KB}UDjbe$)AzVuY|dq$EVnjhPo
ze{|Er2qrll%7Bma-})sx6X+D%&HNcEmDhcn^O|sOLRHNcv4q<~<W99ogk#9Mbwq#*
z8QB|##-Z&IpJXsIezeU4{xLuB!x3-5i*@&wVG8V_%xF<^S=wHIUf{2L@E4i05{1dd
z;^^oU&TYQeb66)wxs8ph_4d+fsvH<9xQRP%3|2`KP$FKUH8JMZ^ihFzd?T$adDS3e
zpX-By-DaY-Y0}N$X^n-|MLF|V`2wpJq)A_tH=&rqey`v8_dQNvI9xp*fliHDPqEGW
z`J}vwl_29@FL+V2TBdeJK_~=wcN*iP&I0deJYLne4v>`N!q^ojmrwa8Cpu>NcQnLw
z@C)Ry!gXg}M|`+*?K-BQbC367ckdv2Z_CH+T5sCxap@Jv;+*wIZXMLXVnO=5_TB6I
zTi<sRaxyb#L-vzqe1CY-AUDa$o;zGEB5ZR)#VmYhHJ~>5K%e$~ej=P-s2lG;;d4w#
zaNBQ!^$%`E&Ey73`l8>l4h&YwHsuj$IXsIi<RStCOlW(y@25FujnC&sO56J<PZTw=
zsfY!%BG~MMg(1ehT+W=vr2W?~pD!*4#-4FB)-dIO8<Cl0XjZOkjXPW6Jd?bBcpYp9
z&z~_5Cp-is<<Ujk#)C5V)ZzUr-yzJlEp)$*=!12V1dpSaI2rP^cih4ElrmGM)icuq
z-e*i->GeTVl&j}YWCzaD^IZ5X7Y)+Ir-GPE?zBsqe;Bj6O+J9e-;2FB{`!n1+A9&3
zaGPIH8#?AFQyV+$+prTne^B<7$~)~{IxQJl_KR+ZK&O@fW+8OwcL&Fo*=es2M{aW%
zVseV$J|>{e$KH34$G(~p9W0x*Oa*zh$n>6Bl6{(3{q;%z#l!PZfzoy@uiULZ=e`~b
z&E7t<5wDUSyx^=)hC<iS>VsFQo4GVS%rJSgk$1~62*G422k8(}!#tww#>0i6v^g>|
zJ&l7)wLA-{bp%n%D!Z0huz#Y0{0`IMXbCql(tbnSf_z|Gi=vb*iG7yd^dsG_&3Tvp
zOxn6(jrPZ0sn5%PDb32l-=f>5NYdI}=^*uixTE(sa7T^_#utw0K$JLBr?FLoOdJcU
zyUcpAWx%&_r@8FwY7hW3Hy<s~IRve}s@@Cn?o1^T3NQ}&!qcG$|8q1Pd)ffzxa4-X
z+mMq5$8oR<<@E0CEx08KUW`tYun+D8@FX}K%nW?Zm`{xuN*u})#+)M~T0mV-poZ)s
z?SF}Dr#N)~%@+uORnITKH~}8A8)yCiVu$3+IckQJA7_30`-N`N8BLhri}y;+u=68<
zj`vS5%X5-XpCYc1ZGl<z@Ok8aF0V1qUl3Ht{_UlccRAcB&LdgL|NSN4U1&WG6O;Sd
zKP~--2G6kKx7RR^Z7(Us9R|4?kM>t_vUu-$Uipi(E6w6rGny2CE_8L|acGE;dHsEZ
z0-ZdJduzHe9IQP(Jxx3!;ZgoGiypCxp+`Z+;LDf(^H^>d5EO`m4~gi^qxhrWuNB{`
zvnd4c`y}_Lk1O#hRTS|RRYvN|C5sl&oPjZF>hU?$Gw$UJol!3JR~8jqmHRN<MrHKc
zR^vK;$42fpx+`u0qTBPi?`=rysxRlYouC$9=J#IC#m~kAHKIlK<vF83M@%1urp`yh
z2^*sA{w<sA#gqq~%R#VPQ&MJp>XAtfX)l?gp<dijTz6f`Ro^q|=36ap(=v_A`Kdpz
zUT)oNdE5`J`=NA`gONRa)hvRsh!z$9aT*VmxuE_Q)XD1@jd~#iX0Eo-U$q$fv`rqj
znp5EG)K+F$TDnoXd9_Age>GiO>h{V*($h?hH*_RIu9yWUuuTMsnaFEAj~_k^H`+Ry
z_c=&^o-zAk*>1IuW+|agOXfwaWi#BeHKVL)z431R-a?7Ly2hn_Ikh)mAGD4=7_~~i
z+CXZS+A7;fRKi4n@ts+hU2Wg;-|Q^*=dd&{cKmX&jvVWZpg4c&{Ve&}p@}Mc#~)u_
z#2(N_OQmiV>PKnb8b(QZIqLM$vS~6QYzlg!qD;~fz${Tzb+O#F*k_5K=C^de^2yzH
zODekRbB4VYy2xDC4UtYusG4CeySCSj9#tYXdKCzHroU9`Uiasp32^sHtAP(gW_C;)
zoGe?Sj-JApr?>f?no)rWjc9gteI8SY@!=C+m(Jua%A+i&h+;UEjkHLqMH&|7Z<5F9
z{ni-2zm@u);8dbB4l<UlN9mFH;IhqMmgujXE*F^NNBG;;_ltRY@~ss9of>z!)r#&d
zez7sXIn4UV_xu$>))#%93bC;6C+r3|EMB3ipWpmoC4JRU%KY5xDzCAo=c_8gbe))O
zuL296eqzQPy-N4`PJCDMG6)ZLoSF-<ee^PWOtu}hze3T##BC$*-Ta2|XtY5d{F8;}
zS4*39oLT{ruQ`J~AgG6rkYrE|9bXNbTaEJ_P~mNp29L2@wiXLkB3(hrqVU4$GZ5vo
zfP&tX#A-`XDPEr2?ckfo-n?5Z(#)dKTuhWS?ebhSAl>=`p9xgN)~p!9FZect$2nfe
zP=<e;!9xSpdUx#Jtq000gk7(hvG{&_5#%20_w<shRZqeErhw)E>rLfifB5Rqs&Z!&
zI%W7Q<<7?2H|?%pc3Fhr%bVOdrH*CjK|077SEO5Vz^f8G?9(?~xl!M?H%;XI#-EvS
z+vZ@UxuRmo0pUDemOyy1ViEGd&?>0??fy^J(bY+AJsvB)VUqk}^F$O0{O%o>a_P?9
zDbDp$kLH%J=xgg9@(Qz+Q=}XE2<SNSy1Y4@(cfY(kMgP;eidvLq0Hn)fgFeI@k$=C
zkK;p+1B>_j<{>(Zq><FZwx1uvIqYd9E6I(l^JR7H3YAD_S1;Bja{a0t&U_=Psa)m}
zT=-BCe)WCv%!G|<42!bm{xIxkljt<pR{!{7$j32S@4Cn~eni`yiNkeYcbN^y)Xuuc
z5yz7Ov-7T?Ua0OnisV)QUWhhUxy-YTwhoz}rrD=pn*izMT{#rQKRkMFy@uMKXD%!*
z)AIc!z|M+ywr(<6yV2gD6;4pSd^+-EM|6JotS4?iow2}s(U*&Vu;FYDpQ3lTSEn7v
z9sO5x7q8K$EvvQNf5hFhVc5PB(;MU7WzV9k2us?nj&I=Act}{8#=bK2%^eMo+5i2F
zY8>^MOvA4g1!-?Cob1%FM&NDhzZ=_b=yn*I_3T!ERSh_=Hv(ncLF@;Y7MVGouMBw<
z+|Wgh^iCUWGa?m2$1pt=?9(Cz^;?4Lnv$BUEV!Cfg<Rohvm>-KJ2ef{THq_b^)yLo
zNK|OWqhr)<#Mppk^(Fw__l_#n@qfeo9rfm>3&#p-CNp^YF}JDnS~^&x-=Y+7!Y1Rd
z10PlZ>hK#B7tj7d_=oB%>`1eWoj^+|u%6uimht%iVvUmSo?5^Agy(;Z;k+;yJ#rHE
zkVTOHBSQF~V1>ARR_XF}!`qy^e+45UJh~Z|fY)~0p3Od~buszs5%@S$6nrs^>*B^o
z3`93WZo>KL=`ViXU~(t7`U<%LJX8D%p}t6sq*l6oc8~WBAw$OZZDV62n-yYU4w`fZ
zSv(>Vw{K*mpP;SCGCpXf3@x@YS4<8u52wFu7=#EB<K4N!buldKF)xfz*^nXa{b~lf
zDgfQ=ld@$>U0+5Q*w#~_dD98`SFabp)xU|Oin?_tuYmt*$zAMdOnJ@=yY1ra5V6CO
ziWf+um}|%Q7bAqHUw}z{NXR5qE?0gX8y`ncHF)RERg!yuZ;PPL3#}wH_SJPD`Rx)L
zhg7;DCJkB@Qu&nF2(F875eLyA0Uq5H@yPQuERRM<M|}=<JxwcZC}WsJ!c^XIXs4&A
z6Spz$vKt9wkcjTv^CE9~(ycy-fP+=|=er`A%gtY{OU2r~WhUGUG?~;u3+tGbE#$5E
zD5y5jwzC%`P;Q>|lH%0|36Ksz=WC05{ZwO-bYap?5>{eae}CiQPpu^E^z2sR6vUu$
zVg=I;fvViC=ruuh@e1~)v|C5!im&?w^$1FFRBc37$L6`v7`tKDvXT$?DdUXrd{3lw
z>Dq}JSlS(a3SiIp3J;=TRt7lcwOUuq(koWCEOLtTgFn887nYU9_Giea+BRw}$ADaT
zMoU0aU<1<-&@6RRoo&nYThAtUkYF6;lNa`Y?;Uzk?;^LG2ky!;k}|v&ofK`f)-+q{
z0POr7nI2ojB~}+RGgcaQnfU!3ypVm99JNB|5ke&RujrlOyxgQbQ)E$Fho5=UXV+)1
zc1v7CK+CS?bRH(<UMz68*!<U@*#f@jPDGbpB_f~=>mL4cC-TU=#|$@hnrRM{ieZt^
z==Z@A?$K~6nD>VSF!WZ<EeS}NkqRG0KbwDvwrYDbAzXvA#ypv}TaAUkH5leY(<Q<Q
zrn(XZp|?9U`<|JVO0a5+$;<Zt#cUt!zDl)-f3byF$38fbkq?=K6*>?N+r9T3fxkpV
z^8E*?g%Dh=_?TbqMm-Q*38>En=eIzbFucj(g5-y#6yM44V6MG8OUaLdu#4G_;~{%i
zd|mBEYzyMrl4eFKieRtWc^SJRoW1_SJs5$?+RmVka}d~yu$wvNVqnQx7#JFPHS%ow
zJ<qm`xs7Z619F?uQ?X+Mk>>f|s=!;DHzmz#T-dO;>}dxa5r{t2*m6*Sy!kmmwUh++
z0M9t20Cm0>)z25b!+fL-m(^X4uIng2Rmu06Ud%%6Dyx!DY`>kT-HAFXaZo)&?43Cg
z?JzF7|DdLnNVEG-%s&CD{+#pfHjQNOgSqWo1?xXx@aPl_+D`rH&t(5#7Ss|?5hbhs
z-<;`FWVtLqXi0uY2=K(?rI+Aj@r(fF(8ERqk@Zjm9E2_HK0g^wnF~8z;|!Wv+9N0H
zq&TF1zHzghu)ytOL)P}^&Ijx2t_90fwr&!UC;P&=uDBnf6jN86>|_yKQ`>+_V<5YH
zaTIojRmeT?QwIhbBDOYCpY>rf#*^%M*7cg!O2U|=0gSio{b%e;UpX=jfCPCiT5vNO
zM2<Zd{M>;VzT^{Avy2t`?3%k!=JTZVyPHc%!dy+?+Q{8H=fa9+{%det70M@pr=1-a
zS-!2}${T~~Rmg9-)USyXjgdJ|cIy>hKX`VUu~~2474VuS7%!<ftVmVrj^~p~dy4lV
z{Vhqf1GyEk%RTlmn)}Rg>rx+tX9S(fe0@#VgDN*o=hj_i70@@DQj~cTRl0E%>iMnj
zD%*{ijq52?lZ{!54~PNJ5^1wl^-0BuV*zX&(|YKrdxvDGu+c2};wYmLv#Cjjbyze-
zR*?Q-ArZ+h`)TGY^Lo6gJz6%SB4_(9Lf^-Yl=Mn``z|P`XWYJ(>=Aj3`&O{OCGkOI
z-PQr^)S)u<z=~8XF~zYF@CTvwpd`Lo6|rYzJ=c8|RXZSuirTDoTjhxM(mW9f(pHZ%
zvs)myjQkr8<u&+v3m0KYN>qorjA23W;aci&eS3M^S-$s6OmNfK$BIV3SJT!Z`Z{3E
zzM@O3Y@z`XUmM>Q4ik2?Vui`Fl^mnT2i;2`>&`W8L1K!sRD+D8wO9zppUHG%AmQKY
zxH0uHpg~(^w#;zo`?eA3E!RD8F%B)0|3*x{<dZ*`Lwv-G0cI@;Ui1f%J&MfU20gTV
z8hxnJ>CLh8(W9)z!M#qis-{&_GKR893z$)WBDKa-#JM)>r+4m7?N$6dm#uEH1tPoe
zf$d|I57p<bC2Z_8Wh(&jrG8!sAf8{gO)LRPf5iAtp*?pZL>Eqk6;P=A$>B#-_X7ZV
z%IZ}LJ(q<5%&Xo)R_hr(FoflVY9o7l;hzzz3DVgVcAo4J-T&O`m2VL3;}ms4;sM$7
z`4=bs0F=e%6&X>oxzjs+J*>R<LUhp1+P4GzqG{JRJ<XVtDEnhqYaeFj3IDt4RV>5m
zEQO$9L+8=XTcz%0$55l52}^$5(bwJgG|1N<vk>rcWZ;i4<fhF~35y1=Tlm<i(HW)<
z?Gc?AYL>!jCK%7sldKM6ZtF@Iq4Dc3*;`GeXi&1-4`z4chm1=qbkJ+`8+QC-F=n5=
zqI^TRM87~Nt`beD0{S|OS|22ssjr!-oRtJ;bc?z*Xu}fRRsDJ)%0bqy`)mv&l8?P%
z39;xWiwjRu#)iko#@@>Hjm+GgVa2R%U|6?qaZ3gm#oBI{Sr?U?R!rZ4rI~Y5UFs4~
zZ?cF@w>*As<!aXDSesb;%Q<dN0Vf(TLMda6Yg;S9GxkB)cRu-Ac0<|^Qxm|ebk8vB
zpfYj4P|#WJcZ9Ddg5iW4mARO|o)gw5s$P%5E%CyZam$rnem1L2l0jA9Xh)R$=2gmN
z<3hX}Q19o`GGw)3m+UF(E>K|me)SKK%0vwd;%(n}SG0*i*wDpnhbi|;>%ppB6|p%R
z-Tm2Z!6>6e>$!v(1w{~4Pb6vIS%Jz9(NE%AJY4miHC;v@YOJ!xTAPsg?q(8WJ>Io&
zp*nWC(3r(V4Z62)H(Jt=q^8-!*p!qMm(49v3*++Gl5Gqw#(vgij3D+zD({W+_2pk4
zU3~>TJ-;xS&-RdBvu~gZaM7u`b;wQ&2=ICr+vr@xrJ_6(IM?s@%`XfXW#~2_(sk3n
z1?zcwU{*=WB49YFNNNsIx^BVR_hc)mVL0kuG+n<}04w&PxW4O0G{mGQXu_je3zh&Q
zh^{Ow-rFhAr3~exm&)58Dd_p#6j>sQ>nriM@t66xe($-XbUM<X?{wC@*|8&Zj~ta-
z^}wp8I7TQxt0DHC^#I>U`_O`04;oE3fqNG8MiijIG?U@5<;o37a6p{L>&ir>-M9>H
zR~fMH`!c&BN1J-9<W9j<_oo2uIW_K)7T)zZW|3yuSL>aZ4Tr+<xn<q*XO>5XO2@IP
zim{V*?ae)F>gmrl{<@C!odylxW!otXg?hJE4%=+`7nhU>!--6sm8j0$%eEVmGh98h
zkUhI{g#bSj_OO9)PQF1mwwm6bAy2>3GD?+zC57fbr%t?>v+HLw;FnsJ6F|f|@~LLK
z`8m(-SG&S+GK>xI*MaevI2rPU3w2d3meof^)1dy>#nmKKf`WbP#u6ThCFOSQzPAuW
zzFxYC(YTyJcy-=?kPY>O%#bW^3BK`(Ef8rO`!t9wj~lRfQ5lLp5WUOePY=YY??+rQ
z4o%R^8ryxEmYzt>#Cbnb|M1&5V0nkm{m-BS*x)<f|H<%Xocj0A=K+uc@aRE@6(YY-
z<OG_iDE<je!EGnLd)6>YTwzCfKboMEA;%146(XM!AP68}3;TrJwM8Y;Uoy&HhR7=?
z6fPN@dK3{tb%d0ogp!~kni!hRpWSiINLNHYc7ZyY5%6-TEQG-YJf~4XR(4Sx5>x5R
zF99gs#Z9ppd4v4He)o_#+L{{aHhP}h+S%>?)5@x`Y@RRM{}n$NvTTh&W+7Ob$p%~M
z(grN8Y4FbUNVQV}`=Tv^WZ#>WLnr^JAYVIYdS^zHw6o@&<P3Y$dUsw>{x{iLs_=_R
z3}&sK3z@2s=YXGSjuoDnt+Ic|twnz706hTdM#Hr0LR{q~N-UIA7v*%#x?=NQ*=JN>
zo1^_zkB@xJnVewv7Ls3c=Ep<aWj&tja470nRN13(g$BzOSNxQj_R3h@b8#rx1xc{v
zc#i73o@&w#9%e;)S-~mm7abe55r9eOF~@4(y2GHU*K>XGc4oC!#<Gbp5J6=P-?7Bn
zqNi&DnERjv&&Dd~O;^($meS&o*s-zE2}eY9ol!^4Y=~_09+nf0xyCar?fHwrs#4Y2
zX{l0pp8pv`5KdJwdrUuP>8NQvTi}@rdj}*SA2T#`BL=!Y)iC^=j$P)_NqDk>5<(yB
zZQ^P%L8sB3-crvvB(-h?J%_xo{BsWE*z>D9K56rw>r}Z8lUGza5(UvsyQd^;49|}h
zvHnaV%@%B8yU?<24nmaNEgNx}gY*@%yjnYRoCo(4zlx1=A&c#5<AD8B3O}#!>suo}
z*%`%%eshJ}fw(lZA&YH)O((nYM+OEH-VxTPT3+~#>g4jL4-C2Y_vJJgxaTz{z#n^W
z>Zr;HVQs%_`3st>b-A}B3kG3XeUzAR5zb|ws56hm*;}?vq0fFjF%{@djxij7IU`ZX
zMyvMoEYe<o(XdKJ-_}avqVfOs{)VBYrI7vCbv!i33ekP9v#98^#?>6i<GdIHIS$R&
zQERyxLi6(?{LL42a}D=>CJJ9Byhdr{rgc?5JsqY-P8Jd~Jp6#wa#ymsN>QmbIFLag
zSs|JwQOKv)hdu;}Dlc3QCF(;-Ih=V_oJYdx*U}Di6tiI+E--X4-pThQ%G$&QVQO7-
zSl#MhoWI0$Kl}n+eq*DIjPFW(wEtq{E5gcW@dH8ad#-82T3Gdp^z27>6D7_3p(cJG
z=ZzB8QKI7QWB(cr7ciPBtu3_buo+x8n@+Gd`_-cAU{4-(v}3Y4G7vf~vvM@G_!%Q=
zu~7YE#9rZHlao`WU6Ym|*7ly|KSHsz+TvnVk^&2ozYW`_g|0Hp=v+}rQI8X`;ZKhd
zp3l`7K=#`Hc9G&8cJ3PbSNG;f%)!225xgZXwv<&DpBeHItc!G94qG-sp=3gU{;?`6
zEl1E51~GHVsde3;uo=KmeBOM>nH?O~oOvv_hRbtUBUvB^ApZCn0nYsS3#}@VCSn8s
z4C1VIN~F#pQDTOYI?n1(q@L(vC3>G#4fF8cfE9|I#^Nal(RBg#*IYw<Z`TMg<_B(E
znQRKWB#<E%;rGkIE7u!qi*R3`Qn&BaBK}fU_$WE88}iYqEBcebLF)9o(6p471h?ze
zL3^n9qSCdYb|Z=lw7Dlt)P=%@zEmC{#QWWDw47&E<CCV*AtnY^t#27IPuN>Gma;La
zwf!lY>1<*ee(q!-d@;a4JUeeX6$iebaaGqN^;A@s?<+u?9aFhuD21@{ihd=ojrPa$
zLQ6Fmw;X^TMjwqCJ2fANObWJ*UBp`4_%7yi$91+v{ykyip}~Q7c1jA1#$Q*xQezV5
zc+xUM_8pnW_+oPwsb?Y6sE#(R2^S+sG%U>(8xtAKpYHbkndIuRM}jd2M;QRIZ_@yz
zC@hRLZr#1(3(rsy5Smtnk7_Ym0X`Q&bSCze=F)-Xu|zs)Q?WoIM@4_DH+kE#KqhGE
z@>=sEhv`nmyCD`4lEq!Swr(5I_XJV7Rb1v}LN5&UQ&`dz{49~q+a%QRApl}Am+vwO
zomJ9v{Ar6A=ucCE%ab0O{@!IbtaAWoC6~3KAQNY0^R+(7*G)YbMHiqH7eCJ@`B}vV
zw(iImamuF@g>H+<d<h-xd5Z!#f>fc!q4w_{(_$8YOMPl7z(`rh@5@k^o?t`Erg*<~
zV#xcRm%tP*&~fC_^BaG=@QLVgPKb3=YuvR*DO$?%G|1Ik+7O+Y`C*TcKX($r{sGpD
z$W>ylg6&C;NP{A(%UUw~!6zgHh-p9dh_k~BK8w-=%+{%~>p3-cFHd7w{r^OT{mq$q
ze*I%7DgT)~-+xIsAq?_hjzQ~DL}skS;VpWgzqv2-gzrRHI`l0IRy*`X5zv`-*D7z3
zmhvCk>`qWa%s5dhW>Z;8Tv7`?3+`tG>}PDM(8<WT?)ZF#q-UHxwN7t~W?0-&W2GaA
zkY?`Q0mzP4@&nn{J#Cqhv4xAEv?TFJ+F4&lc4@DUE3{YvuD|zY!~ly6{T8yAC{Vo+
zE9<Z|?QeiCGV)7<5!N$B!ebSPm(x=uWBg_Vh1O>42CT{~ZXQ*>X(E21sCI8V>*VfU
zhYe$L=S%o_{Jez&NjiA9x@tvrvg?<xH$tBwTpG8WR|~DysAOao114qs?n(e`1v}mr
zA-lg*fNj%j>JS-_I}pz62*kXg@Y&e)TuG5n71T}Fz`rf$Z~Nvy4dE8BY>_Jmcs&kz
zsA2weYiR2w3{Ujo_X=wt^Y{VGy4;Z1jA7U_BO}Akj%V>|EW_8y7*6Elvp8V0CVc!|
z!75eYptSXp47Jp;W|h^V%$youUq2QhtSi0eTHUOU`_XO}al0eZM~AIRIqBC>3QObN
z=-szT=PdVz-hK8Rxzl)D*5nYCq<=vKoU!cZ<D-_7A?sfz{^Q|mT77$ap5}uMlsJ%F
zYgm(<eZ%YyfN`6P!B~s<+`U_S@`;xj9h>cOD9(Q$)BkBZs*HkoGxMJ=$<6rx!^YGW
z0ec+(#z<f8!*#~o2+j5w1M`kNSeC#h{akW+y}W_Wt!K-^B7w0ykCVN`|JKDjp9!_q
z)q_aJ7H#}5-9h)+3}wxHx|~-yYIZS;h)ja0OA(1PIDY16Np<<xYelWav-ZbJ@0M<f
zU~t5hCR27rz##~dp8YTQN}Y6>TiEG<n|6pW!;e=9(ViM&Mq(CSfJ--7b5{ThX^_!T
zr_Zmo_``<f>0idWI=bcWFLN)Kj`Iv%V6@Y3-{f|{4WC0+1C~<0*^S*dblrQzHCfQx
z)MG^~^OJ>ygh`dfZ2*GO;H9N8uV~pd4oN$(DhnOV=%}q0r#yC4?G|=<qO=>5S7=&g
z!74dVEJ^0<?Mab#{#U1hSl5tX*-_A}de>M?!H%w?I-FYZN#j%K*hXb+CLv>{{zD_Y
zHKVcf5{#yfbS*QhPGO68<zVo&L*`TbqM~kK0Iw-21V#{>nQrn&y)NAS3fF%&)+;s*
zk<$VEDp-|e#<@+G@A9iL)r5S`+6_p(1`9kulE1>fKj{RZl(j>U7(`X1WUEZvWFj?M
ze(&O%g~BU_0RT+=#HEKD023kQzn)w5>^5|pn^Qe?okvl<#u_=uaMZWnrKqFb29csN
zZ8@;j7#-VQnk#xiabdXH5&bjVaC4zAZgwZJv)yQ;X`<e?1c8^r*0j>qwzSt^i99(L
zs3Der*$aC_3_pXu*>pJ3O*3o~6q^?@x-+z@jbU@tf-vLvDy&`6@+8JkCHS--YahTu
zZ`aj6UOn7F`(3G3VZu{=&G_`tk+i+`A{xe-GM{;EbYw*D=7;wfm+DK3a|cAUE~?zv
zlTF?-HyRcr>KNLJLUqbv=;u-jdu(k;vgTHm$k)a5+oC>~=s*Aks;mP>Vn#+D6<Y?y
zH-dC?5@G8(<4*Ze<x}}62(x?F$6G!}@Z*&J!@W#&ihj;#=z<mrZosbK^JaU-o351f
zy~`mc=}?eCY|ciM`5S~eV{1eA4P*gj>&3(>AS8l%-B6-f^y!)imWJ+clmIN0y?uYy
zc*fxk0muPuk(s#ApcZJ(7U2@c4#YqiW^SKWmeIIOZ$nS5CgHB;SrW%6kXaa2Br&u9
zXmzsf#EF7m^}#lmtX%5Xlgs`vxe<awSavzcMR`e_LJ{0TL)IUvsAdZo;bg$m9DYmB
z|1(?<S|0|B3CLfS!~r4Dzbs4uv%C9mv6+lB|86wSVtt_}X&u0R<-O>{im>W`(zBLh
zwfm%Jn-V*2V3_>&4->5CXv>mGx(P&zCzTcdD<=5qpN!Jk|1!MniFfRMCj*#Y?a&^e
zH0}Og+q}pOaXcIPc7q0}>(aO7+mAmrtO+;j2rI9q41D75ssR1lBl01@@Ng8GoM<b=
zm6x6LUqm}8$jI(+J^>1juEn`bG$y2s!~I{LaN1G)&u!mc0BT+o%84TKoN+%x*+T!b
zMKr&R)y{jo!8thI4#_<B43-CiLi&Gil4At0Hml=f2JMsdK0f`M)xN);I6)SeWfe}6
zQYXgi2-Ey0*4tjovF?f;B4E34wX(W*keJaKwVG@;!Kgx4mwds8jlx!*=gPGR!03A}
zBr4<sc1LpBA{91N!pK=5Tg)?@?+YJlTv>E*wMb6~eB{#*P6-7QDroRt)SyuCS-R}&
z=QoTJYSr3Y9DrfmHU(OMJl2@x<3P~ulH!IB4C1x2=!i@Iob(%lq<djOdko!hcRPGI
zej<)nWYKf7-YQ-ACxdKECZQ;KEmu9xVK7U{(859>#*Z-HDgLbEB8xm!9B?UK(sC;N
z`UbMWu4OMw0;N4#Qheq0XP*4~7I-t```1_<Kx>a0hxgbH7pCM=WVeiq%=Y*sr0_nu
zn_}P$LS=>9_wpAiv25z?uV`{8uiaK_XBV}(I66L#GASoD&CIj7gQ}9&_V4nec2%5Q
zO6a@hOgzOT#!NMb<uq&24z{0z6UNiQgQLATPl$koq`&k#$FK8LPm|{X>5Hek8?3b>
zHj|jhFuB`Sx14@Rxxa>~a_A;njg$v{vd%C5Eq0<beZD{t=F?6iHTayI!r}LiuZAFy
zYJpDrN5Z<?9E*Ekj_n(l_{0DzZx=Uv@1GNdGfwfC#DER2>P!Mvm2s7$>|vgtlg%}d
z<7h241BeX84v1A2;_0$=BaBchE@f~?{6HLAjav$*uKGN;cct2E`HZ#ciOE1rO^uDI
z08T~T(IE*nAy}}svLc#KHx8MegCb;0d9~krpuRAUY`D}}<W|jF{BwD=Z%_Pp5m!^-
zj@zCvy<)C})5slZbW9gkJZRTLnuIeE9(Xlf1*|N5+#hj!lPEeI)V_A;=VYw;olh$q
z&>62TVD0V*0XnlT*}agiUA;G&JW^|(wBD`ifZq_QhV);btjOv9&<}{n-+8cn?bO?x
zxhYca83!$OkAPaQDP0Nbhc4G`CpG(OO`vxr%rv{UKUUry=vi$TDe0Xd%?bW<p)h~3
zg6?M5HeOhsPCQ!!XVauE#^;Qu)=Cd20eckU@HSM((7@nf<f8{}RYRf&FE`P;iURGX
zW@hYrZ`~1Ry6}()N~yZQ0aGzLP1`nhI!y^DBns7yBqn1==jZr<s!|9rpR!aN1A}X&
zAq4#uuzZXuxbYphI9agGD^(C{kGM1d-Q#&Ax9RHc4zqHpMs)OAt-Nzudie~Y{MB_b
zpzR-0HLkreku0`UV;`zU&CwdZ!q7)8jyC#vg26jqUQomeOPcR!0ZF9)fEHz`KYx6E
zxKzQrqaVEXc(MUaQsTRI5~Bc4Yar!6G_#rMHYIlL*4;8Pz~BEYnv3+|z@7k_ZPDcu
ze4~!)f=Jdq_!QKB{XYUPu3LOTH62LK1Ml27{5y;PcS+k{s1rCQ(=!+TL-7Ij0l58N
z)cpRlHV!D0S}ki5bSEBgr6f%PF}2tIYT+6)K`q>K2P>yK^Q0c~p&JE+g`6~+3=O@K
zqPIm!Pol4?^WRO(isub}q=vNKNW%uTyxR5Rj`x$uL%kNQ7s^&q!q9JVGE-qJ<E{hg
zS5bSWJGXDJ2uYPO#RHBsTZyu@YGL^5;xl(=DO=rv(I;j6+Hc~On^dwgdSb$A`BxN0
zueY=^3_(0+&t?PpiIovv7CDG;sYzA7J-f69jjasqL7HWU8#2uA=Q9hlj+GL&i+QbK
zgS-w+3>b(K7t|I}RDnlq>Ok?$J6__Dw^u9p-tv5me_X|_;`jUBtrFZ6pGaUO%tzVW
z{HMB*m8sPEf;#uBhp$AY<N^}X6<UccOdd8fPwXfYP>EJ!Pvft487$j26#6uD*C+C@
zXIPZ+wPW|?`lS;F+pdlgp!eU$mJ~0p6_rWpc&<X9-L%-BERiuFAfdwJaq>;)X{jbH
z!)rMU`WhF-Y;7jBe<}rTzX_{#ro~FcisWy5O);7Vh?>__bulgT3881@kt<ZWUC328
zm&DL;>PHWk=$)mqX6{Ty+P0feG|~&Yzkxh<@vct*<>D%BD3)p5IE4l(w?s#3d3z;U
zeYpuS#R7GFVewWn7qHUK>?--5{uw`hu6%Rbs<#-eS+zp$_WnqnW-tvzSr>XZbAG>G
z-6}KLRd9&dXjpf*zc(qyNi|v4f^=rFmYdW>MtO|3P^rqMBGndyKLk#pd&;=HScHTu
zJlee|_>);uakD>k9=oIzk#A9rv5s9Atc~+@t0z9xjeL1=@fG%!*T9)g0W&%}mIalL
z&OLOq_>H4SjOEehb7L{RVy{akY%_L!ZQ`J#W&2x6wOhgl_gae^tB1~?d1^3t<mAMe
z={g%YW08>~z+7FxdCnDNiIs>J0k0+a)W9FO+qa(PJ0{`6z=)*oNR>GGz>#))QuVCG
z6@kN-hiw|FHe2qfB6vD@3QF=KgHU7b;jg626-FBraTj>GLG{gWJJ@>vH8!_`ppjy~
z(Sh0Obl>1Ij}Uxk&Gs!|&$QR9r)WI}n%ajl0`v#{d<UK;m(&g;nc&-Ai=M9+-}>VN
zBZ?2HxC;oCM3o&Umqg3(0@!s?`ebipaU$Q8=2cO4f4`#^UUr_)^_&*|!R|U2`Q}N<
zh{6LC)E!5(zLYPYRlSNobI9TkHF)gTxmW#h7m6&xi$H5m2tU`<S$5xrvJ3te&bDM1
zB7VVRw>|5UtufdP|LIv1%gro#3WGsE`drYZ(tXBn3jAHhXeR6s7`$fpx@ohpGJQvR
z-E#m~n=?R~MWPX8U3I`JXM4<H+@{h^^9wZhOm_1YV&-BIp(L1u)F&_mzyuVQyM<Td
zI9@kx*wl8$<ZeW<@_BPdk|P^cLhkWf)P6FDdk<nQNU@cpG}9DBKbmZCP4OzUsutJu
zS+Ny5xSGQGrTl!rkKC-o(IJI=$!?cad;ot8{d!P6)mkzguzQhAiprS@bnis>FW94*
zteu1o!GoSt+zTQf(YxFJ=#U5?yBU7RKRo=-<wC#G-?R+3_1EFaCJE9UkZU-<bMh2O
z%!Nq9rZxz*%E*3k;H|S_n2akme&?Eb0DOwd;Cyt=pb6JzNc)B%-wzd0$aYykYb}x5
zK$=SiDB1(?kc<k*NC21rd<f#7fcVd1;r||4|9`5L+UkJNamcBOfr})NBEmCSD@#9)
zf$EGbh1@J;;7_#+YmSN!1TMtt9p<x(+ifbR)Y#Co%lh5r7l;Od+V8D^jFgSSLa;0)
z_i5L8+V;Ee$+H1$T9L~+ks07%fP=~!!#+HPU3`8t+y^^M%Tm8B8l%OL9|LdwkkIlI
znHpUXBNzo4PHNFBPeWqvV>>+2Et5)OT_zZIu|mt%<eME-`0;mk&lZ5{krAGF6vTf`
z_CB4UV>Z0cy?{JQcDWeUxMaE7k2azn7#yW;T*`pe4t{<3nl0d_I9B^Hf=@@iCR0Q2
z#9(l1&pnln2KD+CyM&K+%*9T?MeR>);4sb}!OqSu?%a^H-0zsH3Ue!vb~bZ>24CAc
z#@*QO9e6j)m^lS>`b4voM0amPc^ndTNmFVjHu;e4d~wIzVKr}AAm_=X&G(q`8DkX0
zktog2e$&QI?uvI>2P~?B84njrwupxl{Eo}7(&HyFDO>XHM0>=Bybb}PC8*SORbAuT
z8dGN+udJ(_oq&E+b!2=Ge8ZMi2IY!4M8@QJ9uDI^<GoIkC&3^fpq`je58SC49?D_1
zp02UylyGs%9-~-0DGgJFDhDvZg-tM8Tdob)0am}4N(^VP@GC3<U<+DN+CseTC(Pr1
z*+KMp-%yTfVQFa}Q-Q&4pcLqdKrj1%n8gK`dQ(%1yVDTdwZ7Zoo&F~!IKjpZ(RBt%
zYc1RD#Eqi9>u|90CQRa+N5)!hEoXK>w^4P7a~!vB1e5#r<4W#Q^2Bxs&Y%zbSqbWH
zhva8t(v^64`Rtbd9<#eDz;HE|MI!r6G%W)NTr?(=%HA+|0n);?+J+R;SZpU2Y`@Jn
z*=!Hzw%lWdn>&?dLvC&cyBjM|+$|tb&7BVC{cS}oE|XF_*jDTibHGj9>zwxSomSrO
z$qpyhq#XM6ZI%-8Vs(06Tenp?^3O!W>XgCQcB23mc;;_dF(BOgX$R3e9g){Y%1a~8
zw+<_Xw$97%FM^tutAL{*&WpeDQj5li`HLk{_~0!$t(VbK=1+i(F~CBOEdB(%IUy-U
z{iYa&x($%H@0@8$Q*8u;yUVBi#A)1bL+|?kQ2kWZddL;Lvp2pJBjwl4Tn3xtJ0*=T
z|NQiC0rAC+%h7eu%j+MU_)v;ZezCeFMYOG{{~?IE?!3`bc&r9+y(eb~{$CNqdV0x0
zx$gmjSX<DH5@_V4l2Z8aTv5h6P+w(>$gdB24lD>C$PHkS*Kk2E2yfT&G+}m~iw|%w
zP9F%*oM{`5*_rQ*0t!ul>_bt|KM@05(RUj<*A{WNsHiA<E_w(eYd2h9<T>(m?S!Ak
zmHv+?;!+ivp%^+to?6z%-gPggF5GV0VEI(m6SBFGP0p6AeV?Zv92-@It0187-OMMI
zD8|A0AG+JC30qQ?!>}=k0p(lA^B^Po9Ehl`PVo=9inDoIo&jHgQU98#l1$$0&gv3F
zGQ-QwdrxGaPqiW1f4qf)_~Ya4{mBDAmh$?zmd28(qndR&i<;k;ESj^T)&m@=+2wq`
zeJCIzi&GtdlLSxbJFhA%nEiE9^r8j+a@vq3po&97N>zzb$?It<P@iSLl&ac@{BbG$
zV@r<gfrEoP!Gvxa;*YSJk;dca+?LhR<NR6$YRJHS;xbUH1FVlx%R#ii?kYKSrSq0y
zlN*0c9cTRPV%Y>xVedT#-9P%3Q0>#Mqp{}Nx1S*eMF#S!6N>KLD&4J5B1hq7o}^vn
z1!dTnn-wkCu4u+<bbRK^s77fbi)|qJ2jYMV2Zr(SaGxekZgmepWMyR?@h!$OP;u*$
zrtM!jue7yCpjqj$oQmse@Hbh6{5w~oPO3J`s*!SK5ZkH7$fiFjI4(t?`Y{zqFF!Uj
zOBK=KX%quHW;scwCXe3!Xv*>7wqWl>Y+c)$Nm<gB)hbK&L^s6xuKC|f^uGlh#Ar~2
zI*@NOUXybfbm<rie*!g0oV$&kjGj0LAg%vQKo`<++mQ%4f0FYz+}jYFiS5^c`dVCz
zNv}$5*_c;isjQA#5VX{dX_|EC-ahmJ_1W$B|1zo$9004f0JU~ohTi+KCSWH9%nGIb
z^m|uqP0J2Fq41@!S<~GsU9&W+woOl$k*h}(%#F*9Sf;8!9ME6?PjCj16lU`=AX>aa
zk~i<PE8ggWbeo8og59=BCRa73z-Z3yA70vXmrl9!4Z!H|=%i)6aupEYO`zQ;(c^~{
zTPL+MEr_=*WbK8f4Vx3eCN(A@_~Jz?4QGUMI1T1NFCi?C6;7hF`FYC0ovZ`+6)ZLL
z^R!B)*&csNqlZAB1?EANRIQ!?YW<DEsQIN`l0^nN>F^3I`N;^}eGmT@JD@c4{|-)k
zKFCy7VE5#e5-0$s(kLIu#k72Z(0J~Vo!piI^=km}b#jh%_v^FSr|oyIyXmfo{VD8J
zvf23XV3_CB$9Y5b_X*Fxof{kGKgDR&cBk>9+P|HQ3j6JOtZCGl{iKW6utBMZvbaox
z{J8xN!KS*buMB_v);zr_KI`Wfh|*H-)rz!GOU%2hy}&>=Au1!c_g-Fkykim!oRSt*
z6$u+DL~GI^>ns`ZJd@Bx=A$}Tpjg(qzF7<wqW{?|JU)(JyP~Y(`);~FFT6Xzg-PfR
zgE08AActnbersLtv9UMwi)Q!N0b0$sCLcAf>B?-NL_boJW_=byt4!E=5=M>$>?Kh1
zp%WVE7cvbJwsbXnHm_mE0?ic_GUNP?kY3VL5P_LR#wC`@p58KQd7<Ofu?;AbL3*G?
z<{L3sdl$Orr*qxv*Z1H=&TDi1p|WO)?gM<@b?}PV(n{-X5$~5MuU=oQ(QMu!85tit
zFogsz)SGSyeP^7psWaJvaQ|ZRtY}!S?RQF%q#mDG503ApUkzUtT=4&39AA3gQSywh
z3$5m&cY2&<!@jiRp4@=0F6Un{T&w1WU{CoTal_z-O+G}~Koi?Eq_bA^);nTlkgPe6
zL9ATp#Q9}xaZs$Y=txBmOi<Rpeo;cY$A8>^K~8Lu_P*6~LfGZGuYFJTo^2;yezll!
zYlEyC<24u`fH?oqzrksiy$rXgG|sYwl|x^p@OW#lHGJ`2W(b>6Y!BX`j9@yoJWa|M
zcAb5a4`xJ^&WoyX*PzDdDx1p&iqm=tyY1?eS%~4(vVjL9O(}i*b?~N3^j&ypeaJd^
zPN{#WM#z33nOTf10ysw8)-ImZEi94+y#(P!`TUGFWUXee2Z~kM$~bj3d1$0=oVT5+
z8{YK%`DGQv@j5VJ)mH$FD-1^RYrhwrUW}uLTkj=WGiR#B9eLbrJMA;9&-nQMkBOG`
zN~5%l+Ya^1=2OcSi@y|f$*3r!8DG9??kI>T#3?llgqPP$b<H_F{YjpThS0v+|Is7H
z=9)agoRK{A4X-s?^6r9#2=(K|1%+4{ciE{NbGS1>PO&&BQk4ZR%D#AK({%i%otsm`
zlzz*r@vS`=cYmaPlpo>?ck=<ja);O%Cszemt#GI7W)!Qjicf8(RQA-Z++Pn2^&rc-
z49LFP6N)-oIybo`Q_{v9L(RzN*C=ucS4k&knPL|ak9@R~t;3wx@6nA3yLM9Si^Kr~
z-1yFx$2+g)GG$G?oFe->air+9@7Gs}I_*}7=oCS8b6U^R_}t76pK6{rORaQsQ;`3D
z^o{*G_k0CW-(K4&nTu@w5DSC+Apg{IY5Q4gvg@=!?wLy*YU|Wi!j5WhXbU8Rzf7`U
z{nrBo?2~u9*fRq#{5Rstc@9u97uogybk_U73v>S4L*oDZVfSg0fb2RW2BO`6axmoi
z%;wh%oZn9nCF{(0a}}Y<DgToo>V8BPtJ#R<?T0J;r_UY?#t5tk#ogGV4>?@5Y(IJZ
z>giY0Z~7HBFG++RZTg6Q$eMNi{^Je00Wu&@T!6J|Em}e&kIEh6M6{(n_BL!!GVq3H
z8Y^(5m85;6{Y-ne+;fG}rVa#f&&&S4B&Bqq2#hBK5+=i=m9?$P@yQZyf)y^J1L~MG
z4GM-kc@37PyEt+T6c28s@8gg2XC)<Nh7+h61<g+gwfnb#5i7vAbT56XIzHs|2|?b0
zZhW|6s&&%3-$A?LV8sQFthhKHG;n@ti5R>y^x`!~_RcuG4s9N^Yt^`c&Kw59Q@B=|
z8Vp|_Zrbwu+=_YiHyr~VAAkRUoAA==;uhUd=b{R_bH#nI-;tu4Y20~0xQNBf)_bcc
z!t|GcxXZ6m@gsqn*7r!oo5Ov9J(B|=yw_v|?J8fpwWc?&H@xoGN_jNhX0Cg<+chHC
zyQASMU=j3NsqrtZJt}Uy4p4`S|6z>OaGHB)YAoWQvVBnWZf+?EG{kMh0D4#8jr8gK
z!E0*lE8%M4@K)1%pXm6nWjz;AO3L&lHdzLxmi0D9hJfUgj9Z&bqej8QK2<Ri)-5{N
zV5baBQk7-TONd>QWzuS)dvMgu)%-~Tt(~^!one!TY0u3*ALR~<EBU>z0+oAxERR<}
z%jzGtzl5D5vZ5bvwh@R3VT`S=bbIXzN%>aY$=M*P6TULxxtog;_*jgzN?cuZ<J#}k
z7Wc-AnMNOJr2Z<GhbBRqB{Ir5WVN0M;%%e-=ZcDh?HgC}Scl-i=2Fnf-S2X5PUw$i
z*JNzjk#D>gB4@Gxm2SyPP6rl2ZpkA3Q8M^&l^8EPJ%R{`&0D&(oLtuK^N^>Gz#;2*
z>0jM9fTKc>1fa(esY^T5ElS6SzdZzyTV6~hN6#J_SDB+ApvYtbH&$8ecEUKyRplVd
z5Ch~Wljqu(+umI9Ici*8nzB5)l}`Gmy7Ws`QN!#QXPLXao~bxX`ot%VVOLqpzZbP_
zHF=d-UQptJy4yuph0Wk>)k7_sH`c~Xr&tuUk9vBu;y-Y!p6Hw&<q~pX$26cNV=3X@
zkWklP9;1qr$SX!x_>k6CvM{Ure$#A8azz))Mh!nUHcYT;Us_W<vX&vu(V?ZI(3uB+
z2{hsuoQle}Lq8_R2>;$`XjIy$71p)w(5)cn=hjXwL%%WN=zFT1;gd3j#LUdl0_^c~
zjr&rPA%|XTIg{XpEfUQA26Vag4a2O?=40;~rgr{JW;};ZaoYi)*U+8yrsXw7lGy8I
zKkCM_1!XNMG8vFI>&S_lU!tX4i<}aRSmADolP#d+*om?T@pYh+$w{ieJE`>#m3$M@
z`olQeCXIo;tfHN<1e$at9C|5O7%!PZS{h&Tz=J|&fs}TKD09swu+ex>X*PeG&%n{B
zrLESE?$OJc{nXYE`GG%A%ghePEmT!AgG5*TTbR9qx>kktbueaFiR2(R>~xhq-HBJk
zM?U@CuD2=Np?ht+ce^uPF>cOK>{W=Yv-nV2szW<o@=2jLqOw=Kx%$_ZVO7u<zApdf
z#w!E^l>6~=rkxgW_VL{%P90~rh6o)CU-~ure9T|p+s+^43F$8y=ms1|@H?wG2Nfk_
zM;=#;_md%4n?~54Qciwhbw`|(-u_ux`Bofrwq;1vOy(xdO_6pBsX*~V=)M{h-+i3b
z1#Z#RWd4EMXNP;A|0ND)7S+w&6tT2@fY-^;vRB;VeZ9QSA^f}uC{cACkXHqgSb1a4
z@Vve@AJ%g;VGBZ`$ub-PFGFw=n+f?v0_2!kk`tY}g?x14xn#m5DS4w8NZp(fl)!(l
zp!k=>uWUt)3@p=$xo7)dYhT_NvGSSw`gLSmFH}I;5dgiJy><WPgD!<cNehwHH8zp3
zklR}R1Jpv_E)*v913)?=F|LL#WpvrawC1JP&G3byidjt?%3U#%|3Z{yc&0$+1IG2k
zP~zCTBcbNacKBde?KxAIlja3^;)r9P^?laSnfdV&XxEUVfG#xZKz6pji?e{;a`#Lr
z<MPL20;l*fAZZ;RZ~3KoJp)e2ow&B2&-z$<w}yydC86G0(O^XAdj``+nCOio(5uG9
z-cNCL(<)INzx>Ci8j!7Ox9nR0fDn+H)e<`T$un~65-B`}wQ4wlB4*z7RMW_pkap0+
zXS3ARgzy+swPi4{?Yb{xg}_>`L-sVG?rWy1Y5h2(Vuw26g`6mcgwkcv;?7GPC#y&g
zz?Ob!@})v}xff33U(;4Tv=z;5Y1_b|P7*dJn#`~T>wdpa1^l0Zh*K)T$^+L!zyBkg
vt}+J34VY0fy(iy&*iTv{doH|t^DuOsB0Ej|;g!sjXX?s2kIEiA4g0?Unvk@`

literal 16336
zcmdseXH-*Nw=OnN0kI(+R75(Vqf`q;dMDH%Lg>AQj)EXvq<5wF-bsjp2I(b0qy;h3
zr369^<!<zSzjNR3o^j4N<KAEQ2V=9_%3N#B`OG<=Id`~*ngZoz`pYCFB$SHJWVJ|0
z&R~H*)r+LSl?wYSe8Az1o0h^8l8S!DCE(<|)nnDiBqY_b<cDS#fb&bv&kWp1NUn68
z{+;P`DzYFUk%218KGuOjRx`;{Zh|v+e7%s<9-xZWf!(Hx((L4IdVB)|lSi9~<KDNB
zdmQAEC<U+swL!ECi|SXo>*f@S;+N7xWG`Oq61+FX;FEHdG?cmB<E+#pD$Km#x%2mp
z&%L`EU150?xDeQ)wq3leJvu5hJvu72KDnP?+FxGMU+jjJE-VfECRVxk;0z$*ZN@x&
z4Dp-9>Hiwg=WyWg=*>qMa2j;=CH^dMdgm<ebS_WMqsW0n$k(7~ug^5dr-4#t0oPcO
zeh2|6;4%rR8Qi{R26A-P-(i%K{;1c6e$pl8zC++^Y1d9$bDz^kD28Dmb>>1UzQsZ>
z-Uo{7%5Bf$JrB?R9(IqP1BWQnrCn>+CSch>!$fVFLPe>{_ESNGZz6ns7Kd1-pGTQL
zh(V|PP@(9C$uuAGAi%xuplb!hmt*AaMxNhM#IK}xC!FI295<$9=``ULH{4|Go`EU%
zzA12QL$#+K6}fu{fA6VXl-216W>j*XVZ|xnh&y-x;ET5a2kwYCwndN@ot^_JI!+2a
z!p)sI)MtmrBnrJrHh;8Mmvjx>x9G7v4pZH}HCBCw<hFPUh3D;po>N(-JYVwJ^rf$n
zeJ19uo+HNWqM8+cQs^Mkhi_`fT%sNB9yer{`T>Z-<)CMlmQB<*V`d;B$$9NqcTU8_
zQUfKSLc7K`><$_vzFSxdON~6oj~&ob>T{p#^}01}-RVtvcvzv>XPlpUD`CGH{E&hL
ztc;6GPW~v>Gb_3IO>b{Xjk~ce!QrcUz8Q6QL(*g-VZ146;q#P%^jtC3^?h?oQO2S6
zoBJzzf~GPHvx347i|(s-7~X*|l~*$6Bq~4Q`~XFG#nHi3v?Ta4+UwgwAV;6x!qJN)
zU&ZCK2pR7fZ0!cm^wjn{VMu0d;5IvI(;oJyp-)f9ta)9K7yW4cjT=Ka*ic>!k`0%+
zC7+|BVV`|<p^ze<|LMR22HmV$<;)COD8gli#VW=;;FZbF_LRPY(_X}w<G?Wi0RhB)
zb05shP7&GxGGJL0i%=4WX`n&2#)|h6UTsQXFGyaXKK|WdK(gvCf_z}GHA_-4+j!&b
zbkiDzzl{Go=5Zf+`t`2@rh-X@&LB|F<8kIU%9I4d3}JzVUlsgD9?2cn_t%q?ab;Ab
zv2W-smOE`tPu^bLkn|tWyxpgy*n_LTe7na@aV&Gmhqp}fiuM)bn3*<p;~+c!fM<Xq
zT>PMtJhSbfZ76e=0hHUj+rWf;PjwkRmwgRk^%(0ubG)}j80$P(?9<*wvl_ihbqpX8
z?GiR}UvK^KlLQiqUtaRx;tHmQehcLu7Vo|H-TQ#4^V-6J#&<iz{>_Ntn_uR-2E<i6
z$MCIuyKU+jGa~wCF<aH>GbE3M`RP_4^)>R~prNrXdTHy8qQ>vN`ealC#Tv7*0!Aro
z1c=X82Qg$R>xy;D*{s=zq!yv73Sv?Y{7FJjkS`(1EBx`-ZTz<kYh5wd-7JF*V|4eY
z=hFMp3lDruzB;>Q!5=@wMOZ~12q5AxY+IzfolZ!d42;N4j*M6#MiLU+@a#`lKKu2E
zLgroV=84-PR!a`GF@r`0EICN;A{8|ChW&u>VE4;$yvYZ){UCL-kMoE7&fMj~JZz1Z
z7P*)Sh^>+byuAq1VfQKTM1tf#6`j^vww{g0_Y>ztjpBSug!HySMRmpxanCiPaiQ<b
z3O&3Z(1E*8ERKUvbKr%(-I=U_msrAg=`=2tU4)p7Dr@I)IsiGM!#~YxNP<3e1w|)o
z&P%Ymkrt4jWwq*)GZi2q`8fDo1J%Q^^?K>7QytWuv)A(s$<yS=44_jOdUfs}cy=+0
z2Do_f8tv)Lt9SV!z~Q#+KY_41x-mch6a-0hN&leWvp9SkVOaULg~odQnQaKepM!4`
zB`vMf`9}y0>4>kxpTp{`==10BYb5`A==9mJ$)J~bd6IuUbowl_<2h0k!<l~{Fy$kv
z)qBe_?Sac(6Ysf1LYI1gR@;_zSo(1A_xD)4bIS<PKZhM>27b2a-NXGYcZ`YGkQj1b
z)v(@{I`g4hXuwwb%vUe$f^&?F*P5{=<SNC#|8hYd{&-PACWnj}78J1CIuobJC=Knt
zncAO;c`W)^wVL*eeHuqrZyK8PWsjYbhNyKD&0Im{S>19kIYGV^$+*#WF5NH>rJL)!
z7I4LaSoS`A)`(`h?oj|{rA={aYi<nsXt}(+#AMw-0JXU5rwzw<zI6pw#xFWKnXU~V
z?WC{z9i+C<$}`(GUZbca9F9_a^U3<QSPnSLwWmareUMXk-EOSx!$9Eimg}WAGv21f
z76_w_+t*?vV?J${w{xHVdf%FtRA%tKFXk>v^f;yWF<>$W@TgC+N0I->p9i$onQ2uk
zV7pS+6}Y^E&Zv(S+Tr^42mh*p`=7&(V8f}7Z#o=4?$NKSicQO|uCD5h5+l)gud_Y@
zWCiIC{9^CHSn;Lv;sM*(@o~juh>y*+Za?L*)_dHf{>=A2KmTBAm%m)47Cv<(o#F%b
zUU|Rzq;l6*BfLTIi*DTVs6;HNVpRBf$Yc;+1bdBD{_8r)tHodAweDZ2!4Ebi__6k5
zh4Q?7>0d!JU-KV|NI3JDZM@6m0`Xb8==s?2a7~HFe2a-R2#vtVTqxbR@6z$vcJPw>
z;c})`(|z2WvtE~vRg>CJc6Bh>&`Nh^8_MH4sYvTgIcx#Z<ucZ$g!7)Un=A3(=Q{{C
zv2>rTEZOE;$EVOryvtFm+sHYnUj7y#6no?F@#tl+DfL&^v^r0h7*i~CG@!TG5V3-B
zdV(sg7B@AOTm8=WbhQ+|MmU=bmSuE2hr+<TgQ&QUpJXLJ**?57Ma^9ub-VaS#<_Tx
z@Mlg}N9kmn?9YqR5FbG9n|r7v#v+M4;+4+$Qm+c_X=iH2elCOcvlR^6Qa7C@don#U
zAE13h#b^P+YngWoOcB2ME@8yPYu8E)*C{|NrBpv(M7`ba-M)*up}VjH)3nW~B3_PF
zy_-p2O7QXgiRUaunX8R1n^cmAR;rIlG2~xdfEjrC9aXe&&^MYuyWs_%<lm{U0ecYs
zElO;L<M2@k?nddG*vP6J6v38byJC3KnyE8WeHBB3^kF%S!jxzum`ApKOnlET-=nbg
zL9VRc5tvCo*RsC7cTsE9$IC1|!xZsw;-x^{YtHNlP$Q3&(;J;~ETTf8l7@O+%}(jY
zy{R7VyH^^|;OyY=f`QlsvTKD58(t8(#8T<%%|hC3MYM=AcQ@|xf)~2*cBP+B+FN|-
zuDiH{Fg7OU3LQ%kc8*<^8YNa%q~4~9sE|5)x~+&AWo&wI(_cb>+K*<jmoY2cUmwg~
z!Qgs$dk`$wM@zjNRE9dXeOxe!rfIilciPsd_4Gsj*jx4s+>Fc7z{z2(?vbU7WZ{<o
za-WWwYuDr0T2hAbpb~*CroyU`_x`UuLX4EJdK&Dj%f8OP3vOx~`H&5!<j`HWufd_B
zbJhKR+}Jcpb$siyu;M18XcyKzDLYGzeLnIlV7En#$y;*G*XuzbRoOy$a6_pjVxjY8
z`?iE7ya1mw^1v+2$XvTC-!i+#R&rivJ0N-YPT<Gt9jHG(YD5=Y&@z}56TMqsJzci*
zcGkGy(;n-^-%Hs0vnzgXy-De)KN8)%CH|Ir(fE~SqG{9P<`?8t2^<~HA>o(#-0zv)
z&bbElE-~AdpGP&~$fFChmE-s7becGApKdQt<3e>j@<xNB4>n$0#`IW|*m@#+U>%6!
zi7!g#@O5a@H$CX4`ez-Z?mhS?1#eP~Q6HLJ_<?_UiIELyO@OR_b0;~<En~1<msspG
zHrZXxG%Zlrvdy=qEULUhKUbeFoyY%TX5<QXx4wB=1#-=!i8AFKswc2o_N3=Nd~Cq9
zZcAd_?ZI(P*Z05NM3Ew*mF(osGZXAO<(T6Xsfr>_cSG=8C4P(M*P%NDa;t59^W4Sr
ze{lY(>M|3`D0`QvAqLTq`gdRP|K9oB{p~9sZ3q2H1%B{D&?B^`jxh1eA4m9?`;5C|
z2ETg#@zt9;_gRYXJw?ITRnyJ`kL|U;n9*;rH~8Z0JN#A<a`Dyei<|EzVX;gSqSnuU
zzwz@9t<wdwPp~_{J(*81?u+Co^2b-t?{mJvGs^^I91w|2X7GVopOmwx(h-ToG;@K7
zaba}G4upHyX!S-K^x)E}-Xje>KCMt|iS-d6L%kL!4(cZ5y?HNF+#>=4o4r7XD)9aB
z`4U}4ySuFweEht~mo$zzkJln>9HoV&*URqWMx(15GYdpJi@Zy+MH<i{-_GMt&OBqH
zBBcOkWUx;MO6Oy+H!@=AOA}G1=VRax>&uogJz!_3ob<D^hrh5aW^hP|O4jYZNoJnL
z4@~m?*Pa2`sOu(g<J1!{#G6euT{Jp|SxPCA22>zmjvB1TK$QLc{oM};HVSPM^p*VM
zvheU9idOm-QQ+*Mh`mcMNO_V!q_Yp|2(V^72PqrbOt4$`jKXy?2NpOmW=%Kh1kKuj
zscLE$(}6(jl}3#*s2C>YT>0pn@Ehz(9f;+U(w{0Rxapbgu_;(>%lPtS7c4-Yr@Gew
z)yc`%o7RzjUD0N0f3M8M5#H6!J}jP8Bch)l-I!b;Dn=f!yUwLArcTvCP{Li=<vs`O
zSxNC>RI-`&9NlVxYWm`GX=MT6!v?>`u@=|YC-!Ga8CkTbtVV<F*+<L3Vi0Y^0PqZX
zYa_Ichb^scJsQz{qw4Gc>|y`$)%REBr`EbzhgGkVIur`fl}>mejfQ}kXt?Wi!{|i6
z`4e}BL@>rrJHn`vYfZ8)WJ`GUr$}E%5r>r(1(fTfbYF+BHt}mtex|_7O&$V>-NgL8
z=6RwpWSUWxO7r1nm0~TO5!<5ow(Iol8Vpb=4#7<!Nc{-hyz>gZm}5r95(?)+FXdC0
zakR;kV%0HZWZSS)8-CyRI(r7y4f)>CVqTU>)Uv3NmmiOsVyTLZejCb8YBb{{^(sgt
z(xHCLUbye@SJPXISKEkk?hGW^*j7vIslLj|2cSx2j6DE<J~-_)!;1nU^Fw^++%6){
zze$O%GGn_WwS0=tPbOXUb8sJQPRlLo$E9Smp3Tgvh$xJJw&zhyGE0H0r12LsHMB*o
zE>w8yT`e_6LYG%2QjonV3QQ}M-f|Rl>(s{R64UTC`_lVA;}f3UTijpBZnSDT4B2{0
zC3UYcciZi5GUsL)_z3={Pmh;D4F66jELj+WorkXYwbd|J0K56>b~3P?nn*PC+&t8Z
z8bzcyDZpeFdZLWX^-tCJ_E+_MV7qfY7|H}Kq*Tt}UZ1{0bwL2@`V#*H*sZr=&*9V|
z7k*zqJdZ2C%~PQP82d-6TSQU@%luPY7x-=Km+!{M>bwK60l51}=PwZXi%-b=dYasm
zXqfyJYu}`+w6UcidBeO|NisqM#No?~1Te`mIS`n8Tshz-*}f1(6C_S{L>+W+_buLW
zrVU|FI3x*LetCTPk^i-Cu%2t;f+Vwl&RX#E!~2_&&laMV&X62CpA7AC+rp3Nl$sB0
zxzJ8(<RlkEmX%*dCpRKAemF=WQyKG(h7*KPXGmUYjUIQS(z`W~oE7hia3LO&B(?y=
z1&J5li2|R&U3eN~O;@?-zNB-!$6G86J=ikitj<&`w19EN=SEGbX^LY^-(WV!p)K9<
zvoV{p`h4ZQ`7WtnI!BT}c^4ZOXm*mkM{P)zthW+#Xq4dP3tqR0uRdK=J(Ay9(rKG1
zftSQ4|BBq-ctXFDQsL)0PBJ2}A8_LmZnaRQd(@_RtE=Dcb!+45-jlFj18>xLqTltH
z$M*)ZK*LG}%bdw#1j~i>_V>3w^DxQAmh6DNPmECP0#hd?GjAM@pO>_q<0}P~2-ej|
zcAlprdvug@pbglp=MzM*&=hBVe}R{zxdM|u%+TGDm=Y?y!vpr~##kXqWY4rYZTowf
z5}t%Np2m1ba^#?8u^2*{O-qjk(WeQV!Zjl=^nzshriYBeXV{U9DnsLTRZT~EzJLgE
zyW5V=kuO?}Dn~(=SlSADCV3DYr5#%Ox*2%4KzNP6jQ=I+J#kcNQtpU4^`Us71SCOw
zOskfwLp<yW#H?z~yu|%bDxQ@h$XbH|CqiK0&LSErr8v!6DV#aTneb#BFjsl&LNWq^
zGB{n`_q1SW#9uz(4aT`?P-&%z7q;=vXd6nGn@2oAchLJR%sqa}YvuCL66X=%b>UG$
zk!_#|;R5QLlaAzq3+Phva^#MuT3Y#$NsWz)2K1~(;a8%8#yMR1RpxU~p|kz5Y@n;E
z%O%LOB(E5pniuy=mFlCDku%iWFUR@baCwZHo*`)%IG_iS+-`Y~JgZ>}uxLeYgQjPS
zK!ApiJpAv~x*h$;BBcJAeR2vy&@I9ww|)NmQ6nFr><%z0N*@-;NOY)9%_s6B$|z<q
z?##tMXA$)4UGeO5txgK_fif6z`Ik5I-9qc;v{1;tbmhXI)nxutwnx4n6S*2EP9OqB
z56`VuDzOpma;IcySt35|Y1~NIrJR86u1zbK>XqjJ{w!%aj_9`Z)+y&N6H2@!eyd2}
z+)`!BbGReFbkMTaHJok%0}N#}GDzJr6pWQkgpZea;PgtSY%^KjQ1D}e&LfhPAa3=`
zm0EM6TEwwyfL&VEL>W1vp^1}mOhS-r*=lnGAJ`HLRFH`=X#ItG{j{;+LM_fX_NUEJ
zF!hCBn{GD#U2jw&iRP(@l@u->wg$9oSJ(E3kIpLS=E=El``c8sV+|e|QT26D({zem
z&ScJ9wZUq78b>RCq%CTtiK?8agko5m$srg9UY+zry5?6CTkl%?L{as-(nV3lvCZ5+
z6V+H)7$z<u!8C6tXrk8@W6#tP>U3-T<pC$F<M~#hC9&jI3cCKKW;CJ4S=8B=pC8-1
zb_ieRdg`HM5c+_I8y?gtfao5o3`a+-c(^mJJmAXy1>|*&#vanQAWN%TZuw-C!Ntg=
z+~=qjc%>2+3E3@Al%A=qYny$LRA1TNt+;-1cagkCC5lQA;U7>zcwfS?&TRun9<4eR
zmzMU3nu5^K3oBo3W!Rl0iI%l7rXO24<%|vUYCD+3vbjpDoB|`}7<&9!m-pe_&S9;%
zX(D9yg;6HCOjTUh8)s>jwMTR=TghAlg~nLELbadL)(@Iiw~tC_D>42eDb85E-HK?-
zGM_fBB{@bEnN>498h<CPNR-nC&I4_;Z-Nx`aP`3GJht32i0Hx)nZ$^6E&pY0=-#xf
zUh1ahm_&_4CYWx`*$eJF!=2FxW&fe}k@&;#v#-3LV7-ie%4Q;u7m3GN`s<a)^g8t-
z5bZ$B#RO*DQ<r91mK+rWRFBsD3bduHCK`;rH}#<mdi6MO;aPetm?=+&RXmzPjHmV+
zbc@p7zdN2tALF*6UxJ6<LBuR+#`Jb9%)C1}&%HCJPEA;c5pYHR5>us9FGns}%RUi+
zVEozo+Fh~_3dMH0xm7g-8@stKZz;v%KQtLfQE3*~<0x}Bqm!LTSK_UZqj&Zs_dc9m
zMQQe^tdZUN<?Pb24BfgO(~`<W>p0&oQ12Sqk8WQ{DR8~FY}vR|u0H8$P~jE_V5CCx
zx#AmxFlUJsqV7uNg#VmhlTs_vcu9GOJNDR7vP~UOwJ&oo{NC`@l%JoabFy|O<E@Um
z@aUXI<S`dZceR!M_C*w#hQ!(5!1FYW?1Bp=O1+junAU6?+<e|PnhG^;g9yT(8KE7G
z^^2w<xoYx10Um&Zf0P+~>PKg7PF*!g5%XU>7$eFqjs6^P<-OoPivoi8qG*6n!d4{}
zbyy^15rrXi&I0ay1jNIP!;~9=1rnT6evn3RX$$22d61$x8Z7qnWlp+<NVg8fL!8JL
zVAvuS{ezS%xM(1NAW7n627-j6kHejWmnjyzsOW^HU+y8N89^j>5Htc{1vO-<2m%Pk
z_^Ad528ZdYmwKjNOyw=Jq|1iQ!!hJ9;N$j5o@-M}7jZ{fS<DJR!oY3uuh*oC@HI;f
z9(9_&ooIL1JjKL=0Lgk8!doWOZrHdn6^pb=XAD!Wl<&^hDw9^vp*U8B#l@jq*U3zF
zW8CV123O*T0PT!)*I_|uftAaJDiu7iCd*_=(gkD!5Yg$?mE<7;``U+fwbt;la_`VF
z72gDLL!(vU0923AG!_dnZ1a2gJA2r8d5)~8vNCqQFI~ZHzBg{taqBhya_W!MwWH$k
zSD|_VPo;El=l7Rjl4uH9gV|qav&23fs4!urXr5HVS;1{BeS3Ht2NS^%MRb8`ynL(m
z&|P{VO9~U;)q3~E!8_uxjrXi9QQ)sPseoMzc)n!r!-<=2@#b|<pO&Q|GUuBjAEaAO
zZ?oB&REG$rmdCiC$_No1tGB}pf2%gP87a~fcKIP|(*!p0psug4?=q+&wqmVmo%mEa
zT^ObHl$9ffA0~>bF1d5D@HMz`A>Jq#mJ#ksqAQ0Nde#Q?y_?EZkX!n<{;{R*GPu>X
zwE`=a6Y(QI^;gG4g1ez4^kzLMdp%`|>omF8g1SxD+1xPk-yRiy@%bYCL)Uxt4GqJ1
zTqhJRp)MQ+R>+_AvT66mC0M5Qhpz^7=V^J@dK4x@7dWP0q}K5~6|$$i1t#fX0u<$a
z8!+vbWW1-9;D{)cC(~!`me1;;yKS~Ws2-1lKmk;V4%E@pN8DM>wX0|j4W(k?vue#~
zKq6;Sr0G%I?dW!uty-O|FU#_V&$Rh1xHF^qe`F{Ppn9Pj_G0YAcAZ1d|DglvDuP>6
zmbU3TCgL^oJ_mi_#KmTdjHCt?PD98TUI@!1;rTVJc<)ZR3l7zl>L|%vIFzf<GY%Sf
z<t_RvYg_&!%saFjWy5=Eg>=OR9%^8(dB6z$DJWtI7~|j~p!CxY?^4T6>H@lSCK`=X
z)~Y3J7B(vfb5gwqlXy*H+#L_2z=2K65!@B;0q@>JR%|(t#fw~z-ssTX&o`@gpUPIG
zv4qDs`xiIoZ%mgveyy?Z`3jZB)YOpzwlx<6SfYmMpPyMOq#0}*n_Nm<J3prvRk)9K
z%wK2`eK?%5Ap{AqjtEo}1{h?ed)HmlqmyRYGg$mK9@91W?m8;8ZA60;I-wI6g`l;%
zvz!puhG;RiopSdUv&iwXlMY=&Z&(vhNu_57Y-Z*D_~@uyY1ZDQOaqbBmTY)pR;q+t
zNTR3-Y5+!;wY{nS1~#AGGiO1|zzY&^OF77;7oVkf3i;=%uiW4NIuf>&s?esuyKAga
zPHst-w#0S1weziB>ktK6h6>+;(xCs{x-hD)KfjhPu1PrNH;iaaw2TrTbKQ6x)oA=2
z{-gi~nDq8JWfpX)**kvh<MtnygMhq;{;93Xf&ep$;jw<fWxz@`kX5iKE4R{{-C`;(
z=j0NLX$5~179v?H<^dyg*MHL@vKRhYPKfwjWFQ&6AoRPuaPOZ1-swv~3Mo?Xdjvrs
zgezq~g%_GzvG@YyEfJ0XZ?N<xfTj7IY~8apDLUd$k3!wefK`6}5A?HdnZ$r{m(-`8
z&SZMtC^y=oC{Nwt@ThB;umNDgss({S)cNhZris`k34cFFc16R~l%+3SEOx#(m9=qt
z-pC&ZMXTm>VoWct4CEEFWx5rR)1BhNf572YT%WylZt&9N(zj1+?w#iG90FU+KAx-e
zW?!d0>1A-bLX$?0&95uqn@VY-4r#&@a*?-&QUuHwC+sTopN3r-`V>sYv|nNmKT1%{
z=g3WU)cL1gCJSQA(=o$4BdYGz>zW7Kk+n8sCZ;)K)XE(3<IB$$tl*M3s5#(ec%zvl
zlH{Z5<!-R6C4~Bp>Vh?mjM6hMv?5o^EATs3pY1VL1_r1?&P=s%+(y}hr%MU-_xfrr
zB%<{~C&1p*OBasl_+mS>6Z#1fu{NLnv68z&*tIoBpB;Q9dSLh7B2rzw@Qb#*CUJ8=
zCbgm+urg6oQ4GLK4UK|LRaxbu-UA*_%g&CQNhZJ;)w&g82XC%}zOhe8^1kfW`|}&4
zx98Lon`Vbpc8~&*u9DwQB)tKROvn{ZZ&E64FsW)ftH1W()P61i_JfFOl!*V(z-hiT
z;?_85w@|1}j1s7OVG}99s|~O`5JzmI6N`ykpNO#Ep7X=Wxw@mHBNSnlzEZ+C)~iq?
z|I&3wI+${VRqMmJ{s^ys&Py!SV!pX=M0B;)-J)-skbYx#$gS%EuS2R<9lQ*1j}o50
z-co7fpBe%jb-d6tOj0dZAvUSjH0#2a{Wq!8b@lP@v=dYZvGR&dVFxtjdCf}s|IKks
z-V-uvwLW@RT<6rxKW*+c+&^dfK~8A>J+Dy<<I>a~UFEU!C^gvlaXh<v5|vgTz<&kI
z80ChQo?k0Wdwr)sE_Fw%)**>mxo>Q^8j;7-Q@iQIC&FF38_*Q_h5DmwCjcWwARzKt
z6YV0P$*oOSRtZX8uUxrN=tG;vVK<X>MjMqqI*^R;7a8_62`@gj>zA7Q<a;)5^ixUi
zy{DK&_%^bdZbyT^?=e;K&#LtMjv2!AORlcL^tsAU2|)%lO-yoohc4hfHUL;R5$md`
z;4|F*tiIS=(lv7Qvz*X7#d)`^Zb=aE{TpS;flodQ%^35scYL$<4o~eEVHq8~^aWP>
zYO<~;1Q1y8U!ht>`cGDEmI5p0edhWpH>P^N6ejC}QVuAbB7Gf;@MSWyZ(2*O_($Lc
z{CFH|WlrmQQ{se{vdxO#I$5#Gd4NhPHpMaB`$v#KuuZua<@FX&CIENequ$b^y`#eL
z@>i3Jp8%@$JG301;(EPF3G{MkLb*btev?tr?C2C0kI<0c47KLJ(b9kM*B+n#RCzD`
z6PEu8!$4(D8HA_<Sf$%(DHG*43tS)7@z)!1s>}sho7pyMrF5Se`jCfDVikt@2YEWE
z3|2&6nyANL#K3AV*+zWfKnaUz-nBWUmF<*RuD!$G_wIL*Hht=cxTe&aHk|mBX^KWO
zH)l2CAeJI=wNf#n^G5;?9cf9|`{><0JWkm4=QBfuk4F$GO|a|OL~?Mw^)C(&=Og1^
z4yy%>i_P>s9{HEzy1jmK)!Ch2F2)vF2g)5Oghn*j)ko9ps@^7r!b_@=#Od|n(#kgR
zsu;%nP{B-PwtmnHG4r=EWp<BN#r5y%S#3Y!IHC?wlbfucK#`vnc#iWB6YW8Ms!gzt
z(3FhJD@$V%s0r@mG~-=Beg4%28K!n|iDO5G*i6%AVA~W43@GQV1YOVL!%gCgk8$4V
zmz9f*8z^c?bITrNDS>+W=6h68^^*G=KU{U`m@x}3{o^6GlB#0FNR&J*8cDGg%Rac9
zjTME8c|E4-x>j6ReX4n%8Y|4l$8tow!5v(k+^*k;s3)!AlGX!fG>1HS&EO~j)CeSo
z_=H<MwA6ElmepjA`k=K_e>x~Z7y@be9y&*=Cn$0{g$p@%2od!R8csLYKG)2aoteIz
zEG8?-+3;|xn|s*Rpynlkv@sTJIqpMeJ9*PGJ-Q`s4>g)(ME$s%KQkDgQGbOM-6Wyz
zd?;R{c+L^*vFei|(8j-atMT<1c2l2gYJyCZdbKiU2X7-&=~qFVq>I_%35#ebt;DCH
zXk&NY;qMv)S^7|afxxi0X#(?ZT@Aw<pzuT4O<77mU0Q8$Ou2Tir=XZ#qw+bzOm+5!
z1l>Ytj|?H<*&Aoa2aX)OJXKRQ+Z*rA9A%9&WTusG{7`p4)5AgSIQ>=9jU&w@=~AQi
zLwcRoWsLd6Scl5&Va4*WJj2BxRXJj5vA<t~|GKxAcT9uDU{-)mor!-mh93p12M>?7
zT}EUc{W#6_ZIPcifMgvpgrHBKoB8fohGKs9^jZ8|e?KvY5ubH6J0l|LemAcX6&3yb
z#{->(;{=wxC@r9Nm}b%ftcy-7>FE0jU70|%=g@X@`@a8GjCcZ|gd+8^E)pN5)~_h|
zCdtW7j!FeXBPNs>%;6I~nVn1!E-Yf5x?+bR>JgB_N3V^3<3W-RfH-e*)%=VC^XfJw
z-?I>3`*rBAEv<GurQi>KukASQ<5TZ&S$jV+NprIx*Kygt-8p(q@UZ_=9E2&jgEF&_
zg5XJ+^SHhgKT+=x;5Cxk$~@&!o_K~)rv@oL(K&4y;}GkM^$4W#?+f0cP?4L|eQPRE
zw`_WwSjK3iY96KF>s_DDwANqP?TMwy@07Abe!6H6fBbXiy8&^x>bj_s<8$O?n#tFo
z*=>1^Xsgvpv6zTPj#hiTqI#%7HsQfkVqq1p<Gn=FDUH_*iWK}~BAXos`!$qvKAFMH
z>l0oH<&KMIuG+S?R5V%}wM8Cmm69PU_Rmn*y(LrQny84`5vW%*oAetnvMF<3=+Lzu
za4oVAgnr)RJSg*nB@D?tNJr6X`!4Oiior1p#KvWy8j<P10$z=#k$wHF-Y(dyia*>n
zkhiy_7ymJxqmi4ImMyx`_&-pK>uglxi$4Iy_1c&1ywK#!zv1f><`2VY@K5CXPaFOI
zuI&BS5DMV#X+=OoBh@eO9R(dOQ`qJ@0M_5hBmK?CYoOE}tBOy%e;4<@Dm&t&Jb!(A
z|DV(lgs<YJk%2N&hZfzmogZPrC5_1^!GIG8efx@j{linlNW6sXv@ezBWD74Laht~a
z;76kS&#!Sgb^H*M)f+_*Z{?=E_kPk!{q<Ad-7*8z((I{7=G<?9GC_STvzo*E%Kqsm
z=1IQ_2Y6TWxy2y`)m_1aUv85T!<Z>pJRUwoeNCMn4ZfU&hE3YMdf<o!``Rp@w`=v{
z5)o6UzM}_o6H@)s3lJXG&x#UG2TgV~osvr)=o)$>=TAt59ucU@7Z%^`v)kw^%S`Y6
zB%KKS9>l61VhR5Z^EyPJ=m_|Qm1o)y^{?QlYo}8js?r`z2@rMXffD0+k(R@##zvs}
z2BHy~PPIAc8txOW%}p<;^BCGFyfQd*^o!sBu&v(RSD9=TTZ@SUwV;fk`Yre!H3v`H
zvg=`DcG||f(m-iwq-j$Kn>Fpbbj*HB+qO@>dv2#^-3{!7RXY(!#J3%NyKLCv$qn^d
z<2%R_I}n2GGZ(_(ihPg7*xn_)om9Q4Zn;{Azi$_An5Sx?8<1G}ZP36G=a9w!^1kpw
zkLJu=`{_=GRshlh6o%*8glZTSO_Yc40H3WXMy_>t{**I`Aw(STL(FO#QkN%PImMO3
z?{oJisHfJF>*1roCwyYaJc`r85q%3#m=g=5VkrP>esnnZWeZdfDNq-{c^9k%QG%82
zg7O(E{c^@Fs`g?|7yfHW0)FRG?R28Vvn{=f!o9jgVJm}HiiPpDwW%{{nZ}Bl46Tgb
z^q*mo$?uqKD61Gz+}XBSk5-3$$%P=ZA7LeQz#wnB2VlO$1M99dK6;tjU_Rd$GA8wP
z*_OQPd4wJRI@lKTL2UEN5<_fx9+Q*=)Bf_zpGsYL`z}ImpQ0)Q#T_#9TjA4yWF+vu
zJEnb`5bJhjNP#BvgIPJvV$B8O(q^;oVuz3?y0Fmk{m&AQ7)h0Lv>>NQI4Z2PTNolU
z3jzaMPWf=3ZhdP&MtwEC#pY)_#Ag@aPsoxoKJ0>EFQo<D*!=?x$#{*MApz^93ubpM
z;Ir)jzY47W`#bD1I4G=nA3JjY;CqDWpvjhmwVr|)uTMjION-Y?hj!m=`>WqF25>>)
zy;)NM2V+rI){_mZuAwW?rpvS-KvB+nbG*SPk^iRVUP=C6m+<)iwAB6S<qi28IsUyT
zAihTrfCiGbs&8T{fiG>}H%Zw%qpResVEi5KB~HRr1AUu;RQ!eS(r~^UK3~K8_YLZ(
z##dGDIE3@;69d|4z)XHa1HJ4y0qhZR7u}&=5amJ<1-7pZ&yopjd!x@|NntgGnw0)v
zkmpoj8CQ4;43~i^kJkRTU{c+8-)C*=A(?&4WiLh?KNed&G9{U~89xn4o0wA37T5w5
zx5O7Hgs!&k40RM!5=NVitb5-b5t{Q6?sA<y!lK@9v-};6G!G`|oq)c%v`=4NoLW_%
z4RuB#=VJqHV>)0a0Lxew?bvczD$9k|iFiK3rgm!Ql0bVNpyox#y4|qG^$F!h&{|H<
z!cXhZInoEcH30`<V{YzUhw;K?`Pq(suIE-|oIl1D?x0H3twj~X3ur~y{CXReP`;Z#
zyJ`lb8@+6WME=GEoooOT017g#&A8Xys$hv-Sq$A9<Cr!)CfAWI{wQ#_wu68tjt#H!
zGS&GGKor`53MV*4Eir2MbNCJD@8Ykm-#(qwz#78+<VGZCy(R0MD{*eOxm3)lFfbFV
zI1^xhf!Cxpu|~p+#(#i83g^$Mh}X|}r{`zf8#L$Yq@8iy0GwrEY*aE2T~6jmx6aX*
zv`J2m>a>7;IF#g>hLOGEB0FV3Mp6Jt+uEcjn(f4xq>cH<R;5~t{7q<9vFW)$7AHQ;
zeb*Xppd>7E320HMs6$Csz@Sqt;jPbsHN!IjYOP@o*!MJ}v|q~3>ZDZ^I(#h(Okb4N
zcgwOqJTFNhFPz-10axzqo5XGT`QR5g3_uu(wwqUQU$pxGhe27ag_>mV^#rfo?lWr6
z`hnIP&Va58W>~ehx{+CXy0UpV{&M{po`o;r2S~c{lFTs5wCHa>SCv6Mf>Rd8=>o0K
zmr%s5?2{>!&5kz#hBAXc+50UPuIqmWJ2_DJn0DX(x`lVKfqf}^hR4%}Xv_f?{MqV8
zyZvg7EMuTpS@P;DKzt&V#bUuqjQJFb`!&+|0<eY}0IVLT4w{f-&@%lGWm!zzLqqE!
z?|W|jD(qQU`#?4DO*K2K<>kB5v4@-d^<t2|?-2o=+)>}wXSqa;5|QD_86vrJbC$?#
zwrY2r$Wa^xALeF1ZS-%lpW}amS+;g?-C)YeLyg401Wf?o0T6Hx5HK`3eO=WdhpJ-l
z!n6o7*wVutonzHnT<WVJn{8V`dU(V)5Oj2WG3?X_EH$<Sd^|-ydQ+e)VLX0PeI^Z0
z;V{`?((jC*01v$v!VUvQ#dNWR5$IAV5}^JJ>$!lkd&5n3dg^lF|F%8h|G>78SfXi3
z$*oawwft^MEj4`)UGhB^`Ed4J4+l?wE6!_9gFa*;fI>fEPq*gU->pBom=;*oiO<oR
zBjqgANwYOE-!?;wFc|SxD#|p>An}wRp9kSzy`2s8_2xfkICvN=6+@HACHCxL{;<vp
zeQETJH)b;}qcar$$`<HAnEg@hUUK5wbLb?pKn5>kJp5Iam%>&ojL&05^01~>ov2zJ
zi=~gc)F`gbxa!sN94D8LcyB!XQWj{am6iRi0gF4p?`PC)i6!;SqU`X}$VV6r9ZMIJ
zMeqHYx+F|T%JS68fow)IqjZ+uebZJGs!&4B;r(lChmEz+{hhKJcOw1DH?Gz$Y0GeD
zgP3MV_;PCl3(2EgpsV`BbqhKHx>!v~oBVpx=T~rkS^K=K&kRE|uLc*ZEL>c8IZdx3
z2Mchfv5_0MeQU|8(K%n`CyjZypIDk5pER&_NFY2Oz8KLjH%E=hRe3s^EK%9Masclc
z0y>MhwKt!EdKx=CF3)}4N_KcF)7HJvbpI(+so#E$a+oh9KG)C7pQgXod5uJelooXH
z8uJtdDVwF!B{SHX!Ck7ia9%Ri)J{8o_vF%@=~=@7X7}=!()~ib0wh-6sC&^tTT7jq
zb47>JbM%#8GO-A!%jlhG=(5MBNv?_@VXam_Cca5Plx|MOSecBUl-=Bjr2`&WMCo{0
zAQ5PTa5=09TUl76X8y@&LUi3RP7ye#q4*qrTT&%BmEy*^lFp#ydKHEKXZ4RKUrHD!
zewsbN*SQZn-*}-h@6Rp8qHqNsFz3<)ZiZlf=w?k=!H3UtqWz`wH^h^i9wy<#h4-o0
z@Am%w&2RSGROho+SNM#+EZMvYP45S!_2^&QI{*INN7!TQZ_0j#DTd4mM9GUrJ^qXp
zr1H#fA4V@cFQTfD>=;T)&76Hr7k${T({}(Hq^`Z~;kbq?+G^;K>fUa-HLz9Noeayv
zbD>>g1S>swU(6RI^)SuZ!A!CPAO6UIHCT6&OAhx?iJ)*amWgbWjYZO%`#+l_>K=DU
zRTdZdm0tPTwo67v!gVH!CL~0}d1d1}D!8H^#Nw!_9PQJ@sIg_4oAe>F`_?%t>2kf$
zTYO}uyx9(-@O4`2eM#K_e^aVm4$O*S9ie{<jelm&gEpbDx84_KMD-Ny3r_bGM+Gpg
z`B%E?h!>irqg#8t3PH3vfy7(Oxf-3u4Mo8pXQMD8)ZJc<m(tzvQlyXOPTP&1m}?Z=
z@13ZYH0JUn*-(1p-Eifv8y&uMEy9wlqI27qK@4W!UFt8NeMJ3VB|`t@7Xts)i*bKv
zP}R|xpS`CM5Upe-VkeFAl#`+l+V&viY(J$rWu}BLwp7a<K?U<Zoc(?8{Pee+V?nxM
zjoD=6A=~duXQsbRReDb@Xui;Ub^qA;uKx+yOrZozOMC!OXfpILOHAT|Cp*eovG}|Z
zWI5tsQogs?XonI1;m$V&V?}Hfs}D7^XXnk78(FDnQ^5~6drk|z*5}>LwSiIRhu+0}
z85xSt*~#Ut`}z51n*Xm`KAYdC6MlI|C3*7YjhC`eO$Q}jLhNmHjCgJJ5e^Z%S~H)+
z6I!>_4(66eujKkTjB@!bRkSX)GkFbid(EhJB6p?4kF!q{PcqdchDXU42C~C|eR;(C
zo`C^r>Dim-k*d~xXv;ZGYzHr`grzS{1heE<`^u=8`$#{^o+PNzBiGDFe0@Mt*qxB1
z+5-^ui4k^-S=@Ef!QFoNp7=v=!OW&@y$ND2%aD_}#Huh&z@d4|-p6x<2!3oN(8>=2
zio_m)zsyG(pTEp3$a>&5Px1FcW=-teEFUP#pR;25u+GS&hG9PNrElDQ+U^`SWF@p-
z$o+aL#^gj`S#nfq*Rt(#*O~$0YmP$E7C6(8bE4Gh<`-0_eQ0?`<rl1aE{ZC5MZNfF
z-~A}_?({EW`O%ML!4J7F?)!dEpUFFBaLS7ZdO@v1nwd|IcRAU6cVBSH(KsSAA=eB1
z;;sq(h<wp7x!*i6)LR*td8IFXfxqtTmJP0ocABo1)>8^$tpcW8D}+{?)w#5B@(ln@
zo~H@?;KfChXy6yW<p2@68&~{8QLFn`k0MiMW4htV@{R#CM_UtKgLB+7YK5j!s%5^z
zjl=cjf$9v|lh4R^c}A3~A;a#G(e=;U)NqKvhRKvj)9w(MWvfEU3ck`mTJ4gy6syYa
zVV@Y<pn9748Z;<(%}X;ykYP<u0PVjfl>LDyJAvTkCD@_0whmWpLis15yAmCu%S7G$
zy3^KO#?wkzbdaD(z+2n7q<hl=&w2bS7LMFi=cnE0=DmhbjEJHKg`-X%l(j1h$6J~2
z9WaHb;%^XW;>`(b*~g%`^)qQ`=}tcOlkW6iMa)tva5WS44pi**q#oZ3xJ;yL%DM^|
z;m&&Sr9`)Gw_$Q|F}Y3Fsx!85>*RRdefD5wDSzEB3=-411U35zie^$?ktQ0nn5H;-
z?$~!~xxYMA!I-st(4K(BGCn+QNeq&Ilu9pyICNjTM4#!+a<nzyh~B7o%J0!T;q`A>
zby|EU7x*N(k3}8{-%}R%T4Ov~Qimv1lbPT2y)6&!J26Vb?Btom_&uc13#`6VYES`%
zbARdG>tB&mxs!<LagaZJKhnl>{8lZ7S#_Z^>VsP{L<t0Z`a<}@a(pM#e|p6l7bbmA
z)oUQ*A(l$FYkZBPJM{;TYi=FeqUNsAY?1*)raLCx<;agW+iht=)YHy0lM39)>i`eC
z!u0BoNvT8!3f655-fTG>ZyYStJ90Wesw3mDwLjIDDBa8n^PMxY<83^d(ryvb4{<nx
z?{4SfE=%;#y43Yts=mXgKDMbVceq6%xv9%SW}?_bFQlB1d2DjmTZm%*;$o4e`$6nU
zO8@aEmchtd?ASv~!;LQ>Eli!wvASUGHPT~gu-G%~t@+}py#UeY&^&Ln2Yq#SE?wEz
zcy(Zv-I^Ky*d5gNP-2>W=O`pi?~r=>a0;`izHm`HgKe*vKiP_Xs4@W0omTh5GGdw`
zS0;@q7bC@o&3-e)UoACY0e@@-m&(w4y^mB0C3I7Y4K87jShE(Z^GC069if`*h+Q8Z
z0i*LN_<2>`J}nR2XrI>PE*Dy0vi>c~WCG^3j-~v2qfcC-PP*?clC4xGQmH#g9Whec
zHHTmi&|*Vz+F?r@cxj)`+>@|l+1?;i<ZXGUXY+KmKbY#?uX46#9G1e@VOvx$QllpJ
zhoct*^(yir+uaA+=6Ellk7{LdwVeW6g{Pk)Pl$EORSUz)OB?>X)JOe|kHXhsO!vEO
z$n4<v<3SE^DJiKx;G0m4H_bDwF%vz)pA$%HTM@8nlPdHn!hN(os83mKTWu2?V(EJ`
zWO}*QAJ<KLq$)1&WO5_7(=#C3P_K!l;(Fy>p*|3=uhb|HOBEO1q|#CLaAb2y=49*D
zQiQ?!hoM}XZ5rgWPEd1*=VkQjb^GV%jz6;(tsfH+C+&$Mxgye|y)L$#hV)h>xNQ^L
zD^=$mo=-M7{D*8G3<<qw4|c}_bCB>8&?3^uFmL~Ot$t=md)n>iZi|yXZ7veROX1}f
zg{|h6$JqNzID8v=>?TSVm26rugBQ2@sD?|tQ!6LVvZZ^U(4D8~zEkexk+K$Zjn#T$
z4_~)5q_DIBe6qF{>lZRcj#ed~xR9#uAK|kOj}Mp?*-9)Z;XN}sL$sw*q-2omdDRPB
zJ$m9j50u-^B&RjnkN;)7VhwcMR)cX1RA}}>Wc&*;ly%oy{;(g&7oLi(dX!R;vQ)Fw
z<{KC#T_+{KwKJpYCF3qupY4QED#j|O4h|r<dBu0Zfr(-!0xPQwLZJa%Dvb+319z~F
z%FMKv_D%;&Qo-bXePWE);26kX@i+-AR_9{|wBY>hKye1^14$=QNnU-00=(G;yK3I#
z(TA1XOH>7)7eVg?eB7*}uxO^-fi)O+pNumVuOcXKY{97hdI?eMKEYK`u@LyEhGu3*
zwA)Z<x;Kh0rZ9QmtIdCR>Zy_Rj==KGrFSQrAmN2jhQ<9ak*mVnpIbau{&oTdkVC86
z7>8T6Wr$TmHj~(3qc-c}7Wd54c+3fd6vFG4!+3MjeHr10I_SA%!8^y`(Ei>G#m=@v
zsNro(<fK)f;ISOn!!5+B=<;zp&0;vqVbH;AGvv;%TDhg=mvv3Ieg`KcE!D*|C#%q7
zp|@^&eIM8ccnS)^^+RaxWbG1vy1w-kb>4KNCq|Gl)0S&^^^h1oLs_ycp9sk6qVwk^
zINX(O^(x8__UTm%@Xd2#%BK#1ihh4)Fq(H66n}@3TCYqW$Zk$iSgfH4uy0`<eV}LR
zZ&&>%3^D_Fq0{9ixlO?bfj<L+D8p*J>*;qUBwXa_6{jNt-*A$$6rNDkAZr*mj%a`{
R?@34$<<w*=o;-i`zW}D+1RVeX

diff --git a/ProgramScreenshots/SettingsSiteRedGifs.png b/ProgramScreenshots/SettingsSiteRedGifs.png
index 79284990e2f435b3670325918ccfe832020dde7e..e5ed2425b66e5a726a6350bf28807a306823422f 100644
GIT binary patch
literal 14475
zcmd6OXH-+`)-H;IAT0tS(nC?Y0@9lhdXu7vG^L94UIQW^p-Bhny-Aba!$wd_AoPwD
zArxs6nk1CFqI;ij?=!x8zWd|eG42n>N><i-%Y5g2<}(Xnk2IA?iEk6*;o*_0C_{Ac
z@GgV#@GjlEMgZIim%DujxLk78QIf-}K+<mjU#?g`)Od)8R~3Ez^u<-+JCT#Jfh!&!
zStsuAQnzEV1s<L#vkK&)o|nmX#`Off@r+8_fieR@Ta9Wf%ZXHX)(r1C@3IGi$W4>@
zRO+1pi!V;pRPxNX%p+ASbG`1QrqQzBzhSCvW~0YOER9F4{YWP_ccl0==?w@d{Mu#J
zeY=+?xsra0!xvH)#@1Q$Yh%)fFPmGMOWREcM4-rd?3U|?;)8RaU0uu7mLfk*V2OCQ
z13|G>S!cVr&ro9UW#B@J54wbh_xf!h4EQ43DGLEE*)N!Zz2gntdv!Bb$*{1eHA$ji
z$fZGYOhC=5p+6RDNGwo;y5CfUQc0Od*UpVsLmV8vH4AIY5=?7b*&1q3pE<mmW|ndE
z9+<_6jl=;M=gu>KmVLv*K33k*m8B$K%bgg)l@1p2UVQo0UZ^}{vTtZ@UnEO}#Y{|r
zOLq*lfO}7b%VtdOoPb5!oTNp3gBCE*t+_ECa5=9CLvrL#%oSkO9U22*w4RztCMKd6
zJ+?5<SsoxEzj}d^(z)fL)f8D<+n0W^mo6!EpwNV^G>zfR`SZO%1uUk{Ws{o5cay4o
zR2VMK^dO=~P`)CTw}B^_d;t^X=XD^0o)7f2Sg8IwB7X3KmDN?#OZg`BP|O>;%_4R*
zfB)p?R5yA)jj3;h$v%<uPV4%%>y~xEU4B(beiM|fKGC*$nxxA+T@R$t1_@ShT1<m4
ztS_TppZDD)J|JfWJt1kY3#rOTy$@=6Rv-g`72;{>Lwzt)08izqMOCZE=stQF%cQ#Y
zW?M&eiP7fl+cLT%mVD*w*=}!m#AM$a?Lou`ThsWai%o?Z_2tbPb#UY@o+Q(Rx>87P
zbiUn{Q?r!H!MH2q{L+Bjg6OiG+?3=JQWY#VVwe!flEL0?CMXZ0-6^^DymtV7R4;;B
zyzXl;U$h%HFgigP2d+LyFL1da+P7FOT0=-(ls_&Ez|f`$=MT(UpV+;%_Q>Pfxo_RW
zDq))#v6Frsn1V`QvYDGj6*!K$n7xtv?j^BNP%XOzktZHK-QCi0`V~*PqBHJ2CM#P{
zAb)qN$as?0q^MXwxWGQkILpg#)TCmS{v)zsP=I!b7UY@2R^Rol|CJ~z<5*+!duM`v
zs&>`dXqNFt>uzLr1>1e${sdr3y)VSdp6rkk1IQDSlfbQ1Oc^MawNzpy?^rqksU(~r
zt>OB~LhNIiytE${-}`iTwWspDP2)(aL0=lP$U1%A#n`kqT0SqWX0~WCO-||Vtinko
zzj2G3IC-vtcghvg1xnG$_;R#-WH29adJ0VVC`_6<Hc=jar=^HbKuwU}f5~e4!I`(%
z5z=wxWa+r?4U0&htw_0${CNZoa2Ea;M(>}4Ydu&;IKM>ZlzozoAM}d_vsfA^jg%-a
zHzp=39Ll!I9j5FBkJ}2i1SVMgtO`4KYk=BwYuCWaZo9zUG@)N$J>U7~?{aIlD$dWI
z6w>o~^yRiUYG<C!WuVW`8&E-c?Xejl9@9sQR)Vb6`(b2F7o+69SoOZw$mbC7Vq*A5
zNexJxi+0ugWWDXpkOEp@9vSJq^@>QqmP$kYl<H0WD(Roqnmh?OdgWbV*;;ln(dOdR
zYg>Jk=DJeC;%#sgLR-C=Ot%s>?u%Mf!{+aoWK@4UwOq|>gG(bUnK_B!wBb5Uo;Dma
zo>w`hiyS31)p1zDoErxyog!fRb-Zi0X${;zouK6q#}*2RfK<AtvzkAvPG0WjCfW8U
zXYz_JDSDgrSa{p@=%sjmG9FIOJi#3Fz6KFVEQ9!xAyvmtQ@a<}ZnPLY*y=2wbW>5d
z3JPP;-FT~y!vM8T_>i43VlpbS%!bG!-_nSgl_m+ew({6FsVCJM(e}c2Hy5E$0PX%*
zEVKem524421<;)z1io!j0t+P&0gS&eNt=lF<ha>N(eGam0=S5`ZbJbAE-!Dvt^pSz
z5(of0c()1u19U>bE<b;~0G@g+ef8g<mEcw|g`Dy;zh%V$LJ;lqmmKQvf#)dX^On0>
zz4v`cB#wT5Z;sd=eFG!8Cv-%rbd4qWC18uLYslp<iEroEfBygjZc~WBt{u?ch5+Ni
z(p14C!^13u<ctZP^WIAH&|~Ay9Qja-$qM5t4;2c~kKBh4;FZP_4sb?BMz!Yxoy%%e
z#0q&kwB1PmDJzy7&N<uQn9OTf4_V)nwo#@8ZA)+pHCLh>Qm%q*E(_fU*<|s^3)1#N
zND`gPw_g;bdDvvk-9Ej5Z0#*S>%6SdqRx0bfi%Nte*TN^{Ktv~c2tw?+}eG&;wu9_
z(mrHsb#_^jd>)z??fN2dqFN|DZyCtJ*x|U3v@h}_Jc-S8;mO(|=`Hb!(+4&TB4cAG
zgSty+a>_Cq?4ar4D#Of$A(nm9DK6KfHm)pM5hYDg$NITb1j=Pxt1@;kIZ`AYdNf__
zbNH%K=qChXX+D@KRqeTJGTr9ez^O~5y)o=!xcUZm!11}&BE!@_Mg57(RV@i7A3I@w
z1yke88Y!^GAT8h0SXfRxA|R?>>*(~2NH@900f>w&k)W=6pW_H?&^l=R%+l!Ix&nWq
z_x$pk5pmt^CW%8I228V}x$lo%>Xx_5Dj6398@q(Z3lGlDs0zO9Pq@LE71_RfF;+?U
zS9P@KxPA=J0&N#(z*iG5GR}5s<S>q0VLdYg83NyCLIk)jYW+O>bWX+^ta_Q!B@q4L
z^rBu*tp+n$BWU<z4ISIctw2>ZJo{^d$u^^fw3oD5hO4J*tP%Ywf>AIw%PXJ_jW_{q
z4Zb-{CKX8I`yUjimo;r9#C~4Cf7|vT`J|C6=;5^3hYJ@+yOAv4@2*=VkhS5ILdG~U
z)9?P$58xc*nDUd>x^ud*6O(XE@!nzihL6;ws<Mn`Dy*2fwr!5Zl#I<n18Z_(z|160
z=W@P{u-Hf9yZjuAbqIqQ`!^kosG-JmwGugX3*TF2Ho30#tq<p+%4(1TYEsyv?FfcY
z-~cQIv}24o?p$q%QgaMf-lFk7P4<~K^*QoNjQ%0gsA;I>z?<0c-Sh|YQu*?yjjb;4
zymm8<6H!|0LU_<V0e0CfrMv&5XpmZ2tB~3wkFq1$fqNm747PazC4>Q0Y4+v(#!=GU
z>$j}+xGuOGYOg%dELvLTfBp?Kw>fdCudQ%V)>UK4Hr8k0=)}Fvs;VnfKV)s^%#*a?
z>v@p<F=hY}BN@u6+REX;q@C`XXsq8DX^qrfdT>n_abhM2hOfomouqB6IMzbXWW2}Z
zAnV-Q2!`vP__b4v1n8<jk}5W10@~0jHrM^Rv?^veD&OAtrn4If<7=<2tLuG#-`rxQ
zCsx4!)QgpwRWb6OAp5hdR(;&L-4M{`S!q6Um%yNk)Pxm!tvjLi=I;hnq?6reM4=Kd
zKSU@Ow3E0qyU)xn=lOr~X^<3KoL<gdqgo{M=-@x-RV4ltI8Pls0=vx}Z7lC*2ksT#
zY1*o9JD++mV>`)~*`k=tC|5EZSbUKBxXA(gX~r_~(Tv&It2tYbfVbmS?`_M`a|0)x
zwj>0$ZL1@e>{!nkn>kFiE1OAtF}X<Cxm_P}Q^g=-&2I;*Of;`npr-E4SU7ibJUscy
zlVQnL@B3&;bY1EGFM~~mwH{6wRu}ANN47b~p6)dg7VIB(x~%*d79c9ohfpPwWb8eK
z`!%I|%-9InP2HoF_G^^HtmnBb{t+lZq)ib!53&4oX8FNPTiu4HSLrU->Qr3zd*O;M
zwxKZ*R-Mc#Q=j2I3_?m&@#6NlYSF^Wn~;F2S^Ty&(r-z3W~a`?`?{~<$9mo)+C(&{
z1tl~QjR}r|e0Rd~$zFQM7&yc?z8kaElrV`e+drhFnhm%vX!}4+w6In;b--oNJUZgh
zrM;|$3x6j{rZVpHw3mMNpSUzW@2B|ceDW!;fkM18L$_I{lQpWPCn~Tw3)UThKx96Y
z#@(|SVViDr&TBn8nsq_<-s!&e;5+x%8z6-c^Uk-VE|`s?G`O2E#9HNG`4jvIrtJ7F
zJfw&(xvqxck~GLUx_l_P@B{2;pPBRdi0jOEe&dYhcLbMaIjATEe@<(TBA0&cEw#`6
z$LPa5b|~BU`tmR<@i@6B8<lfTfADT1TpdKTz3Xf>PeXP&COlPTn(g!D2{AwXItF_^
zKDrIAQ4UXu&52fqRch!x**>x1GV)E}TC4d~>Ru-q{Za;XSa;Z)^`cItVV*zuAS*wt
zCze%d<<oV3o_KPaMA({s+1A8Jf9eBUi>;|DD-O0~L~pTnUgXbpo-kz6N1@T={Jx-h
z?zqI(jO~xxK5CGD(}X1w#SloqMpO4@{h0#&rhWkJrfJlUw`6<&gDUihY1-ptD>tWc
z^SCvViqB+RtMTN$!t>is%skXSgdEs8wMp|qnypQ|mzZLgufqx<YvJc|mHq>TmCt9T
z57E*>oM-Q)$~Q4o5hu4kAT2gD-7;6)-=cOl6Jbz|X3RB8Uzx`N{)v@s+$C#*oQF9~
z*@x2PhCAojDd~P+PSFXEmnI88+H9lwTjpnQJ6;2Je13)<D0=31*=#sXW4FceNrU4P
zDO7^4#ka1oj*I#k%P*0%tNtK|C-zsU74mIU3f~VNo<_nlZ0@h~YaEM|oE2oMKQcK|
zn^ws+O1@&ov{bey`gON?`ko1+vF8s&yPxbRM@ROJ`n~y>_tgv%d}1Ho2M<blP3^|t
zH4c?{U0~e6NS8D_DZV}TK$72-saIHArr@>`$(yNZ{HWPb-;9oZ0e<;!^n0Saq3bgV
zKe4?5#_R?g%_oA}Ghg+5F2v*(eHm}BiH8zgysetlv}7w2?0(u?v!<FZ=+Q>K0PJxg
zKMZy<rf!%POPUpY*Az37yb{h`k)R@?^}$vVg3Wwjo3yg;JzZt4B!r)vl|5X*{B?D?
z1*&q@`_akA<7f-_urIaT!6Id=`A(AHkvqetUD7EVDeqIRov*M3$2i>4fFvAlP9j9w
zPc$lnpYk;>UQThE4sPB7RV`5F%H<-2>eY{_&opCK?!%NRvo~}>+A7LtYE@VjB;>&9
zIG949SVslo7Pf*$@E;Sy6m}_xu@c`wAcfDYob*o~%?Vrwk6d|)@mIvrrvOcMP?c$u
z!-cOv;?Od5B!&Zg_y#6)>A%R3@qclihmh>Sp>;Ykfch!qEeDewNrf=@`niAod}Q+w
z@(()pzYl`{jR0D_eh9Fs{Ldl|2c8tMm)>&hFKYlS?!J(?=1(}JtYxaITYu8nF6$=5
z;&o1yqo~|97Dzl5XkoH+GJ>15ZMf(vj`~r6fcp*<pmjl^3YdjJic<uIT+efW@@%ZH
z#{?0Q_et!wvhKpM6-z@o^3}GJ6;E5(VAs5cnZbYz=JY6Ikx0$ymR(Y@{VxjW&;__@
z1$SBO8R0_0_G|+piPsQ(;FTo=ocd7))$Om7E)D(v5K(oWd4ptoj{Iu-$H%KYzK^8^
z9p0ro&D%AdBqLBCvP@W)`Dq<Rv0F8khu_CdY<`5n`o3gJ`C9DGw^jQdJLneP$Q{W;
z)%O=TD&)UUw!5eNT{flHirw@_?FQ$8(R3>n)Ez%iyuvgHMj?028E}si4m$~;NxlT_
zlOj}$Zc<+n{DIo};+%oila)U@It6@>=nY!E!sdK7?H@$IGAvVM0^sUt!UNY}#9>JT
znNo&U$aEVB8z(FDF8FG%<>iyRZ?TH1E;@H@C*=>4U<ZYZjZjvcWZtpbfOFpr9l3=1
ziN(Y`*!D$P2l}ns^_(>D#}7!5_bkaPHM4^~PEaFi{E50+QjZJOQ_PaQSCJXqc}meq
zHAry;&*9c=1HXsSLYT56*`oBXg9;K&gjj4elbuX*XC>4x7NJ)@*rQ+FW#KzS!q(Ah
zhK6a8w1SF?@8~&~yQ4)e3z&6X6V%N;?DbW^XhO(n*s}(d`AlPSGpMVmT#VI(Q_5EQ
z<1|8O6P`=Z96WyZt@rcH6xvRhZj7D4MX+(rtXok~AWYic`##fwc_nwF2b8QpxB$L<
z__@NBGZCqOl&)5(HRkDMC%tx%Rh>}qo8GHX#x~6RsMWhMCRB;=#mO)pXS>1upT47)
ze#XIa7!J#g%MoNmB=aYaYD#FlC8gu&3?)xiVuI?C(ThIfU{PfXSC+kht0yDy!425c
zw2GA1a(oowPEI2D{uLB<o3Aq{s79r!GM>wdYzGC-bAto>r_7h3;@yfUE_q|LIi#ma
z+Odt3TtzBt^h<rj3hUM^z2Ob2QN_>fCw_85zhf5QY?#I$tGpMoiL;w))Smap+KZj6
z#G6OnK1>9NWbUV`7o7xRX9uGirZ|#R!-jEwVTy%QgF@fmy%OZ0X?-s;J6Q1Y3-4r$
zVDt-u^^eAoNBT|#ds9_Q@XG$3qQuZQxgryaf?`$mnLe{hWlV$qAB~UFDGy7!Ifi~)
z&i{dXyQ(AD2a86=t=p;KCtJl$O$R#>eK|)l(K(gBW+PZ%=?~(q6m}}AEAg-sijPkR
z?TvN!jbb#skq+1~^G+xsDHt&AE{#;!)<XM&--pk4m~XaCAHcCz?pUjFT}?3s4$btt
z+uPd$=3hu$+m$;VpYZakxsm1@3xe5MHlD#@{3YwoKJB5#xf{)sY@B>Anp#@p=o{<o
zw~Tx=#*?f*rQG6Hs7j&HYLnoO^MNO<ZS^VYNXB8w{zO0_(EY4b8(YEZrFaUInkgpE
z$oX@kz{aYI`vC0aLXFixoS!tmgvS=lO7?(KsF^B%mh|+egEsN-8A~%&PR;cKaR%77
zi`ukCq18PtvL79?6>8uYGTIq7bVrowrFM(LLEaN$!v2h=-di(~r&DxK)M}Vehc5zD
zL-tRyYDOD?-=Mhjj(HZ(0q(;bZlcl_P7C$rcxa5A0@WMs<cyDDQ@cb!3}boQun-&W
zU!;tFFHIHeFB{U)s=uDM4}{z}aO4Vu@x>bXpP)=GRjot8J^@N?BBdX^*g`sq!wsz-
zLVV&0!f>H5;5xSSD`qb;)!Bc8o^l%rAIL`MPo+zQ<hL+`7ZrYEQ4mZvD`!}Q9th7P
z6uXHSwtR{I9(CiEUHkJ()H&IIi17bRj{fBrdhmh(lv9atoLk>z2IG?q1QX%X3T7|e
z(tkk1o_bc9M^{#~OiA;?dhq1U7o2c0I|nBiUa4P6qkr2cPwP5Z;EzAmlNmf@{iknu
zrw^%jm}1`kY*t1By2O9G5?0%=c>zd<Hh7}~25>QX6T=40q|-%0^p<6EZ($;LUh^|Z
zeqNru$My_0_b8Ot6TyRXw<_Vvn~gbfy(Eb_DUl=$led$OoM!GIhH~PsP6FFKPu_vS
zRC}svl6yZ{XU3F!&a)r}WlS^Egn2(ya)7z$e2=zb+kB7vcD}Y~q^K%eTNiOQSn|P?
zsl!jwErL2E^DJuOxT)H<xpex~gwv99D=P?xx*%*E*R}<`*B_<K(bWSk`Wi7yu#hAG
zL#oQyna?g*smb0DUH`jkG`unOEjuxf)shwMfdf~C5qF=S>{~u#=I3JOVtXd+dt{d)
z=2{4f&5vXTQ{P>!3G`bjctnB-2i!n)Tm!Z)jsq;kb~p7stoB`eq~P@taX!{I0nRs0
z08?n!Xal2X5C{v~+3}I8CT9J4>4*N(XFlFG<EqnesNq;)9Bc}etj6D_rzv%)mm*-P
z>a^vNBH>vP$td*<DZa@wU2Pfh%Nx*x<5acL(+<j^(bAbfK15RQt++08FEsw>39X1w
z`bIAaDTKX@d<D$KB(4b#*h}n&K(N=b&IroxX~d9iIPxp^=mUV~H0nmf?B*Mv_@Di>
zba6wJqt7=-EirX#J>LqhTW(J9R(T{sy7&<PF=kZBOO?EG*kmXAhn1^Nu^!`QDaBZ*
znxupGH&Jd`t0!MbraJC>UsT5wN`r<`sp`pi#R*sB?lnpAkQa3Iyh%}2;cWQyBL9oQ
zc^HJPiiaw3^MpR7Y8KE+AD+5!81flU%dw=lE7Zil#_>acn{z&oDcZ}9qYE&z|2cpY
zGDF8etkndD&%lZ|T|y3AW|R508*6xm#ctH_Yd7&-6%#OTpnUoLMy&F+8!Ab&XR0V4
z`7)$eqpeI8=1~Q>IrvVV;N5t`6AN;d-~+i=pjdmuhCWJ>=)|@`Q?Bm$_gv+kkxBJM
zj7Rm4Km6TepjP6wglkyD)m(loK6LbjutlkY<H~BViG708&n0g8MScAF{cFcF?faZz
zQB5ksrq^ady4i;s!8(VGvH4G@*bv4!%G{IFkuN#e3#57Y)O<_Tg|l{E;25Wm_&CI3
zb5$QzvO$BWx8{o@7q3iCBo9!!dDDU4@SSrB8`#6fY9RH2fXCKTLCQD;%3`co+sXq7
z_}uD)3sO=`oT8Q4mz1ev)2ZaDdZ=~2Z#%01`n%>9R#;CP+xUnrNl9JK`C~|Ti;ynY
zR@}Q{NpD6&he2y%sYxIOxZ(xyr+No(4U=d0jD?XGaKDfHue`m_8!XPD-qZ9wVY7TH
z>>%gAMJ!DDfBKedBBdTd2U-L9JRN$5srR9xBcR04?rC4yT$f{A@eQ;5urTGA4-2e1
zqXQqFSiSk#$69sw^R@7u7SxWnnMmooh$Q<yhkW*63YR%xlch<#G5SpHs`LIEKGO#)
zCjyRN#?jvkNvnjVe_3u{PnkgtTh?G&H2y3t#o3jCe3kfqVWx%h_^D&qI%!^xMKO=t
zSEJjiiqE{+Zq^UREp}Nw>OW&W5<RvWuh_S?Z8dnH`aE|o0N~d_f;NEZ+E(_~kQ?!1
zX-v5JzXqi6WcsGHV!nTQPoJ+1C?i&ig^R6O-5lX&I=oAz!We`L0xEHgleQKhL%uti
zEaeSnvQ`(Tgw-p(P3UJ)H*)nT|1GHa?P^9KE0Kb5o`yN6a>>bhK-yn#$G>?s2L4B6
zAp{a*{C^r*{4=#o`#jxkM8$o1lMpD#$-D+q!g@U4iEwV|j1~wjhV#HUyp4}lhdgl!
z$!*`>%U$bREm$ut4bA*s^aO+P1L{5`z=PTmFgG{1o*zq{sFI@04}9PqW<wrj>9klo
zIE_Vqr9xM|#Qgpf33yQ^4c;HjxZng35;qHtiC0c5cBkbqO!=9C){ySm#O&Z+X2Z;0
z+o8`TJdztg=%dIEQc;B!I)KECaEZN;kJ8Dc$@bO8mIj8q^>wp_gXt@-2G&h?B$1hj
z$x59bF*SuH=dhz`yP-<!MgG-{{f$UXF9zeay(|gS$YXP53DfCA>H!j+vWwa^z=4|J
zqO0%_zNTWQVy~&6Y!Kac*!p5BDZ%;(v+XYJeSB!e;uxWQ&_jK~x%V&E2c2Ss&o=(B
zLku*H0EkMiVq3Y!)3VwqNvrKrdFR!xQH#Cdgg)=u^&dxBBVY6ZsS*Iv$uY~x&H41g
zl1)QS=xZiOWkL)aVx%HX-1Pj>AR&tD1{eLXdhlA~ik4P;bH*s`HHo}O<xq$Uqd-Sh
zlOK!d7n|gD8GqM`Z?G`?cn|pVmZVK?Tk}oe#Bibq26z57vU>!Kcc0|rFg%uw!O2~Q
zB6-nTnu$+7pFzLQlsa3McuQS%{AdXtF>hy^6s%(fahpY^=g0cMpH=V|L~R50wLV!O
zT73c$dZIW2$RQaPoR!M?b@Gu7kpkgdh1TSHzw#Di+|#VyOA_U#+cle+QD*aeVO}#W
zXLNFx?sdQNO$=P|wl^M1KGS=Ie)d(^a!suX{*=jPu;Yjn4^IUrXl`&_{s-6;`;{P9
zN2RBx9yLWBWD`s9d8HTZ>|%|x&<4o@Q-;Rv!!Cy#<L36>%u*<HjHqxuL@$n8P|XZO
zY{4S#i5d6+-#@A3pAYyBRKoH20m74~qyVUOb_b3aQAhaf9Rk(QA*O#;ng1eE|ECp}
zf8$?&zGm?{_GGWH`Cl^-+~T@<cm=4yygnxZ2v+f9$jwR_JO3w?v1TlHrqvY%Sf-6k
z!ZSTI9^U7lw&Ry+hl>*8$x;Rah6cEuO~wWD8G9fbXbI9L>Rru$w8h1}>KfNe{cYQb
z04-}<*(Q>O4;bSk8r&vRVNZ!lq*-+m{Dir^mE>OK(n7lQCv|ZPb;k|3r5+lmt|KQ@
z0@gvirmgL@?6gd?<BPeONYj!fDm<N4W7==sS&&t>g8rNU-@Y%_i>ifc5?8_PycMfY
z-mDCG44LN01%#pPm`zrjH3F9Ez9bdaw*L@KhAgZ$f3oE=4t2Gg@_d+8BUq!?V|fb2
z$0Kq1Wj&t@Ts;w{M*Gjy75#4H0;SS7mzspKzdtWUh0#*ZN_(fX8!&Fuuvr(#A^JT+
z;6az998sUP)ez-njkBxtoM$O6)UR~{d}P#tGKm+068f~`S|#fZmYROlf&KS#b+Jky
zZPJC)O|F}}trxL=hezA7k@+expv<O{lolvN6@M);n5#Q+JDC8j&P)uL%(_U~ro#e!
z`x(}CRsy=>R@lY3R___DvNQRJao|lc-s9$70=(xGLBH@0(04Z(z%om~ap?*l8}UEv
zR{mVUOMhZg@0hInMmoC4alxbftZ7@L38`27(T#VvYX;lbhbex<NUY4_HE&rd2s91g
z1VIgoN{kgE8qSYUer=%n=>D~1e1jf^n#)UZ!LC}No_O!>^2$tIn)KtDs=ZF=tLuO&
zLc+hg?0TpM)Xy0|8AcaNI}c#OSY|zgi^yAqmh0=VRp{)C#VNG(CA>dy<vJr!2|Kj{
z8}pGA*k`|>B|XP17r&%j5Z|MNq`xXn#olyBqeP4wTySYVla;RbP0{YkqJuL+w*fkN
zyS{1-X{olIv1~S3s3ue|lbj9JU&wTA!G^gQXNF}0TS&m^kk2znwurVEnuqohp6nGs
zqaRfj)0oN(A=b}W#1WtDt^r*I|5q%j64swChKpdb^_?<UA4BG#z~|SQc>h++#69p=
zp9n=P$6|iG<_9`c8Q?aQ6iC+<KOLjQ6-zPKff!^c9<0-2$risC!|gQ-AOJl%aC0#n
z=1}w^Zx-(VjfyR~SEa)cz~mu8X0V2=j=;#rVS7^<XWWL?p}_FWoU}Gm>-CjcqKqKU
zRd&G9ys8%KrBSm4*j+Lr6>SG+_O8iDG|HKJyh~4Wn6f^Y(2cp?M=aL+s_h|`N2aL7
zE?-TpFiHxT<G}VG1FC>HRi)E-dqa2VXnWMO0|?$wsD!mJjE9cgpx5swL_hC(h}E^Z
zX7QP~0UC_DZw7s9|LI(9vX_Sp?+;mgph6lK7yCBK0gDNXzcn`S+R>V$+3GGj<Pn)&
z+Dg6Q!~oieS$0@V%0Aa1M($nOt4nwUw}9QpBt#0?xy?>$(PzQDtmuq5f7sv2&w;zN
z5m<Y$ZBIRtC2n#O{*r``C)-Z=_c@jgQ+t7A(nDguS&ZO%QAI(DvViL3kh>i-eXr|`
zhfk$S842LpF5?8Os>r*M3A;kod1-+swo#<??d8Q;VVN4F^E;j^?v^MArb}E*9xBS%
zy$EF+Zw^~_BH%?5+;K^ON94WobJnyUqIu{5b^EmhfPQ?Q)T$hs1?L`zuG<mSu;Ah0
z-}s*k;{Sx}2N5{DmUUbdClvhEWMuu%-~X-7K62&f`DXL@k6(Uc63~s;;R;d@A%O0+
zzXtf86c-q%>*8wD7VP?WF|&;PJ{5K*;qYdk^%8&Jp}~icR6Ko%n*=G{*P}yoWwP&|
z->lTo_OALqRP@n>#8BeBzH|xDRyKCl-%qR~9=3_#To%EVza3I^heR<APDfeF27h6<
zzQM#qi~V-}hTxqOqX~l@qUf46^kFHL3sOhh%P1ErOm~phYBlTWwPWP9V+W@&39VVt
z>l72%5xX&&%AYhtvya^0jG|@3d(Cm>Z>M{I>XPIWlLWte6l)O}K}ym^tHlB8bWFDW
zz2eR1^pvD$DfB;CRfb#(4s8dS;wDT6Q(9NMng;6F8{)egyV;Q-esU}<vD>m-tsmI@
zjeqVywndOmGo!||Cvhb&<~qTK9}sWle995Tx9MgN@WG64ry~{Lrx0WW7LQ09B&~DX
zx2(FZYt8b>ea>g&6L*b6(7f?jat7L9K#+VQWmU!7!p+;8-7)m9zgE|F7&Jt=t-r3o
z1~y)i**|egVcl;0aP|T3YLK7H6L1~0F$<8F@tW9yb-^@QThk=Z**#XkdE&6)FGGmV
zvBTqozAAKEfE2J(F$}dx8|MkKR{1KA5V-4RPB_|d6mBw-v|L%X**&UE$mryZu%GmJ
z_fo7kY1UWP>}-mi&fdJ?((hg4G{1xk9A+8%@*de{i^CWRp?eTRV<)uDu~Rji8*c}0
zm^o4z9@v&SrBUKj#!H@mXQI9QIK8vM7$Npeq?BL;WNd3>mh0bWK#iBp0l-Bzz++n9
z)0sg<hA!j%;T#C)9zZX?Z4!Qak1BYnm~XoZz?u))|F_l<=I`_U8K4t<z+V2K27T4+
zRBV8r-HO9^sbW5{16YPhOspbI`I#ZGgKU<+V=%$O>p8<9H?6~2$}^m)l3x0|!g>*|
zyjc+t;|vB85{-88+gyklpN8_U!q8Q=EQB~hYRUP?2=1RKhcw_Kj#jH3v<mWXn@msi
zt14}4`jX)K1*2>fF&nyjJHmU-`|wLY2w-5iI8LQk`S$|n0>yLho;=S+(i{S~YTZTh
zN7EZ!rdrajhlD7A^lKfPP$phCbU-FfR7wRXKl7Eco_@fTBv)ap!uh@C6%*2R*#Cox
zxzR{-Fo24${;_ljex>0K(oWPJ2`9sFF@+f2gRKR*FyucL)w?qCPVM~QpmbI&qx_yA
znK-3(L7ST1PEQE0+NONKjH|+x?wdL@p>N`dFoUS;9eXdN@bJd2{2fP>$%Y&Zs*zts
zMsh~7e_Mt3;El-2_A&oX6tzUW4qy{ZFRpf#R8EAR9}K+8uZupqzBEFK!^A@zvi(Z}
ze)weuaYJXdD57#*oAqbJ!zr;-QfxLsaL&rstry8E;ohDnY{T>03lBFB&ZF0LWfGAa
zNs}Ye&0n1AKi5{x0tSmSvwxWck;Km#Oa-0r*Nz3UF@WH^0tEkdf2VlMZc@=fDf&g_
z9dCIXJw|1%vH+S<WNc8ESR3>T`th07c!F*1WkAax;FKQ#UYw`D_S@4(R5Ae+0Z#Cr
zD8k>{s3KEw5Q~>B;*{~b{Z#t1`#U|5^D#gt@q8}-Wkn-bfMA~G_QI{<1ssn5POLts
z$Q!=@V!qW|>MeuyU!}ZMyeKH;4IuLOQwi@uW=KTS{h3(>>V{yDK{FKq=#&pBKrip!
z1_pl~b0c2@Tx~PT(PTNnIxl_|6qpKB)_{OHfw?ZcXLVq^+GE+u;IPjsWuaaNY3!q1
zh%{!Nt+(g4HT)e-R~WaLS^m``h08Ppp)<QOFSr_mB6UHqB32BK%M*s%=h#gB8;v!+
zF|bI^R*pgG3mpUOD{yXgmGvOwbc<)@)_mJ+LP@Zjhezt~E+ys=BSisP@}@TpXG>-#
z)xRof-C;Pn-paoMG;o!g`YZ5dwaA@s&qoPt<?y0Ed$+6vNc%iGw>n}Jb6(|ZvX~H<
zKKNc*W&XEp>P)STqO6{Bt=-Yq^cOlkNSpxB5Je1RP+fF>Oo-t&K16o~$nfBb5{Ffm
z=yC~~UM;5c#JQ6Lt|sSmVzHBRebnIY3|Cf*f0&W<zKub{dE%5aE>+oX<g-!W^1Y;}
zFM(6n0_gP-@Z2$?mGY@gcb_n*wnW^VZg4c+5{2aJ<6^$-K-@I8lWky;IVpWc?^Q9N
zZz8^lX{E%pJgHLCnCIg7=+4R#JHPVY<YwOvB`&pQP*`5B0Tkd_S(V-;>@9cGU822j
z7M#L4j9F;|!;~u*L9w#pF4ImW9CQ<(A#9=?X#fjcx6k6AIqLA>qvONA^p&coCk0})
zd&)$(GPBjUN&d?Ca>Evg`Qc1*L7ja_nXhGDO0UzbAt1B=p-e^$9^qzF$iI6c%T;DU
zwI8Uw4rP4;31=s|Uk$4BJj(Ov&|+oEDWh^J5#;(y)#6}m)6MRsc2gfa4A*otAXL<3
z+nWcYTFLQR($oEK*Liw7f(YBTL9r$*EZ`?>aoC)v7VfK^Z8_r!p*1X^!1q)-m?~U(
z=eOpj!t97vmQhiaz4+IYR2}**H+h<ra!yXixYL;?ZiHN|{@FzR>-ddR4Qi~SA{itm
z`h!<o#AqM9N=RWCHn@?&`@*JBt5^y0#zR5E{M*=_WRJP!kt2q`)R-M)vrw(zf6`AZ
zwu>x6neNQ9u`<rHk1`taL_BefX=;DQf3XWMK<_s2$2_nNV34SYg8}R^)1{A7!1)`*
zRd)-hhW4L<=gMY^#+rok?9I@i`a#dH{5Qg`<MLPI*MMU<FmIZaY}7kHZc9UDG0yPc
zk@itOw?uNBG+-wXGILd$@O$1VR5$BCztjFlb`kN8K_d6>>BVizIPeV$W%<d0qIZ6x
z;1^feKa64(?R<}|9^-K214VuuteCBq&y>BB$u7Cw@6`BY)^sPiJ+sE}d=F`gNYTwq
zBBbGYa2(axeK!#T`EObl;(-oI06;h&;`9R{I4M<abiNbTfJ&X#Lev)N_sS1e#8H<{
zxM6h#!^4$yM9Z=pEpI~dRsO=1aR|hq-8nuzpgSHtqE<RUqMZ8rDUf9F0Z@(VFU^dA
zjRDemkQat)>g>q|K9efsIm!V6Z0k!m^`Q=U(Z}V;KMP69l(Imj>ZPAK1ZX4$F!SHr
z_kq@407&uL0ypVRaKGcNU;l4HLrj8s_dA7O=I_SCAWOa*pk)>F8V0a)-EU+EXJ<=v
z*@V||d|ZfqM|NR>34Y1v;}4_+P~-vt!><t^8W7NkzaOX)zw$W%b7wkb5D}`D)b-tn
z%-AJt>-=;LwOD3=b~a3F7?52Anu>mn#Iz%8x|?^F%HQW359bk#@Dwj-JN_7i-fWly
z8~PuxPCI{fueLn(n)W&zM<aE$J`?PiU#IC?vaN`f*EivG)JVU}uy6r)n{$glwHnTS
z+7kGQ&aoBu&kM5qOJoO!k~d97<jCd@sKvYxPn*ua4{K`dN^NDgqASl;>(5s1RJ(q<
zGVQuuH*&Jfgy7aUVqxMjp|2Bj8-MI_uqKn-a2X_q>167Q-GypBfgaUVTO!ko2V~7I
z&d>g}{LSTx6aAhX!@)RtU1SnX1;gqX8>6j~>T0WcSJ-tci8_&<o_)=Ph@+XaX_w*g
zhb<c-!B`Zz#9hbs)!W{OEenap$wpvbzBauh!s_9@tP4&$d|EL~539>M8i8_R=2S}D
zTSl!PxARA|pISEUODx0=kV{g~Ew;Sp9n5$iTPnzM$AqoYclMA#q^Gq%3_WLOY8(di
zgW%LXmE1GC61CUwJJ=I??5FfjQ%YAlUBKujyl$w(ol#M)Pa#iD@f+Bs^B})CL1rtv
zOps|4e|r7rQG=x;Gc6XM$a`5yCJw*D13L-lPzq|!3(PNmO@B6jymG?tuU$bt0~c^D
zY~3|XO@YSFfqJ@I>AqPGHeuUT-Eo~OzcBv9i4gOQardkL+g8_28}M;DXM9%1%2;D`
zoLi*PX42K@Hk#hBwI~uQ$Z<2o;^++}H!^rCRN`KHn^R6JIzFrC$k9)pEZsA+)w$!U
z%X)6a%8!84Q2JifiZU}>Xm@06y&y7%?lKXlW)`Di^G2=^<&F3l>7r(s-E2K6pzW_$
zI~mqXr5KwxXVD#zf~dR{YlMb=l*_9d(eIra$*HL%uHOjnc@rDggvre=EPXt~Dki!a
zRYb?vqJ9*4o82*zk(W?QT*c%fPbO|MV9j&okKMCO$>ZYyM>dPIw&TKu{8v`;ihYWv
z#ywwRk#Pe(bf3_V82N6~j(>F?wp(lbsiVavzO<!QGMCu^ENZ@$_OC^8OJ$0Rnyz%D
z_nfWuEzz2%-yW1#=;Ef?Q4b4O-k6WAPKi$lb$so=8LMQ0?TM}4^$gG_J3VqlY_eqB
zNoRJ2pSv5}w^T)G^%dV5^OJ#blQc8*1XIV;=_!{zO<-f=<2bsdB>Ki&)&4_7&zC4V
z5Wu-!O3wwFFdfUB=~`EA?hWIc(xe>n#)iVVM<Ygo`SUVqW9w!nk{<j2Bv^0YgFiij
zqT}xqO*4Ju&R*`KEI4c4)Jd|Cd-Wc~sq!}Cvy(zsBB8ZR`QVhDG7OaR9bE13Rs1i#
z3)rmJ1*E+|!MS3Av^`cp3DOv`GcEX5(5LyoQ^#)5YI|ey;Jy%5k$OxQ`?(Y0YV=K>
zn7qJX`j<8vaWM-Q&}nQ@z$-S3eaEw;R{D?U`SBK;hm*<BL1mi9JD@O?ka{T-(4LBx
zJIJ8LgBRyY20|r<76i_G!LIFe1AcR7pX>{bb|m!u1rK>*B?c4NnfQnd^}Q2%6>K;;
zwsi$p-;Q$~hd1Ka_;Xn;+>st;XURIvw_|*unu)<o7A!lSEBZ4i_k_Q;<YK!x9jr#Z
zr5kAve2~8P!~d1y=GI6QDC{;Q|J#T<shTjOiO&Z6Upt@dW<YR+&0W}^EFx<Z3bR-T
z=lqjeU6*fpA7d(ex(NNZYRi^le=^4YBvCPfsP`UZ8(*cZ3PKxFa`Xfa`f+fu*uEu=
z=UmIUgK%tnTyNqURfg>jNGJ#l<{^Gb>b19@m3&lMnba_9r5I@;s>U%4WkqTf-FcVb
zUDpqTV2#gC9G{RDJKI>H`V#-bDMzMbs@=HgJ6W8LD5c(5Tg5)QWb$NE{q(Kcm;Ie&
zeU6y{aQf4+BGnt{Fs+^>pkKRQR&E0M{)L13<9hY<yPpGo60)-F<0qX?XZ2oR`1$sP
z59Ilp=`N2coc=F`{@QIHZOrL-x_;3!&vaVadU6&Jn?h$LUKiy(_3%VFhuOFLUE<`$
zidOzDWN@ojH$#<H_xf?9-O2Qz1<G26J0i#<q|#4er|qZN^nFi<F)QZbiHWy=fq8GY
zR6{yz%iuuY*W`@v3Bo%s2rbVl*LT|YHK)CiVghTY`<92bHuH|^4+L3dPQuDCGm|Sj
z7a0C&>TCT~)>*u^A{0-lBx!z~5}9ZAvDA*Y_ghKdErX(bXL8Ty6VWRU0qZQ@hv!(-
z*P^U<<4yDiA7v-5<W{>Q(=Tze^nD7s{+9{C+hzRl51ucD-O2nH$eo}6ARP({>1Ol=
z8Z>^x4i?)fB1?Xg(f{WQ+^l$*OrWi-ugbi;PXWS>bICrGi81ei4FXw6sjT=5a`P;e
U`o|#UV%!}S1x-kW-19g83%t+oXaE2J

literal 14501
zcmcJ0cT`hrmp<4KQ6M1F1wxaq^xh1;7eS;%x=0nI6A%yyNN=Hoh=7P7y@QHM@4bsA
z^aKc<Q07GMy>st3GvAt7>-YPEb;vm<Z`tqO`+0Urgs!&AwJUU22nYzSsi{Kr2?)-C
z2?z*pU%mv~iBzQH1TKUg`YMV9rF{%5z=sR=3R(&T1m&?L$Cej?&%|!3CLRO?q;2>=
z!gkjp8v+7xNi~Rqp^pVRi=@eL6t+=_cFw3#8{P?YXJyD}cOIJlk|8Ub?r>MmLEoAx
z>AAc^&%4fiy{72JM2K1xB>LWu1Nd{A07C9OqOTxO^7%`f&x+t(<Vv~{%x>Q|DX2D+
zX?~tz&eEIrO#J(&w#9oSJo+|Iv|45S%c}RL{9kmM%vX+O-`S4-DaQe<kf8S?yyL)H
z7XR<<TxMW<1Ovk4AmH+d4t^Q92w#I-050j5z~_LA)@wUZ+PtXNVzoI>Sj`%$re<<z
zPE^Ikg{PyWrV;s~#@|+X8s=_3Em+@xCQKWvQ4bv3OFgbaBe01zyY42_m2<L$1O(qV
z3+zDkg=qVVTr_umrE|l~px5gj#=w^|lE<R;wg=Mn4hOUDKQ~F!BmyEdnOe+BX;0(K
zL;|YKB${r?F}7%z(wtV+>HrH8Z+dG2k(>&2R~7uRMhV;?b$xsz{;RXE$uYvfc1xu+
zIVQFz=^|5;!j(4HTZs4?(zNY;vJPifqwd|H6SyXc?U!-<F<#|s7<-@0(=Rn_TKFid
zW^44Y$OIC2=U8!aXE+&~fe7Mjl{j$pg>Ag6@c&A>Lh~d%K3<~DC6WDX@0oP#9=q@M
zt{CdQ*nGk`^f;RL?9?tz)Tz3*f2%z}$4Eo^T@cdIm>B(2qJFzudlFHop)--wS+nA9
zWQeIc865JF0ajoLQTiDTZN?<Wt9v?(@PfNv<Zzmn`spIy*CO9C@h95{VLu%28Mnq~
zhneQzUca<*fSkpC3l>9G%anEBwJ%K$v%Z<4BH(AVcsl&JQuF6pr6xFvhBrAUx%wR>
zFE-!l!m(3WS%1QXQ33pEhl|NBEWdnyOXOt-c0n%A*;t0z^<<CF<S=3_|7Wvt2Ty<V
zE!@pXuI-pQZBcC~wQ6JsRzLue5#F0<qQV<TKR3)G6mt-!$uzfut_%=u6Kd3>+E4B8
z$eMnf{IVsJ1eoHwvGfr)i+V2@`*Aa32sY}@O5eCK$t+N^no>J={9f8~&b{7o;$Fr6
ztDC+*KbE2T$ofSDD{Mb``C>{Lu^opx-947An|mf4=OtNx@F#vrxu0ort*~jSV5J$B
zid7fl-U~RY6q6ByaTM{WMO_nO2j)yJKR0AdtOw{o_=_OZ8mMP0DE@q`ceg9_EP7|A
zzGcTD-O|8zBhuxtm&dhZ_RKp*`XDE(0vBwKofZq^F~v-Bi7^Z=pexxfX&VIy=usn*
z5^g8Ol;^pPY4u<9kAaJW4T^^+0%v5qaj`i}z>M5?a={gk55#QS?`iZ5^{nccu}s@b
z^SZViIr{n_qbuAFP}p@HqcoPFT?Y-+9;-{7)agFM;pofOg!lXFx4VT~WUU3`GJD~@
zFP`h^sdgxTl}*@9hOkLP)x16n0uyXnu|t9yrdw)~0hPST7+AbxwoAeajt#=P`z{xe
zpmv=Fx=yWPc@Mk0QKzxyJgrmPkxfrF$1C0su=me44EDgC8VgNbWPgyl=BUvQ&_=0V
zXwnCz6h^4(^K*~kruO>sJ_w%&jIy2cCM-EVT?x6h07dZG&)pK>GvSP7@(7k55Y-!l
z?J7^!uA7+Pk|ip9d@PIttO}f3Va-jO2mF)!6D}(zO<Ff4J;M$km6i3o)2c>>xW33U
z#F(c??3o9v?X675P*UQ(3%rPp0TvI;V&gm=L__QQbmA>mby^Jds%9gV{=QWB$;W^y
zZ?);LMUDO&q>W}6TG@LTy1?WfdN1>xH});EFu{kA&wW16yV>>DWf=Bwav@(_jIQC_
z)<l~1^%Njh?S>5tRCo{b#sT_h&t{rBDyqbR#3tWak(sp+0bKKVU8Ph~s<W6n;Tvn;
zVKBh0eO%D$1y{77=eavN_KUmVWq)~=Y!~{(xcIXYN4wu{f?*D@OkfuT(U(AgAA431
z3<o~Q56eS<ORmGe@t?|UVBG!&5%3y~?!Wj~8@R${mgo6j#aym>k;k*Vup7!(1KztM
zEUDd-Ay#HNQQmGmZtRqE17ZVzRqiUTc$o!~cs<^Ex`t7(RCq___X7n8Fi4#O<l)Bw
zX7F=z#Ti42cnrp6veq@H>1g#GcFM7g*1~UveX<4SUt&%HxzO~890UyIQXHYGqZ7M6
zbrN!nLunxUTfHjH%<i-L?={~tt#OLi$`Dmr-ja1tr39g+xP%+ZP%dc~K@Nn%cR(xY
z+^mAMosg(FVn%bzHyQjZsZ*fiGsyZDrR3*xS_n->P*Qa2gSokH{&OE(2G~*cjx$Sl
zte#)!rDKu_-+thwl|?R9csBozOf9p}y|{@9Oy>!!&hF0^Dk)>{9ItKjg`HQ{ycMJ+
z$q{wi^K{$Lr<Gh#)j$nW<FyeNKJMKeq9WRzN!8yGPr2Cf!C(p%Ic?k(dx}#`^BIG*
zQMVo_`5tezHxGTM1SLmjNqKjbnm5|C$1oOXvP0gebUUY!fQNFfZzp&L9@+|;bW%y9
z1D4Ato36t=iG^*!KS*WG8I{4xntW#>QzE0=By$XM;6W8}aYMS1uD*;3CYvo;@0B>>
zPr201hKs&Bm(|xatCuh%Yo5z%bkXQft;Xwgr0kxj^!cq!GeP4!`vysL{ief*AvEzt
zKYhO(-EO~h_M-0-cc60BYp<hp<5TawR_JBgrnhWhN3p$*qL(*1Q;%WTXoqf;IW&uJ
z<2ZKG&d6q?<z#41RwaesoWt1Sa64V;OJ4=={SWd5Iyo*EAYqX1sp)Cku@VzyNP=Jp
ze1}slt%!r#1;(lbNtC>Oq4k-;l=ih##i(y|C$_S$x*qC!#jLi@WMu3tWgjunCofA&
z4v#ReY`(!P8T@qAe?OnzZ@Sj1khSrqD3%U7pI$od@&5VMANdjRD~d~$v)D;_#j&U8
z1STTvt4fwai)KYpmuVgxRC0h5RNgIMp98DObo)#!=sYD{*(2nQF{738D#;AMcG|tQ
z-^a|B|0It;&DZ3(lF*IJ|6cQCMF$jd0**b?7r<%s-z>v|PA`o+ti5G?gC#v7nUl!1
zRus?55_jD(F5${yrtBH<cAI+`6vDrqN_)fJEg~6VN8A-ND*KwYV6(y6c}HOPyMR~a
z``tJ12A60Ue@3aJf>0?bxg5*F0mm0L&2s!_CFSeKuQNO<<qF`_FPoHYog3#(nb<Dg
zoM}EQU8tE3`hd1*^`%W%x~&v3{sqk%=}}s-b_KE3<ICN2$?~xT)JgfvzBC0&^7T0G
zRL!E1(m?KWea+lBbHiBV2DRcPSMG=oEN3IiU}>Hw>yr*@P9-PNUXl38TW@6u0xBsb
zWjj;%M9^>NQJVOZJW!n8Yvr^wiuXEmJos}XPP=u(y&2cQc!C{f&&WeoF0|C#X<uZ^
z>6UcPY+)20RmvZNzL1QQM5DL#<Sd&_vl%wmpA33jaU*K{PJLv^dT~L1<BFmKBs#gh
zltofB-iChP%xl^rXq^sS?MTsY{#t|V)yT5Ep<i#YSuM;GU7>!<xjaw=Bho0>wtBy(
z+Q=8Pc)TETDYV+cW2GYDL<%kJ0-KbeC{r5=&wvDp+Ai(pm-Kna?!)pgY`hs_FOViP
zz#QY29Tys7HbuC1S4P^WMh^p7Y~nbyAQpgyO^#IRe1o<?POUz_AKE?+l=yJ=FzxvW
z4>(f&MW0WJS-rlt^cF+{Q}@#b*%2=obQ&<(=<S;J{1#j_C{J+VRPbK;t%9nTNY?9A
z9!_eyn)Jq26pvOjKwLWO0?o@lC#ahYuY;l=zZrHFCdq4^KnKrlUwYD==)4}th@uP$
z?vP4-zKfcEqtG>TVKr?9F0&8OClYSV;jL9OQ&|-$WGqt~J3JzeM7M^eRj1Q27)){X
z+SM<Ww<{GrJLumClB<g#8>2eY5^fQ-OfL9w*dxPb**rEW3zqJ0+lycC<}hJ$9N*t3
zVF~4O0Ov7{-cw5zw2gF{_@H3ni=vX)o3OTyqTQ~SjezHUE)P8MlUT`5)PzdX=T)*D
zJ+XxPL-OUGeEn>I=$@L4A;^K(wHqyK7~F#d*p`b2tw=cUB1*N*RYIRRQ(l479y=8}
zEV=#Kn-)s)U?rEb23xH*Jq8hCRAYI!W9%aSJ!KaqQJYcJG$q1$`q`UuP3jHPtmx3I
z^Dv*5?@NYK_ZybBBOa|YxMYrh8Ry`Bw|6W|RVt&Nylt{D+VCJ-r78z|G<AgR|1g!W
zgV$x9Aqetg@Ok&6l|n>k_)GOKZDj9PhlhI7MI3F854P+$*bv>FsducS4wiW%`cgg!
z3&rJkh0gILBsXQDKcJ5^AU)8eg{#V8kf4?N_O+T5C5AQQAlfx(G{#rDwMV2JI|R+R
zhp>C<Hfo))bhY#=DfeO`S*Pe6+Kri)%8!TxH={9b-A}!~M)2sU$bEKDDQqe7RIx0u
zx1j9dwCpZcR+#G~Rp$NL$@Q0qG{t>3E80)9k)AJ5n6+d$Ov?{<nbKeGUQl3iS+m&N
zB_XceS4_FPvSg;1Q{04Xk3X0AnAanV`ORj>Sb@g5sX2k?R~PdmI<jT_dkP-}oU<Ct
z&~j~X@XB#Dk~uy2X^Ta6embjZuvzR$TMPub7&%{}Qp)#ED@g4Z2~_^lS4FdfD8OZm
zoa*av+!DaOS!dHL)i_rk>o(?-iP@iXq7jHKl{!E{Wpf=8AL<fM`?#uVPR1}I8189)
zUb-p0zOR;4+Q#^CsMIv}S~uD;%L_x7jVOz?$tcRvk7m83u)ZGr4c*q<_uV%Q!SW==
zCv*SqQ)l(#6J%>?LdnkDahey}g}eETfn`&MEZQTBH6*BQ!m&`0Vl2(N1Uc!!-bdRw
z_uE4aLB0e$E~p&tc%h@1q!V;B>^|qa)SbjrFe1X52kXz4F~uG>In6eRq!SM63@q!%
zxomIE2Iq%J7X?h<R4N)E)>BlU>5V+}#jk^C<CX=ia(aY0>^MT?B#2q^`_(8xwzCbM
z*yOT+uRJU%!`f0>99cqdOZ_41`_GHwmIb5vhG9yr25i1p!9(XBT{46iQs|%Qulpwm
zfv#b)$rVZ88B&1E!4ms39?ifZ;2=AvF@6w;-j?c>aH{LIJt6Qag7n}V5X*CN!Bl`3
ztQ(h3pJi*Z@A%{h=SQeEGlTh_UBW;8QIG)Nq54nGLk^<3EqwF>V7+dG%i^y>VXr?}
z$Cj0rO~~@WJIF)H6)&s3be*AD|2Ks0kAV36pFHsD9e{tuRULeb{zM8E{4!t@xG4-!
z!>iFTlq~|FH6E|^t<hbo>B5U3TB}Fv^fAC3gKSD)_IFozf2iLL+Hp{Tyr7|j0L%?e
z54mvZYBUcxO_O5=pmOeY!0MlRdv~|MaL7?(X!5v)fA8jyhCt^YdfFPDzzqJb6bc8%
zdt#sk@$>Vu8OKl~=LMkPpwsFM)Q`_}la(7vlNGivou;a|6l3?*?xw>Z&8xi{gz<TI
z^TJh0a({D2fOwcTdUv#~HQIh+&9Lo@v`2Ojd)Q2Hq20ftc~B~6uvePWj(H0&p~rdB
zfEidgY(~JlzV&5E*^ZZ*S6H``8Wd3E4ZTLy^w>UB%1=c&-Bw+dPwTW}hi+CmT=y$=
zvWRSHcqPv`UiR07|BslC;4`p(oEb-4tW}+BJ{xCPh1a#bR=}fPY)8}M&)@wrpo>(`
z`#2j=mBG(TR;JkHNRfB#?`k*ug*naC81J<{&D8;0A)tM-I46mP=ae>6RStG(_L!M^
zL9g}u5{JmdUj2T|Y@>DiwM_WV5&`D?uVHBl6X3i-6{fPDr_DpO$A%c#j)X5q5;?-p
z9`f|?O=YFQw`h9K*DA3o5tN*CgtQ`$lhU{bkC4sa^PFJZ%Y=SAHiUrcU|;0@EA?~i
z8Jb4!cAW*Eud08@B01vb+d^77JNb%cTwA3$Ur#&ZQEvU3HVu+f)09efR6b5+)+igU
zpP@g$b!4?spQOIT<KOpYoO4x5S~SPwNXMjW=yx0d__1z*R^AN1z0QMfL<dx}?w()v
zya3T26K`UipAtl`bAUEBna8**f;0P8JEM1I6oZ8RVt<Z+|2~E<k=&L*i7l7rDzfh*
z9WkUtYeQ3>h5E9RcwGjeoblxv&yU)dBORC`wQuKU?0u5opo*8bTQA>|&9Z*&p8U$<
z@D3PhmQy>I6rP{m?_fQxgaz$6$M6wHI=udo5FpF)Ti-K;L4&cY#cY~sf=Z%J6U=2z
z*hmKd_3}I4q7Kb+0DE7!-x}DQ`E*FFpbXEFOejw3K9rq&jD+9SydI(;RwzWHtoxZZ
z_(PMipyJ`}^G_%E!9_gcp+4&qZu7==`@>y#6$a@YU#Df>H`QrIvyR2u%T4h6_eC6y
zSX2HH1^qAZ?V`TWH+XDc!m^VZCBiOYV)D5g@wZbH6TRE}XKa_2kv*Y&Wuk6{)o;C=
zgcB1pL0cp3UBgFOzI`sZ5$iS>(KRp-Zhg^8hp$gowg(h{<z&9mJh@YlVYh#1H~KSH
z&VoZHo7ddjT+m}t)1y^&*wu)SPh*EPzgY;(&az_O0vC9@{KT&{+&pikd7O=l-?F~3
zDS@G`+Iii~Pir*A?sFOqk5YLWwNA4XPl8`d($adDvc7Zzj`S}n-^oc|Sr@KYNF+xM
z=bTn$de0pSq9VCGdjWq?Y2Tj`AS+;6>k@4zze6e9a6Nxo>-fM$@5<l_OT+b7l_YN@
z8R2MmjY+KnyW2XXo1f%MHNci~dRY$idz6{)oW6^O`i@D62Hu4Fu1`fBPtY4_R5GD<
zErZm<whwbEhiidnFgV^xK1k#McQtsfA$g#Ok;aO=g;`$dnv(YV=KJu84Prf(L0dZ0
z0$gNZp(-|&@Or$0eAuTZC{6CR!|#BVI|9xhpXraOw;(KEhJpQpRGP)!75lJ-wOxrc
zwNro`C2~Xn(~#@`S3qE}01xH;apK$&s!#>U$CtkW;u0vB@a}6@aUk%f23)q}gxD3S
zy@S=GNc3<B{2#vkS03~)w-3DkKZXDQ1d_W~d-K&2f!D1bJ<Z&NMcjv${|$2PTF<-T
zT|WmGxTVavjM|v)=(P?B9!Gu~F*Eq~!#~zddJiI61{E;>YE^O-L?}R427l_gat4I*
z5?6<fL6Z%h@1$|a#ESLl`4n8ggi5wWHFxnlB}hYKqb+U^T`o8~?*0dI=EI+A(y*lU
zT&9ih?0^$9S~`Rdi`-L=O69I2WqE$JWk(5OsAyDT!SXWjNvu=L9-WEr>Rar`ofSQp
z2uN>oqTZu$eX3f+Ykk79%TN(O9?g0_4+TiEZqE`M{nbTU_Kak+SIf@E@m3ZUzryNk
z@|2YEsmxD1M?kDLkAo%@)8Wjwo|6yl08s!pi@77BYgEjPw@?R{%?qv2l`LyizG>bf
z{TM)YLq$XJ8@%_KhtK=!5ds=gvA5@yCgPX^iqDT?22<TytPBo7zR|tf9eJ_Swj!Yx
zSDnBCzD99fOA{i=q53WD;!0{<d|=vj1@X%)HUk9~Am6<Rs*3vUb1QTA<F?DP*$};T
zkemKblbt59W+MRJPM{E#{j#Ro;tLnjM4cbFt=~wK@-B^HlrqwmJ+zsua!6dCYnJk2
z04J#HVJBr(!($1vfrN;pqO!OFb0;jZlr-%&ICG^l>N14AgbWGhX1b#Q4%$j?hd^*7
zxF_9|?UUUDj*)${0>dHzKKT^h1WndizCXrdJdocDcu>au{c*I^Fq0I1C|ib@Yh?91
zHn5jT!M{NixGLQ!lBKBMwvA9UBT?}U_C7Q$SJvzYel8P2!Ae29kEAi3I7FE6E?_|8
zHhvf7->{K~yfwG<y~VD4qsLHPy`GAcRiqEA!v>D9eN|-Eztj;m%K@CvhY@bDq+|Jy
zZwAP(p1y~>n0Gc9)N5N*MWeM4ONu%;ugGROs=X_j2la(gC+TO5l(upV1K0LaKcd-x
zKSd250?!8}hO<eUCPZMU?^ML`<RhkAo;tK=*+%rmr@|t-Jh?jJX&bZT4G?gMVw`Hl
z491vyoZiawTbns9Vl>>HYLG{oHcKIG>Jz8`WtMy<{g-g*THneUkFP$HyPK2PMG|AR
zb`k409$SoaHR^zJ8j6nrHo}?pGyxAJcA^k_HGnKFImg2D_0%8<o?fl`z8v&UM4@G%
z8_;H{`#jtn?B#dFIu}V48aL}M&>2ID=U5Z2lVsS`^IUg8NoIh0^Ycf-zuK;>#=Tt}
zmgxcbmg;MOZ;84FDBtK8H^|0)rNt`uvsbLfly&EQ9<}Yh!=DWK!rxnBQmOncmdVvl
z(Y-!1idN`bPs|@7l7SEv2K1JV;Vn2JQSsJ|dPVhS8Gf~L=EF?>!4Xkb3hKx&Sh(6P
z(wa?Ogq?a=^AISRv){TKeW>|r=?HLe43B{X!=hGymo<rf$BT>e31T(o%sRXW#k_S~
z0`%u4o=md?ln&Ed+|Cr#q?s)(aS&RiVb_=GfT3Qn8<mYaeVdlVp88lrsDMmGG7q~c
z?oXy_hzV5ZG>-z3d&K&?{*cEFCZk=N<WOI>8*gY724S@`GCJ#aqr`(1T9eULfWsn{
zNQNK>sYp<1jX`W>(q0kLu#LBZu8SA3J;Q6(&H(^_PbN=}pRBakkj)WeBB~K$J|a%%
zGAKxOmTfWREZ+bP(ktKX)HPXdt`|;<s=})BI_0o`is;Qv#i^`60T$o9)Ia7^`8eq#
zr2Z@fn6Mw<Gk|6C?9aPLteZTIm-gD0sCbI$N2S?|enB!v1KRknAVLGlzc}Ed1T441
z65ty33rA@~TidQ0INSLY+x@;|d&ea5H|g+O+&9%0K7{;8F(Hq?A^)3E14xx~*kg|>
zL|CwqJ>^gA%@AwP&!ww||2?<>5*(x#|Gx$o|3sO)QLkfV8(acTfZJCu;Zw$uN-_#S
z3i{#gPynmwxWQkWY=nTstPQ*It)uCi+<#DSzek30)q(>{=Ly7n<bh}d*oC)uEuQY(
z5U?;ahs-F{+>Z+oWt|L=>*$bw33v7`T6*sl@H(5C;G^Xg0E~(_z($JNawkuH(beOt
zl<`#+$^%7#Yv?82epB?psb4ctf1?D}qs$IcQ->G0fF_{;E9VURAd9$$aIR>!H8I_&
zsh%$A&qR8d*w=GP_homFm+5y%Xecc_iP)QT8Yr{>F0h!jy%MGE!`QsEl_Ld>+P7Af
zf==#I^<LF4IjdR%_H6NM%VGTWMQ%kt69;S%gI4(R_w;L*mWP-fH)!vihn0RGA#x5?
zFeaKweYD)~7AJbL^3kcgw|?lTdWlTUv22OAaj{OCR?oeR^YMmRqqFIlG2ar&=3dUw
zH)9}2e+i#yw|bTL>a(RSo0g(5EE}XYCV>kxQ<J??|4_G|2*pjo%`m9>e5nqpqtn`u
zHB5V1>b35B7)0%+;HUEX02c9Y4v1yBK#$TN@CfHbua<|6DQi5A)@wkO;Og(epZprx
z^Cg^b`|5|mmUvP|H%~co#CLmHCjPtmjK<Yas$BUi>zeALdkZZu=bRi<p6lB|o=*2=
z=EwWBJSY`-6O9I{Y+d++G=c~lDGvd1K)|2pq;t)V>pBoC5zWl$j4$`7uHQ_!pVLVw
z^&X0@+|Q1-n&Xe~nQA<tS0udM{@6b`80qV5K7cqe)WtrS1+sb?^)2_A9Qr@)T_Ye+
z!wZ@RT%BJGpJ2Zb>fx$#AL><E_=$9Ep=D0RlAT?mZW>lA{RYZdhu;0-LNRLX?8_{J
z!p4b<)<6ssc!V^pj;`3SNO~Xj7Po94mI=%StpfFM0s$b%e*FqxQ68}Qt-j3%M?gJ=
z=IZ|;;Qpsg0H6M+!nNR+%@Y-L@xmH#vJY=R11!Xlca<1Fdnhe%7K4vKTsPbkdTrP!
z6M9i^mL0|^fSN$>-u5;<99V1>IexJ>Kr0wbN<6Dd*N?9+d0xWRRYf_&tXxg*<RogA
zlDjSmCJ{aGN1q%r0JWWG4frz|g?v%(SSifmFKga=a1q3%E}N0u#L6Nvcm@39o#S<&
zxGrzb489ws4o*lS*D8jO2tK^z>^|u>$&o>luY~%F;f&GRTUw{yo^)H`<f#w1^TyR*
zQ`=p_IVVxEM8GsV-l>Jzw~}$kxM%>HCruAW)VmBrecqS9;X(^Y_puMw)|YOktB)@*
z(C?WKEUowOQn}Lx%>#vB31B~WzbYck48;wlodPKGfC_pDVZCtf>ce-a2wKW%S>H@{
zlbdL2Hv2b<-927mEun-muBgvwjqdj)b<>LsTqkMnRL}H-{Nyy#;B`LTl(74sE|;-V
zuvGS-cAQt=Yf6*>XZZy$1nwK$bleQTb#p&T)rtAqS2jiVS6xqRac_d9DdCFz(91{H
z){drXT^q+vXZEz2B(k{5+w0M@)(JR~B$Y~LZuw+PBO!r!6h1w|eS^*zujh%};7*eZ
zFQsyiP9t?lKRTdnab6Pa%iFp~d(PuiIn#4VYnowKG&Zo>CCz0eC9zjfuby2GSu)>~
zJWue95J<q>2Myk*RZAq-YJguzMO~l@b(4z=GZW?^=T{Tof9gZ@9X^B&WpwLp57BCL
z`yhrg3S3>E=G%8E+_CSTwWZ>VU8Ni^$)Tx$srVdy&=7JlZDishJ0gqW+W>kHcmV;o
zQN=&d*Mpq1nrF=ugEn;2a&t(=O-Twpr0)61(3m!|hnh=DuLSGUeMd`F#Pj+bX_I1Z
z)Jl6!d%w4&_s5vkjLb>!dpQFMHk=3X)czh?qP8*T);KC{S>il_JS|=&2f^n~BD&)3
zJApP0@LyIG9H_iOHfVCg?k-T84*B0!C;v5>^>^FyQL+K*Nx&U~laMulto*<LX)^-h
zbN}cI`PX>p!Lz?XlrTQWWTmHruY1z)0!cY}R;B#7ZdHz-EXJEPfK`fL2N3ro6=+tw
zO}Q3!@`X#4KQS?+mK5-ockr+43l4o4bcV`3!H=*U1iZ}5Me8uJTvL`KeiOvC$PU2E
z;|hsRY7N`Thf;{{bnGwV$O6KT3DXS*>fN;E{-pLJlCCQfosXLpaJ+JbjZXO*8U@iZ
z!0cBa|6@S4U$)BE8IGZ+?a<H*x)egL7SYH!8a_n9VBAB5efUKIXW($z<||(<>^bU=
z73_uc=TnXGPF_-ikGki9%4kAD{EKK8+)+d#%}DPvS9=aW`&-yBT~enEWR2-qJJyU@
zeo#WjInN|cF(%_NA;Ak8Kt6FvQNm77r^j^|a^OC8^k!U}&YbzLTHKp2*?X~}Cv@en
z)Vqm(OF2*QF_-A?bNn<-?^NZ7DqIPeJ`!3kEPa!vDyTj_;P1rD(CIPd<yWRwa+QGK
z#W`S#@9N5YD;e+$*V_o^dE@KE-n}^YeOgqmvhPU@?*&g=lnWCfH<Oo|DsJngs)H|w
zBReth#jC&<2jsv*%+f;xK8A79-O50t(6R#L0Rh!ZzpdS2ft_0T@(GKi>1U_Q1Rvur
z{Fx5@y9WImr>@-ltFLH)sjlx+6u#f+D$Re_cJ!BeRS~qDHMofUrau2wukQXzJ94n5
z!Ap==l!B)3D)lG#Y7811lSQxMah(BRf^JHX+Tma7^a7b{!K*5p0k~2on|wK?3lf9`
zG!%bVxEH|;BRB&*vr>Hq<eJqwRevccO;f0!f_qx#_0LCUqGmOndnvZg&C_Ep8L}P;
z{kB=CY=BGiLtE8ZmUyYc+S#Y<D-~Kh9cy6WOMPKWeTyUup5hwXBAKi|vss_KKeT!a
zyR#wPdYY<mj^L5P-*k~Fl<}iAN~x3R{F9a<IiW!UmrHYIpWc#9T?%a={dQ+?Ag41}
zF5!ZV@q^aAV-^SWZf2*WcILF1sk@YKl)u>zhAr%e*!#X_V}4%&9pDcB#}3X{NmVY4
z{6%Ww`hJrdNuf9|Gi+fYbhdBB>3N#N04<ywooE};GF0Oz8-7}a1{-Rs|Hu>K1W3*!
z>YIR2sQ_homT!}9`Fgq~@M<UF1fK?drsuS3IO%c&6I^3cD2EIoF%<J|s_csH?G8?R
zcKzvaoC6>)&+NNFM(OB*4FBFCG9jR?qWT{)?z;4SsL)P*U(4`;;vix3{;-Io5Jh7+
zo3pMM%Hbr%&dP7&(+7>)*?TT$>XQ<g6%$_0OYoFLr}}0hwy{|Aia}8?`agDEYBQ2h
z3{JT31;6z3L(9H$ubZyeM6lG%I8L-AzwX?3Oe2cxq?l%6En+sQxP1yM?`L%~?bk06
zFkPL=8d&+5nQ^fC8#~8pc*Z?Kg2(3o`vW-k_pdYLYmLD-0M1JcsFiMc5j9kfyq#A-
zNeJ951hfVXi2qBY$KM<2{?h2b8_FNeB`3ja3_W<){qfnq?JogL8dtVv)HY5Ayb1&?
zRRr8OcJUVY?9(~$&^cj4NThG4onS&lhkB{*POXgLj@hp?%<cd@kj|5jfIycT?-nBA
zE`@&{Uj1JIfT|FL?L8l0odbC1{HMQV3U!solqodmorvZ!0SJ)G^>=f*wDHXB|4R7x
z(<>7M_G-k&Q{DUSGetN)!EKsb1NKmMnkoU<gXKRam(o?a&dzjo<S_5F2eKcPN+@pZ
zwi;R!EWVt}KzZ$CWzI3r-SS^}{)v9aE<cwN%n04)%Ri+v>KLW*pe&A%K%VdKOMmg`
zyJz=o+O@*I$#DfJ>UA8+rL6$n($K0a;gRxFPdan513je*E2-?hDcFOHtGpw+80$aS
zI>457{7d2AClu9jy1If2XL#x_TS7$eEM5MeRx!n=F;<ULmNcY$`kUo%n1pQYBBosH
znyl>gi)+aCSxcUY?~Wb~<g}PXSM3c3vY7c<DFYI|`40)WJ`>TPXvnFNe&xx1tyzQR
z51SYeLnR|*)&<q>Z1Cr>0rXz#QP$iU2)0@{Br%J9Fr_k1(^r%F%OV~V0{Uy#S;T%%
ziLIR1k_c)#@84D+bub+)IWz9hUy=_A^}TPuKZ{KYyeGT9%jSA3y6gN(#O{XGl!SYn
zcwud<d`t0sNxFNq(L(^BIe_Km{^Ihtp8*1W7OC_Hmj}|7fC~TjZKVIyexR=nc$47h
z{J6xg@6hO)EvZt0yz%XIxu8GMBmTxSpvJXQcJM7r`B&jjEs+D@nZnnjV}!OBdmU*y
z?_33TCcJm;E|44%2CIQ4Yn-Q90JFH2t_n#J!1D~@5N5Eh5FMVn&?%EcE<9Ea1?)_|
z?J|&1!dKYv1vT40Tb%TS@lYfj#XJgu*jg|3WmPzi^G}vrhjSSaudJ-x0qR^pBNTI(
znX(`)S$#<D$?2bY&Tu%sJ?z;FP<{fu=y{Rbzc%PZixt7yY%hRTsDHP<y!XI2kUcCS
z2j2f@;xXN6vO;OGFN?>zJtjF(N7h8td5W#kdn1N19KJ(>UtblCLUAvA8LMG$Ul>I%
zrmY-%laG>9Tlk#d<B?lJ26?-k{z~NWfuC5x!B3GD3;J53B`+gX-84mc>J<m4WuaB*
zP&5EydxLv^P7;4eChmWe(%T{V#gyW%@X&q@V5ab!hf~E{sVPP|LC{$zMdq8s9V)kY
z!pv5qBL5TyKE=YYHeQBE)Rt6>k=eU1gztU;lG58XDv+bF=kWXSs+e%A_|Y`7{TD_C
zH~U^dE?DWSuC!yMeks!<8U-NtZ=P;aX%`*EBsbUd9O*7WD`Xdy#yDs~k;P}}U?*Rs
z0txX_lCu6W!in&j`8l-5_~$7C*|=tt-GiU8h|WY#4P#?OPo~81jKJsK;`8cR8bVVX
z988wDfQ=Jyd>vlp2Cjw}W`Oi)(`5W>klVgMUfognd|pm&8qn1-x%jj3yrMqj+&PEk
z=EISAG8ML{T!<$i0_Tmnl1RKtQC<eh57%)rEZl4jn%3P<p@SRO)o$XI@lP2)2GXYg
zS+sa?{TiMLU1L?{1M3UGRbS@e6FRw;7Zf15cEa)a@-EA@%iwb&uLs2dFqdZq>ejE%
z4c<zyrU6_%{^<$TeBH3>e`j=mBUuYnc%yt4Oz>ZM+CzEY?Orif`~Z(6QpjF~@3)?~
zr#{1PM&k$RPUy)3eJ&aGug7XL!GRy-0?zL&e12Ef@@v0q3#2=p?R>HG;KLQ)G@m}m
zVV`#^E4605d}-r`q{+?@xN!8N%uKNFMiN)W(Z;EE4Qd;kVcTux$uE%QnX-Ox&~7`w
zK8ZE5FRbm={SNe+{8H|l7<pHwT4}GBGlBDF^{(iwp>o@lnK_U8o(Zp-o<OgP>thyt
z-n`BC?0B;!zAIW0p_YP<3?_F@HoC`N3Z!UJa(2BS;g2(>7Kphv<I4Yl4JXi~Yaw|S
z;OmRESvei6&Bt-d#X|*5C>+HMeHOxg?+;j~1=IMP_xq=%7ToWkt#|q7w(cDsErQ&!
zl|h_8vybR$8~0eTlgUhR29mMyrL#JnJr~ENRQAr=NW0$2?y&e`!sU{j6FEBjUh*eo
zGabukOKwQ}TCWTh^=il+#WOUm3;Ifs$A`}2vKbB*#ZZIRG4Wa+ixB4*6#jebzfOMF
zjp!(YsnH~*%!0!keUf%Oo??wcMh6M}%sG0*%&gLBZ**3jNv_&ahidN_GT%o17(L?(
zQz`83cfqCc!eDQQUvA%*dLUS61CDtxff=#jeyt;+-Zx>pKaGka3Gou*zqa4a<fS|3
zz7U4(5o=+Y?w8c?%7)df6WhGTNzKP!3yxxF+Sc}6neng<V&)=Bj-W(+uWe!1ki(hO
z@2x=*(X}%a^xyp*5JWLu9T(H$UiZZ<HKUJ0HEb;wZ~5lV8XM;o782nd;aD5v^7MuS
zLIv7rz~OY99|hglJDiz{?N}ZSVrOMK);Juu-9QAH9LP?dOt}mm`*e~ak%vJ7WYWja
zW*RU?g@{c{wtO>TKU+3_FrrU2QvDDRwB&X<e_S-C45sCEF`=9@E{?k83^qyc<PAIB
zcE4RDMWY&drQ?%ppux>kBqu5%7i~~!*I5>zA%wQ?5D5<GX%x2Dd)7E#W=M^1l*MDh
z12U<Owdl7b##G1|`){50<EPb`RY#%jpF^4AbOij%0v<ofV1O-2*?glkhBvXhZ(EOd
z=U61glbs$1U1&Gw5c8U$*){M>%D3KmP|NGHE_pXb()MXCbHg|f7)=seEKX^~g!y>f
zm8XOqAq%=?+Ooqw>EFeL{p?WKsbQbVf;(GlMauJY5}jk2lyk{^8n`Ir?!e6Ql~%|~
zL##Q;PSJ`&@H?>FrEGuF-*P3z9<8J{ikS&m8=Wy7juXvuw)0ErpZadO9exR6MYh$R
z#2<U$^suX+jBV#zVA%Gv6VXny`1l@MTG~-rGZ&NFQmgIKR-YGS4RzOfRd0bwR5TVt
zghJBij2vQ--%G@@OXZdrCME2mnr?fQtV<m|@;#m1NLdOx+qd1Ap5q`3*m<q2I5z8J
zeWX=vCu&pWv^g5)M1$s?jA{|)B||Ml4eHH`*jGule?|C#2Z`;W>ZrY@Q6-z7-=cpT
zxL4eG?DAa0mir+BH;w%H^0e@H7?^=<_Ou<_mmw(VwCJB-_x4uf{(3@C)1oz23So!z
zF6-&oIOb(#YTnyNE&4`e7~O+3xi9o36~U7*j9eKKYQ6`TmJu6G1~pMP`5MnQ$!s?^
zPO_z$hJ>6_dk#NSBVRcTa|h`wf6ZOQDVSLfpyfGAQq77Lt-j{5u{^m`-Y)(b#9;8)
zz#IbfBm8oKYnDX5C)sgp<7c%t8@`BuvxTxwrg<9G&pXd@h(ggPiO5}J3xwK!0926L
z9!X|rgLD=O%^9~x7Cpq>$bpYYvQ`*PPgQi0%@dqp)9kx2-c76=EdJ+eh@LWeCOtI|
zc+!=isd^14^>==#q$!2hVZW~z?$TylBfbL$mXRHRRr^ar5y`V3Bn9Tp11sujcjITt
zy7ek$c~wr2Ww0})y%qKTiA`r+t#NV<T&x?ZiSgby)T5f0P6X{g_3FvJQGxBllU$s3
zBQ%Z|NPAk%>vTykQB>5ve{ZaKiqx?g$IaQZ+5Fr%EtLj+z%0ME-DXE5!TMDN?qNU?
zYGE}phM+Aq9Z!%+qZd9lAb20nh}@+&aE0Evd%9T>Ww!feR9Sfp^MGexrt*H^Zr2)i
zPGgQW$W2T6ls7KcTcD={q#@{z6cBXZ6=-Fx#Hh`c&`Eb8^Qx{V?!Be;XnUOOuQU^E
zB1ct;L%VJy$9Xs16^)@~ec8HsapiO~9EAveE`9xjVi=O?R6*3-&*4by!waFCb2`0`
zvdkOqfb~M*hGyw+Ejz!pS;xw}z+>01gG(8i#$>S;_MRmjPreD_7AwiJwL#*4u9Lyk
zJUBy*?K2g^w%#B*hkd9#cLq_`_Cvxdta@SYKh<O5%dA^6;4RvOI(TXVtwQ4!K>%bB
zoLULZDmQ5p<3!pSIfu0+l#DEV-#E2wD*9qw&x}%tC@R=;Ss(7U%ki62n=zN=_eRll
zx}|95;gmBov}5V`wjZZ~BKG`o+w&!Kx<7|{itoMqg{%PboTi73cX*hJb<0`o5_V=L
z$4}=pwRLpJ^)s++WKybjd`@^Cu(=Wyu(K64gWa)7leVpR+BC4RGZaK7b*t59^=-w5
z`3ARI$MigZ#<!T{9AGV8KtqXjafJichU>I<o`%?j{KNXm20{h!KilSD41t{C{d#xy
z-{&bcuvXIH>21#GEi=MzZ4XmCUB!yh`nC~c{So#^9THmF8evu@KVjA!6Oa5Vxozuu
zSm%4eptXR)@Ke}?!lC>t=EiTah^2X)1=kB9mUm_K9D6G?C)x2@a;N1bl8ZDZbX7b7
z7!UWKfEA3@d%PCC8`0ON{ad-cb8E>?fM28#g|>dqS&hq?@h&)Sm5NOaf*!EcKRPr<
zVhRhoi=q69FAL0sb1CwG9j^r`dG}Y3chv|4nJi}d6-&#)8usZ8dV4wm4;vc@K*5Q3
zE6?=#VBhUiT=&$qizyfSFXEkN3IIyzyJypPj;hgO{0(|8t=^?G&5wd-nm76DE3LDu
z=EwOfZ)S=-?7o9(V@%y;tv7XP)XJ_uwDU!`-~ir2bb~)hB)G^aTgbjc9bWNh5d7yR
znAQO^ht;|D%k2N6l74mPPaXyVE~zc75z|2OCnOT#+Qj6U_-CH9Gva+A!BuG@vYSa_
v^8uA+kSf5q2y*50h$ABKk3N3fzH@lCx|9+!?^jw4+#pa>(uR~OJ`DK}XhZ3I

diff --git a/SCrawler.PluginProvider/Attributes/Attributes.vb b/SCrawler.PluginProvider/Attributes/Attributes.vb
index 9d2e3d7..f0f8389 100644
--- a/SCrawler.PluginProvider/Attributes/Attributes.vb
+++ b/SCrawler.PluginProvider/Attributes/Attributes.vb
@@ -53,6 +53,9 @@ Namespace Plugin.Attributes
             ElementName = XMLElementName
         End Sub
     End Class
+    ''' <summary>Attribute to disable some properties for host use</summary>
+    <AttributeUsage(AttributeTargets.Property, AllowMultiple:=False, Inherited:=False)> Public NotInheritable Class DoNotUse : Inherits Attribute
+    End Class
     ''' <summary>Special property updater</summary>
     <AttributeUsage(AttributeTargets.Method, AllowMultiple:=True, Inherited:=False)> Public NotInheritable Class PropertyUpdater : Inherits Attribute
         Public ReadOnly Name As String
diff --git a/SCrawler.PluginProvider/My Project/AssemblyInfo.vb b/SCrawler.PluginProvider/My Project/AssemblyInfo.vb
index 89259fb..2855725 100644
--- a/SCrawler.PluginProvider/My Project/AssemblyInfo.vb	
+++ b/SCrawler.PluginProvider/My Project/AssemblyInfo.vb	
@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2022.10.18.0")>
-<Assembly: AssemblyFileVersion("2022.10.18.0")>
+<Assembly: AssemblyVersion("2022.10.23.0")>
+<Assembly: AssemblyFileVersion("2022.10.23.0")>
 <Assembly: NeutralResourcesLanguage("en")>
diff --git a/SCrawler/API/Base/UserDataBase.vb b/SCrawler/API/Base/UserDataBase.vb
index ee08159..14217c8 100644
--- a/SCrawler/API/Base/UserDataBase.vb
+++ b/SCrawler/API/Base/UserDataBase.vb
@@ -817,6 +817,9 @@ BlockNullPicture:
                 If Not Responser Is Nothing Then Responser.Dispose()
                 Responser = New Response
                 If Not HOST.Responser Is Nothing Then Responser.Copy(HOST.Responser)
+                'TODO: remove
+                Responser.DecodersError = New ErrorsDescriber(EDP.SendInLog + EDP.ReturnValue) With {
+                    .DeclaredMessage = New MMessage($"SymbolsConverter error: [{ToStringForLog()}]", ToStringForLog())}
 
                 Dim UpPic As Boolean = Settings.ViewModeIsPicture AndAlso GetPicture(Of Image)(False) Is Nothing
                 Dim sEnvir() As Boolean = {UserExists, UserSuspended}
@@ -976,7 +979,7 @@ BlockNullPicture:
                         Dim v As UserMedia
 
                         Using w As New OptionalWebClient(Me)
-                            If vsf Then SFileShares.SFileExists($"{MyDir}\Video\", SFO.Path)
+                            If vsf Then CSFileP($"{MyDir}\Video\").Exists(SFO.Path)
                             Progress.Maximum += _ContentNew.Count
                             For i = 0 To _ContentNew.Count - 1
                                 ThrowAny(Token)
diff --git a/SCrawler/API/Instagram/UserData.vb b/SCrawler/API/Instagram/UserData.vb
index 04b9e5a..82c4ef2 100644
--- a/SCrawler/API/Instagram/UserData.vb
+++ b/SCrawler/API/Instagram/UserData.vb
@@ -702,7 +702,7 @@ Namespace API.Instagram
                 UserExists = False
             ElseIf Responser.StatusCode = HttpStatusCode.BadRequest Then
                 HasError = True
-                MyMainLOG = $"Instagram credentials have expired [{CInt(Responser.StatusCode)}]: {ToString()} [{s}]"
+                MyMainLOG = $"Instagram credentials have expired [{CInt(Responser.StatusCode)}]: {ToStringForLog()} [{s}]"
                 DisableSection(s)
             ElseIf Responser.StatusCode = HttpStatusCode.Forbidden And s = Sections.Tagged Then
                 Return 3
diff --git a/SCrawler/API/Reddit/Channel.vb b/SCrawler/API/Reddit/Channel.vb
index ccb4078..fcc9d25 100644
--- a/SCrawler/API/Reddit/Channel.vb
+++ b/SCrawler/API/Reddit/Channel.vb
@@ -236,8 +236,19 @@ Namespace API.Reddit
             Return If(Name.IsEmptyString, ID, Name)
         End Function
         Friend Sub Delete()
-            File.Delete(, SFODelete.DeleteToRecycleBin)
-            FilePosts.Delete(, SFODelete.DeleteToRecycleBin)
+            Dim f As SFile = ChannelsCollection.ChannelsDeletedPath
+            With File
+                f.Name = .Name
+                f.Extension = .Extension
+                .Copy(f,, True, SFODelete.DeleteToRecycleBin)
+                .Delete(, SFODelete.DeleteToRecycleBin)
+            End With
+            With FilePosts
+                f.Name = .Name
+                f.Extension = .Extension
+                .Copy(f,, True, SFODelete.DeleteToRecycleBin)
+                .Delete(, SFODelete.DeleteToRecycleBin)
+            End With
         End Sub
         Friend Sub DownloadData(ByVal Token As CancellationToken, Optional ByVal SkipExists As Boolean = True,
                                 Optional ByVal p As MyProgress = Nothing)
diff --git a/SCrawler/API/Reddit/ChannelsCollection.vb b/SCrawler/API/Reddit/ChannelsCollection.vb
index cd4f776..799c496 100644
--- a/SCrawler/API/Reddit/ChannelsCollection.vb
+++ b/SCrawler/API/Reddit/ChannelsCollection.vb
@@ -17,6 +17,11 @@ Namespace API.Reddit
                 Return $"{SettingsFolderName}\Channels\"
             End Get
         End Property
+        Friend Shared ReadOnly Property ChannelsDeletedPath As SFile
+            Get
+                Return $"{SettingsFolderName}\ChannelsDeleted\"
+            End Get
+        End Property
         Friend Shared ReadOnly Property ChannelsPathCache As SFile
             Get
                 Return $"{Settings.GlobalPath.Value.PathWithSeparator}_CachedData\"
diff --git a/SCrawler/API/Reddit/SiteSettings.vb b/SCrawler/API/Reddit/SiteSettings.vb
index 1dadc94..a2bea8c 100644
--- a/SCrawler/API/Reddit/SiteSettings.vb
+++ b/SCrawler/API/Reddit/SiteSettings.vb
@@ -79,10 +79,15 @@ Namespace API.Reddit
                         If Silent Then
                             Return False
                         Else
-                            Return MsgBoxE({"Over the past hour, Reddit has received an average of " &
-                                            avg.NumToString(New ANumbers With {.FormatOptions = ANumbers.Options.GroupIntegral}) & " outage reports:" & vbCr &
-                                            dl.ListToString(vbCr) & vbCr & vbCr &
-                                            "Do you want to continue parsing Reddit data?", "There are outage reports on Reddit"}, vbYesNo) = vbYes
+                            If MsgBoxE({"Over the past hour, Reddit has received an average of " &
+                                        avg.NumToString(New ANumbers With {.FormatOptions = ANumbers.Options.GroupIntegral}) & " outage reports:" & vbCr &
+                                        dl.ListToString(vbCr) & vbCr & vbCr &
+                                        "Do you want to continue parsing Reddit data?", "There are outage reports on Reddit"}, vbYesNo) = vbYes Then
+                                DirectCast(Settings(RedGifs.RedGifsSiteKey).Source, RedGifs.SiteSettings).UpdateTokenIfRequired()
+                                Return True
+                            Else
+                                Return False
+                            End If
                         End If
                     End If
                 End If
diff --git a/SCrawler/API/Reddit/UserData.vb b/SCrawler/API/Reddit/UserData.vb
index 368a9ab..dc1284e 100644
--- a/SCrawler/API/Reddit/UserData.vb
+++ b/SCrawler/API/Reddit/UserData.vb
@@ -793,7 +793,7 @@ Namespace API.Reddit
                                                                        End Function
                         Dim m$
                         Using w As New WebClient
-                            If vsf Then SFileShares.SFileExists($"{MyDir}\Video\", SFO.Path)
+                            If vsf Then CSFileP($"{MyDir}\Video\").Exists(SFO.Path)
                             Progress.Maximum += _ContentNew.Count
                             For i = 0 To _ContentNew.Count - 1
                                 ThrowAny(Token)
@@ -850,7 +850,7 @@ Namespace API.Reddit
                                             End If
                                             If Not v.Type = UTypes.m3u8 Or Not f.IsEmptyString Then
                                                 Select Case v.Type
-                                                    Case UTypes.Picture : DownloadedPictures(False) += 1
+                                                    Case UTypes.Picture, UTypes.GIF : DownloadedPictures(False) += 1
                                                     Case UTypes.Video, UTypes.m3u8 : DownloadedVideos(False) += 1
                                                 End Select
                                                 If Not IsChannel Or Not SaveToCache Then
@@ -897,19 +897,20 @@ Namespace API.Reddit
         End Sub
         Protected Overrides Function DownloadingException(ByVal ex As Exception, ByVal Message As String, Optional ByVal FromPE As Boolean = False,
                                                           Optional ByVal EObj As Object = Nothing) As Integer
-            If Responser.StatusCode = HttpStatusCode.NotFound Then
-                UserExists = False
-            ElseIf Responser.StatusCode = HttpStatusCode.Forbidden Then
-                UserSuspended = True
-            ElseIf Responser.StatusCode = HttpStatusCode.BadGateway Or
-                   Responser.StatusCode = HttpStatusCode.ServiceUnavailable Then
-                MyMainLOG = $"[{CInt(Responser.StatusCode)}] Reddit is currently unavailable ({ToString()})"
-            ElseIf Responser.StatusCode = HttpStatusCode.GatewayTimeout Then
-                Return 1
-            Else
-                If Not FromPE Then LogError(ex, Message) : HasError = True
-                Return 0
-            End If
+            With Responser
+                If .StatusCode = HttpStatusCode.NotFound Then
+                    UserExists = False
+                ElseIf .StatusCode = HttpStatusCode.Forbidden Then
+                    UserSuspended = True
+                ElseIf .StatusCode = HttpStatusCode.BadGateway Or .StatusCode = HttpStatusCode.ServiceUnavailable Then
+                    MyMainLOG = $"[{CInt(Responser.StatusCode)}] Reddit is currently unavailable ({ToString()})"
+                ElseIf .StatusCode = HttpStatusCode.GatewayTimeout Then
+                    Return 1
+                Else
+                    If Not FromPE Then LogError(ex, Message) : HasError = True
+                    Return 0
+                End If
+            End With
             Return 1
         End Function
         Protected Overrides Sub Dispose(ByVal disposing As Boolean)
diff --git a/SCrawler/API/Redgifs/SiteSettings.vb b/SCrawler/API/Redgifs/SiteSettings.vb
index a88f497..a963252 100644
--- a/SCrawler/API/Redgifs/SiteSettings.vb
+++ b/SCrawler/API/Redgifs/SiteSettings.vb
@@ -9,13 +9,16 @@
 Imports SCrawler.API.Base
 Imports SCrawler.Plugin
 Imports SCrawler.Plugin.Attributes
+Imports PersonalUtilities.Functions.XML
 Imports PersonalUtilities.Functions.RegularExpressions
 Imports PersonalUtilities.Tools.WEB
+Imports PersonalUtilities.Tools.WebDocuments.JSON
 Imports UTypes = SCrawler.API.Base.UserMedia.Types
 Imports UStates = SCrawler.API.Base.UserMedia.States
 Namespace API.RedGifs
     <Manifest(RedGifsSiteKey)>
     Friend Class SiteSettings : Inherits SiteSettingsBase
+#Region "Declarations"
         Friend Overrides ReadOnly Property Icon As Icon
             Get
                 Return My.Resources.SiteResources.RedGifsIcon_32
@@ -28,7 +31,11 @@ Namespace API.RedGifs
         End Property
         <PropertyOption(AllowNull:=False, ControlText:="Token", ControlToolTip:="Bearer token")>
         Friend Property Token As PropertyValue
+        <PXML> Friend Property TokenLastDateUpdated As PropertyValue
+        <DoNotUse> Friend ReadOnly Property NoCredentialsResponser As Response
         Private Const TokenName As String = "authorization"
+#End Region
+#Region "Initializer"
         Friend Sub New()
             MyBase.New(RedGifsSite, "redgifs.com")
             Dim t$ = String.Empty
@@ -40,17 +47,83 @@ Namespace API.RedGifs
                 If .Headers.Count > 0 AndAlso .Headers.ContainsKey(TokenName) Then t = .Headers(TokenName)
                 If b Then .SaveSettings()
             End With
+            NoCredentialsResponser = New Response($"{SettingsFolderName}\Responser_{RedGifsSite}_NC.xml") With {
+                .CookiesEncryptKey = SettingsCLS.CookieEncryptKey,
+                .CookiesDomain = "redgifs.com"
+            }
+            With NoCredentialsResponser
+                If .File.Exists Then
+                    .LoadSettings()
+                Else
+                    .Cookies = New CookieKeeper(.CookiesDomain) With {.EncryptKey = SettingsCLS.CookieEncryptKey}
+                    .SaveSettings()
+                End If
+            End With
             Token = New PropertyValue(t, GetType(String), Sub(v) UpdateResponse(v))
+            TokenLastDateUpdated = New PropertyValue(Now.AddYears(-1), GetType(Date))
             UrlPatternUser = "https://www.redgifs.com/users/{0}/"
             UserRegex = RParams.DMS("[htps:/]{7,8}.*?redgifs.com/users/([^/]+)", 1)
             ImageVideoContains = "redgifs"
         End Sub
+#End Region
+#Region "Response updater"
         Private Sub UpdateResponse(ByVal Value As String)
             With Responser.Headers
                 If .Count = 0 OrElse Not .ContainsKey(TokenName) Then .Add(TokenName, Value) Else .Item(TokenName) = Value
                 Responser.SaveSettings()
             End With
         End Sub
+#End Region
+#Region "Token updaters"
+        Friend Function UpdateTokenIfRequired() As Boolean
+            Dim d As Date? = AConvert(Of Date)(TokenLastDateUpdated.Value, AModes.Var, Nothing)
+            If Not d.HasValue OrElse d.Value < Now.AddDays(-1) Then
+                Return UpdateToken()
+            Else
+                Return True
+            End If
+        End Function
+        <PropertyUpdater(NameOf(Token))>
+        Friend Function UpdateToken() As Boolean
+            Try
+                Dim r$
+                Dim NewToken$ = String.Empty
+                Using resp As New Response : r = resp.GetResponse("https://api.redgifs.com/v2/auth/temporary",, EDP.ThrowException) : End Using
+                If Not r.IsEmptyString Then
+                    Dim j As EContainer = JsonDocument.Parse(r)
+                    If Not j Is Nothing Then
+                        NewToken = j.Value("token")
+                        j.Dispose()
+                    End If
+                End If
+                If Not NewToken.IsEmptyString Then
+                    Token.Value = $"Bearer {NewToken}"
+                    TokenLastDateUpdated.Value = Now
+                    Return True
+                Else
+                    Return False
+                End If
+            Catch ex As Exception
+                Return ErrorsDescriber.Execute(EDP.SendInLog, ex, "[API.RedGifs.SiteSettings.UpdateToken]", False)
+            End Try
+        End Function
+#End Region
+#Region "Update settings"
+        Private _LastTokenValue As String = String.Empty
+        Friend Overrides Sub BeginEdit()
+            _LastTokenValue = AConvert(Of String)(Token.Value, AModes.Var, String.Empty)
+            MyBase.BeginEdit()
+        End Sub
+        Friend Overrides Sub Update()
+            Dim NewToken$ = AConvert(Of String)(Token.Value, AModes.Var, String.Empty)
+            If Not _LastTokenValue = NewToken Then TokenLastDateUpdated.Value = Now
+            MyBase.Update()
+        End Sub
+        Friend Overrides Sub EndEdit()
+            _LastTokenValue = String.Empty
+            MyBase.EndEdit()
+        End Sub
+#End Region
         Friend Overrides Function GetInstance(ByVal What As ISiteSettings.Download) As IPluginContentProvider
             Return New UserData
         End Function
@@ -84,7 +157,7 @@ Namespace API.RedGifs
             Return $"https://www.redgifs.com/watch/{PostID}"
         End Function
         Friend Overrides Function BaseAuthExists() As Boolean
-            Return If(Responser.Cookies?.Count, 0) > 0 AndAlso ACheck(Token.Value)
+            Return UpdateTokenIfRequired() AndAlso ACheck(Token.Value)
         End Function
     End Class
 End Namespace
\ No newline at end of file
diff --git a/SCrawler/API/Redgifs/UserData.vb b/SCrawler/API/Redgifs/UserData.vb
index be6dbeb..1042d77 100644
--- a/SCrawler/API/Redgifs/UserData.vb
+++ b/SCrawler/API/Redgifs/UserData.vb
@@ -20,6 +20,11 @@ Namespace API.RedGifs
         Friend Const DataGone As HttpStatusCode = HttpStatusCode.Gone
         Private Const PostDataUrl As String = "https://api.redgifs.com/v2/gifs/{0}?views=yes&users=yes"
 #Region "Base declarations"
+        Private ReadOnly Property MySettings As SiteSettings
+            Get
+                Return DirectCast(HOST.Source, SiteSettings)
+            End Get
+        End Property
         Protected Overrides Sub LoadUserInformation_OptionalFields(ByRef Container As XmlFile, ByVal Loading As Boolean)
         End Sub
 #End Region
@@ -29,15 +34,21 @@ Namespace API.RedGifs
         End Sub
 #End Region
 #Region "Download functions"
+        Private NoCredentialsResponser As Response
         Protected Overrides Sub DownloadDataF(ByVal Token As CancellationToken)
-            ReparseMissing(Token)
-            DownloadData(1, Token)
+            Try
+                NoCredentialsResponser = MySettings.NoCredentialsResponser.Copy
+                DownloadData(1, Token)
+            Finally
+                NoCredentialsResponser.Dispose()
+            End Try
         End Sub
         Private Overloads Sub DownloadData(ByVal Page As Integer, ByVal Token As CancellationToken)
             Dim URL$ = String.Empty
             Try
-                URL = $"https://api.redgifs.com/v2/users/{Name}/search?order=recent&page={Page}"
-                Dim r$ = Responser.DownloadString(URL, EDP.ThrowException)
+                Dim _page As Func(Of String) = Function() If(Page = 1, String.Empty, $"&page={Page}")
+                URL = $"https://api.redgifs.com/v2/users/{Name}/search?order=recent{_page.Invoke}"
+                Dim r$ = NoCredentialsResponser.GetResponse(URL,, EDP.ThrowException)
                 Dim postDate$, postID$
                 Dim pTotal% = 0
                 If Not r.IsEmptyString Then
@@ -59,7 +70,7 @@ Namespace API.RedGifs
                 End If
                 If pTotal > 0 And Page < pTotal Then DownloadData(Page + 1, Token)
             Catch ex As Exception
-                ProcessException(ex, Token, $"data downloading error [{URL}]")
+                ProcessException(ex, Token, $"data downloading error [{URL}]",, True)
             End Try
         End Sub
 #End Region
@@ -129,7 +140,7 @@ Namespace API.RedGifs
                 End If
             Catch dex As ObjectDisposedException When Disposed
             Catch ex As Exception
-                ProcessException(ex, Token, $"missing data downloading error")
+                ProcessException(ex, Token, $"missing data downloading error",, False)
             Finally
                 If Not Disposed And rList.Count > 0 Then
                     For i% = rList.Count - 1 To 0 Step -1 : _ContentList.RemoveAt(rList(i)) : Next
@@ -192,9 +203,12 @@ Namespace API.RedGifs
                 End If
                 Return Nothing
             Catch ex As Exception
-                If Not Responser Is Nothing AndAlso Responser.Client.StatusCode = DataGone Then _
-                   Return New UserMedia With {.State = DataGone}
-                Return ErrorsDescriber.Execute(EDP.SendInLog, ex, $"[API.RedGifs.UserData.GetDataFromUrlId({URL})]", New UserMedia)
+                If Not Responser Is Nothing AndAlso (Responser.Client.StatusCode = DataGone Or Responser.Client.StatusCode = HttpStatusCode.NotFound) Then
+                    Return New UserMedia With {.State = DataGone}
+                Else
+                    Return ErrorsDescriber.Execute(EDP.SendInLog, ex, $"[API.RedGifs.UserData.GetDataFromUrlId({URL})]",
+                                                   New UserMedia With {.State = UStates.Missing})
+                End If
             End Try
         End Function
 #End Region
@@ -218,8 +232,22 @@ Namespace API.RedGifs
 #Region "Exception"
         Protected Overrides Function DownloadingException(ByVal ex As Exception, ByVal Message As String, Optional ByVal FromPE As Boolean = False,
                                                           Optional ByVal EObj As Object = Nothing) As Integer
-            If Responser.StatusCode = HttpStatusCode.NotFound Then
+            Dim IsNoCredentialsResponser As Boolean = AConvert(Of Boolean)(EObj, False)
+            Dim s As WebExceptionStatus = -1
+            Dim sc As HttpStatusCode = -1
+            If IsNoCredentialsResponser Then
+                If Not NoCredentialsResponser Is Nothing Then
+                    s = NoCredentialsResponser.Status
+                    sc = NoCredentialsResponser.StatusCode
+                End If
+            Else
+                s = Responser.Client.Status
+                sc = Responser.Client.StatusCode
+            End If
+            If sc = HttpStatusCode.NotFound Or s = DataGone Then
                 UserExists = False
+            ElseIf sc = HttpStatusCode.Unauthorized Then
+                MyMainLOG = $"RedGifs credentials have expired [{CInt(sc)}]: {ToStringForLog()}"
             Else
                 If Not FromPE Then LogError(ex, Message) : HasError = True
                 Return 0
diff --git a/SCrawler/API/Twitter/UserData.vb b/SCrawler/API/Twitter/UserData.vb
index 105ccc0..605de2e 100644
--- a/SCrawler/API/Twitter/UserData.vb
+++ b/SCrawler/API/Twitter/UserData.vb
@@ -355,18 +355,20 @@ Namespace API.Twitter
 #Region "Exception"
         Protected Overrides Function DownloadingException(ByVal ex As Exception, ByVal Message As String, Optional ByVal FromPE As Boolean = False,
                                                           Optional ByVal EObj As Object = Nothing) As Integer
-            If Responser.StatusCode = HttpStatusCode.NotFound Then
-                UserExists = False
-            ElseIf Responser.StatusCode = HttpStatusCode.Unauthorized Then
-                UserSuspended = True
-            ElseIf Responser.StatusCode = HttpStatusCode.BadRequest Then
-                MyMainLOG = "Twitter has invalid credentials"
-            ElseIf Responser.StatusCode = HttpStatusCode.ServiceUnavailable Then
-                MyMainLOG = $"Twitter is currently unavailable ({ToString()})"
-            Else
-                If Not FromPE Then LogError(ex, Message) : HasError = True
-                Return 0
-            End If
+            With Responser
+                If .StatusCode = HttpStatusCode.NotFound Then
+                    UserExists = False
+                ElseIf .StatusCode = HttpStatusCode.Unauthorized Then
+                    UserSuspended = True
+                ElseIf .StatusCode = HttpStatusCode.BadRequest Then
+                    MyMainLOG = "Twitter has invalid credentials"
+                ElseIf .StatusCode = HttpStatusCode.ServiceUnavailable Or .StatusCode = HttpStatusCode.InternalServerError Then
+                    MyMainLOG = $"[{CInt(.StatusCode)}] Twitter is currently unavailable ({ToString()})"
+                Else
+                    If Not FromPE Then LogError(ex, Message) : HasError = True
+                    Return 0
+                End If
+            End With
             Return 1
         End Function
 #End Region
diff --git a/SCrawler/Channels/ChannelsStatsForm.vb b/SCrawler/Channels/ChannelsStatsForm.vb
index 7b3d3e4..f415a9c 100644
--- a/SCrawler/Channels/ChannelsStatsForm.vb
+++ b/SCrawler/Channels/ChannelsStatsForm.vb
@@ -20,6 +20,7 @@ Friend Class ChannelsStatsForm
             .MyViewInitialize()
             .AddOkCancelToolbar()
             If Settings.Channels.Count > 0 Then RefillList() Else MsgBoxE("Channels not found", vbExclamation)
+            .DelegateClosingChecker = False
             .EndLoaderOperations()
         End With
     End Sub
diff --git a/SCrawler/Content/Icons/TagIcon_32.ico b/SCrawler/Content/Icons/TagIcon_32.ico
new file mode 100644
index 0000000000000000000000000000000000000000..8fee8e30c0721a3d60a5f58c327753383d43fa9f
GIT binary patch
literal 5430
zcmeI0drZ?;6vuBDBg>X0I-^@+jAU*`_fnT_W||<&(1}i+bCDn_FkrY1-KI=L9N+_1
zN}&}B$Qz141qzP04iQuyQbeJxJX%`7@)DGHDbKTWe+5H$IF{_6#r~4d@BV%#_ulV4
z=bqo~NeN+*m&l?;1Y2WrWC0<o2_eSD`gal9{n54tZTN^i^mc3rLHm+d^)T;-+kYMb
zr+ucxX4{63oe%Daakbkka<ku;h$KwnVzXO>eH;&%tX*io<5LpBJx5uAEabT#C%&hT
ztq$=zRV=?(0&PudP*#;eZAB5(l;1&$KqadH{+XkVU#@+986AHm#Fr#p;+{?n;(U`D
z&U+)2<Kgt6^cM6!?S!Gh0qA(7gjQ7zwA5EK4E8*QNZ;REw-~?tCLNy|!6V{u|8=Pm
zd>+ojjpkj*zF$%ZwN>{(+us9i>Kf40N#Rj#6~ka}7mjy-HhyXVlS8?<9?rh%ijvXc
zp+OiK9)k9UT4+|tm^qpiav0L~LnPOub<0X4Mt|z~Y+)eDjOH)9krErLs45?8tdl{#
z>>kurNuc%tQYir%mq5=Gr8_@Zy7<SvCR2wq&sQUPBqNHyJT1ciTf~x*6w0;4_*ljZ
z*p@N8^OhlAuIo=(ZGFkl#c{^?7tH`b$aHipLimX11l`zDsC{~0dd?UlrU*Tcm<tac
z!#Sf5h2d_9fFT0&j{yBmdLHwi>HpW0`t7)T(?Z*A9~mF~{Qdn_Ti&(9I>FY`WQ{d)
z7&&BVvUX0aOy9FU^u>qUah??pJ2x(%^Ude7*!(u3w6r}Xht1Zl!Zn;ceqek1N$cHk
z%J%DVhVLd?=6w&^reU*Z{I^3p;b#l8O4R+y&is=_)Ac869a`_OCZFm0zW?eo2FG2S
z7F(OGKYGH-y!~2=a7-bsfM&H4G%5vB2b%g?&?u{+N%0Vx>g0NAWzfVR1!-v^#PZIK
zqwf+MjNx?sFwR+mtU`7nuhDmU2`;!&SOMo;jz#*Nm1l{fptVT_!@5C$u`w9NI;vHP
zI`VR8lu1A>Edw>yW$MbipuArUYFRmGyE=f@R=HQA0rl&xx2}I{x<1w*1lg4k<dceZ
z)<!=M7o$sT4-(4pq_Bd#+=SUlanRY;3_5KeOx93?{k_nlkTTj0sHK+DHAp~Jbr%$<
zuacHSUuPSP4Qb(Kx=62YHdFu4sEY*IpBBlNCkTAl@d6)HaX8NyYsgiX1KIBcd7Vzn
zOHanS5A_<9(AC+FYtX?E#$ga^L2Yk0(gg!O6Ldd;e)PMK`i}N7tod%HUzt-M>r1Q;
zxyw_+{EyHzV9lw)XN4%lR}mk`R)qR^^j=RB;hrlXGcg*Zk|Jg;+P-d3RTe{aNgg~z
z<i&q6$nIQ+2Zh-nFU@ECA0O5|S3idDO$6TV3(()?7zYbng9GZ@qrM&LJA`uFi}N#5
zp!>;Vkd+rhOJhCyuEo6=fUb58JZWiw&SpfTX6SgNg7!uQJjRyBWqf293Nn)B^q)z#
zS#FpQ1YyPU&kJworlDRxX#0AY{2Lt|!8%_19DOBpXc|C=dxpshh1ueNtv`_$tkf{S
zfIC^qx;FHiu3>a!1k-;MbOXJZ>lpvi$@tSf$O9Vxs$02GBe~7w24LU(jJfxJ7S|b5
zR%`%4SXnU_H)jchVhhs~$2wY?^!{T^M=%HV`G<K&^KUAci%hIA_vm*cjuue=l{Q;9
z%=rH1(!UlbAe0-4!LM8m_cPBD28)YxQv1sCv!MKDww{7qkQC%V8NS~|dr96TnNV~+
z9q7JY6URdg-%IU$(475?h1pU($L5lp)t*Dw5g)uHGbX@1HH<3|hx%Sdgp(v+;s`|{
zY+-`n58>qiZ(-a;ikA@2JYkfdr!bOxHa^V9{mex-r*%BnAB^~JPP6LFWy}@|NKRZ3
z?nNLAb7BVgy|Ba){;cFMKb9zj%a9oC%c8j(7vPQg>&*)1c(6Fm4ut)yE#WxZ&n0EB
u8zNwczzY-s{BfG!RX~gY>GC8-C4?B=Mhd2Ye^(ei!&BcE8pz6jn*47Z#q`Pm

literal 0
HcmV?d00001

diff --git a/SCrawler/Download/Automation/AutoDownloader.vb b/SCrawler/Download/Automation/AutoDownloader.vb
index bc14879..bb250f4 100644
--- a/SCrawler/Download/Automation/AutoDownloader.vb
+++ b/SCrawler/Download/Automation/AutoDownloader.vb
@@ -15,7 +15,7 @@ Imports PersonalUtilities.Functions.XML.Base
 Imports PersonalUtilities.Tools
 Imports PersonalUtilities.Tools.Notifications
 Namespace DownloadObjects
-    Friend Class AutoDownloader : Inherits GroupParameters : Implements IEContainerProvider
+    Friend Class AutoDownloader : Inherits GroupParameters : Implements IIndexable, IEContainerProvider
         Friend Event PauseDisabled()
         Private Shared ReadOnly Property CachePath As SFile
             Get
@@ -135,8 +135,9 @@ Namespace DownloadObjects
                     ErrorsDescriber.Execute(EDP.SendInLog, ex, "[AutoDownloader.NotifiedUser.ShowNotification]")
                     If Not User Is Nothing Then
                         MainFrameObj.ShowNotification(SettingsCLS.NotificationObjects.AutoDownloader,
-                                                      $"Downloaded: {User.DownloadedPictures(False)} images, {User.DownloadedVideos(False)} videos",
-                                                      User.ToString, IIf(User.HasError, ToolTipIcon.Warning, ToolTipIcon.Info))
+                                                      User.ToString & vbNewLine &
+                                                      $"Downloaded: {User.DownloadedPictures(False)} images, {User.DownloadedVideos(False)} videos" &
+                                                      If(User.HasError, vbNewLine & "With errors", String.Empty))
                     End If
                 End Try
             End Sub
@@ -182,7 +183,6 @@ Namespace DownloadObjects
 #Region "XML Names"
         Private Const Name_Mode As String = "Mode"
         Private Const Name_Groups As String = "Groups"
-        Private Const Name_Labels As String = "Labels"
         Private Const Name_Timer As String = "Timer"
         Private Const Name_StartupDelay As String = "StartupDelay"
         Private Const Name_LastDownloadDate As String = "LastDownloadDate"
@@ -205,11 +205,16 @@ Namespace DownloadObjects
         End Property
         Friend ReadOnly Property Groups As List(Of String)
         Friend Property Timer As Integer = DefaultTimer
-        Friend Property StartupDelay As Integer = 0
+        Friend Property StartupDelay As Integer = 1
         Friend Property ShowNotifications As Boolean = True
         Friend Property ShowPictureDownloaded As Boolean = True
         Friend Property ShowPictureUser As Boolean = True
         Friend Property ShowSimpleNotification As Boolean = False
+        Private Property Index As Integer = -1 Implements IIndexable.Index
+        Private Function SetIndex(ByVal Obj As Object, ByVal Index As Integer) As Object Implements IIndexable.SetIndex
+            DirectCast(Obj, AutoDownloader).Index = Index
+            Return Obj
+        End Function
 #Region "Date"
         Private ReadOnly LastDownloadDateXML As Date? = Nothing
         Private _LastDownloadDate As Date = Now.AddYears(-1)
@@ -223,20 +228,25 @@ Namespace DownloadObjects
                 If Not Initialization Then _LastDownloadDateChanged = True
             End Set
         End Property
+        Private ReadOnly Property NextExecutionDate As Date
+            Get
+                If _PauseValue.HasValue Then
+                    Return {LastDownloadDate.AddMinutes(Timer), _StartTime.AddMinutes(StartupDelay), _PauseValue.Value}.Max
+                Else
+                    Return {LastDownloadDate.AddMinutes(Timer), _StartTime.AddMinutes(StartupDelay)}.Max
+                End If
+            End Get
+        End Property
         Private ReadOnly DateProvider As New ADateTime(ADateTime.Formats.BaseDateTime)
         Private Function GetLastDateString() As String
             If LastDownloadDateXML.HasValue Or _LastDownloadDateChanged Then
-                Return LastDownloadDate.ToStringDate(ADateTime.Formats.BaseDateTime)
+                Return LastDownloadDate.ToStringDate(DateProvider)
             Else
                 Return "never"
             End If
         End Function
         Private Function GetNextDateString() As String
-            If _LastDownloadDateChanged Then
-                Return LastDownloadDate.AddMinutes(Timer).ToStringDate(ADateTime.Formats.BaseDateTime)
-            Else
-                Return _StartTime.AddMinutes(StartupDelay).ToStringDate(ADateTime.Formats.BaseDateTime)
-            End If
+            Return NextExecutionDate.ToStringDate(DateProvider)
         End Function
 #End Region
 #Region "Information"
@@ -287,14 +297,11 @@ Namespace DownloadObjects
         End Sub
         Friend Sub New(ByVal x As EContainer)
             Me.New
-            Name = x.Value(Name_Name).FromXML(Of String)("Default")
             Mode = x.Value(Name_Mode).FromXML(Of Integer)(Modes.None)
+            Import(x)
+            If Name.IsEmptyString Then Name = "Default"
             Groups.ListAddList(x.Value(Name_Groups).StringToList(Of String)("|"), LAP.NotContainsOnly)
-            Labels.ListAddList(x.Value(Name_Labels).StringToList(Of String)("|"), LAP.NotContainsOnly)
-            Temporary = x.Value(Name_Temporary).FromXML(Of Integer)(CheckState.Indeterminate)
-            Favorite = x.Value(Name_Favorite).FromXML(Of Integer)(CheckState.Indeterminate)
-            ReadyForDownload = x.Value(Name_ReadyForDownload).FromXML(Of Boolean)(True)
-            ReadyForDownloadIgnore = x.Value(Name_ReadyForDownloadIgnore).FromXML(Of Boolean)(False)
+
             Timer = x.Value(Name_Timer).FromXML(Of Integer)(DefaultTimer)
             If Timer <= 0 Then Timer = DefaultTimer
             StartupDelay = x.Value(Name_StartupDelay).FromXML(Of Integer)(0)
@@ -331,24 +338,18 @@ Namespace DownloadObjects
             If Not Source Is Nothing Then Source.Update()
         End Sub
         Private Function ToEContainer(Optional ByVal e As ErrorsDescriber = Nothing) As EContainer Implements IEContainerProvider.ToEContainer
-            Return New EContainer(Scheduler.Name_Plan, String.Empty) From {
-                                  New EContainer(Name_Name, Name),
-                                  New EContainer(Name_Mode, CInt(Mode)),
-                                  New EContainer(Name_Groups, Groups.ListToString("|")),
-                                  New EContainer(Name_Labels, Labels.ListToString("|")),
-                                  New EContainer(Name_Temporary, CInt(Temporary)),
-                                  New EContainer(Name_Favorite, CInt(Favorite)),
-                                  New EContainer(Name_ReadyForDownload, ReadyForDownload.BoolToInteger),
-                                  New EContainer(Name_ReadyForDownloadIgnore, ReadyForDownloadIgnore.BoolToInteger),
-                                  New EContainer(Name_Timer, Timer),
-                                  New EContainer(Name_StartupDelay, StartupDelay),
-                                  New EContainer(Name_ShowNotifications, ShowNotifications.BoolToInteger),
-                                  New EContainer(Name_ShowPictureDown, ShowPictureDownloaded.BoolToInteger),
-                                  New EContainer(Name_ShowPictureUser, ShowPictureUser.BoolToInteger),
-                                  New EContainer(Name_ShowSimpleNotification, ShowSimpleNotification.BoolToInteger),
-                                  New EContainer(Name_LastDownloadDate, CStr(AConvert(Of String)(If(LastDownloadDateXML.HasValue Or _LastDownloadDateChanged,
-                                                                                                    CObj(LastDownloadDate), Nothing), DateProvider, String.Empty)))
-            }
+            Return Export(New EContainer(Scheduler.Name_Plan, String.Empty) From {
+                                         New EContainer(Name_Mode, CInt(Mode)),
+                                         New EContainer(Name_Groups, Groups.ListToString("|")),
+                                         New EContainer(Name_Timer, Timer),
+                                         New EContainer(Name_StartupDelay, StartupDelay),
+                                         New EContainer(Name_ShowNotifications, ShowNotifications.BoolToInteger),
+                                         New EContainer(Name_ShowPictureDown, ShowPictureDownloaded.BoolToInteger),
+                                         New EContainer(Name_ShowPictureUser, ShowPictureUser.BoolToInteger),
+                                         New EContainer(Name_ShowSimpleNotification, ShowSimpleNotification.BoolToInteger),
+                                         New EContainer(Name_LastDownloadDate, CStr(AConvert(Of String)(If(LastDownloadDateXML.HasValue Or _LastDownloadDateChanged,
+                                                                                                           CObj(LastDownloadDate), Nothing), DateProvider, String.Empty)))
+                          })
         End Function
 #End Region
 #Region "Execution"
@@ -422,9 +423,20 @@ Namespace DownloadObjects
         End Sub
         Private Sub Checker()
             Try
+                Dim _StartDownload As Boolean
                 While (Not _StopRequested Or Downloader.Working) And Not Mode = Modes.None
                     If LastDownloadDate.AddMinutes(Timer) < Now And _StartTime.AddMinutes(StartupDelay) < Now And
-                       Not Downloader.Working And Not IsPaused And Not _StopRequested And Not Mode = Modes.None Then Download()
+                       Not Downloader.Working And Not IsPaused And Not _StopRequested And Not Mode = Modes.None Then
+                        _StartDownload = False
+                        If Settings.Automation.Count = 1 Then
+                            _StartDownload = True
+                        ElseIf Index = -1 Then
+                            _StartDownload = True
+                        Else
+                            _StartDownload = NextExecutionDate.AddMilliseconds(1000 * (Index + 1)).Ticks <= Now.Ticks
+                        End If
+                        If _StartDownload Then Download()
+                    End If
                     Thread.Sleep(500)
                 End While
             Catch ex As Exception
@@ -447,7 +459,6 @@ Namespace DownloadObjects
                 Dim GName$
                 Dim i%
                 Dim DownloadedUsersCount% = 0
-                Dim l As New ListAddParams(LAP.IgnoreICopier + LAP.NotContainsOnly)
                 Dim simple As Boolean = ShowSimpleNotification And ShowNotifications
                 Dim notify As Action = Sub()
                                            With Downloader.Downloaded
@@ -464,7 +475,18 @@ Namespace DownloadObjects
                                            End With
                                        End Sub
                 Select Case Mode
-                    Case Modes.All : users.ListAddList(Settings.Users.Where(Function(u) u.Exists))
+                    Case Modes.All
+                        Dim CheckLabels As Predicate(Of IUserData) = Function(ByVal u As IUserData) As Boolean
+                                                                         If LabelsExcluded.Count = 0 Then
+                                                                             Return True
+                                                                         ElseIf u.Labels.Count = 0 Then
+                                                                             Return True
+                                                                         Else
+                                                                             Return Not u.Labels.ListContains(LabelsExcluded)
+                                                                         End If
+                                                                     End Function
+                        Dim CheckSites As Predicate(Of IUserData) = Function(u) SitesExcluded.Count = 0 OrElse Not SitesExcluded.Contains(u.Site)
+                        users.ListAddList(Settings.GetUsers(Function(u) UserExistsPredicate(u) And CheckLabels.Invoke(u) And CheckSites.Invoke(u)))
                     Case Modes.Default
                         Using g As New GroupParameters : users.ListAddList(DownloadGroup.GetUsers(g, True)) : End Using
                     Case Modes.Specified : users.ListAddList(DownloadGroup.GetUsers(Me, True))
@@ -472,24 +494,12 @@ Namespace DownloadObjects
                         If Groups.Count > 0 And Settings.Groups.Count > 0 Then
                             For Each GName In Groups
                                 i = Settings.Groups.IndexOf(GName)
-                                If i >= 0 Then users.ListAddList(Settings.Groups(i).GetUsers, l)
+                                If i >= 0 Then users.ListAddList(Settings.Groups(i).GetUsers, LAP.IgnoreICopier, LAP.NotContainsOnly)
                             Next
                         End If
                 End Select
                 If users.Count > 0 Then
-                    Keys.ListAddList(users.SelectMany(Of String)(Function(ByVal user As IUserData) As IEnumerable(Of String)
-                                                                     If user.IsCollection Then
-                                                                         With DirectCast(user, UserDataBind)
-                                                                             If .Count > 0 Then
-                                                                                 Return .Collections.Select(Function(u) u.Key)
-                                                                             Else
-                                                                                 Return New String() {}
-                                                                             End If
-                                                                         End With
-                                                                     Else
-                                                                         Return {user.Key}
-                                                                     End If
-                                                                 End Function))
+                    Keys.ListAddList(users.Select(Function(u) u.Key))
                     With Downloader
                         .AutoDownloaderWorking = True
                         If .Downloaded.Count > 0 Then .Downloaded.RemoveAll(Function(u) Keys.Contains(u.Key)) : .InvokeDownloadsChangeEvent()
@@ -499,7 +509,7 @@ Namespace DownloadObjects
                         notify.Invoke
                         If simple And DownloadedUsersCount > 0 Then _
                            MainFrameObj.ShowNotification(SettingsCLS.NotificationObjects.AutoDownloader,
-                                                         $"{DownloadedUsersCount} user(s) downloaded with scheduler plan '{Name}'", $"Scheduler plan '{Name}'")
+                                                         $"{DownloadedUsersCount} user(s) downloaded with scheduler plan '{Name}'")
                     End With
                 End If
             Catch ex As Exception
diff --git a/SCrawler/Download/Automation/AutoDownloaderEditorForm.Designer.vb b/SCrawler/Download/Automation/AutoDownloaderEditorForm.Designer.vb
index d806f53..88633df 100644
--- a/SCrawler/Download/Automation/AutoDownloaderEditorForm.Designer.vb
+++ b/SCrawler/Download/Automation/AutoDownloaderEditorForm.Designer.vb
@@ -66,13 +66,13 @@ Namespace DownloadObjects
             'CONTAINER_MAIN.ContentPanel
             '
             CONTAINER_MAIN.ContentPanel.Controls.Add(Me.DEF_GROUP)
-            CONTAINER_MAIN.ContentPanel.Size = New System.Drawing.Size(476, 276)
+            CONTAINER_MAIN.ContentPanel.Size = New System.Drawing.Size(476, 308)
             CONTAINER_MAIN.Dock = System.Windows.Forms.DockStyle.Fill
             CONTAINER_MAIN.LeftToolStripPanelVisible = False
             CONTAINER_MAIN.Location = New System.Drawing.Point(0, 0)
             CONTAINER_MAIN.Name = "CONTAINER_MAIN"
             CONTAINER_MAIN.RightToolStripPanelVisible = False
-            CONTAINER_MAIN.Size = New System.Drawing.Size(476, 301)
+            CONTAINER_MAIN.Size = New System.Drawing.Size(476, 333)
             CONTAINER_MAIN.TabIndex = 0
             CONTAINER_MAIN.TopToolStripPanelVisible = False
             '
@@ -81,29 +81,30 @@ Namespace DownloadObjects
             Me.DEF_GROUP.CellBorderStyle = System.Windows.Forms.TableLayoutPanelCellBorderStyle.[Single]
             Me.DEF_GROUP.ColumnCount = 1
             Me.DEF_GROUP.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
-            Me.DEF_GROUP.Controls.Add(Me.TXT_GROUPS, 0, 5)
+            Me.DEF_GROUP.Controls.Add(Me.TXT_GROUPS, 0, 6)
             Me.DEF_GROUP.Controls.Add(TP_MODE, 0, 0)
-            Me.DEF_GROUP.Controls.Add(Me.TXT_TIMER, 0, 7)
-            Me.DEF_GROUP.Controls.Add(Me.LBL_LAST_TIME_UP, 0, 9)
-            Me.DEF_GROUP.Controls.Add(Me.NUM_DELAY, 0, 8)
-            Me.DEF_GROUP.Controls.Add(TP_NOTIFY, 0, 6)
+            Me.DEF_GROUP.Controls.Add(Me.TXT_TIMER, 0, 8)
+            Me.DEF_GROUP.Controls.Add(Me.LBL_LAST_TIME_UP, 0, 10)
+            Me.DEF_GROUP.Controls.Add(Me.NUM_DELAY, 0, 9)
+            Me.DEF_GROUP.Controls.Add(TP_NOTIFY, 0, 7)
             Me.DEF_GROUP.Dock = System.Windows.Forms.DockStyle.Fill
             Me.DEF_GROUP.Location = New System.Drawing.Point(0, 0)
             Me.DEF_GROUP.Name = "DEF_GROUP"
-            Me.DEF_GROUP.RowCount = 11
+            Me.DEF_GROUP.RowCount = 12
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
-            Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
+            Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
+            Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
             Me.DEF_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 20.0!))
-            Me.DEF_GROUP.Size = New System.Drawing.Size(476, 276)
+            Me.DEF_GROUP.Size = New System.Drawing.Size(476, 308)
             Me.DEF_GROUP.TabIndex = 0
             '
             'TXT_GROUPS
@@ -117,10 +118,11 @@ Namespace DownloadObjects
             Me.TXT_GROUPS.CaptionText = "Groups"
             Me.TXT_GROUPS.CaptionWidth = 50.0R
             Me.TXT_GROUPS.Dock = System.Windows.Forms.DockStyle.Fill
-            Me.TXT_GROUPS.Location = New System.Drawing.Point(4, 140)
+            Me.TXT_GROUPS.Location = New System.Drawing.Point(4, 169)
             Me.TXT_GROUPS.Name = "TXT_GROUPS"
             Me.TXT_GROUPS.Size = New System.Drawing.Size(468, 22)
             Me.TXT_GROUPS.TabIndex = 1
+            Me.TXT_GROUPS.TextBoxReadOnly = True
             '
             'TP_MODE
             '
@@ -220,7 +222,7 @@ Namespace DownloadObjects
             Me.TXT_TIMER.CaptionToolTipText = "Timer (in minutes)"
             Me.TXT_TIMER.CaptionWidth = 50.0R
             Me.TXT_TIMER.Dock = System.Windows.Forms.DockStyle.Fill
-            Me.TXT_TIMER.Location = New System.Drawing.Point(4, 195)
+            Me.TXT_TIMER.Location = New System.Drawing.Point(4, 227)
             Me.TXT_TIMER.Name = "TXT_TIMER"
             Me.TXT_TIMER.Size = New System.Drawing.Size(468, 22)
             Me.TXT_TIMER.TabIndex = 3
@@ -230,7 +232,7 @@ Namespace DownloadObjects
             Me.LBL_LAST_TIME_UP.AutoSize = True
             Me.LBL_LAST_TIME_UP.Dock = System.Windows.Forms.DockStyle.Fill
             Me.LBL_LAST_TIME_UP.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(204, Byte))
-            Me.LBL_LAST_TIME_UP.Location = New System.Drawing.Point(4, 250)
+            Me.LBL_LAST_TIME_UP.Location = New System.Drawing.Point(4, 282)
             Me.LBL_LAST_TIME_UP.Name = "LBL_LAST_TIME_UP"
             Me.LBL_LAST_TIME_UP.Size = New System.Drawing.Size(468, 25)
             Me.LBL_LAST_TIME_UP.TabIndex = 5
@@ -249,7 +251,7 @@ Namespace DownloadObjects
             Me.NUM_DELAY.ClearTextByButtonClear = False
             Me.NUM_DELAY.ControlMode = PersonalUtilities.Forms.Controls.TextBoxExtended.ControlModes.NumericUpDown
             Me.NUM_DELAY.Dock = System.Windows.Forms.DockStyle.Fill
-            Me.NUM_DELAY.Location = New System.Drawing.Point(4, 224)
+            Me.NUM_DELAY.Location = New System.Drawing.Point(4, 256)
             Me.NUM_DELAY.Name = "NUM_DELAY"
             Me.NUM_DELAY.NumberMaximum = New Decimal(New Integer() {1440, 0, 0, 0})
             Me.NUM_DELAY.NumberUpDownAlign = System.Windows.Forms.LeftRightAlignment.Left
@@ -269,12 +271,12 @@ Namespace DownloadObjects
             TP_NOTIFY.Controls.Add(Me.CH_SHOW_PIC_USER, 3, 0)
             TP_NOTIFY.Controls.Add(Me.CH_NOTIFY_SIMPLE, 1, 0)
             TP_NOTIFY.Dock = System.Windows.Forms.DockStyle.Fill
-            TP_NOTIFY.Location = New System.Drawing.Point(1, 166)
+            TP_NOTIFY.Location = New System.Drawing.Point(1, 195)
             TP_NOTIFY.Margin = New System.Windows.Forms.Padding(0)
             TP_NOTIFY.Name = "TP_NOTIFY"
             TP_NOTIFY.RowCount = 1
             TP_NOTIFY.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
-            TP_NOTIFY.Size = New System.Drawing.Size(474, 25)
+            TP_NOTIFY.Size = New System.Drawing.Size(474, 28)
             TP_NOTIFY.TabIndex = 2
             '
             'CH_NOTIFY
@@ -283,7 +285,7 @@ Namespace DownloadObjects
             Me.CH_NOTIFY.Dock = System.Windows.Forms.DockStyle.Fill
             Me.CH_NOTIFY.Location = New System.Drawing.Point(3, 3)
             Me.CH_NOTIFY.Name = "CH_NOTIFY"
-            Me.CH_NOTIFY.Size = New System.Drawing.Size(112, 19)
+            Me.CH_NOTIFY.Size = New System.Drawing.Size(112, 22)
             Me.CH_NOTIFY.TabIndex = 0
             Me.CH_NOTIFY.Text = "Show notifications"
             TT_MAIN.SetToolTip(Me.CH_NOTIFY, "Show notification when some data has been downloaded")
@@ -295,7 +297,7 @@ Namespace DownloadObjects
             Me.CH_SHOW_PIC.Dock = System.Windows.Forms.DockStyle.Fill
             Me.CH_SHOW_PIC.Location = New System.Drawing.Point(239, 3)
             Me.CH_SHOW_PIC.Name = "CH_SHOW_PIC"
-            Me.CH_SHOW_PIC.Size = New System.Drawing.Size(112, 19)
+            Me.CH_SHOW_PIC.Size = New System.Drawing.Size(112, 22)
             Me.CH_SHOW_PIC.TabIndex = 2
             Me.CH_SHOW_PIC.Text = "Image"
             TT_MAIN.SetToolTip(Me.CH_SHOW_PIC, "Show downloaded image in notification")
@@ -307,7 +309,7 @@ Namespace DownloadObjects
             Me.CH_SHOW_PIC_USER.Dock = System.Windows.Forms.DockStyle.Fill
             Me.CH_SHOW_PIC_USER.Location = New System.Drawing.Point(357, 3)
             Me.CH_SHOW_PIC_USER.Name = "CH_SHOW_PIC_USER"
-            Me.CH_SHOW_PIC_USER.Size = New System.Drawing.Size(114, 19)
+            Me.CH_SHOW_PIC_USER.Size = New System.Drawing.Size(114, 22)
             Me.CH_SHOW_PIC_USER.TabIndex = 3
             Me.CH_SHOW_PIC_USER.Text = "User icon"
             TT_MAIN.SetToolTip(Me.CH_SHOW_PIC_USER, "Show user image in notification")
@@ -319,7 +321,7 @@ Namespace DownloadObjects
             Me.CH_NOTIFY_SIMPLE.Dock = System.Windows.Forms.DockStyle.Fill
             Me.CH_NOTIFY_SIMPLE.Location = New System.Drawing.Point(121, 3)
             Me.CH_NOTIFY_SIMPLE.Name = "CH_NOTIFY_SIMPLE"
-            Me.CH_NOTIFY_SIMPLE.Size = New System.Drawing.Size(112, 19)
+            Me.CH_NOTIFY_SIMPLE.Size = New System.Drawing.Size(112, 22)
             Me.CH_NOTIFY_SIMPLE.TabIndex = 1
             Me.CH_NOTIFY_SIMPLE.Text = "Simple"
             TT_MAIN.SetToolTip(Me.CH_NOTIFY_SIMPLE, resources.GetString("CH_NOTIFY_SIMPLE.ToolTip"))
@@ -329,15 +331,15 @@ Namespace DownloadObjects
             '
             Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
             Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-            Me.ClientSize = New System.Drawing.Size(476, 301)
+            Me.ClientSize = New System.Drawing.Size(476, 333)
             Me.Controls.Add(CONTAINER_MAIN)
             Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
             Me.Icon = Global.SCrawler.My.Resources.Resources.ArrowDownIcon_Blue_24
             Me.KeyPreview = True
             Me.MaximizeBox = False
-            Me.MaximumSize = New System.Drawing.Size(492, 340)
+            Me.MaximumSize = New System.Drawing.Size(492, 372)
             Me.MinimizeBox = False
-            Me.MinimumSize = New System.Drawing.Size(492, 340)
+            Me.MinimumSize = New System.Drawing.Size(492, 372)
             Me.Name = "AutoDownloaderEditorForm"
             Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
             Me.Text = "AutoDownloader settings"
diff --git a/SCrawler/Download/Automation/AutoDownloaderEditorForm.vb b/SCrawler/Download/Automation/AutoDownloaderEditorForm.vb
index e406377..a98d34d 100644
--- a/SCrawler/Download/Automation/AutoDownloaderEditorForm.vb
+++ b/SCrawler/Download/Automation/AutoDownloaderEditorForm.vb
@@ -101,7 +101,7 @@ Namespace DownloadObjects
         Private Sub TXT_GROUPS_ActionOnButtonClick(ByVal Sender As ActionButton, ByVal e As EventArgs) Handles TXT_GROUPS.ActionOnButtonClick
             Select Case Sender.DefaultButton
                 Case ActionButton.DefaultButtons.Edit
-                    Using f As New LabelsForm(MyGroups, Settings.Groups.Select(Function(g) g.Name)) With {.Text = "Groups"}
+                    Using f As New LabelsForm(MyGroups, Settings.Groups.Select(Function(g) g.Name)) With {.Text = "Groups", .Icon = My.Resources.GroupByIcon_16}
                         f.ShowDialog()
                         If f.DialogResult = DialogResult.OK Then MyGroups.ListAddList(f.LabelsList, LAP.ClearBeforeAdd) : TXT_GROUPS.Text = MyGroups.ListToString
                     End Using
@@ -111,7 +111,7 @@ Namespace DownloadObjects
         Private Sub ChangeEnabled() Handles OPT_DISABLED.CheckedChanged, OPT_ALL.CheckedChanged, OPT_DEFAULT.CheckedChanged,
                                             OPT_SPEC.CheckedChanged, OPT_GROUP.CheckedChanged,
                                             CH_NOTIFY.CheckedChanged, CH_NOTIFY_SIMPLE.CheckedChanged
-            DEF_GROUP.Enabled = OPT_SPEC.Checked
+            DEF_GROUP.Enabled(OPT_ALL.Checked Or OPT_DEFAULT.Checked Or OPT_SPEC.Checked) = OPT_SPEC.Checked
             TXT_GROUPS.Enabled = OPT_GROUP.Checked
             TXT_TIMER.Enabled = Not OPT_DISABLED.Checked
             NUM_DELAY.Enabled = Not OPT_DISABLED.Checked
diff --git a/SCrawler/Download/Automation/AutoDownloaderPauseButtons.vb b/SCrawler/Download/Automation/AutoDownloaderPauseButtons.vb
index c339c61..9103979 100644
--- a/SCrawler/Download/Automation/AutoDownloaderPauseButtons.vb
+++ b/SCrawler/Download/Automation/AutoDownloaderPauseButtons.vb
@@ -178,7 +178,18 @@ Namespace DownloadObjects
         Private Sub UpdateBaseButton(ByVal Checked As Boolean)
             With MainFrameObj.MF
                 Select Case Place
-                    Case ButtonsPlace.MainFrame : ApplyButtonStyle(.BTT_DOWN_AUTOMATION_PAUSE, Sub() .BTT_DOWN_AUTOMATION_PAUSE.Checked = Checked)
+                    Case ButtonsPlace.MainFrame : ApplyButtonStyle(.BTT_DOWN_AUTOMATION_PAUSE, Sub()
+                                                                                                   .BTT_DOWN_AUTOMATION_PAUSE.Checked = Checked
+                                                                                                   With .MENU_DOWN_ALL
+                                                                                                       If Checked Then
+                                                                                                           .BackColor = MyColor.UpdateBack
+                                                                                                           .ForeColor = MyColor.UpdateFore
+                                                                                                       Else
+                                                                                                           .BackColor = Control.DefaultBackColor
+                                                                                                           .ForeColor = Control.DefaultForeColor
+                                                                                                       End If
+                                                                                                   End With
+                                                                                               End Sub)
                     Case ButtonsPlace.Tray : ApplyButtonStyle(MainFrameObj.MF.BTT_TRAY_PAUSE_AUTOMATION, Sub() MainFrameObj.MF.BTT_TRAY_PAUSE_AUTOMATION.Checked = Checked)
                 End Select
             End With
diff --git a/SCrawler/Download/Automation/Scheduler.vb b/SCrawler/Download/Automation/Scheduler.vb
index 848d098..f2fb9f9 100644
--- a/SCrawler/Download/Automation/Scheduler.vb
+++ b/SCrawler/Download/Automation/Scheduler.vb
@@ -40,7 +40,7 @@ Namespace DownloadObjects
             If Plans.Count > 0 Then Plans.ForEach(Sub(p)
                                                       p.Source = Me
                                                       AddHandler p.PauseDisabled, AddressOf OnPauseDisabled
-                                                  End Sub)
+                                                  End Sub) : Plans.ListReindex
         End Sub
         Default Friend ReadOnly Property Item(ByVal Index As Integer) As AutoDownloader Implements IMyEnumerator(Of AutoDownloader).MyEnumeratorObject
             Get
@@ -59,6 +59,7 @@ Namespace DownloadObjects
             Plan.Source = Me
             AddHandler Plan.PauseDisabled, AddressOf OnPauseDisabled
             Plans.Add(Plan)
+            Plans.ListReindex
             Update()
         End Sub
         Friend Async Function RemoveAt(ByVal Index As Integer) As Task
@@ -73,6 +74,7 @@ Namespace DownloadObjects
                     .Dispose()
                 End With
                 Plans.RemoveAt(Index)
+                Plans.ListReindex
                 Update()
             End If
         End Function
@@ -98,16 +100,18 @@ Namespace DownloadObjects
         End Sub
 #End Region
 #Region "Execution"
-        Friend Async Sub Start(ByVal Init As Boolean)
-            If Count > 0 Then
-                If Plans.Exists(PlanDownloading) Then Await Task.Run(Sub() PlansWaiter(PlanDownloading))
-                For Each Plan In Plans
-                    Plan.Start(Init)
-                    Thread.Sleep(1000)
-                    Await Task.Run(Sub() PlansWaiter(PlanDownloading))
-                Next
-            End If
-        End Sub
+        Friend Async Function Start(ByVal Init As Boolean) As Task
+            Await Task.Run(Sub()
+                               If Count > 0 Then
+                                   If Plans.Exists(PlanDownloading) Then PlansWaiter(PlanDownloading)
+                                   For Each Plan In Plans
+                                       Plan.Start(Init)
+                                       PlansWaiter(PlanDownloading)
+                                       Thread.Sleep(1000)
+                                   Next
+                               End If
+                           End Sub)
+        End Function
         Friend Sub [Stop]()
             If Count > 0 Then Plans.ForEach(Sub(p) p.Stop())
         End Sub
diff --git a/SCrawler/Download/Groups/DownloadGroup.vb b/SCrawler/Download/Groups/DownloadGroup.vb
index 3a63fb7..c384dc1 100644
--- a/SCrawler/Download/Groups/DownloadGroup.vb
+++ b/SCrawler/Download/Groups/DownloadGroup.vb
@@ -51,6 +51,7 @@ Namespace DownloadObjects.Groups
         End Function
 #End Region
 #Region "Initializers"
+        Friend ReadOnly NeedToSave As Boolean = False
         Friend Sub New()
             BTT_MENU = New ToolStripMenuItem With {
                 .ToolTipText = "Download users of this group",
@@ -90,12 +91,18 @@ Namespace DownloadObjects.Groups
         End Sub
         Friend Sub New(ByVal e As EContainer)
             Me.New
-            Name = e.Attribute(Name_Name)
-            Temporary = e.Attribute(Name_Temporary).Value.FromXML(Of Integer)(CInt(CheckState.Indeterminate))
-            Favorite = e.Attribute(Name_Favorite).Value.FromXML(Of Integer)(CInt(CheckState.Indeterminate))
-            ReadyForDownload = e.Attribute(Name_ReadyForDownload).Value.FromXML(Of Boolean)(True)
-            ReadyForDownloadIgnore = e.Attribute(Name_ReadyForDownloadIgnore).Value.FromXML(Of Boolean)(False)
-            If Not e.Value.IsEmptyString Then Labels.ListAddList(e.Value.Split("|"), LAP.NotContainsOnly)
+            If e.Attributes.Contains(New EAttribute(Name_Name)) Then
+                'TODELETE: 2022.10.18.0
+                NeedToSave = True
+                Name = e.Attribute(Name_Name)
+                Temporary = e.Attribute(Name_Temporary).Value.FromXML(Of Integer)(CInt(CheckState.Indeterminate))
+                Favorite = e.Attribute(Name_Favorite).Value.FromXML(Of Integer)(CInt(CheckState.Indeterminate))
+                ReadyForDownload = e.Attribute(Name_ReadyForDownload).Value.FromXML(Of Boolean)(True)
+                ReadyForDownloadIgnore = e.Attribute(Name_ReadyForDownloadIgnore).Value.FromXML(Of Boolean)(False)
+                If Not e.Value.IsEmptyString Then Labels.ListAddList(e.Value.Split("|"), LAP.NotContainsOnly)
+            Else
+                Import(e)
+            End If
         End Sub
 #End Region
 #Region "ToString"
@@ -149,19 +156,28 @@ Namespace DownloadObjects.Groups
                             (.Temporary = CheckState.Indeterminate Or user.Temporary = CBool(.Temporary)) And
                             (.Favorite = CheckState.Indeterminate Or (user.Favorite = CBool(.Favorite))) And
                             (Not UseReadyOption Or .ReadyForDownloadIgnore Or user.ReadyForDownload = .ReadyForDownload) And user.Exists
-                        Dim f As Func(Of IUserData, IEnumerable(Of IUserData)) = Function(ByVal user As IUserData) As IEnumerable(Of IUserData)
-                                                                                     If user.IsCollection Then
-                                                                                         With DirectCast(user, UserDataBind)
-                                                                                             If .Count > 0 Then Return .Collections.SelectMany(f)
-                                                                                         End With
-                                                                                     Else
-                                                                                         If .Labels.Count = 0 OrElse user.Labels.ListContains(.Labels) Then
-                                                                                             If CheckParams.Invoke(user) Then Return {user}
-                                                                                         End If
-                                                                                     End If
-                                                                                     Return New IUserData() {}
-                                                                                 End Function
-                        Return Settings.Users.SelectMany(f)
+                        Dim CheckLabelsExcluded As Predicate(Of IUserData) = Function(ByVal user As IUserData) As Boolean
+                                                                                 If .LabelsExcluded.Count = 0 Then
+                                                                                     Return True
+                                                                                 ElseIf user.Labels.Count = 0 Then
+                                                                                     Return True
+                                                                                 Else
+                                                                                     Return Not user.Labels.ListContains(.LabelsExcluded)
+                                                                                 End If
+                                                                             End Function
+                        Dim CheckLabels As Predicate(Of IUserData) = Function(ByVal user As IUserData) As Boolean
+                                                                         If .Labels.Count = 0 Then
+                                                                             Return CheckLabelsExcluded.Invoke(user)
+                                                                         ElseIf user.Labels.Count = 0 Then
+                                                                             Return False
+                                                                         Else
+                                                                             Return user.Labels.ListContains(.Labels) And CheckLabelsExcluded.Invoke(user)
+                                                                         End If
+                                                                     End Function
+                        Dim CheckSites As Predicate(Of IUserData) = Function(user) _
+                            (.Sites.Count = 0 OrElse .Sites.Contains(user.Site)) AndAlso
+                            (.SitesExcluded.Count = 0 OrElse Not .SitesExcluded.Contains(user.Site))
+                        Return Settings.GetUsers(Function(user) CheckLabels.Invoke(user) AndAlso CheckSites.Invoke(user) AndAlso CheckParams.Invoke(user))
                     End With
                 Else
                     Return Nothing
@@ -189,11 +205,7 @@ Namespace DownloadObjects.Groups
 #End Region
 #Region "IEContainerProvider Support"
         Private Function ToEContainer(Optional ByVal e As ErrorsDescriber = Nothing) As EContainer Implements IEContainerProvider.ToEContainer
-            Return New EContainer("Group", Labels.ListToString("|"), {New EAttribute(Name_Name, Name),
-                                                                      New EAttribute(Name_Temporary, CInt(Temporary)),
-                                                                      New EAttribute(Name_Favorite, CInt(Favorite)),
-                                                                      New EAttribute(Name_ReadyForDownload, ReadyForDownload.BoolToInteger),
-                                                                      New EAttribute(Name_ReadyForDownloadIgnore, ReadyForDownloadIgnore.BoolToInteger)})
+            Return Export(New EContainer("Group"))
         End Function
 #End Region
 #Region "IDisposable Support"
diff --git a/SCrawler/Download/Groups/DownloadGroupCollection.vb b/SCrawler/Download/Groups/DownloadGroupCollection.vb
index e604cca..4d5b1b5 100644
--- a/SCrawler/Download/Groups/DownloadGroupCollection.vb
+++ b/SCrawler/Download/Groups/DownloadGroupCollection.vb
@@ -22,10 +22,15 @@ Namespace DownloadObjects.Groups
                     x.LoadData()
                     If x.Count > 0 Then GroupsList.ListAddList(x, LAP.IgnoreICopier)
                 End Using
-                If GroupsList.Count > 0 Then GroupsList.ForEach(Sub(ByVal g As DownloadGroup)
-                                                                    AddHandler g.Deleted, AddressOf OnGroupDeleted
-                                                                    AddHandler g.Updated, AddressOf OnGroupUpdated
-                                                                End Sub)
+                With GroupsList
+                    If .Count > 0 Then
+                        .ForEach(Sub(ByVal g As DownloadGroup)
+                                     AddHandler g.Deleted, AddressOf OnGroupDeleted
+                                     AddHandler g.Updated, AddressOf OnGroupUpdated
+                                 End Sub)
+                        If .Exists(Function(g) g.NeedToSave) Then Update()
+                    End If
+                End With
             End If
             GroupsList.ListReindex
         End Sub
@@ -49,9 +54,9 @@ Namespace DownloadObjects.Groups
                 GroupFile.Delete()
             End If
         End Sub
+        Private _GroupAddInProgress As Boolean = False
         Private Sub OnGroupUpdated(ByVal Sender As DownloadGroup)
-            Update()
-            RaiseEvent Updated(Sender)
+            If Not _GroupAddInProgress Then Update() : RaiseEvent Updated(Sender)
         End Sub
         Private Sub OnGroupDeleted(ByVal Sender As DownloadGroup)
             RaiseEvent Deleted(Sender)
@@ -67,10 +72,16 @@ Namespace DownloadObjects.Groups
             Using f As New GroupEditorForm(Nothing)
                 f.ShowDialog()
                 If f.DialogResult = DialogResult.OK Then
+                    _GroupAddInProgress = True
                     GroupsList.Add(f.MyGroup)
+                    With GroupsList.Last
+                        AddHandler .Deleted, AddressOf OnGroupDeleted
+                        AddHandler .Updated, AddressOf OnGroupUpdated
+                    End With
                     GroupsList.ListReindex
                     RaiseEvent Added(GroupsList.Last)
                     Update()
+                    _GroupAddInProgress = False
                 End If
             End Using
         End Sub
diff --git a/SCrawler/Download/Groups/GroupDefaults.vb b/SCrawler/Download/Groups/GroupDefaults.vb
index 56a0c88..b8a8bcd 100644
--- a/SCrawler/Download/Groups/GroupDefaults.vb
+++ b/SCrawler/Download/Groups/GroupDefaults.vb
@@ -18,28 +18,28 @@ Namespace DownloadObjects.Groups
         Private ReadOnly CH_READY_FOR_DOWN As CheckBox
         Private ReadOnly CH_READY_FOR_DOWN_IGNORE As CheckBox
         Private WithEvents TXT_LABELS As TextBoxExtended
+        Private WithEvents TXT_SITES As TextBoxExtended
         Friend WithEvents TXT_NAME As TextBoxExtended
         Private ReadOnly Labels As List(Of String)
+        Private ReadOnly LabelsExcluded As List(Of String)
+        Private ReadOnly Sites As List(Of String)
+        Private ReadOnly SitesExcluded As List(Of String)
         Public Sub New()
             Labels = New List(Of String)
-            TXT_LABELS = New TextBoxExtended
-            With TXT_LABELS
-                .BeginInit()
-                .Buttons.AddRange({ADB.Edit, ADB.Clear})
-                .CaptionText = "Labels"
-                .CaptionWidth = 50
-                .Dock = DockStyle.Fill
-                .EndInit()
-            End With
-            TXT_NAME = New TextBoxExtended
-            With TXT_NAME
-                .BeginInit()
-                .Buttons.Add(ADB.Clear)
-                .CaptionText = "Name"
-                .CaptionWidth = 50
-                .Dock = DockStyle.Fill
-                .EndInit()
-            End With
+            LabelsExcluded = New List(Of String)
+            Sites = New List(Of String)
+            SitesExcluded = New List(Of String)
+
+            InitTextBox(TXT_LABELS, "Labels", {New ActionButton(ADB.Edit) With {.ToolTipText = "Edit selected labels"},
+                                               New ActionButton(ADB.Delete) With {.ToolTipText = "Edit excluded labels"}, ADB.Clear})
+            TXT_LABELS.TextBoxReadOnly = True
+
+            InitTextBox(TXT_SITES, "Sites", {New ActionButton(ADB.Edit) With {.ToolTipText = "Edit selected sites"},
+                                             New ActionButton(ADB.Delete) With {.ToolTipText = "Edit excluded sites"}, ADB.Clear})
+            TXT_SITES.TextBoxReadOnly = True
+
+            InitTextBox(TXT_NAME, "Name", {ADB.Clear})
+
             CH_TEMPORARY = New CheckBox With {.Text = "Temporary", .Name = "CH_TEMPORARY", .ThreeState = True, .CheckState = CheckState.Indeterminate, .Dock = DockStyle.Fill}
             CH_FAV = New CheckBox With {.Text = "Favorite", .Name = "CH_FAV", .ThreeState = True, .CheckState = CheckState.Indeterminate, .Dock = DockStyle.Fill}
             CH_READY_FOR_DOWN = New CheckBox With {.Text = "Ready for download", .Name = "CH_READY_FOR_DOWN", .Checked = True, .Dock = DockStyle.Fill}
@@ -49,6 +49,17 @@ Namespace DownloadObjects.Groups
             TP_2 = New TableLayoutPanel With {.CellBorderStyle = TableLayoutPanelCellBorderStyle.Single, .Margin = New Padding(0), .Dock = DockStyle.Fill}
             FillTP(TP_2, CH_READY_FOR_DOWN, CH_READY_FOR_DOWN_IGNORE)
         End Sub
+        Private Sub InitTextBox(ByRef TXT As TextBoxExtended, ByVal Caption As String, ByVal Buttons As ActionButton())
+            TXT = New TextBoxExtended
+            With TXT
+                .BeginInit()
+                .Buttons.AddRange(Buttons)
+                .CaptionText = Caption
+                .CaptionWidth = 50
+                .Dock = DockStyle.Fill
+                .EndInit()
+            End With
+        End Sub
         Private Sub FillTP(ByRef TP As TableLayoutPanel, ByVal CNT1 As Control, ByVal CNT2 As Control)
             With TP
                 .ColumnCount = 2
@@ -87,33 +98,63 @@ Namespace DownloadObjects.Groups
                 CellBorderStyle = TableLayoutPanelCellBorderStyle.Single
                 ColumnCount = 1
                 ColumnStyles.Add(New ColumnStyle(SizeType.Percent, 100))
-                RowCount = 6
+                RowCount = 7
                 RowStyles.Add(New RowStyle(SizeType.Absolute, 25))
                 RowStyles.Add(New RowStyle(SizeType.Absolute, 28))
                 RowStyles.Add(New RowStyle(SizeType.Absolute, 25))
                 RowStyles.Add(New RowStyle(SizeType.Absolute, 25))
                 RowStyles.Add(New RowStyle(SizeType.Absolute, 28))
+                RowStyles.Add(New RowStyle(SizeType.Absolute, 28))
                 RowStyles.Add(New RowStyle(SizeType.Percent, 100))
             End If
             Controls.Add(TXT_NAME, 0, 1)
             Controls.Add(TP_1, 0, 2)
             Controls.Add(TP_2, 0, 3)
             Controls.Add(TXT_LABELS, 0, 4)
+            Controls.Add(TXT_SITES, 0, 5)
         End Sub
-        Private Sub TXT_LABELS_ActionOnButtonClick(ByVal Sender As ActionButton, ByVal e As EventArgs) Handles TXT_LABELS.ActionOnButtonClick
+        Private Sub TXT_LABELS_ActionOnButtonClick(ByVal Sender As ActionButton, ByVal e As ActionButtonEventArgs) Handles TXT_LABELS.ActionOnButtonClick
             Select Case Sender.DefaultButton
-                Case ADB.Edit
-                    Using f As New LabelsForm(Labels)
-                        f.ShowDialog()
-                        If f.DialogResult = DialogResult.OK Then
-                            Labels.ListAddList(f.LabelsList, LAP.NotContainsOnly, LAP.ClearBeforeAdd)
-                            TXT_LABELS.Clear()
-                            TXT_LABELS.Text = Labels.ListToString
-                        End If
-                    End Using
-                Case ADB.Clear : Labels.Clear()
+                Case ADB.Edit, ADB.Delete
+                    With If(Sender.DefaultButton = ADB.Edit, Labels, LabelsExcluded)
+                        Using f As New LabelsForm(.ListSelf, True)
+                            If Sender.DefaultButton = ADB.Delete Then f.Text &= " excluded"
+                            f.ShowDialog()
+                            If f.DialogResult = DialogResult.OK Then
+                                .AsList.ListAddList(f.LabelsList, LAP.NotContainsOnly, LAP.ClearBeforeAdd)
+                                UpdateLabelsText()
+                            End If
+                        End Using
+                    End With
+                Case ADB.Clear : Labels.Clear() : LabelsExcluded.Clear() : TXT_LABELS.Clear() : UpdateLabelsText()
             End Select
         End Sub
+        Private Sub TXT_SITES_ActionOnButtonClick(ByVal Sender As ActionButton, ByVal e As ActionButtonEventArgs) Handles TXT_SITES.ActionOnButtonClick
+            Select Case Sender.DefaultButton
+                Case ADB.Edit, ADB.Delete
+                    With If(Sender.DefaultButton = ADB.Edit, Sites, SitesExcluded)
+                        Using f As New Editors.SiteSelectionForm(.ListSelf)
+                            If Sender.DefaultButton = ADB.Delete Then f.Text &= " excluded"
+                            f.ShowDialog()
+                            If f.DialogResult = DialogResult.OK Then
+                                .AsList.ListAddList(f.SelectedSites, LAP.NotContainsOnly, LAP.ClearBeforeAdd)
+                                UpdateSitesText()
+                            End If
+                        End Using
+                    End With
+                Case ADB.Clear : Sites.Clear() : SitesExcluded.Clear() : TXT_SITES.Clear() : UpdateSitesText()
+            End Select
+        End Sub
+        Private Sub UpdateLabelsText()
+            TXT_LABELS.Clear()
+            If Not _JustExcludeOptions Then TXT_LABELS.Text = Labels.ListToString
+            If LabelsExcluded.Count > 0 Then TXT_LABELS.Text.StringAppend($"EXCLUDED: {LabelsExcluded.ListToString}", "; ")
+        End Sub
+        Private Sub UpdateSitesText()
+            TXT_SITES.Clear()
+            If Not _JustExcludeOptions Then TXT_SITES.Text = Sites.ListToString
+            If SitesExcluded.Count > 0 Then TXT_SITES.Text.StringAppend($"EXCLUDED: {SitesExcluded.ListToString}", "; ")
+        End Sub
         Friend Sub [Get](ByRef Instance As IGroup)
             If Not Instance Is Nothing Then
                 With Instance
@@ -124,6 +165,12 @@ Namespace DownloadObjects.Groups
                     .ReadyForDownloadIgnore = CH_READY_FOR_DOWN_IGNORE.Checked
                     .Labels.Clear()
                     .Labels.ListAddList(Labels)
+                    .LabelsExcluded.Clear()
+                    .LabelsExcluded.ListAddList(LabelsExcluded)
+                    .Sites.Clear()
+                    .Sites.ListAddList(Sites)
+                    .SitesExcluded.Clear()
+                    .SitesExcluded.ListAddList(SitesExcluded)
                 End With
             End If
         End Sub
@@ -135,21 +182,48 @@ Namespace DownloadObjects.Groups
                     CH_FAV.CheckState = .Favorite
                     CH_READY_FOR_DOWN.Checked = .ReadyForDownload
                     CH_READY_FOR_DOWN_IGNORE.Checked = .ReadyForDownloadIgnore
+
                     Labels.ListAddList(.Labels)
-                    TXT_LABELS.Text = Labels.ListToString
+                    LabelsExcluded.ListAddList(.LabelsExcluded)
+                    UpdateLabelsText()
+
+                    Sites.ListAddList(.Sites)
+                    SitesExcluded.ListAddList(.SitesExcluded)
+                    UpdateSitesText()
                 End With
             End If
         End Sub
         Private _Enabled As Boolean = True
-        Friend Shadows Property Enabled As Boolean
+        Private _JustExcludeOptions As Boolean = False
+        Friend Overloads Property Enabled(Optional ByVal LeaveExcludeOptions As Boolean = False) As Boolean
             Get
                 Return _Enabled
             End Get
             Set(ByVal e As Boolean)
                 _Enabled = e
+                _JustExcludeOptions = False
                 TP_1.Enabled = e
                 TP_2.Enabled = e
-                TXT_LABELS.Enabled = e
+                If e Then
+                    TXT_LABELS.Enabled = True
+                    TXT_SITES.Enabled = True
+                ElseIf LeaveExcludeOptions Then
+                    _JustExcludeOptions = True
+                    TXT_LABELS.Enabled = True
+                    TXT_LABELS.Button(ADB.Edit).Enabled = False
+                    TXT_LABELS.Button(ADB.Delete).Enabled = True
+                    TXT_LABELS.Button(ADB.Clear).Enabled = False
+
+                    TXT_SITES.Enabled = True
+                    TXT_SITES.Button(ADB.Edit).Enabled = False
+                    TXT_SITES.Button(ADB.Delete).Enabled = True
+                    TXT_SITES.Button(ADB.Clear).Enabled = False
+                Else
+                    TXT_LABELS.Enabled = False
+                    TXT_SITES.Enabled = False
+                End If
+                UpdateLabelsText()
+                UpdateSitesText()
             End Set
         End Property
     End Class
diff --git a/SCrawler/Download/Groups/GroupEditorForm.Designer.vb b/SCrawler/Download/Groups/GroupEditorForm.Designer.vb
index e123168..9cc09f8 100644
--- a/SCrawler/Download/Groups/GroupEditorForm.Designer.vb
+++ b/SCrawler/Download/Groups/GroupEditorForm.Designer.vb
@@ -35,13 +35,13 @@ Namespace DownloadObjects.Groups
             'CONTAINER_MAIN.ContentPanel
             '
             CONTAINER_MAIN.ContentPanel.Controls.Add(Me.DEFS_GROUP)
-            CONTAINER_MAIN.ContentPanel.Size = New System.Drawing.Size(476, 109)
+            CONTAINER_MAIN.ContentPanel.Size = New System.Drawing.Size(476, 141)
             CONTAINER_MAIN.Dock = System.Windows.Forms.DockStyle.Fill
             CONTAINER_MAIN.LeftToolStripPanelVisible = False
             CONTAINER_MAIN.Location = New System.Drawing.Point(0, 0)
             CONTAINER_MAIN.Name = "CONTAINER_MAIN"
             CONTAINER_MAIN.RightToolStripPanelVisible = False
-            CONTAINER_MAIN.Size = New System.Drawing.Size(476, 134)
+            CONTAINER_MAIN.Size = New System.Drawing.Size(476, 166)
             CONTAINER_MAIN.TabIndex = 0
             CONTAINER_MAIN.TopToolStripPanelVisible = False
             '
@@ -53,29 +53,30 @@ Namespace DownloadObjects.Groups
             Me.DEFS_GROUP.Dock = System.Windows.Forms.DockStyle.Fill
             Me.DEFS_GROUP.Location = New System.Drawing.Point(0, 0)
             Me.DEFS_GROUP.Name = "DEFS_GROUP"
-            Me.DEFS_GROUP.RowCount = 6
+            Me.DEFS_GROUP.RowCount = 7
             Me.DEFS_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 0!))
             Me.DEFS_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
             Me.DEFS_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
             Me.DEFS_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
             Me.DEFS_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
+            Me.DEFS_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 28.0!))
             Me.DEFS_GROUP.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
-            Me.DEFS_GROUP.Size = New System.Drawing.Size(476, 109)
-            Me.DEFS_GROUP.TabIndex = 1
+            Me.DEFS_GROUP.Size = New System.Drawing.Size(476, 141)
+            Me.DEFS_GROUP.TabIndex = 0
             '
             'GroupEditorForm
             '
             Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
             Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-            Me.ClientSize = New System.Drawing.Size(476, 134)
+            Me.ClientSize = New System.Drawing.Size(476, 166)
             Me.Controls.Add(CONTAINER_MAIN)
             Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
             Me.Icon = Global.SCrawler.My.Resources.Resources.GroupByIcon_16
             Me.KeyPreview = True
             Me.MaximizeBox = False
-            Me.MaximumSize = New System.Drawing.Size(492, 173)
+            Me.MaximumSize = New System.Drawing.Size(492, 205)
             Me.MinimizeBox = False
-            Me.MinimumSize = New System.Drawing.Size(492, 173)
+            Me.MinimumSize = New System.Drawing.Size(492, 205)
             Me.Name = "GroupEditorForm"
             Me.ShowInTaskbar = False
             Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
@@ -86,6 +87,7 @@ Namespace DownloadObjects.Groups
             Me.ResumeLayout(False)
 
         End Sub
+
         Private WithEvents DEFS_GROUP As GroupDefaults
     End Class
 End Namespace
\ No newline at end of file
diff --git a/SCrawler/Download/Groups/GroupParameters.vb b/SCrawler/Download/Groups/GroupParameters.vb
index 1338deb..1d77172 100644
--- a/SCrawler/Download/Groups/GroupParameters.vb
+++ b/SCrawler/Download/Groups/GroupParameters.vb
@@ -6,10 +6,14 @@
 '
 ' This program is distributed in the hope that it will be useful,
 ' but WITHOUT ANY WARRANTY
+Imports PersonalUtilities.Functions.XML
 Namespace DownloadObjects.Groups
     Friend Interface IGroup
         Property Name As String
         ReadOnly Property Labels As List(Of String)
+        ReadOnly Property LabelsExcluded As List(Of String)
+        ReadOnly Property Sites As List(Of String)
+        ReadOnly Property SitesExcluded As List(Of String)
         Property Temporary As CheckState
         Property Favorite As CheckState
         Property ReadyForDownload As Boolean
@@ -21,20 +25,60 @@ Namespace DownloadObjects.Groups
         Protected Const Name_Favorite As String = "Favorite"
         Protected Const Name_ReadyForDownload As String = "RFD"
         Protected Const Name_ReadyForDownloadIgnore As String = "RFDI"
+        Protected Const Name_Labels As String = "Labels"
+        Protected Const Name_Labels_Excluded As String = "LabelsExcluded"
+        Protected Const Name_Sites As String = "Sites"
+        Protected Const Name_Sites_Excluded As String = "SitesExcluded"
         Friend Property Name As String Implements IGroup.Name
         Friend ReadOnly Property Labels As List(Of String) Implements IGroup.Labels
+        Friend ReadOnly Property LabelsExcluded As List(Of String) Implements IGroup.LabelsExcluded
+        Friend ReadOnly Property Sites As List(Of String) Implements IGroup.Sites
+        Friend ReadOnly Property SitesExcluded As List(Of String) Implements IGroup.SitesExcluded
         Friend Property Temporary As CheckState = CheckState.Indeterminate Implements IGroup.Temporary
         Friend Property Favorite As CheckState = CheckState.Indeterminate Implements IGroup.Favorite
         Friend Property ReadyForDownload As Boolean = True Implements IGroup.ReadyForDownload
         Friend Property ReadyForDownloadIgnore As Boolean = False Implements IGroup.ReadyForDownloadIgnore
         Friend Sub New()
             Labels = New List(Of String)
+            LabelsExcluded = New List(Of String)
+            Sites = New List(Of String)
+            SitesExcluded = New List(Of String)
         End Sub
+        Protected Sub Import(ByVal e As EContainer)
+            Name = e.Value(Name_Name)
+            Temporary = e.Value(Name_Temporary).FromXML(Of Integer)(CInt(CheckState.Indeterminate))
+            Favorite = e.Value(Name_Favorite).FromXML(Of Integer)(CInt(CheckState.Indeterminate))
+            ReadyForDownload = e.Value(Name_ReadyForDownload).FromXML(Of Boolean)(True)
+            ReadyForDownloadIgnore = e.Value(Name_ReadyForDownloadIgnore).FromXML(Of Boolean)(False)
+
+            Dim l As New ListAddParams(LAP.NotContainsOnly)
+            If Not e.Value(Name_Labels).IsEmptyString Then Labels.ListAddList(e.Value(Name_Labels).Split("|"), l)
+            If Not e.Value(Name_Labels_Excluded).IsEmptyString Then LabelsExcluded.ListAddList(e.Value(Name_Labels_Excluded).Split("|"), l)
+            If Not e.Value(Name_Sites).IsEmptyString Then Sites.ListAddList(e.Value(Name_Sites).Split("|"), l)
+            If Not e.Value(Name_Sites_Excluded).IsEmptyString Then SitesExcluded.ListAddList(e.Value(Name_Sites_Excluded).Split("|"), l)
+        End Sub
+        Protected Function Export(ByVal e As EContainer) As EContainer
+            e.AddRange({New EContainer(Name_Name, Name),
+                        New EContainer(Name_Temporary, CInt(Temporary)),
+                        New EContainer(Name_Favorite, CInt(Favorite)),
+                        New EContainer(Name_ReadyForDownload, ReadyForDownload.BoolToInteger),
+                        New EContainer(Name_ReadyForDownloadIgnore, ReadyForDownloadIgnore.BoolToInteger),
+                        New EContainer(Name_Labels, Labels.ListToString("|")),
+                        New EContainer(Name_Labels_Excluded, LabelsExcluded.ListToString("|")),
+                        New EContainer(Name_Sites, Sites.ListToString("|")),
+                        New EContainer(Name_Sites_Excluded, SitesExcluded.ListToString("|"))})
+            Return e
+        End Function
 #Region "IDisposable Support"
         Protected disposedValue As Boolean = False
         Protected Overridable Overloads Sub Dispose(ByVal disposing As Boolean)
             If Not disposedValue Then
-                If disposing Then Labels.Clear()
+                If disposing Then
+                    Labels.Clear()
+                    LabelsExcluded.Clear()
+                    Sites.Clear()
+                    SitesExcluded.Clear()
+                End If
                 disposedValue = True
             End If
         End Sub
diff --git a/SCrawler/Editors/LabelsForm.Designer.vb b/SCrawler/Editors/LabelsForm.Designer.vb
index 05cc240..5366851 100644
--- a/SCrawler/Editors/LabelsForm.Designer.vb
+++ b/SCrawler/Editors/LabelsForm.Designer.vb
@@ -79,11 +79,11 @@ Partial Friend Class LabelsForm : Inherits System.Windows.Forms.Form
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(374, 421)
         Me.Controls.Add(CONTAINER_MAIN)
+        Me.Icon = Global.SCrawler.My.Resources.Resources.TagIcon_32
         Me.KeyPreview = True
         Me.MinimizeBox = False
         Me.MinimumSize = New System.Drawing.Size(390, 460)
         Me.Name = "LabelsForm"
-        Me.ShowIcon = False
         Me.ShowInTaskbar = False
         Me.Text = "Labels"
         CONTAINER_MAIN.ContentPanel.ResumeLayout(False)
diff --git a/SCrawler/Editors/LabelsForm.vb b/SCrawler/Editors/LabelsForm.vb
index a2b9256..f74c65b 100644
--- a/SCrawler/Editors/LabelsForm.vb
+++ b/SCrawler/Editors/LabelsForm.vb
@@ -18,6 +18,8 @@ Friend Class LabelsForm
         Get
             If Not _Source Is Nothing Then
                 Return _Source
+            ElseIf AddNoParsed Then
+                Return ListAddList(Nothing, Settings.Labels).ListAddValue(LabelsKeeper.NoParsedUser, LAP.NotContainsOnly)
             Else
                 Return Settings.Labels
             End If
@@ -27,8 +29,10 @@ Friend Class LabelsForm
     Friend Property MultiUser As Boolean = False
     Friend Property MultiUserClearExists As Boolean = False
     Friend Property WithDeleteButton As Boolean = False
-    Friend Sub New(ByVal LabelsArr As IEnumerable(Of String))
+    Private ReadOnly AddNoParsed As Boolean = False
+    Friend Sub New(ByVal LabelsArr As IEnumerable(Of String), Optional ByVal AddNoParsed As Boolean = False)
         InitializeComponent()
+        Me.AddNoParsed = AddNoParsed
         LabelsList = New List(Of String)
         LabelsList.ListAddList(LabelsArr)
         MyDefs = New DefaultFormOptions(Me, Settings.Design)
diff --git a/SCrawler/Editors/SiteSelectionForm.Designer.vb b/SCrawler/Editors/SiteSelectionForm.Designer.vb
index bcbe3b4..d80436f 100644
--- a/SCrawler/Editors/SiteSelectionForm.Designer.vb
+++ b/SCrawler/Editors/SiteSelectionForm.Designer.vb
@@ -87,7 +87,7 @@ Namespace Editors
             Me.ShowIcon = False
             Me.ShowInTaskbar = False
             Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
-            Me.Text = "Select Site"
+            Me.Text = "Sites"
             CONTAINER_MAIN.ContentPanel.ResumeLayout(False)
             CONTAINER_MAIN.ResumeLayout(False)
             CONTAINER_MAIN.PerformLayout()
diff --git a/SCrawler/MainFrame.Designer.vb b/SCrawler/MainFrame.Designer.vb
index 121bb95..9d6991b 100644
--- a/SCrawler/MainFrame.Designer.vb
+++ b/SCrawler/MainFrame.Designer.vb
@@ -910,7 +910,6 @@ Partial Public Class MainFrame : Inherits System.Windows.Forms.Form
     Private WithEvents BTT_ADD_USER As ToolStripButton
     Private WithEvents BTT_DELETE_USER As ToolStripButton
     Private WithEvents BTT_DOWN_SELECTED As ToolStripKeyMenuItem
-    Private WithEvents MENU_DOWN_ALL As ToolStripDropDownButton
     Private WithEvents Toolbar_BOTTOM As StatusStrip
     Private WithEvents PR_MAIN As ToolStripProgressBar
     Private WithEvents LBL_STATUS As ToolStripStatusLabel
@@ -986,4 +985,5 @@ Partial Public Class MainFrame : Inherits System.Windows.Forms.Form
     Private WithEvents BTT_SILENT_MODE As ToolStripMenuItem
     Friend WithEvents BTT_DOWN_AUTOMATION_PAUSE As ToolStripMenuItem
     Private WithEvents BTT_TRAY_FEED_SHOW As ToolStripMenuItem
+    Friend WithEvents MENU_DOWN_ALL As ToolStripDropDownButton
 End Class
\ No newline at end of file
diff --git a/SCrawler/MainFrame.vb b/SCrawler/MainFrame.vb
index 8247d2a..d6334b5 100644
--- a/SCrawler/MainFrame.vb
+++ b/SCrawler/MainFrame.vb
@@ -52,7 +52,7 @@ Public Class MainFrame
     End Sub
 #End Region
 #Region "Form handlers"
-    Private Sub MainFrame_Load(sender As Object, e As EventArgs) Handles Me.Load
+    Private Async Sub MainFrame_Load(sender As Object, e As EventArgs) Handles Me.Load
         If _VideoDownloadingMode Then GoTo FormClosingInvoker
         If Now.Month.ValueBetween(6, 8) Then Text = "SCrawler: Happy LGBT Pride Month! :-)"
         Settings.DeleteCachePath()
@@ -115,7 +115,7 @@ Public Class MainFrame
         AddHandler Settings.Groups.Deleted, AddressOf Settings.Automation.GROUPS_Deleted
         AddHandler Settings.Automation.PauseDisabled, AddressOf MainFrameObj.PauseButtons.UpdatePauseButtons
         _UFinit = False
-        Settings.Automation.Start(True)
+        Await Settings.Automation.Start(True)
         UpdatePauseButtonsVisibility()
         GoTo EndFunction
 FormClosingInvoker:
@@ -376,13 +376,13 @@ CloseResume:
         DownloadSelectedUser(DownUserLimits.None, e.IncludeInTheFeed)
     End Sub
     Private Sub BTT_DOWN_ALL_KeyClick(sender As Object, e As MyKeyEventArgs) Handles BTT_DOWN_ALL.KeyClick
-        Downloader.AddRange(Settings.Users.Where(Function(u) u.ReadyForDownload And u.Exists), e.IncludeInTheFeed)
+        Downloader.AddRange(Settings.GetUsers(Function(u) u.ReadyForDownload And u.Exists), e.IncludeInTheFeed)
     End Sub
     Private Sub BTT_DOWN_SITE_KeyClick(sender As Object, e As MyKeyEventArgs) Handles BTT_DOWN_SITE.KeyClick
         DownloadSiteFull(True, e.IncludeInTheFeed)
     End Sub
     Private Sub BTT_DOWN_ALL_FULL_KeyClick(sender As Object, e As MyKeyEventArgs) Handles BTT_DOWN_ALL_FULL.KeyClick
-        Downloader.AddRange(Settings.Users.Where(Function(u) u.Exists), e.IncludeInTheFeed)
+        Downloader.AddRange(Settings.GetUsers(UserExistsPredicate), e.IncludeInTheFeed)
     End Sub
     Private Sub BTT_DOWN_SITE_FULL_KeyClick(sender As Object, e As MyKeyEventArgs) Handles BTT_DOWN_SITE_FULL.KeyClick
         DownloadSiteFull(False, e.IncludeInTheFeed)
@@ -395,18 +395,8 @@ CloseResume:
                 Settings.LatestDownloadedSites.AddRange(f.SelectedSites)
                 Settings.LatestDownloadedSites.Update()
                 If f.SelectedSites.Count > 0 Then
-                    Downloader.AddRange(Settings.Users.SelectMany(Function(ByVal u As IUserData) As IEnumerable(Of IUserData)
-                                                                      If u.IsCollection Then
-                                                                          Return DirectCast(u, UserDataBind).Collections.
-                                                                                 Where(Function(uu) f.SelectedSites.Contains(uu.Site) And u.Exists And
-                                                                                                    (Not ReadyForDownloadOnly Or uu.ReadyForDownload))
-                                                                      ElseIf f.SelectedSites.Contains(u.Site) And u.Exists And
-                                                                             (Not ReadyForDownloadOnly Or u.ReadyForDownload) Then
-                                                                          Return {u}
-                                                                      Else
-                                                                          Return New IUserData() {}
-                                                                      End If
-                                                                  End Function), IncludeInTheFeed)
+                    Downloader.AddRange(Settings.GetUsers(Function(u) f.SelectedSites.Contains(u.Site) And u.Exists And
+                                                                      (Not ReadyForDownloadOnly Or u.ReadyForDownload)), IncludeInTheFeed)
                 End If
             End If
         End Using
@@ -421,7 +411,7 @@ CloseResume:
     End Sub
     Private Sub GROUPS_Updated(ByVal Sender As Groups.DownloadGroup)
         Dim i% = MENU_DOWN_ALL.DropDownItems.IndexOf(Sender.GetControl)
-        ControlInvoke(Toolbar_TOP, MENU_DOWN_ALL, Sub() MENU_DOWN_ALL.DropDownItems(i).Text = Sender.ToString)
+        If i >= 0 Then ControlInvoke(Toolbar_TOP, MENU_DOWN_ALL, Sub() MENU_DOWN_ALL.DropDownItems(i).Text = Sender.ToString)
     End Sub
     Private Sub GROUPS_Deleted(ByVal Sender As Groups.DownloadGroup)
         MENU_DOWN_ALL.DropDownItems.Remove(Sender.GetControl)
@@ -442,9 +432,9 @@ CloseResume:
         ControlInvokeFast(Toolbar_TOP, BTT_DOWN_AUTOMATION_PAUSE, Sub() BTT_DOWN_AUTOMATION_PAUSE.Visible = b)
         ControlInvokeFast(Me, Sub() BTT_TRAY_PAUSE_AUTOMATION.Visible = b)
     End Sub
-    Private Sub BTT_DOWN_AUTOMATION_Click(sender As Object, e As EventArgs) Handles BTT_DOWN_AUTOMATION.Click
+    Private Async Sub BTT_DOWN_AUTOMATION_Click(sender As Object, e As EventArgs) Handles BTT_DOWN_AUTOMATION.Click
         Using f As New SchedulerEditorForm : f.ShowDialog() : End Using
-        Settings.Automation.Start(False)
+        Await Settings.Automation.Start(False)
         UpdatePauseButtonsVisibility()
         MainFrameObj.PauseButtons.UpdatePauseButtons()
     End Sub
@@ -1438,21 +1428,14 @@ ResumeDownloadingOperation:
     Friend Sub User_OnUserUpdated(ByVal User As IUserData)
         UserListUpdate(User, False)
     End Sub
-    Private _LogColorChanged As Boolean = False
     Private Sub Downloader_UpdateJobsCount(ByVal TotalCount As Integer)
-        Dim a As Action = Sub() LBL_JOBS_COUNT.Text = IIf(TotalCount = 0, String.Empty, $"[Jobs {TotalCount}]")
-        If Toolbar_BOTTOM.InvokeRequired Then Toolbar_BOTTOM.Invoke(a) Else a.Invoke
-        If Not _LogColorChanged AndAlso Not MyMainLOG.IsEmptyString Then
-            MainFrameObj.UpdateLogButton()
-            _LogColorChanged = True
-        ElseIf _LogColorChanged And MyMainLOG.IsEmptyString Then
-            MainFrameObj.UpdateLogButton()
-            _LogColorChanged = False
-        End If
+        ControlInvokeFast(Toolbar_BOTTOM, LBL_JOBS_COUNT, Sub() LBL_JOBS_COUNT.Text = IIf(TotalCount = 0, String.Empty, $"[Jobs {TotalCount}]"))
+        MainFrameObj.UpdateLogButton()
     End Sub
     Private Sub Downloader_Downloading(ByVal Value As Boolean)
-        Dim a As Action = Sub() BTT_DOWN_STOP.Enabled = Value Or Downloader.Working
-        If Toolbar_TOP.InvokeRequired Then Toolbar_TOP.Invoke(a) Else a.Invoke
+        Dim __isDownloading As Boolean = Value Or Downloader.Working
+        ControlInvokeFast(Toolbar_TOP, BTT_DOWN_STOP, Sub() BTT_DOWN_STOP.Enabled = __isDownloading)
+        ControlInvokeFast(Me, Sub() TrayIcon.Icon = If(__isDownloading, My.Resources.ArrowDownIcon_Blue_24, My.Resources.RainbowIcon_48))
     End Sub
 #End Region
 End Class
\ No newline at end of file
diff --git a/SCrawler/MainFrameObjects.vb b/SCrawler/MainFrameObjects.vb
index 1cdd10d..06b2353 100644
--- a/SCrawler/MainFrameObjects.vb
+++ b/SCrawler/MainFrameObjects.vb
@@ -48,35 +48,31 @@ Friend Class MainFrameObjects
 #End Region
 #Region "Form functions"
     Friend Sub Focus(Optional ByVal Show As Boolean = False)
-        If Not MF.Visible And Show Then MF.Show()
-        If MF.Visible Then MF.BringToFront() : MF.Activate()
+        ControlInvokeFast(MF, Sub()
+                                  If Not MF.Visible And Show Then MF.Show()
+                                  If MF.Visible Then MF.BringToFront() : MF.Activate()
+                              End Sub)
     End Sub
     Friend Sub ChangeCloseVisible()
-        Dim a As Action = Sub() MF.BTT_TRAY_CLOSE_NO_SCRIPT.Visible = Settings.ClosingCommand.Attribute And Not Settings.ClosingCommand.IsEmptyString
-        If MF.TRAY_CONTEXT.InvokeRequired Then MF.TRAY_CONTEXT.Invoke(a) Else a.Invoke
+        ControlInvokeFast(MF.TRAY_CONTEXT, Sub() MF.BTT_TRAY_CLOSE_NO_SCRIPT.Visible =
+                                                 Settings.ClosingCommand.Attribute And Not Settings.ClosingCommand.IsEmptyString)
     End Sub
     Friend Sub UpdateLogButton()
         MyMainLOG_UpdateLogButton(MF.BTT_LOG, MF.Toolbar_TOP)
     End Sub
 #End Region
 #Region "Notifications"
-    Friend Overloads Sub ShowNotification(ByVal Sender As SettingsCLS.NotificationObjects, ByVal Message As String)
-        If Settings.ProcessNotification(Sender) Then MF.TrayIcon.ShowBalloonTip(2000, MF.TrayIcon.BalloonTipTitle, Message, ToolTipIcon.Info)
-    End Sub
-    Friend Overloads Sub ShowNotification(ByVal Sender As SettingsCLS.NotificationObjects, ByVal Message As String, ByVal Title As String)
-        If Settings.ProcessNotification(Sender) Then MF.TrayIcon.ShowBalloonTip(2000, Title, Message, ToolTipIcon.Info)
-    End Sub
-    Friend Overloads Sub ShowNotification(ByVal Sender As SettingsCLS.NotificationObjects, ByVal Message As String, ByVal Title As String, ByVal Icon As ToolTipIcon)
-        If Settings.ProcessNotification(Sender) Then MF.TrayIcon.ShowBalloonTip(2000, Title, Message, Icon)
+    Private Const NotificationInternalKey As String = "NotificationInternalKey"
+    Friend Sub ShowNotification(ByVal Sender As SettingsCLS.NotificationObjects, ByVal Message As String)
+        If Settings.ProcessNotification(Sender) Then
+            Using n As New Notification(Message) With {.Key = NotificationInternalKey} : n.Show() : End Using
+        End If
     End Sub
     Friend Sub ClearNotifications()
         Notificator.Clear()
     End Sub
     Private Sub Notificator_OnClicked(ByVal Key As String) Handles Notificator.OnClicked
-        If Settings.Automation Is Nothing OrElse Not Settings.Automation.NotificationClicked(Key) Then
-            If Not MF.Visible Then MF.Show()
-            Focus()
-        End If
+        If Key = NotificationInternalKey OrElse Settings.Automation Is Nothing OrElse Not Settings.Automation.NotificationClicked(Key) Then Focus(True)
     End Sub
 #End Region
 End Class
\ No newline at end of file
diff --git a/SCrawler/MainMod.vb b/SCrawler/MainMod.vb
index f70de95..44afa60 100644
--- a/SCrawler/MainMod.vb
+++ b/SCrawler/MainMod.vb
@@ -101,6 +101,7 @@ Friend Module MainMod
     Friend MainFrameObj As MainFrameObjects
     Friend ReadOnly ParsersDataDateProvider As New ADateTime(ADateTime.Formats.BaseDateTime)
     Friend ReadOnly FeedVideoLengthProvider As New ADateTime("hh\:mm\:ss") With {.TimeParseMode = ADateTime.TimeModes.TimeSpan}
+    Friend ReadOnly UserExistsPredicate As New FPredicate(Of IUserData)(Function(u) u.Exists)
     Friend ReadOnly LogConnector As New LogHost
 #Region "File name operations"
     Friend FileDateAppenderProvider As IFormatProvider
diff --git a/SCrawler/My Project/AssemblyInfo.vb b/SCrawler/My Project/AssemblyInfo.vb
index 0282539..0e9b979 100644
--- a/SCrawler/My Project/AssemblyInfo.vb	
+++ b/SCrawler/My Project/AssemblyInfo.vb	
@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("2022.10.18.0")>
-<Assembly: AssemblyFileVersion("2022.10.18.0")>
+<Assembly: AssemblyVersion("2022.10.23.0")>
+<Assembly: AssemblyFileVersion("2022.10.23.0")>
 <Assembly: NeutralResourcesLanguage("en")>
diff --git a/SCrawler/My Project/Resources.Designer.vb b/SCrawler/My Project/Resources.Designer.vb
index e08c57b..424a8b3 100644
--- a/SCrawler/My Project/Resources.Designer.vb	
+++ b/SCrawler/My Project/Resources.Designer.vb	
@@ -360,6 +360,16 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Icon similar to (Icon).
+        '''</summary>
+        Friend ReadOnly Property TagIcon_32() As System.Drawing.Icon
+            Get
+                Dim obj As Object = ResourceManager.GetObject("TagIcon_32", resourceCulture)
+                Return CType(obj,System.Drawing.Icon)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Looks up a localized resource of type System.Drawing.Icon similar to (Icon).
         '''</summary>
diff --git a/SCrawler/My Project/Resources.resx b/SCrawler/My Project/Resources.resx
index e3889b7..6583640 100644
--- a/SCrawler/My Project/Resources.resx	
+++ b/SCrawler/My Project/Resources.resx	
@@ -211,4 +211,7 @@
   <data name="PinPic_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Content\Pictures\PinPic_32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="TagIcon_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Content\Icons\TagIcon_32.ico;System.Drawing.Icon, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
 </root>
\ No newline at end of file
diff --git a/SCrawler/PluginsEnvironment/Hosts/SettingsHost.vb b/SCrawler/PluginsEnvironment/Hosts/SettingsHost.vb
index 15ed660..73ab6d8 100644
--- a/SCrawler/PluginsEnvironment/Hosts/SettingsHost.vb
+++ b/SCrawler/PluginsEnvironment/Hosts/SettingsHost.vb
@@ -187,7 +187,7 @@ Namespace Plugin.Hosts
                     If m.MemberType = MemberTypes.Property Then
                         PropList.Add(New PropertyValueHost(Source, m))
                         With DirectCast(m, PropertyInfo)
-                            If .PropertyType Is GetType(Response) Then _ResponserGetMethod = .GetMethod
+                            If .PropertyType Is GetType(Response) AndAlso m.GetCustomAttribute(Of DoNotUse)() Is Nothing Then _ResponserGetMethod = .GetMethod
                         End With
                     End If
                     With m.GetCustomAttributes()
diff --git a/SCrawler/SCrawler.vbproj b/SCrawler/SCrawler.vbproj
index 5c55b7b..a00ca80 100644
--- a/SCrawler/SCrawler.vbproj
+++ b/SCrawler/SCrawler.vbproj
@@ -563,6 +563,7 @@
     <None Include="Content\Pictures\ArrowDownPic_Blue_24.png" />
     <None Include="Content\Icons\ArrowDownIcon_Blue_24.ico" />
     <None Include="Content\Pictures\PinPic_32.png" />
+    <None Include="Content\Icons\TagIcon_32.ico" />
     <Content Include="ffmpeg.exe">
       <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
     </Content>
diff --git a/SCrawler/SettingsCLS.vb b/SCrawler/SettingsCLS.vb
index 3012f33..b84817f 100644
--- a/SCrawler/SettingsCLS.vb
+++ b/SCrawler/SettingsCLS.vb
@@ -449,6 +449,24 @@ Friend Class SettingsCLS : Implements IDisposable
         End If
         Return Nothing
     End Function
+    Friend Function GetUsers(ByVal Predicate As Predicate(Of IUserData)) As IEnumerable(Of IUserData)
+        With Users
+            If .Count > 0 Then
+                Dim fp As Func(Of IUserData, Boolean) = FPredicate(Of IUserData).ToFunc(Predicate)
+                Return .SelectMany(Of IUserData)(Function(ByVal user As IUserData) As IEnumerable(Of IUserData)
+                                                     If user.IsCollection Then
+                                                         With DirectCast(user, UserDataBind)
+                                                             If .Count > 0 Then Return .Where(fp)
+                                                         End With
+                                                     Else
+                                                         If Predicate.Invoke(user) Then Return {user}
+                                                     End If
+                                                     Return New IUserData() {}
+                                                 End Function)
+            End If
+        End With
+        Return New IUserData() {}
+    End Function
 #End Region
     Friend Sub UpdateBlackList()
         If BlackList.Count > 0 Then