MMBuilder28Welcome!Page 1Y|vList? ArialListItems$,ItemsNum$,#,NumItemsfi=1NumItemsc%ArrayItem$ = GetArrayItem(Items$,#,i)gi# Browse_Finder# Name_Finderd TextBTN?Start \ Startup"Tahoma,cBrowse$ = 'Startup'cvcmd$ = 'HIDE,WAIT /C reg Query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" >c:\folder.txt'Cmd.execmd$***************************cPosStr=0cOpenFile$ = 'c:\folder.txt'cEditBox$ = 'Startup'd OpenFile$<>'' ** get number of lines from filecNumOfLines=NOL(OpenFile$)cSubStr$=EditBox$$** change searched word to lowercasecSubStrLow$=LOW(SubStr$)fi=1 NumOfLines** get new line from filec!SLine$=StrFromFile(OpenFile$,i,1)"** change loaded line to lowercasecSLow$=LOW(SLine$)-** Get position of a SubString in loaded linecPosStr=POS(SubStrLow$,SLow$)6** if substring is found then load line to text objectd PosStr<>0c$SLineRes$=StrFromFile(OpenFile$,i,1) ** exit loop.**********************************************clen=LEN(SLine$)csubstring$='REG_SZ 'cRetVal=POS(substring$,SLine$)cRetVal = RetVal + 7c copy$=StrCopy(SLine$,RetVal,len)!**DisplayValue("EditBox","copy$")**Message("copy$","")d copy$ <> ''Pcopy$*.*ListRESETListListNAME?e.**********************************************egied 4TextBTN1?HKCU\Run"TahomacBrowse$ = 'HKCU\Run'c`cmd$ = 'HIDE,WAIT /C Reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Run" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtdI.Bitmap' `-ƽx E'`$(g11'd1B1(AWEXvu7*b|]]QT& <飺 ?U]}_UV83V^]ra ːk6 aoղ~eٻ6d* 0qFkee+^5;.y5 znwj/t+-=S+ Pa=:kW6mo_?:vwu~۲[[;'6Yt VZQkf~;MMnVw|__~+kȄvR' z9y/oxe[?|{.lgc ='L9f3gx/;mݝtڹ;6qSop ?}m]kYw5뎙ȉkuxk!W>yQWtC+N5uo|eヷu53vMhuw]MUWvVe;~bӟ-ܐ/[SVzyenw9˚s. /%@ 2~ٽ{Gw=_ۮGw/| |>w}>wQ߸ɫ?0k6߷|dކ>.o>kƛ֝yoXwkGZ{5'u&<]/[3j~m-ܿ:op_{g_}5wNnՓ3;>cw= =ؗe~Y]GYA e1A` g3~'__o>ްמѾv5#:y>~ª+rɟ;秝r={gl{zdckg5{5?t,zɊ`5s.>DVi7m=qYGw?,=]HP1Vo~7v]7ݮ_jeO_ɾ+>wK#Gu=̛v4mac3_Olq}wtC}3֝Ҷkל0eto>W5~š.ܟu>:_s?n%_wmXtw1urWitM%Vu _^w/{+^|mv o'}܊`<|ҁx۾]VF+Wȼ]rJ=?wf}q׵O.cn=lŮoyc~J[We?󗳓'kҧD.7zzϜ{N{Owr9m=qotۆ^ ?0s)mk_s7v>p*7\ܺa AqE]׌תϴ(?^c?FbOV?sZǞ'}JaV(O">8;WM?w?ݥ+qڲvo4sl,o+='xa9b邯x<;{ۿdwMlq]rgyxsψ{OY{R{)8hsiϺyfoNo_'M[)돟}~պW=b\k:_cuAZ3=j5ot?ZkXҼW/?K/o}_Ï}z+/9GwY?}'v~_r;Mhk ;%~9;v^K7oy[p*gu+6xaW[ 7]#'u_}7fnٷysϩ7p}fwfowx]ב ;q3ox^]}sźǯ; +X\۽su7_DՓ~v׼O|vgEϴ"زNt=qYOvLק.pmV(2i|r֮]'~۬s|~;նi;­޶wJ˰JVkZP?[ӇBݖ?QwۢUeA3gBgߔ|֞shA;zϞ{Sn}Mw}mﭿ~G}/}_Nu #7ަv}H=ksN'97eݜ kor͍ͻuqu7^^gpaWc]V}?K+YQkROd-GOݣ??5#vsM8 4m%Yj}".EpHy?~Z8kv0ٽ鱩?y^zNbr7wķGun}vaHM][W}sK!nrدYG.o# V.;s=M+vŖP/[K>4TM"N{~;|Y~ Ewi~s{OpK{g}c17wzt>nƓgl:m֦6Y!68mC5;u1S6jp@ˆZl^1IZ79ݷOXw[ڛoauQִ7Wkw}?XƬcO>h寎^ylGߣ8}O<>W^]iOa/Ga†^1Ν024d _{]Pw+^ x[ WfV`ca䯇wװfya NTXo{Ys.xrgOMs?x_Yy;hXK<|w<6nUFO3'Qe;Ⱥ>ƞKjQ՟oY?}o}]w΂3;u^_-}G;ꆞ}X6I;NY5cmliNdMvu㻯+׿c77Z5_֫vu-n˕u-v? |^3,9v9X/~qx'myׄ-n޿e;?5lc'w]w+|Efv_<ڝ_~m+{_(䯫vsv6ٶbWfoϯ~Q{2Mav"XFQ3?2lvϑk3~m>e_ى75j{PcPbMv>v"gkOOp]Ѯ0fiEH~gTN@J֭t}so{Wo'"v9uaÝ=L|6Im^agm։30{#vش-_[۲y ĭ~s浳Džfh;ڂ,둕ou+ǹ# ]׿ˊ`o涟זݽ<G7>7vÛVk曖!moi[cްXj'+~IR',7-~{^0n+[^_~egM/[on+HNMYtL}oY>N]_/9k}޴a쿆?/~slpiS:Ⱥ>zƛ{>:zkݿ̞&{IwpkخmO~59e;&lߧeۛb7vZz,ޖ_p7v}tͬm`ݬ17u}pSugk bëꎯ_kZu.`Z~'J^[3},{dYÅ`Zm7  Zl曏~#W/'7{*>4h i{@dJ6ai=gu][nCnv㺞Wk};æۊ`?fvƘ]kO_? 毻Zk5w<7&ۻ}ת?M󺺺W\ҲW?)o~ ]pT~]_U1= : *5GX;-~{(hV,s~봝 442@X7_g=ܹk޳~G)w?f^sy~CʵCε?tw7=GL9zz,9zκ;3|z{wk{1zn9C󛽅-L?W\Z򪑫'}k]ל5iz)tJwk =__}?7xo\~rnxsMoZjYߞ>ZqJ^7}িUv;Gw.~9uժ@κ~׸GMzuFo;g޴}M;Fq-;NuG;e{g=\s *#k[w'>WxLq;lqTێ#ֶж<`N+|;gI=ok96Ƽovj?w弣^ƏXrƊ3W\qȕW央+{i -GҜ&}nJea7| "f['L]~ǖٲ'l}W?uqSW=uՑ׬9tꚃ}פ5ڷ]vH/52e-Ntč,ݓ6s}'l㛆^y+7iPx;뺷f[>ts9{/jxq/\p/8=O׿_Δ AŊ`A 6Y;T5+$|{fc}== ~rЅu}/ٰ1KtȨ9G/lmz㽇Lxu􎏽o_׶e4?}{])\?N_3ڻO'-T@/0 Dj@/0 Dj@/0ykIGcкH*/0 LkqkA(KE%%y'!{.ؓ `q{P_` `>p PjVA:=(/0 L'Ir(ZYBגvkvƎV'X[;CpKܔ,t&)ioB{ty?q" K q@B z5_NqrLmc9?{K8AH_ֺF{i,寄/0 L0`B_뻍J_6gA&=YJ\كwU&0毘 lB{yhg _`=_0CA)O&kn,K(`: ѕe1s%@/0y_KUÜ0P_` `w_/0uc0&n!_`j@/0p!_`+:L! /'^& L&_{/0A4C7RB&HS@&H=)A" _5X_` U" _5X_` U" _K: ծF " j%-n-”~;9*X_eq{0G~iX2'Wj!_`//4KMK `ܭJ!_`1&-%m/ыz+#_`_r O9\WJ_ :E^5}Ww DVXK `_RH_j&Fj]0a"R.X< PE/0AVW&$!%D0۫0PjHT LUlyu?!a^_  j%Ud=/0 L`PN#_`Wf Dj@/0 D_?*! /'^& L&_{/0A 4/0A7P1<"  DDװ/[_` U" _5X_` U" 2t4 ]A)/0 L0kqkQJ/b-C4;Kcǒk:" $/97/5rv[^uW@/0AUWT|ABVEFL@QrxqatIY" *y))95y9ґ_B/κ%KFXK `_RH_"+ygI[_` y9LKl/>.ð@/0A?nbsbL?^!уχ~L(ʞ&v*6P_ m0q1izɇ/@z/0Af߿<" 2_`  +" _5X_` U" R/DӐiu/ r&HPu/= CJ _` X" _5X_` U" _5X_`  UB,/0 L`K:mXRd Dd%bIL[_`  ++rWccc_AF!͒W٪W_`  3+HZvkX$Le`%e2e7UBd'٨u?^|r?xqI Vr&S P%/0At|9C _` /C)4w%p&Y_~4 S˔B,/0 L@B,/0 L@B)uJ"i_`4˺G剗G_: Lr!…/0 L~ T _`1yS0a Dg_[UBA¿h_U//0 L_}ʝUB,/0 L`FZX(.v5&P#RIX(烼RwK pZ(/0 L%&gh oYEVJw~)6 Dd$uH)6ut:&Aǖ%N*WFf𳰲.-YOl]D_Frܽ%/{@/0Am寸/%%/J `_d}$/0A6?F+[$j5_J" 0%y%UKqDPC`_tc_/ aD`*S2f&0+e$@/0a+" _5X_` U" R/DӐiu/ r&HPu/= _lHp LCǿ_[1n T _` Y~?}g" "U@/0 Dj@/0 Dd9-h,ZW__` `pB!H'aK5v,v/P_Jt֦r" -J `/=Yh*T_` CHYl}6 :&/qwݟdq;>u4y9ґ_B /ŅZ;8_y " kXF_RS%;3hiWϔ_./0 LPOU$l ,e8ZUdaUð@/0AuWDƎ%R(F܁u>eMN+v_RĘ-J4bZM4Tbu _`_b'U|hu[M, `D,nS2+'ɽUrGvSaܶⱕڒ`/0AiK.acLbZB-yx^c0EɢFS/TvmtҘm3WF*`/0),! $k `d^2+sw.aI-uU3X̶bfM&翼MJX$E76a .U1EzZK?Rf# nC!4L0S0,TL;w" F A *98䬢$OxP#iN̢/&/G"M0G[Fm_` WXt `Ֆ" kX5./0 L@B,/0 L2Y$&H;Tx_{/0A#@)R*\Ӑ@&`,/0 L@B,/0 L@B,/0 LPkIGcкxPJ%]m!X" J_r? ˝d/B%D~%h]ocǒ=>eMծ P ` 󗔔ܥrB_J㕗lEbẂ$2@ :TjPJ_アQ8W%8kO%'AJh6 F bͿT}_L]# r%&4ΝH^]y9(%^7aE߈_Aml+.6޿4*„n=%_`_ `I}p- DX؅" _5X_` U" thQI/0 L&Yw<2 _`4 UG# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# _@# k_5G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2GDװ_G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2G2GD>L5/= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= /= \F5/= /= /= /= /=מjUJS{CիL @_sZpQ29a7n܂E#G5P%yģ4SqDD)zY1W#e r/Ero%}: F?xv+DxM(53;*|L @q R/#L+Ͷߙ%t=k!FnR2ɉǦbcĤcŴB'8g"ɫ̨ _i7&j.nԘ[_;q*uWGONz!e ronXڃ %EkMmsl0u[XN쟅7EGB }H1$] 7QW[<6T|cNމ6@tWnj} /Ƚ_6aw;ޙ}= $ܛg[yoA'Q䊦 g_K .hHfQ򗜞JjWFo /Ƚ_Y͎$H`jRs]?nc#\UVVt-1cX d=7WY{uMwY( /Ƚ?,hK/B)v+aH’6I_YԮ.!\>oݚ .0VabHof*'oP +_{yӼr@jL @jX7MW PL @L @L @e!9@;B0CE޻GU<05z-'D^s}$"ۃnr=C&x0U' k# zF4k&&PjX5w=b._v=}B*S+9o㞶 S#*ڐжdk sBW@7Z[j"e r/U 3TSŞB?|"CiÖ͘sÈqh//~&PUKK_ھQeP]ۺvkiiT]q?z^AUP$ VCݵ(a?qOۍ -Qk\{6iF_W<zG#y=V}21a8޷{!9?i"]/QHê_ō )kڶ^N;P-5%P%Z/Ⱥ)WL>i61: ]2h}S3_@+!rWՅfSPsAs[C!U%y_jH/IC4瘪 /!NY؉vY\kKD/к '/֎Q[%H#&eZ0]tccL @e>u:fœ ZCRRfϮijF+̩ ( +_{_22G2Gå]:xa+\9jZTO5R!e rM]glf-9JKza 3`FP*Ͻ"<W}rERӼy`[^JarۡoNu*e!_@KTof]V)71i߿}OB5+Ԫz7gF+})8wI7¯VDڷ *wy߄\TϋK+_{?L"En%J|ӓWJo~Qwޒv%z%|u ӝ&P F9Qo:k&/LhV%8S+t\zmku ЭM> 4dZ+J]%6!_@+i/VzSW=jqj5h __R|KObU _=hGɍk[/x=/Nމnq h*k_.4O{bK Z৹K[Fط #đ~B*o(%inF-BumVحźQu~='oy)@1_©3Pw-JOv{~m);eZ+ W /Ƚ˺7Gy+Ty,a8G69006IxtEF̰WCpqȫm) /VbGtHky F+T4?2&-1/}>Ӥ]NХ\뒟ZRfdY(W& 䯂PbѾx*6P#=[y_z.:sn K0WaX;M\մk P_.S5Za!"3 ;3kyEԼbZW1֎Q[%F1A#+׺/Ƚ,٧N'^2TՌVSAP"W& ٳkZ sj4JC^LL @L @_3#ɟYXl!W& /i}@;iXXd! W& R~P _@ܣ/& e r}!W& L@ L@ L@ L@ L@ L@ L@ L@^ׂBS{yOPpJݸ5^X&#ܰCdL @_t-_(ίOuGboCw+p~VQ[&G3ԪiSjռaA?&5RHW=uDBhFIC5-J}RfecL @_A);y|m;yy$~jh:K[:/X7ϕ=NnbS22/a_%5svѥe|Ӝw 2*wzMHjq:f>!ɣ@0?sY9u+w%x o +Vs>zMܺ-rم$.,s]u^'K7:?XqRnJjvŴR} ?JKSkTsXmo}[i ΣMS{9mO+_{)$ l%!fcp||mo(_87 Nƕ=YNĕ[qwS{hw?5?4FT8ho0s:k&/Lh|-ֳW(r҅+r6]8YYݛ| W-)+)-J'r /Ƚ+|$M8vVl># zFNvמ=鯑XհA&iD>}%%7m4uhsRu7b ͵SYr N9u'ѹq{?O L7MmL" 6W& /7,E;Z_?|}H৹wM[Fw #đ~BsO|JФ򗶻'nb!T׶nϔ~ZkUgֳ񇺆-a?q΍ -PήA,m! /Ƚ柏<7]X F!/LaD&)ª_0mГ"'X #n?5祩g.ʰ)WJl\ҳ&̱Y0 gUA^WՅvHHeF^ ί.d.\ѻh4rUErH}$N9TVX8}yB 9b˨1o #=zzޏK{cI4{m9.%ϿiBjֵ HL @e>ufY' C^2vMPUUԓA!e r/S P&W& _`W& hU0A\5TXءFzh /ȽKe.z?Ԫ5O|Jjš+O;;BsQ~aN2OA7/UFl#e r/u*v3V4yM/+k&^ UV՛.xW0}err# ned\O A%5]bn+zY#4]`%ՋYG^W"cEO_h,yw6:-HG礜o[޽%J7J>)y`&]T^S~8+WE_UkzkwF7--_nQL+w nKSkTsXmo}ui"GT."MS{9,Sic\M'j+_{%?G~y@[;=y[}HRr>jo_SwS^:^Wd;WoŕMv ӽٻȚNwvoN F9QRgp z EN_pEԦ Gu:/AV&qtUKJJeiT4ͅ|c#P#_@+eb*+ح[q AY'5i=鯑$SaM4|8EJJn]zi묱ln o͵SYr N9u'ѹq{?O L7MmL䕓F62WI{s%ܦ2Ao8\?ͽkRpw2¾~n u7$>%TUQJvčZ,#홲[OuM{?z^z3Pװ%'ѹqsXEٕ4?E-)z$_y2W& 篶Q8qne ӝ][4`E{mΟsԸY;4yaB'xͪgbnS+t\zmku ߛM> jeZVY+;IR/W"@_O/J_oőc<ʠGm: M?k+&FNjXsG4 "N{vѮA׶^4z^#u.T6׶3E6*S+9k]؞Q׆TfurJ&k+Q(bU_{io{R> F?a.)z;laߎZ?7hjG FYJčZ,#홲[OuM{?z^AUP$ VCݵ(a?qOۍ -Q5p׺+P);ckW&Xe@C4U|[~đO}2Bdq>0瀛S/~X?GXt+~|{Am<&'X !vY|k_/T,?nZ\_+8S5i{{2zk=`߄ڦ1aqWEI) bF)|] WՅ&DD[;nFio,@\:&vp_/LNe0&@U@ٳkZ sj5 I}٨ T *@όD`aP_dV [~,,j faI ȆWB/@ k+TnezɍSUee!POP()V Y?oߺ*߾k/@RYw)@+VD\_D䯐& "Q(Q_R((/ _@kB)_`P*2P kJ*/0 (BR9y4@/T }E EWS([*%[0Phj/oܾȺq j'MGaAi_@4_OϖӖf?,3ݑ(*_ʸDeyܯFO1j`x-,#fyeۜ:eqFyvTs|U- 4äFP*,&W=uxA#b)!Z֩5 _@tX$|rS!P5I{lwϳ.{P] q_aك/3vhnŸUPeX=BxXVU@r#{VFF6w"LR9g'}?+9_3 >%xaaZ9_rdS;MDZ`&aJKuX iK\=,/7x!"深Enet$F[e`[M=0:;GQJ AhU"]R?UhoXWuq#h[@RAJ kםWОPi4Qwjyyݸ^ճtG9rj$v-P7IM_Җ=oSx:aJKKkH3LQsKpԦf;[.Q;0PpntAA'|K/T#rw",ފ+UM>55}dMA;;M)4+[5ns% ?._w%t\GMtqk&qtUKJJei"0n 32m'LyatrMlpJɝ_HyſqM_aH{+qt{F>ЈQ~F_R|0iqSs,N{vѾA׶^:kG9[){څ),9:j\8QT&曦6JU";gqGS2hPmj'jOJYXעy" xP5pi?i]ÖQF45#D#yL|Jj_QeP]ۺ=SvkiiT]qW|G+Zr=:7.|Kw@9跅e2P9#&̞W(_YEko{sߠl@RNt~%{kyUʽ'URE];a~ /c#ǔ4˿OqV5](.9oVCma?Hl wq9/M=uoh%/uLjQޛ;sJJo8}hapAJ)*󗐛eAd &n+3<7B]gGp,ί.d\Jj鐫6-Dtm=;iS5ZEW2E~ x%f aaPO=9icL<6Bto/ǥ7bR7MHͺ6!E T!e>ufY' CJEP2 kZ g4j (BBrE T!4/T/ eJrIe0`Bk':C6l ( (U4Q(=/J!J4][^FӁ8:띸Z[oUZ!ȭk2n= ݰ4wg3adRF>`}i$GMSoWy.K}v4m/=O0+7zJ eEbb[M?4Tnɓh##M*]RѰg}ZFySob5=YB3+U4m9qF[g}#l `w5~8R4l8E74\|UŕR-:ߨN< khZJ12q~/S[Tn5<"PLL5Y/;_%NeQIaW< WFzr?֣fܣapYHtOר*'UTL34z n̅`T4|.M{ިa\ㆽoӧY2/&S1霯pf, J2&{W".%Yl}D eEbb*Iy^׭?4n,_W/TAk8u?UJ"7 t4TS$e{%-XUM+5vZjTrϔTXUWx˼ۥ_ϫhTeXO}2^~lU/={=_yUY/_LL5*];5)m_Y{0n湻4m?7f>Nq} 0K +ϔ m|ߪ?θovUeIQ,W|D7.4H9e\~/\MlT/`05R){{5?DͮQFkyDґ2_,RٍZ&j2zyeA7[Kwy@5${m4ث^4R}uGFŵ +ix2}"Fe:Ո/m+|%tG Pw ח b=ݓO_hyEgp,fZd} e)RQ.f3]iD_@Y/o꒲Нۨeb&C{*jZ겞PV/9~I/*uI{3*޲sh ObQS;y"1Z&W5_ nWihU W@P*m'I/z“SL-o’~Mδ/)S_9 (RZ=)]įş:ϻ4 .0_TKF27Uiˠ03씇+Jl_ y1*'W5_4{A[PEB-~][y( (+a|QCqq]%"TYKSf*/LWqC@ymU3z5,/^jiv2ɪ4+lp?<K5?b_]bp2nZw=3]]Zh bK;̏ @ʪiK#f ~LLyRK21{|2/_Vla܍CܗnX{; g.fq'h _U-ul`]Kn_EF(П*|7֖ժӔׁ/n0[ _M_@Yqe&*%)Ô2ji^4|/}oqsE[u /G;<7lrۺV2{')̗SO_m{-բ[i~E )U-e oY5Za-6Ps K@sw6qޤ˯}rISF.w7b)>QuKWf{ɪej M2++ۊ&WrU5z9y7ٟz4\O|c4O|u`QP1ӌFq)zf?JB (+SyM&֨Q=/u y7U@nO~mW!/K)y@GCH?EQWPU޴Raw٨ūFe+LIIuQuט_]F[tN1xi}@uW 4O-~H?/YfNl*)$/_LL5UZ\Kao(=?貆Ġm oU/uvx[_)2r*ԯe:ԫoT~T# ѯBЮb 5nk\C b=ݓ*O_hyEgp,fZa4Ej6*e]lf6JJx-_@YӵOjF{*jZ겞PV/&_ՍUZ5Ze=)T-/D:T GBv01'QFU_"Z5 ^_WbP+l|.TѺ<] 7$Ue~e_*H߈2 LWqQDu@yUmke\y{ҮYYYf (ה sE/^)Imtkc v(V|/.K_ݞSu]E_T-/w c(C) z1@q5Lݕo8*eGҮjfBP^,SE/epa0XRٶ'[]WV~1\ DuUUK̪UVJbp' F;b)纶^55z/Ĭ_|K%6iRTvIm96kU)U v4U7enSάU4mG/mݱ)V0qHm\ҬS-bOsJ48Su)UoX u㻙viOh׮Lյߕ^ֵ5V_"*"ܓj|= һ#Ǵ?Q4 B ?`-*zRL03MA4P\Fei~WQә+`oؙ(vyһJ_M+s?Uo_xi柨lu+Sume֔w|_P T26o_f!ROW 3hYEy]O:*G)ˠdtji/þQWBVJÓ:Zך_]U/ /Ŧ]C(r~m,/,'rJ_se_T'ex aoÍWk eh?Ż&P}tه)9 jgJ6oU_gFj7r|uaYK::3/_=4o[3_Ugn6ifۘTʻmO\[hd"JctqoK_{!1_ޫgk~ׯi^46ɔVd.eQ(U_ItW.g2ojx6UVlz 5n6{{2yn-Vj24$} [/ê7 6NjiUߵ/JO4QPe|-Ģ_ִªѪVfӪM(.[@9Q_=JFZMWM\ lB{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{u * A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{/ A{// A{/ A{/ A{/ A{/ A{/ A{/ _5?@rG{/ A{/ A{/ A{/ A{/ A{/ A{u}/(w/ A{[6j"8u */ A{/ "pPO/r:)?"T/Te/_`={]ׂOE@؃/_`/' *K~$@E_`={ A؃/_`DR"@Ep&TM_PA_`؃ =_`؃زP/(ND~m^IтeseyY/|{"@E_}|qPvߟ"8ypaT3gO9Np1ӧ%// A{+o"@Ep篸D{0ACS'dtiQTS'11?r=_PNN@p>' /?p9 *‘>STC_Cʍ?? @EC_W_P~4|b5p;/N wd njH11C.^ 3x>)ܵCEOoT r? 2#(83883$dfH顡SCN *VI4C'hXBpЌS5P13>~n>*NA鎙%=+'={c'IŋA2@<nEĵ|kQ)hLFus=vw&^\ե[U];w^޹sQҖO[>]xI|%1[7lBhoMwӟι8p߶-<H%"ڌ{qܼ7-ݻ%O~ܽKsYNޒK}'bEo/vYhx\V={e)=f΂7Y07,ܳp[h[07s7拷伶@̓-ޛ#+ͿpxXCax|}WM{uW)W&Nze'N|y0%aܘvsذ O>5#9aPng}{v]ӵiEiRڎ锼([4__zt/حK ιeEQc_.'RX; 7/o%WݛP$= EJ#BVNΛ ,{-9s`5WKΙZʫs>wGs\ =y-+s^+!gru}./W{u0敱c^}vc˘;s̳/yq {CԶo9i>K]G?Ҍ׭'Txւm ZpL#;(]/KXyo̗\y'scx"e_>iSvM 2a_&;]^?~ _?N2g_\7V<8vαv|aF1|ĎuJO?=c u -x7=~}6w {mcCkuYݹۦ$$kLJ_Zk8d:,mE3_k5Ræ_xC :*"uE֎X,u)rߌ[[.)/sDT#ƭ즇k+mMm؜1h ɦAܠ-3d " E(zeq'd 轱O} I%)y^zس7t뺩[ ]nmc׮v[׵˺.]tsV_Vֶ]em cEG-iX4U˧C6~fBУGKͫqZ 1~LJ-PTQUPU"o}Uzk״O[:ڶmWLI]29ueJbqbbIBbIbBq|6qcb bcFG,p,t- i5/՜gެɤGnRwP{m̈Ɉs|p7y?bg]!vȡ2*"MEH+zm75tݟNrr5Rn9qDT#¢Y{_S5ްeFM5߫+<Bw.%qțo>ű"y[Xc5^ٻW=\TfS示:΍{L)褐.˻t*ԥS;u(ءCGCi%ۗ:ڧHڗO_&Rz^X!^i~k񮴶+Sۮj2yꊶ+RR$"j%JI^*)aUBx\"1$MI6mbE/ZպuHGADxÑ] VͲZ6,pz`iMPɍi|SUۧf䓉8=uϾ(R9B0|>|ؤac)9f7GYt9Yʥ"UgmWD5PمQ}+4UIظrZSSfm;Brh?n>>||{}P-Hxtvo-<}k[ u;~xt#,V=N84kՂ{1xsue;S VU"8"le>3@JS[^8~HQo*.Uh>"v z>nu~w&i=d멧a7F}>Pxeڏ~,T#BߚӇc~f~/_m^ȋr'5ۗ` 888**]vi/E ?|9RODr_rC"u^ֹ諭6 軺o];.о]ۂvmS ԔWvNkP˹s`v R7>^oN{/-K;jyȏmڸI(NpJOrvӁcEZNX%Y-KJZ$=k!g&,KȏjMؘ̪11%1Qˣ[/k,2 ‘8$('s["w커iIq?>c%-n1gvL>[B="$X?y~!_O1/_zpDž[6o^cdI3^l޼M}f5ԩS޽{oС2Z ţW9| &[ z ,__,)yF!寎:k}%= &'%.MHŷO:2sirJtn}ִ/Wi w@e'zVX$ ZsITl#vnh9 sBr"v[QG^lY#ˤ1I%+bs":rIғVk0'8 :8֝VI)uqȢBaU-մM&7|J^z"5|}nH1iy\lӈkΙ3g>s_xŋ׫W\Wѕ}&Ѷt1Favݖ|J/QvԊhs< ܫO|DTtV\mEpDvD4KN[ڦ`na…럄&TTaYB![0:{@ cnj7߲7lgJt) zh2]i}_5x] ~½"|?޼\sg֢E}҆ ҹsg8eʔٳgvtohN` 7{XV.cR:v׼%s̑(Rط6Z3rTӭ{r~r6ymbcscbrs/sN9Vܻۻ:K~,ȀCB4J{1`%J,*&!Â[絎ʏ**j]37ɽ9m6K"!rv[vIIl;{;}BF Il;tX7t|Ϥuڅ,i,:~M5kbE[]<2rY$4xapg5Mm$H_} zzEĝ I&Sڵ5+|êmU'xB?gesY?y8'~B.*fT,ދٶ_}bٙnԂ?SQObl:IǕ({/ICrYYlf 2g%U=hW*fׂtxd͓`X)eQWk!]H=8|ʺpDT#åeS/=_F֖aӻ6Vx_/tYd x-/GK~ vynвgQHwvVs$}SAa|RsD6<#sjrX}->"{|xK>^$/a?OC?Ka.Uc5\cs7垽#sY(B}rO?ھ}{1}F5xSK.:t]qG_/9Y);sn y [[9x"eijΏ?ڱc6y"sEFEFFF#cg`On Nz)ο6ݪ[׿oDn7I8 h@ɏYYY(i wuj 0~^odO^{D;鴤$Sg~ m؛Vэ%Eǯ_ۦص"Ia+c"yeIO]HG/\R~.D9[l#ߊWS>ՈS8wZB_U(5}u'Snd]Lg'=9}Jx4ew!}N$aIXBItE)VFEG5 /]bNf3LqyWDA=d"k/1osΣry,N5ὗğY]g/m֪D:tf] RkLx!/{ImfԋT/}.E~"SxvHWYԗ\zeK09S{&9o"z>һ2NwU"Ƥ}os)wcU+JgP^fŧhذZEnb5Q}*BOܷ5bTWx\~ŽoOE:>s[,ij#Oa"r#>*Re`r }wRR$WI-W&3ʕH%ϩ{ױz>WU,N9b!k= q^ݤZ7KW§9";W~i=y/gYKqD(۱׳d/OHЄTyx8t_O#]<~|~BBˆ#Ν;vѣEYl˖-Rʸi _GN_W#/xț|Nv/ _dc/ښ3?&5?UԢTX"v円 y'Jyd '] t,>atͧ7L{/`y'f}zsIMuh2&ı<"8"$u^h̴LWr.]-!q$-tF ?qOVOJ^"m 'a@/䈼蟥5^B{!b~gbfļĕ1 DsiM8WE^Z$$(;TUomy'N&iDVXQv}#_9TNzA??/e2_O}Ȓ1ގ̚RLN&Ϟ9 ڙҙ,o^y&Թ3lS D>JDZPtvL+]}q#h@uƯ TSѪ4i,e77OL+N_Z0Do+Kwj}D9",+BOZ u!+b\t54%-WOթxGğ\qks8"~-G;)Ʃ-/5{l "ء1ぴyW1!=u7옝%x]MP+7vxێVw)ܡ3D&<^,NW[ϻsǽ@oxEה,AT܀c7KZ6繷+8bᣓ4gИ2>Pwfߟ]Wnxf6~ۿlRcKO\r睹)l1 ̍Yo~Όcvv?1Sikrӌ9͇ 0YݚN s8"VD8V:""Cc2rᡭ#kKiϝұ.E377Щ }rtOCO4ir(/&;aLc9|%O|.Q9ͦqkccVDN W<iizGO2 7_bn/oQh;3GUEXU+I>MRW\K{֤ھn∨zGZݑ[{E=y@\c٦ijy*8l'DpYʔbn {,9&s7LyTŗHW|<3$E?_XS}W 瑖Gdʨ2`Yua>+e߾jxA-98yl?cIݻtߏ]'f{u[<)_#BَUG? S=^݈' sܐyIw?dΝ;4XD0x[lY| %>{wXD).|~o2_K gvuew|q3sK&l2<;sqqmGE;!!BPAPP~P7ysBsi/F~=mUކ[vnhP ޯ5#EFuzcCDƈ%Q mg߷勵>X\;ahMT+s6KCFN|͒&M-L,$qIR6%&oM&%mIL"E Vtuy %|CW/ɤd?W&M>2D_W=0_'G2h[/?Qx$ۭkA6gog8y81-iF[u9JM[J֦U\uk1bW'CE6+򈰪k_E*Wא8"aD#]ƹ%֩ìG}d]&=IQqFwj./_0m6`tA}E D,|D,R-0ri򤼫 _5f*#B9Ȳ_}!￞g73n/LE> r:|E#B> gWr-Y3*ҷ+۱7~2v6]{R/quS7-8s&`ޙf׸wMa_U{Zh۽{}۷o7в kf.ߦ W/e+=|/e ;\QBX+vn~;H$:6?602 4HJ^ZjUy&;{Ossg|ϳͣ^y1{Owܷy—;6:""6GD>*,:Yܘm5~lpG|uhۘi0IrͿ3螄ADy<1]ħOJ.H]HҨ%Hl_H[6NI=_O]7Ft~ŻGnYzZ{!+EZr͛Ezş8q"|=p7~W/`~TF'цxWUQ׍SV jؠ|gb|rmmVQyIOܷ ?/_{/UY|M#C8∨zG P?+"E䯏-e ݘ[?߷瑱7ү wNϐ?4M 1G ~qv+bMa]\goNgݱl哇;3?uܡlޗwl9˦lpgDmx$_gN^?9'&>wxK'kq[}g55%uOSs/^m7RF%|I3() u̯ݖIwʞ/T 7E9G/9)N`ǒJa [Iky˖-f1r1?8y_l. ŀ  p˕>2-& eίm;ȨuaO`u?K6սCG\ꃥKk:N l&VD䉙,i,BDU+akBbC ыH T\MBO:5o:u| κ^>|L$0P6Zh9Sђ,<ԪŰU)Up+"MrIkBEVD>">*BQr.A!2"_t?7/54.*yd7} ],oN_F})3;xRJx kEGDIo}[Qx1oΜ?dF>D޻Ƶv>m>"yqՏ7">_78}3RnFYWq㳣^q237ٍkk;'Kqã kfɟor<]&n9'2 _9 XSOHlR>&!%M \D6+y#؝Z   m)WaZHeĤ;Dn3#;ْ/~?m}W>p >wnLi""Dz>2I%㶫nudWDŽϸGH(~9' JƤT5Č{qdgzS>6&eNˤxNδRZښ$]cS|%8Dt]130pFz&5|K=IcKD}:Y{:Su-gZtި7ΰ!DSN8^&_~ywUY[TMj#(Kte^y;7y#W_ZZ{>5J*5u9]Q΋-{rL<+7*^;=KF+|i+|vU8iۮ)y-?Wu/jYotQ'5FIKyd[kn.{35\vfᙚk^4|75֓Ӗf2JGYXN;U3WnɎ ,&SD:ONo8$(URZ_yVE!!7xoѺA cBOicyVA-Mۻ&;mZ1Ƥ>eVձv%_MhJ3Mb`clٱ|cl#[p izM'08`Hg:dldP|fo߮߬W{&ts,Ԑ~hUr#c٭p6~#ԢsUcr9\v JA+d:`v@"K-S*jt5 q C)̝6kռL4/e d,);iuh'G&k/f6U#/E%>IbQzW<="L{DG5OXcׅ7?x;z>PpV=셓_G[.j7<lRT/$+|}amac_d𚯨k[ 蚂:orA ;YבrDB8Ld3D`B BOMCeNԃܡӪ&`Oq܇k}Z_t:Aj 5krRJN .Oo2~8B_au-~ep:Ct+sݴqi[zjn5Mޠi4GnGnIkL4bRs&S j;i?O'I&c(! 00a⎁?3#<[+_{<_k_:Pnɡځu޼b֢g?| ܄w Ym-7 ]}i3· 0 p;NIry\^'{I!o+[0AֆaDźXZ-K׫}z}GD? 0)Y`͖#ˀ:`)j Ms9 !9>7y5 & $lu4u֮C~Wr՛u:{t3LMFQVL6z#_x)W)H"ʑƼ"ыOa%y׆n:Tfp Ġ0 @@4gFS8\LXT̚r +w_dG1P?Ğ'Kϒӟ/>y䱙o"Xdg?09=;opdDCWl3gr`κSu~)S`a'Kd%2d'T#^E:T `Px`lP`J Z1UZբVm;vC>o0 : $B&ScPT7EQTK{l66{Ct?ML/00I4NLCi`?@3 AL;ôFPfbn0&0tuUJCI뢘mHex.%gcS YcKs,0 @! D"L/DYW<>_1k֜]f(` W_߈uOۅo="LyֆZ _[~[5r;%S |op";CP;N@ӋBlM̥`ˠÿ"bv`m tL+"fV"﵈q`QxDUf|ўвL&HT(oDS"D*ZU(RU28[Q@PjQ@g-sc:jZO 8 ZmVߨ34zb Zd3Id+4ͭfSɴ^ekj@z) [r(Vs5=$QMwzmV(w` DY*ޘ^U=Z4bº%;9O5r:d} @ a Dp 44 ԇ5p6 {Ľ',\3u][ZF5^j-WƦ\@ۇ[!bc`E!/0d_HP1'BV+>!;1@HL &H$-ĭm"1 heqXR*I$R0+-JKe2h-U *ԃ JQUr\`.@Ҩ+qRZ-WkrP봠JԓUDTrXFc%ATjC ipv5eD-6zXmW+0f,dKE%q/f N>\@ o+ޙ\?滴ҽ!yѻ>Snz>3 spL+<[J>WxF>s. }x~y3X,*e n@1An79F對w,)~IAg. Z86S`lc7$c6%d%Hbr1h&l$>+iu,1ḰDy\ ,' *ox]k6uQhn҅@nM.P(T0g$y8<Icٲ@')o߾_~Ig/ϳN$KY~YeHCFaV`2*Ϗ_uxH|]"[Q+0-2Zd6!㏲4ly<)spTOeB5˗_ Z!UWT|]G֊=gRn9d^-Nبfv AK<ԣFCx>E%S㡨7umCD}MüìYhQ+{hFӝ5uo=RhsChPL~c9".uCӤziCa(\SvE|hq!"rBަ[?mxHPOݞF9!zGC=ƩQAlC4^P=F땐٧mt-VMggP|3+NQc'?!~NޅOx/ֽnSks9cu ,K܂xȿPЯ%c=c[vCa>zU'ht.&/m6E):V[w ̥^<|zz*/JTk/1c䫴S?4&= t205֣g^\=uXm0ePvc90(U="@tbf^-&ƈ`Js_89p4!W֍#@sD{72b̪}?7fS#\(RX7:꯿ҧ3k\'h~.-l~in +8׻xժ.hizin4pӞښW6_ b%+mLP_k"<j Ń aH F'Y8O@((֣y'hi&'x#:0KQxȫ67FMo=ԥygWHzCQ1=J9÷Cj8n۬3ҹ`t:MO?>P$ZZ:N; NMޠ"0^T1W-utFK7éiǟ㙥urwÁZ2? "Ftw<4gxFvT߬[E |AprV--ˉoJ枞zSEZ!HIMKME4ХyZ-uC/tm_?,;a>oz͇;5lYQtw8M CZnyv>'+O7k/f_qHgj׵Hg4ly[۩K3,/)sn\_6# 0GtrL- gp;Zp1苃L- gp;Zpzpo-.ŁzOee =e@ρ~mN|V~ zzF bjmI,ѭo=9`:z}k`6疹2 [}ƾpssƖCb.OccFay( ˍ.B6-ջW,9a;ו Z^ 8䲈P8_WB>W8LYreT{p:CspSExWd7`.)A~85yn`c@ ^W<]NjBἽ$5CajIK yN}}˓PivM itOYvL-n͗kMbȳSMQ_=?uvQJl&,T8TJZ|}}OJL⩵t T6!><亅<iԖ^h #x= =@AC0(,s zvf7_!24r<JBlţ=}j9Tz2K {l5s<(pAzpb'섞pH^^ݏ_C9sq9pO^\!ˍs 'Xa@'5oK =ԥ @*cq$8Z|19h`˳w!9߻mbo# @F1x;w N@F1x;w#=xNEϡmKC2i7F/΅tx}+!Cas INH@m C=w琡҈0 m}xhwxM==9:h緷7swDs.i؆ƞX뵚׎K!TBlv}`*sOEρv~QZm賬>[o~dx"[E3zs{׽^ʜ p-i؆=!$X}0gꍇ?nx9sNy[wQx xuulP;ʳ0hx'x9IMg% ^'}lv ꋇ/j<AA;=^8$UulC{OWHR7^ }> nUcg"}q0 nUczO>acFayyyy||oacF!ظpp5F!rl PMHnժyNuS0_c/r9t]d;W4 T,K+%N!Tm@;ARK-6̬i :fO >j<)xg$+sժ@[ 5fWN3?Ԧp܋J}Df~SR-D,5aIZ|}}\qwM1cSWO`$ 3Ըj!>|LXm0D|xx4^fZ6{@dF=7WHxuոIt}k,h"ɑʦ͆3LxeaVѓx8Rfu"$9lzTqbt!VfA1-:(?׫D)Gts}{{K?E6 o:nhVM}ґ.=h5{ژ|>_U&hzI_RjJ!2O#{:e-xhL_IU3ק ryBwJzq);_zMD__석s!rK;x^stiť#cifoaT'l^g# P0y:ߧ\G %<ڒًtH8sEAe7(zi*0𿨗i/1N=,-Ȧ=͞Vc\nFa>|݁>uu, JwD+#knjcJd//ν_ʷe@rx[OdY/mj<4^hluiU]5; 5@LjxYWI v@/0Qw~cEJMVM'>8 ]`AVzyvJ9xv4fN7.:_Se4~3} @`p djaGs7@djaGs7>2sX9 r)Ϭe^yZ@a>?$oC9? 9Ĉv!砭 sHF3 0& 2g0=H C|]Zmhc)T/_|G9M9@A__석sɋxX٫ AzsA!ˍsBzL3q=إ\[O=6?Ձܕs9A/^YxBah=}|lh}>Q ݀C>,?Q ݀C@a90(pȥk>֗6zzk=UC|e/e_bo2NC9? C9J%@=x=9hkgvc9$k2mh@K TsH)s섞C{Z&=b8 79Z_CR=gx`"H~<=9@90_>1琠=9O nKGxzv>'+~^9@Axmx c-1_-H djaGs7@djaGs7"0CWbu$|AڍIj0 Xl4"O'' ** get number of lines from filecNumOfLines=NOL(OpenFile$)cSubStr$=EditBox$$** change searched word to lowercasecSubStrLow$=LOW(SubStr$)fi=1 NumOfLines** get new line from filec!SLine$=StrFromFile(OpenFile$,i,1)"** change loaded line to lowercasecSLow$=LOW(SLine$)-** Get position of a SubString in loaded linecPosStr=POS(SubStrLow$,SLow$)6** if substring is found then load line to text objectd PosStr<>0c$SLineRes$=StrFromFile(OpenFile$,i,1) ** exit loop.**********************************************clen=LEN(SLine$)csubstring$='|--------->'cRetVal=POS(substring$,SLine$)cRetVal = RetVal + 11c copy$=StrCopy(SLine$,RetVal,len)OText STRING:copy$**Message("copy$","").************************************************RunScript("s2")egied Get_File_Name?Any comments here Arial c nul_str$ = ''c6new_file = StrToFile(c:\List.txt,nul_str$,FALSE,FALSE)cNol=NOL(c:\run.txt)csourc$ = '|--------->'fi=1Nolc!From$=StrFromFile(c:\run.txt,i,1)cPos=POS(sourc$,From$)cLen=LEN(From$)cDel$=StrDel(From$,Pos,Len)cAstr$ = From$ + Del$c(To=StrToFile(c:\List.txt,Del$,TRUE,TRUE)gid {{TextBTN2? Delete Item Arial# Delete_Itemd Delete_ItemDELETE?Any comments here ArialU********************************************************************************* RundBrowse$ = 'HKCU\Run' cjcmd$ = 'HIDE,WAIT /C Reg Delete "HKCU\Software\Microsoft\Windows\CurrentVersion\Run" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)ListnumitemnumitemgihErrorcmd$eeY********************************************************************************* RunOncedBrowse$ = 'HKCU\RunOnce' cncmd$ = 'HIDE,WAIT /C Reg Delete "HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)ListnumitemnumitemgihErrorcmd$eeZ********************************************************************************* WinlogondBrowse$ = 'HKCU\Winlogon' crcmd$ = 'HIDE,WAIT /C Reg Delete "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)Listnumitemnumitemgiccmd$ = 'HIDE,WAIT /C Reg Add "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /V "Shell" /T REG_SZ /D "Explorer.exe" /F'cmd.execmd$hErrorcmd$ee]********************************************************************************* Win.ini-RundBrowse$ = 'HKCU\Win.ini-Run' cqcmd$ = 'HIDE,WAIT /C Reg Delete "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)ListnumitemnumitemgihErrorcmd$ee^********************************************************************************* Win.ini-LoaddBrowse$ = 'HKCU\Win.ini-Load' cqcmd$ = 'HIDE,WAIT /C Reg Delete "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)ListnumitemnumitemgihErrorcmd$ee********************************************************************************************************************************************U********************************************************************************* RundBrowse$ = 'HKLM\Run' cjcmd$ = 'HIDE,WAIT /C Reg Delete "HKLM\Software\Microsoft\Windows\CurrentVersion\Run" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)ListnumitemnumitemgihErrorcmd$eeY********************************************************************************* RunOncedBrowse$ = 'HKLM\RunOnce' cncmd$ = 'HIDE,WAIT /C Reg Delete "HKLM\Software\Microsoft\Windows\CurrentVersion\RunOnce" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)ListnumitemnumitemgihErrorcmd$ee[********************************************************************************* RunOnceEXdBrowse$ = 'HKLM\RunOnceEX' cpcmd$ = 'HIDE,WAIT /C Reg Delete "HKLM\Software\Microsoft\Windows\CurrentVersion\RunOnceEX" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)ListnumitemnumitemgihErrorcmd$eeZ********************************************************************************* WinlogondBrowse$ = 'HKLM\Winlogon' crcmd$ = 'HIDE,WAIT /C Reg Delete "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "' + del$ + '" /F'cmd.execmd$*******dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf i=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,i)cnumitem = VAL(numitem$)Listnumitemnumitemgiccmd$ = 'HIDE,WAIT /C Reg Add "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /V "Shell" /T REG_SZ /D "Explorer.exe" /F'cmd.execmd$hErrorcmd$ee*******************************************************************************************************************************************a********************************************************************************* Start > StartupdBrowse$ = 'Startup'ListItems$,ItemsNum$,#,NumItemsfi=1NumItemsc%ArrayItem$ = GetArrayItem(Items$,#,i)c4cmd$ = 'HIDE,WAIT /C Del "' + ArrayItem$ + '" /Q /F'cmd.execmd$**dCBK_ReturnVal = 0ListItems$,ItemsNum$,#,NumItemsf j=NumItems1c&numitem$ = GetArrayItem(ItemsNum$,#,j)cnumitem = VAL(numitem$)ListnumitemnumitemgjhErrore**gied Name_Finder?Any comments here Arial!cPosStr=0cOpenFile$ = 'C:\Run.txt'cEditBox$ = ArrayItem$d OpenFile$<>'' ** get number of lines from filecNumOfLines=NOL(OpenFile$)cSubStr$=EditBox$$** change searched word to lowercasecSubStrLow$=LOW(SubStr$)fi=1 NumOfLines** get new line from filec!SLine$=StrFromFile(OpenFile$,i,1)"** change loaded line to lowercasecSLow$=LOW(SLine$)-** Get position of a SubString in loaded linecPosStr=POS(SubStrLow$,SLow$)6** if substring is found then load line to text objectd PosStr<>0c$SLineRes$=StrFromFile(OpenFile$,i,1) ** exit loopF********************************************** DD.exe|--------->ff.execlen=LEN(SLine$)csubstring$='|--------->'cRetVal=POS(substring$,SLine$)clen=LEN(SLine$)cdel$=StrDel(SLine$,RetVal,len)OText1 STRING:del$**Message("del$","").**********************************************egied}MText1?"Ariald 4MTextBTN3? HKCU\RunOnce"TahomacBrowse$ = 'HKCU\RunOnce'cdcmd$ = 'HIDE,WAIT /C Reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtd MfTextBTN4? HKCU\Winlogon"TahomacBrowse$ = 'HKCU\Winlogon'cscmd$ = 'HIDE,WAIT /C Reg query "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /V "Shell" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtd fTextBTN5?Win.ini \ Load"TahomacBrowse$ = 'HKCU\Win.ini-Load'cqcmd$ = 'HIDE,WAIT /C Reg query "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows" /V "Load" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtd TextBTN6? Win.ini \ Run"TahomacBrowse$ = 'HKCU\Win.ini-Run'cpcmd$ = 'HIDE,WAIT /C Reg query "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows" /V "Run" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtd TextBTN7?HKLM\Run"TahomacBrowse$ = 'HKLM\Run'c`cmd$ = 'HIDE,WAIT /C Reg query "HKLM\Software\Microsoft\Windows\CurrentVersion\Run" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtd TextBTN8? HKLM\RunOnce"TahomacBrowse$ = 'HKLM\RunOnce'cdcmd$ = 'HIDE,WAIT /C Reg query "HKLM\Software\Microsoft\Windows\CurrentVersion\RunOnce" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtd TextBTN9?HKLM\RunOnceEX"TahomacBrowse$ = 'HKLM\RunOnceEX'cfcmd$ = 'HIDE,WAIT /C Reg query "HKLM\Software\Microsoft\Windows\CurrentVersion\RunOnceEX" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtd  TextBTN10? HKLM\Winlogon"TahomacBrowse$ = 'HKLM\Winlogon'cscmd$ = 'HIDE,WAIT /C Reg query "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /V "Shell" >C:\Run.txt'cmd.execmd$!*********************************c,Startup_Item$=StrFromFile(C:\Run.txt,5,1000)c dest$ = ' 'c sourc$ = ''c1Change_Str$=StrChange(Startup_Item$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c dest$ = ' 'c sourc$ = ''c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)cdest$ = 'REG_SZ'csourc$ = '|--------->'c/Change_Str$=StrChange(Change_Str$,dest$,sourc$)c5To_File=StrToFile(c:\run.txt,Change_Str$,FALSE,FALSE)"**********************************# Get_File_NameList-1List C:\run.txtdVText2?memail: dr.mfire@gmail.com my site: http://vb-delphi-cpp.blogfa.com http://fire-mmb.blogfa.com"VerdanadMaster Page 000YMaster Layer 000YMyApp1.0.0.0