Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _uVKABMzfXAbi = a; end)); return(function(f,...)local r;local u;local l;local c;local d;local o;local e=24915;local n=0;local t={};while n<930 do n=n+1;while n<0x2f9 and e%0x12a6<0x953 do n=n+1 e=(e-982)%12133 local h=n+e if(e%0x32f4)<=0x197a then e=(e*0x2eb)%0xa0a1 while n<0xa8 and e%0x1c1c<0xe0e do n=n+1 e=(e-329)%15602 local d=n+e if(e%0x92c)<0x496 then e=(e+0x8c)%0xb883 local e=87350 if not t[e]then t[e]=0x1 o=string;end elseif e%2~=0 then e=(e-0x3c0)%0x3da4 local e=30646 if not t[e]then t[e]=0x1 c={};end else e=(e+0x294)%0xb0b9 n=n+1 local e=68944 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end end end elseif e%2~=0 then e=(e*0x51)%0x7311 while n<0x161 and e%0x3e96<0x1f4b do n=n+1 e=(e*657)%48323 local h=n+e if(e%0x2aac)>0x1556 then e=(e+0x222)%0x18f0 local e=30012 if not t[e]then t[e]=0x1 r="\4\8\116\111\110\117\109\98\101\114\121\100\117\82\110\105\112\79\0\6\115\116\114\105\110\103\4\99\104\97\114\112\77\105\120\122\72\119\114\0\6\115\116\114\105\110\103\3\115\117\98\87\81\102\81\108\102\82\110\0\6\115\116\114\105\110\103\4\98\121\116\101\121\74\68\65\66\69\112\100\0\5\116\97\98\108\101\6\99\111\110\99\97\116\68\99\121\99\98\111\108\109\0\5\116\97\98\108\101\6\105\110\115\101\114\116\81\71\111\116\104\103\85\85\5";end elseif e%2~=0 then e=(e*0x137)%0x6de1 local e=37132 if not t[e]then t[e]=0x1 end else e=(e*0x3b6)%0x6a1d n=n+1 local e=72208 if not t[e]then t[e]=0x1 d=function(d)local e=0x01 local function t(n)e=e+n return d:sub(e-n,e-0x01)end while true do local n=t(0x01)if(n=="\5")then break end local e=o.byte(t(0x01))local e=t(e)if n=="\2"then e=c.yduRnipO(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then l[e]=function(e,n)return f(8,nil,f,n,e)end elseif n=="\4"then e=l[e]elseif n=="\0"then e=l[e][t(o.byte(t(0x01)))];end local n=t(0x08)c[n]=e end end end end end else e=(e*0xe0)%0x7d78 n=n+1 while n<0xb1 and e%0x38e6<0x1c73 do n=n+1 e=(e*657)%12346 local d=n+e if(e%0x2a06)<=0x1503 then e=(e-0x139)%0x2bee local e=97374 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end elseif e%2~=0 then e=(e+0x40)%0x45ed local e=33922 if not t[e]then t[e]=0x1 u=tonumber;end else e=(e+0xb7)%0xb925 n=n+1 local e=70882 if not t[e]then t[e]=0x1 end end end end end e=(e-17)%15793 end d(r);local n={};for e=0x0,0xff do local t=c.pMixzHwr(e);n[e]=t;n[t]=e;end local function h(e)return n[e];end local o=(function(r,d)local f,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local o=r while true do n[0x03][c.WQfQlfRn(d,e,(function()e=f+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""t=0x000 break end end local l=#d while e<l+0x01 do n[0x02][t]=c.WQfQlfRn(d,e,(function()e=f+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 c.QGothgUU(n[0x01],(h((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+o)%0x100)));o=r+o;end end return c.Dcycbolm(n[0x01])end);d(o(250,"phm+ysLOzHGS97W4FS"));d(o(88,"M,USQc_fFC=T.by2=Fc__T,QT=cCN_=fy.2Q=bQb2FFCQ,bvCC,2.Q_Q,bfQ,bSr.Tf,UQ..c,wSb,c,UU.f_=yUQC2c*FTUc,2y=.SCbff.Q=y,F,,b.CUk.yySF.SUb,fy,2_cfc,,.._S,q=Scy2CT=S,ZyTSc.C6S.QbyC=QQ8FcCQSQbbCFSFT2fbUS=2_=SU.2fSTQ_QfS5b.Q_cYcT.c,8.=,Q=2.CbUQybf,UT.UF2UQbTUQ.2._fbUSb.f2U=CSQ2,_.SQcyCT=Sb,cQ.2QZ2=,c,oQFTS,.2fQQ2b,fFQFf=U,},TT_SUfbQcTUyT=cTTQ_-fQ,f.S_.,UT,cy22F,Ubbc=.UTbT=Q,=F)UbQQbCFUSQbc,yScb_F?,C.SfS,.T*QFl,T2S2,CT_2QCyTcc_3wCCQS2SFQQS.CFU,_.cFyj.fQ,bSsb=fCU_bQ_=,y=CfQ2cTCcf}2Q.2_kT=ccQ2cCTcQb=f,S.bQfCQ=.SC,.FfQFcU,b.fFTb._fQ,2.ffUy..SS2ybTc_Uy2FCyb"));local e=(-8126+(function()local l,n=0,1;(function(e,n)e(n(e,e and n),n(e,n))end)(function(t,e)if l>271 then return e end l=l+1 n=(n+732)%7275 if(n%1844)<922 then n=(n*712)%12212 return e else return t(e(e,e),e(t,e))end return e(e(e,t and t)and e(e,e),t(t,t))end,function(t,e)if l>304 then return t end l=l+1 n=(n*1006)%17955 if(n%1004)>=502 then n=(n-311)%39341 return e else return t(e(e and e,t),e(e,t))end return t(e(e,e),e(t,e and e))end)return n;end)())local s=c.TkIZFMnD or c.lXHYoGyn;local ne=(getfenv)or(function()return _ENV end);local l=2;local te=1;local r=4;local d=3;local function ee(j,...)local a=o(e,"ZRK0M:jcF 2Ds-%oFF2_o!Mf 0%R0uFM-bK#cLh%cRs-R:<k:72io)M1 _%:0XF,-1cM- 0Mcss:D08>:a20o{MI 3KF2:%K-v0McYs^RwDMRFj:c;VD::D DWM 202_0 F%-0KoFK-KR:j0sM2bo-M? d%NFoo:KjjDDRrK:--2Rj:F RBK: M= M%W0WF4R-jRD h%RKj*DYr/:&2bo(FM-g%G02F_-SKzDRKMcMD0R:j0sM< :o2% K%p0gF(-}KrcmsgRkj(D2i(:82B:s2ooRMM20oMMKF -%KcR1jjDYgr:X%0:o2soo:Kj0FY-cKfcAsA:Ds:K MsD I%:DMu %%B0.F?RRcKDKr jFFboF:: Ks=jsjw-RK00^ -vKxcT*-cosoR%:0D:*0Mo 0<M:K %%0c 0DFK cMsMR:j% RRMjMDK g%203F?-1j--RKDc:2%RocMD 5j: Mh s%a0NF9R F%-0KoFK-KR:j0sMbD::D a%201FQ-7j--RKDc:DcR j%DMwojcM5 M%f0HF+0cFR--K:RGjjDuyB:wo0jMDKooMD :F*-cK,c7s6:F-MKMc_ cd:jMMO :%S0mFuR F--RKcc:jzDDEL:A2H002op*: cD%:M js- K%cDjKD,_z:(2vonM6DMKS0aFc-5K}c9k-cRsDR::MDR!Ko8Mj a%G0qs00o K-%K:FKj6DMuh:;2+MM2 o-M:0_FM-_KHcp_Mj:DVo:TVj:2;oOM?%K:: %%%0 F%-c%pFMsFR:Ka20a0jK2 fY:M:%2%o%KJc2s1RQjbo0josKRK::20kMKD :o -XK cUseRE2RRMjM KR:jMDMooM%0kFF-wK.cUI0cRssRsjKDR40:DMH j%,07FYR%Fo%MK cjs D9&D:r2zo<FMo::0 0oK0 =%MK cos%Dv}R:L2OoIcR ^%%0;Fg-Sj-- K%c s-R c2D:%Kj:DMYMMo %Fy-MK)cGsIMR K%00M:K2uouMQ +%E0O MRIKtFTsYRwjloR:K K% MFjk-F0:cK2)MsMu 2NR:0F2Dn:0:C2YoP2F}M:M2!o0<2Mo o0KcR-c-%jcD RM:FD:oK::20%:MKF0-oK%FMs:R%cMc%S0:o2-Do0 oo:0 Fj%<Kc0oD:--MR2K%:R-F-% Y-F0-:R%c0DFw :%2:-ocKD:Cjj0jooFM: R%MM0Mo--KRc s%-oMcs:* R%2s4:MR0)F0-!KvcPhDc:- D}zM:b2*on Mo::F2MFd-:Kycns6:0soRsjosK2bocMk U%e joK0oF-sK8c:Kj#D 7I:z260D2:A 002 o0MMF:--sERMjkD((.20b j22: =%M0gFW-XjD-:0 F0jbDD_N:L2dM0DMzKMo D%:R0Fo-sKoFKj3D +7:i2B0R2%o M- RoM0 Fo-%szK0j*DiV; 0,ojJ2 o:MM:.oM0oM<D0Ksc -fRKjoDRRK:MMb -%d0#F(R%Fo%MK cjs R0jRsMA :o2%I0%LMKF#-1KE-K0 0{ 2-.:M oo:0DFRDn:s:1sRKKjKD RFRnFcD&H+:LoM:F2 50!h j% 0sF: )0ccR-0->c9sKbojM2:o0:M :%MoH c- 0McFFeo-joDo.%M02:o0mhFjD0-a0Ycas;RO22ooM %s+0o :%K?BcMs K0j0DoRK:MDcD(W_:62^&MMv E%i0RFh-uKvFK-/Rbj{DLRR:q2Yo;:K2-%N0pF>-FKmc.sH0jcDDyLT:62jo1MR _Rc01FM%2K_c8s?RjjGDR}u:MD2o7Mw _%c0#FR-xK* Ms^R4jTDR>H:+2_5Kcc &%30WF--}K3c{-KKRjEDRLij:2{obMiDn%20yFR-IKRc_-cRCcKs2gV:02#R2Mn =%,0d :-LKRcPs0RyjLD_A*j02goeM( i%=0KFA-)KscJs,R?jRDU#K:(DKODMe R%EMMFL-IK!ch- RgjKD8<A:<2Ko4MqDs%a00FT-NK{cKs=MHj:D380:62MoHj ,RVMRF7-0K(20s_MjjBst{K:>2KorMj &%00nF8--KAc0s5R.jzDjHuFyD-otM0 h/o0IF:-U:9FsshR0j)DMXd:02&KQcj 7%00*2M-HK0c=oVK:jWD0Jb:o2+o0M? 3oF0_FM-aKKc>sbR7cKD%_}::2pRcMQ }%*MK R-nKjcN%:R_jLDdGmjR2zoMMl j%S0RFv%xKMcds0Ru RD4uM:h2{RDM1 M%/0mFW-MKk2>s0RtjMDL0::_2Rouc.2s%!0MF7ozKOFosuMEcDD},M:qD0oqMc .R,MFFm-MKTF sbMMjYs,Gc:t20o4j0 C%M0G a-cKQcKs80DjWD0.W:#2FovMR !%K0}FR-i0KFFsvRRjY-jP3:(29o!:R e%K0iFr-&Kjc4o)K:j;DK,_jF2Wo0Mu .%00OF0-rKKcfseR?cKDF#W:M2!o2MU W%6MKF--?K:cxs2R7j!D5,=::2Eo0Me :%Y0RFm%}KMcQsKRW PDbl0:EDK,cMJ 0%E0%Ft-&Kz 6-KR6j0Dz/0:9s%ov:K2:%x0MFp%2KBcesQKKjRDm.::7D2o<M; 1oK0sF;-jK5F2sERqjkD_RB:y20oOMj y%K0g I-jK_cKsH0-jPD0J_FB-jo,MK Sos05FR-x:^cRswRKjtsjuh:R23wK:M m%00tF%-UK,cJ%TK2jwD0ap:02/R%Mu2KoC0GFM-JKscys6R_cKDK)L::2*osM) l%vMK s-.KjcvssR<jADgd>:K25o0MJ j%V0KF6%9KMc1sKR+ KDOh0:q2mKFMp R%T0KF}-RK+FK-FR.jRDQRK:+2Lo7ME s%v0KF_-wKgc0stM&jDDPGK:S2Mo):= 3Rf0MF!-KKS ss,MFjP%ERs:y2Koh:- tPF0QFW%:KGcRs^RKjTDRynjK-coIMR =oD0_Fp-EKVcss=RKjOD+>u:R2pK>MM C%K0hFK-JK cistRsjeDRe;:K2}oKMd2K%K0vFK-&KDcgs(RgjBDoBn:02foRMz y%90;Fs-qKMc+sRR)j6D^RK:F2Qo:M+2%%O0,F5-pMRc}sMRej:D*vR:H2ao-M5 K%m0MFA-KKOFKs%Rzj0DWKR:t2_oLM=2R%80MFI-RK}c}s?RPj0DgW::W2ao8MK vRP0 F9-:K&cKsbK%j!DK0M:52jo>Mw (%f0( ,o Kfc:s+0KjTDjE+:d2 oCM0 u%:0uFR-JKBcos1R8jrDRUa:=2mo>MR l%l0CFc-_KIc?s<RMjNDq#m2M4:jFDM +%M0NF#-JcM- K-c:j.D%7):V2q0R K-KK FF2VRFc:DK%}FsFtoRM0:.2:omM& f0M oM0sF:cHs2RPjGDhM-DRbD::F%oo:M %j0 KKcvsLR?jAD{._jM%)oSM: O%h0&sMK:cPD:{MRcjgDrJOjK2colM3 ?%:0(FL-xKYc s{RRj8D<X9:02JKd:F w%R0AFM-nK0ceoyRKj>DR6q:R2qocM=sY%K0eFR-GKKcbsjRmjIDsUw:121oKMz R%k0C M-LK;cxsRRej1D*+t:U2<o.MX");local n=0;c.ISyQzwrB(function()c.SQGDwQPx()n=n+1 end)local function e(t,e)if e then return n end;n=t+n;end local t,n,h=f(0,f,e,a,c.yJDABEpd);local function o()local n,t=c.yJDABEpd(a,e(1,3),e(5,6)+2);e(2);return(t*256)+n;end;local b=true;local b=0 local function p()local e=n();local n=n();local d=1;local l=(t(n,1,20)*(2^32))+e;local e=t(n,21,31);local n=((-1)^t(n,32));if(e==0)then if(l==b)then return n*0;else e=1;d=0;end;elseif(e==2047)then return(l==0)and(n*(1/0))or(n*(0/0));end;return c.OecGZzok(n,e-1023)*(d+(l/(2^52)));end;local k=n;local function _(n)local t;if(not n)then n=k();if(n==0)then return'';end;end;t=c.WQfQlfRn(a,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#t do e=e..c.WQfQlfRn(t,n,n)end return e;end;local k=#c.AEEtKStB(u('\49.\48'))~=1 local e=n;local function z(...)return{...},c.RAdTQzKq('#',...)end local function m()local u={};local b={};local e={};local a={u,b,nil,e};local e=n()local s={}for l=1,e do local t=h();local e;if(t==3)then e=(h()~=#{});elseif(t==2)then local n=p();if k and c.SfYrAvst(c.AEEtKStB(n),'.(\48+)$')then n=c.DsGMmrWI(n);end e=n;elseif(t==0)then e=_();end;s[l]=e;end;for a=1,n()do local e=h();if(t(e,1,1)==0)then local f=t(e,2,3);local c=t(e,4,6);local e={o(),o(),nil,nil};if(f==0)then e[d]=o();e[r]=o();elseif(f==#{1})then e[d]=n();elseif(f==j[2])then e[d]=n()-(2^16)elseif(f==j[3])then e[d]=n()-(2^16)e[r]=o();end;if(t(c,1,1)==1)then e[l]=s[e[l]]end if(t(c,2,2)==1)then e[d]=s[e[d]]end if(t(c,3,3)==1)then e[r]=s[e[r]]end u[a]=e;end end;a[3]=h();for e=1,n()do b[e-(#{1})]=m();end;return a;end;local function g(t,e,n)local l=e;local l=n;return u(c.SfYrAvst(c.SfYrAvst(({c.ISyQzwrB(t)})[2],e),n))end local function p(b,e,h)local function ee(...)local o,_,u,g,j,n,a,m,y,k,ee,t;local e=0;while-1<e do if e>=3 then if 4>=e then if e<4 then m={};y={...};else k=c.RAdTQzKq('#',...)-1;ee={};end else if 4~=e then repeat if 6~=e then t=f(7);break;end;e=-2;until true;else e=-2;end end else if e>=1 then if 0<=e then repeat if 1~=e then n=-41;a=-1;break;end;u=f(6,3,3,46,b);j=z g=0;until true;else u=f(6,3,3,46,b);j=z g=0;end else o=f(6,47,1,87,b);_=f(6,60,2,74,b);end end e=e+1;end;for e=0,k do if(e>=u)then m[e-u]=y[e+1];else t[e]=y[e+1];end;end;local e=k-u+1 local e;local f;local function u(...)while true do end end while true do if n<-40 then n=n+42 end e=o[n];f=e[te];if 28<=f then if f>=42 then if f<49 then if f>=45 then if f>=47 then if 46<=f then repeat if f~=48 then local e=e[l]t[e]=t[e](t[e+1])break;end;n=e[d];until true;else local e=e[l]t[e]=t[e](t[e+1])end else if f>43 then repeat if 46>f then local n=e[l]local l,e=j(t[n](s(t,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;t[n]=l[e];end;break;end;t[e[l]]=(e[d]~=0);until true;else local n=e[l]local l,e=j(t[n](s(t,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;t[n]=l[e];end;end end else if f>42 then if f>=39 then for c=16,78 do if 44~=f then for f=0,6 do if f<=2 then if f<=0 then t[e[l]]={};n=n+1;e=o[n];else if 0<=f then repeat if 1<f then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];until true;else t[e[l]][e[d]]=e[r];n=n+1;e=o[n];end end else if f>4 then if 5==f then t[e[l]][e[d]]=t[e[r]];n=n+1;e=o[n];else t[e[l]][e[d]]=t[e[r]];end else if-1<f then for c=22,92 do if f~=4 then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;else t[e[l]][e[d]]=e[r];n=n+1;e=o[n];end end end end break;end;for f=0,6 do if 3>f then if f>0 then if f>-2 then for c=15,65 do if 2~=f then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;else t[e[l]][e[d]]=e[r];n=n+1;e=o[n];end else t[e[l]]={};n=n+1;e=o[n];end else if f>4 then if f>1 then repeat if f<6 then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];until true;else t[e[l]][e[d]]=e[r];end else if f~=-1 then repeat if 4~=f then t[e[l]][e[d]]=t[e[r]];n=n+1;e=o[n];break;end;t[e[l]]={};n=n+1;e=o[n];until true;else t[e[l]]={};n=n+1;e=o[n];end end end end break;end;else for f=0,6 do if 3>f then if f>0 then if f>-2 then for c=15,65 do if 2~=f then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;else t[e[l]][e[d]]=e[r];n=n+1;e=o[n];end else t[e[l]]={};n=n+1;e=o[n];end else if f>4 then if f>1 then repeat if f<6 then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];until true;else t[e[l]][e[d]]=e[r];end else if f~=-1 then repeat if 4~=f then t[e[l]][e[d]]=t[e[r]];n=n+1;e=o[n];break;end;t[e[l]]={};n=n+1;e=o[n];until true;else t[e[l]]={};n=n+1;e=o[n];end end end end end else t[e[l]]=(e[d]~=0);end end else if 53<=f then if f>54 then if 55<f then local c;for f=0,6 do if 2<f then if 5<=f then if f~=3 then for h=39,65 do if 6~=f then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;c=e[l]t[c](t[c+1])break;end;else t[e[l]][e[d]]=e[r];n=n+1;e=o[n];end else if f>=1 then for c=29,88 do if 3~=f then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;else t[e[l]][e[d]]=e[r];n=n+1;e=o[n];end end else if f>=1 then if-1<=f then for r=14,88 do if 1~=f then t[e[l]]={};n=n+1;e=o[n];break;end;t[e[l]]=h[e[d]];n=n+1;e=o[n];break;end;else t[e[l]]={};n=n+1;e=o[n];end else c=e[l]t[c](t[c+1])n=n+1;e=o[n];end end end else t[e[l]]=h[e[d]];end else if 51~=f then for n=41,66 do if f<54 then do return end;break;end;t[e[l]][e[d]]=e[r];break;end;else do return end;end end else if f<=50 then if 49==f then local e=e[l]t[e]=t[e](s(t,e+1,a))else if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;end else if f~=51 then t[e[l]]=p(_[e[d]],nil,h);else local e=e[l]t[e]=t[e](t[e+1])end end end end else if f<35 then if 30<f then if 33>f then if 27<f then for o=23,95 do if 31~=f then local e=e[l]t[e](t[e+1])break;end;if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;break;end;else local e=e[l]t[e](t[e+1])end else if f~=29 then repeat if 33<f then local n=e[l]local l,e=j(t[n](s(t,n+1,e[d])))a=e+n-1 local e=0;for n=n,a do e=e+1;t[n]=l[e];end;break;end;local n=e[l];local l=t[n];for e=n+1,e[d]do c.QGothgUU(l,t[e])end;until true;else local n=e[l];local l=t[n];for e=n+1,e[d]do c.QGothgUU(l,t[e])end;end end else if f>28 then if 28<=f then repeat if 30~=f then local o,c,f,r,h;local n=0;while n>-1 do if 2<n then if 5>n then if 3==n then r=o[f];else h=o[c];end else if 6~=n then t(h,r);else n=-2;end end else if 0<n then if n~=-3 then for e=16,58 do if n<2 then c=l;break;end;f=d;break;end;else f=d;end else o=e;end end n=n+1 end break;end;t[e[l]][e[d]]=e[r];until true;else t[e[l]][e[d]]=e[r];end else local n=e[l]t[n](s(t,n+1,e[d]))end end else if 37>=f then if f<36 then local e=e[l]t[e]=t[e]()else if 37~=f then do return end;else local n=e[l];local l=t[e[d]];t[n+1]=l;t[n]=l[e[r]];end end else if f<=39 then if 39>f then local e=e[l]t[e]=t[e](s(t,e+1,a))else t[e[l]]=h[e[d]];end else if 41>f then local e=e[l]t[e]=t[e]()else local f;t[e[l]][e[d]]=t[e[r]];n=n+1;e=o[n];f=e[l]t[f](s(t,f+1,e[d]))n=n+1;e=o[n];do return end;end end end end end else if 13>=f then if f<=6 then if f>2 then if f>=5 then if f~=3 then for n=43,84 do if f~=6 then t[e[l]]={};break;end;local o,h,r,f,c;local n=0;while n>-1 do if 2<n then if 4>=n then if n>2 then repeat if 4>n then f=o[r];break;end;c=o[h];until true;else f=o[r];end else if 6>n then t(c,f);else n=-2;end end else if n>=1 then if n~=2 then h=l;else r=d;end else o=e;end end n=n+1 end break;end;else t[e[l]]={};end else if f>3 then t[e[l]][e[d]]=t[e[r]];else h[e[d]]=t[e[l]];end end else if f<1 then local n=e[l]t[n](s(t,n+1,e[d]))else if f~=-1 then for a=40,71 do if f<2 then local a,b,k,j,u,f,c;for f=0,6 do if f<3 then if f<1 then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];else if f>0 then for c=29,85 do if 2~=f then t[e[l]]=h[e[d]];n=n+1;e=o[n];break;end;t[e[l]]=t[e[d]][e[r]];n=n+1;e=o[n];break;end;else t[e[l]]=h[e[d]];n=n+1;e=o[n];end end else if f>=5 then if 4<f then for r=49,97 do if 6>f then t(e[l],e[d]);n=n+1;e=o[n];break;end;c=e[l]t[c]=t[c](s(t,c+1,e[d]))break;end;else c=e[l]t[c]=t[c](s(t,c+1,e[d]))end else if 3~=f then f=0;while f>-1 do if 2<f then if 5>f then if f==4 then u=a[b];else j=a[k];end else if f>=2 then repeat if f~=6 then t(u,j);break;end;f=-2;until true;else t(u,j);end end else if 1<=f then if f~=1 then k=d;else b=l;end else a=e;end end f=f+1 end n=n+1;e=o[n];else f=0;while f>-1 do if f>2 then if f<5 then if 1~=f then repeat if f>3 then u=a[b];break;end;j=a[k];until true;else u=a[b];end else if f>5 then f=-2;else t(u,j);end end else if f>0 then if-1<=f then repeat if 2>f then b=l;break;end;k=d;until true;else b=l;end else a=e;end end f=f+1 end n=n+1;e=o[n];end end end end break;end;local n=e[l];local l=t[n];for e=n+1,e[d]do c.QGothgUU(l,t[e])end;break;end;else local a,b,k,j,u,f,c;for f=0,6 do if f<3 then if f<1 then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];else if f>0 then for c=29,85 do if 2~=f then t[e[l]]=h[e[d]];n=n+1;e=o[n];break;end;t[e[l]]=t[e[d]][e[r]];n=n+1;e=o[n];break;end;else t[e[l]]=h[e[d]];n=n+1;e=o[n];end end else if f>=5 then if 4<f then for r=49,97 do if 6>f then t(e[l],e[d]);n=n+1;e=o[n];break;end;c=e[l]t[c]=t[c](s(t,c+1,e[d]))break;end;else c=e[l]t[c]=t[c](s(t,c+1,e[d]))end else if 3~=f then f=0;while f>-1 do if 2<f then if 5>f then if f==4 then u=a[b];else j=a[k];end else if f>=2 then repeat if f~=6 then t(u,j);break;end;f=-2;until true;else t(u,j);end end else if 1<=f then if f~=1 then k=d;else b=l;end else a=e;end end f=f+1 end n=n+1;e=o[n];else f=0;while f>-1 do if f>2 then if f<5 then if 1~=f then repeat if f>3 then u=a[b];break;end;j=a[k];until true;else u=a[b];end else if f>5 then f=-2;else t(u,j);end end else if f>0 then if-1<=f then repeat if 2>f then b=l;break;end;k=d;until true;else b=l;end else a=e;end end f=f+1 end n=n+1;e=o[n];end end end end end end end else if f<10 then if f<8 then local f;t[e[l]]=h[e[d]];n=n+1;e=o[n];t[e[l]]={};n=n+1;e=o[n];t[e[l]][e[d]]=e[r];n=n+1;e=o[n];t[e[l]][e[d]]=e[r];n=n+1;e=o[n];t[e[l]][e[d]]=e[r];n=n+1;e=o[n];f=e[l]t[f](t[f+1])n=n+1;e=o[n];do return end;else if f~=8 then local n=e[l]t[n]=t[n](s(t,n+1,e[d]))else local e=e[l]t[e](t[e+1])end end else if f>=12 then if f~=12 then local n=e[l]t[n]=t[n](s(t,n+1,e[d]))else local c,u,s,k,a,j,b,f;for f=0,6 do if 3<=f then if f<=4 then if 0<f then for r=41,82 do if 4>f then t[e[l]]=h[e[d]];n=n+1;e=o[n];break;end;f=0;while f>-1 do if 4<=f then if f>5 then if 7==f then f=-2;else t[b]=j;end else if 4~=f then b=u[s];else j=a[u[k]];end end else if 1>=f then if-1<f then repeat if 1~=f then u=e;break;end;s=l;until true;else s=l;end else if 1<=f then repeat if 3~=f then k=d;break;end;a=t;until true;else a=t;end end end f=f+1 end n=n+1;e=o[n];break;end;else t[e[l]]=h[e[d]];n=n+1;e=o[n];end else if 5==f then t[e[l]]={};n=n+1;e=o[n];else t(e[l],e[d]);end end else if 1>f then t[e[l]]={};n=n+1;e=o[n];else if-2~=f then repeat if f<2 then t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;c=e[l]t[c]=t[c](t[c+1])n=n+1;e=o[n];until true;else t[e[l]][e[d]]=e[r];n=n+1;e=o[n];end end end end end else if 9~=f then repeat if 10<f then t[e[l]]=p(_[e[d]],nil,h);break;end;local l=e[l];local n=t[e[d]];t[l+1]=n;t[l]=n[e[r]];until true;else t[e[l]]=p(_[e[d]],nil,h);end end end end else if 21>f then if 17<=f then if 18>=f then if 13<=f then for c=30,69 do if f<18 then local f,b,k,_,u;for c=0,6 do if c>2 then if c>=5 then if 4~=c then for r=46,58 do if c<6 then f=e[l]t[f]=t[f]()n=n+1;e=o[n];break;end;t[e[l]]=h[e[d]];break;end;else t[e[l]]=h[e[d]];end else if 1<c then repeat if c~=3 then f=e[l]t[f]=t[f](s(t,f+1,a))n=n+1;e=o[n];break;end;f=e[l]k,_=j(t[f](s(t,f+1,e[d])))a=_+f-1 u=0;for e=f,a do u=u+1;t[e]=k[u];end;n=n+1;e=o[n];until true;else f=e[l]t[f]=t[f](s(t,f+1,a))n=n+1;e=o[n];end end else if c>=1 then if 1==c then f=e[l];b=t[e[d]];t[f+1]=b;t[f]=b[e[r]];n=n+1;e=o[n];else t(e[l],e[d]);n=n+1;e=o[n];end else t[e[l]]=h[e[d]];n=n+1;e=o[n];end end end break;end;local f,s,c,r,o,h;local n=0;while n>-1 do if 4>n then if 1<n then if n>=0 then repeat if n>2 then r=t;break;end;c=d;until true;else r=t;end else if n~=1 then f=e;else s=l;end end else if n<6 then if 2~=n then for e=11,61 do if n~=4 then h=f[s];break;end;o=r[f[c]];break;end;else o=r[f[c]];end else if 3<n then repeat if n~=7 then t[h]=o;break;end;n=-2;until true;else t[h]=o;end end end n=n+1 end break;end;else local o,s,h,r,f,c;local n=0;while n>-1 do if 4>n then if 1<n then if n>=0 then repeat if n>2 then r=t;break;end;h=d;until true;else r=t;end else if n~=1 then o=e;else s=l;end end else if n<6 then if 2~=n then for e=11,61 do if n~=4 then c=o[s];break;end;f=r[o[h]];break;end;else f=r[o[h]];end else if 3<n then repeat if n~=7 then t[c]=f;break;end;n=-2;until true;else t[c]=f;end end end n=n+1 end end else if 15~=f then for c=30,69 do if 19<f then for f=0,3 do if 1>=f then if-1<f then for r=30,88 do if f~=1 then t[e[l]]=(e[d]~=0);n=n+1;e=o[n];break;end;h[e[d]]=t[e[l]];n=n+1;e=o[n];break;end;else t[e[l]]=(e[d]~=0);n=n+1;e=o[n];end else if-2<f then for c=26,77 do if f>2 then if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;break;end;t[e[l]]=h[e[d]];n=n+1;e=o[n];break;end;else t[e[l]]=h[e[d]];n=n+1;e=o[n];end end end break;end;h[e[d]]=t[e[l]];break;end;else h[e[d]]=t[e[l]];end end else if 15>f then for f=0,3 do if f<=1 then if-3~=f then for r=47,57 do if 0~=f then t[e[l]]=t[e[d]];n=n+1;e=o[n];break;end;t[e[l]]=h[e[d]];n=n+1;e=o[n];break;end;else t[e[l]]=h[e[d]];n=n+1;e=o[n];end else if f~=-1 then repeat if 3~=f then t[e[l]]={};n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];until true;else t[e[l]]={};n=n+1;e=o[n];end end end else if 14<f then for n=38,71 do if f~=15 then t[e[l]]=t[e[d]];break;end;t[e[l]]=t[e[d]][e[r]];break;end;else t[e[l]]=t[e[d]];end end end else if f>=24 then if f<=25 then if f>21 then repeat if f~=25 then local s,a;for f=0,6 do if 3>f then if f<1 then t[e[l]]=h[e[d]];n=n+1;e=o[n];else if-3<=f then repeat if 2>f then t[e[l]]={};n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];until true;else t[e[l]]={};n=n+1;e=o[n];end end else if f<5 then if 3==f then t[e[l]]={};n=n+1;e=o[n];else t(e[l],e[d]);n=n+1;e=o[n];end else if 5==f then t(e[l],e[d]);n=n+1;e=o[n];else s=e[l];a=t[s];for e=s+1,e[d]do c.QGothgUU(a,t[e])end;end end end end break;end;t[e[l]]={};until true;else local s,a;for f=0,6 do if 3>f then if f<1 then t[e[l]]=h[e[d]];n=n+1;e=o[n];else if-3<=f then repeat if 2>f then t[e[l]]={};n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];until true;else t[e[l]]={};n=n+1;e=o[n];end end else if f<5 then if 3==f then t[e[l]]={};n=n+1;e=o[n];else t(e[l],e[d]);n=n+1;e=o[n];end else if 5==f then t(e[l],e[d]);n=n+1;e=o[n];else s=e[l];a=t[s];for e=s+1,e[d]do c.QGothgUU(a,t[e])end;end end end end end else if 24~=f then repeat if f<27 then n=e[d];break;end;t[e[l]]=t[e[d]][e[r]];until true;else n=e[d];end end else if f<22 then local h,s;for f=0,4 do if f>=2 then if 3<=f then if f>1 then repeat if 3<f then h=e[l];s=t[h];for e=h+1,e[d]do c.QGothgUU(s,t[e])end;break;end;t(e[l],e[d]);n=n+1;e=o[n];until true;else h=e[l];s=t[h];for e=h+1,e[d]do c.QGothgUU(s,t[e])end;end else t(e[l],e[d]);n=n+1;e=o[n];end else if f>-3 then for c=49,60 do if 0~=f then t[e[l]]={};n=n+1;e=o[n];break;end;t[e[l]][e[d]]=e[r];n=n+1;e=o[n];break;end;else t[e[l]]={};n=n+1;e=o[n];end end end else if 23~=f then t[e[l]][e[d]]=t[e[r]];else local c;for f=0,6 do if 2>=f then if 0>=f then t[e[l]]=h[e[d]];n=n+1;e=o[n];else if-3<f then for c=45,89 do if f<2 then t[e[l]]=t[e[d]][e[r]];n=n+1;e=o[n];break;end;t(e[l],e[d]);n=n+1;e=o[n];break;end;else t[e[l]]=t[e[d]][e[r]];n=n+1;e=o[n];end end else if f>4 then if f==6 then t[e[l]][e[d]]=t[e[r]];else c=e[l]t[c]=t[c](s(t,c+1,e[d]))n=n+1;e=o[n];end else if 4>f then t(e[l],e[d]);n=n+1;e=o[n];else t(e[l],e[d]);n=n+1;e=o[n];end end end end end end end end end end n=1+n;end;end;return ee end;local l=0xff;local h={};local f=(1);local d='';(function(n)local t=n local o=0x00 local e=0x00 t={(function(r)if o>0x25 then return r end o=o+1 e=(e+0xaea-r)%0x1a return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd3);l[2]=(l[2]*(g(function()h()end,s(d))-g(l[1],s(d))))+1;h[f]={};l=l[2];f=f+l;end return true end)'SGATp'and t[0x1](0x38a+r))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x26);end return true end)'xgYtv'and t[0x3](r+0x28c))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xa4);h[f]=ne();f=f+l;end return true end)'_KhpL'and t[0x2](r+0x3bf))or r end),(function(r)if o>0x2c then return r end o=o+1 e=(e+0x694-r)%0x43 return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xd0);end return true end)'ZCbUS'and t[0x3](0x253+r))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x8d);d={d..'\58 a',d};h[f]=m();f=f+((not c.YiPqOLDU)and 1 or 0);d[1]='\58'..d[1];l[2]=0xff;end return true end)'DR_Ev'and t[0x1](r+0x399))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x68);d='\37';l={function()l()end};d=d..'\100\43';end return true end)'aoDDO'and t[0x2](r+0x35e))or r end),(function(l)if o>0x2e then return l end o=o+1 e=(e+0x3eb-l)%0x4e return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x1a);end return true end)'KOtkx'and t[0x1](0x15d+l))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x80);end return true end)'Ydhey'and t[0x3](l+0x29e))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x22);end return true end)'tmmzA'and t[0x2](l+0x2d6))or l end)}t[0x2](0xec1)end){};local e=p(s(h));return e(...);end return ee((function()local n={}local e=0x01;local t;if c.YiPqOLDU then t=c.YiPqOLDU(ee)else t=''end if c.SfYrAvst(t,c.YOLraYMQ)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(n,e,t,d,l,o)local o;if 4<=n then if n>5 then if 7>n then do return l[t]end;else if n~=4 then repeat if n>7 then do return t(n,nil,t);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,l,t,d,n)if n then return e[n]elseif d then return e else e[l]=t end end})end until true;else do return setmetatable({},{['__\99\97\108\108']=function(e,l,d,t,n)if n then return e[n]elseif t then return e else e[l]=d end end})end end end else if n==5 then local n=d;do return function()local e=e(t,n(n,n),n(n,n));n(1);return e;end;end;else local n=d;local o,d,l=l(2);do return function()local e,f,t,r=e(t,n(n,n),n(n,n)+3);n(4);return(r*o)+(t*d)+(f*l)+e;end;end;end end else if 2>n then if n>=-3 then repeat if 1>n then do return e(1),e(4,l,d,t,e),e(5,l,d,t)end;break;end;do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;until true;else do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;end else if n>-2 then repeat if n<3 then do return 16777216,65536,256 end;break;end;do return e(1),e(4,l,d,t,e),e(5,l,d,t)end;until true;else do return e(1),e(4,l,d,t,e),e(5,l,d,t)end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment