Advertisement
Aestal

ominixtora

Feb 12th, 2024 (edited)
1,362
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 18.38 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _rpKydXbvKKqM = a; end)); return(function(o,...)local u;local f;local r;local l;local c;local t;local e=24915;local n=0;local d={};while n<687 do n=n+1;while n<0x3c2 and e%0x27aa<0x13d5 do n=n+1 e=(e*649)%45438 local a=n+e if(e%0x3d7e)>=0x1ebf then e=(e-0x1d6)%0x44c9 while n<0x123 and e%0x2488<0x1244 do n=n+1 e=(e-367)%39197 local l=n+e if(e%0x1840)<=0xc20 then e=(e-0x1e4)%0x4396 local e=59780 if not d[e]then d[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e-0x235)%0x9fcd local e=33683 if not d[e]then d[e]=0x1 f=string;end else e=(e*0xae)%0xc018 n=n+1 local e=41959 if not d[e]then d[e]=0x1 t=getfenv and getfenv();end end end elseif e%2~=0 then e=(e+0x1b6)%0x9c64 while n<0x30f and e%0x2bc2<0x15e1 do n=n+1 e=(e+603)%44752 local u=n+e if(e%0x3efa)<0x1f7d then e=(e+0x372)%0x5f53 local e=9813 if not d[e]then d[e]=0x1 r={};end elseif e%2~=0 then e=(e+0x3a7)%0xc31c local e=70108 if not d[e]then d[e]=0x1 end else e=(e-0x34d)%0xa65 n=n+1 local e=28509 if not d[e]then d[e]=0x1 l=function(l)local e=0x01 local function d(n)e=e+n return l:sub(e-n,e-0x01)end while true do local n=d(0x01)if(n=="\5")then break end local e=f.byte(d(0x01))local e=d(e)if n=="\2"then e=r.qQcrMtwG(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then t[e]=function(n,e)return o(8,nil,o,e,n)end elseif n=="\4"then e=t[e]elseif n=="\0"then e=t[e][d(f.byte(d(0x01)))];end local n=d(0x08)r[n]=e end end end end end else e=(e*0x13c)%0x5f1 n=n+1 while n<0x260 and e%0x1414<0xa0a do n=n+1 e=(e+699)%31184 local t=n+e if(e%0x46f8)<=0x237c then e=(e*0x3c8)%0xc2b4 local e=72933 if not d[e]then d[e]=0x1 c=tonumber;end elseif e%2~=0 then e=(e*0x29a)%0x323b local e=75235 if not d[e]then d[e]=0x1 u="\4\8\116\111\110\117\109\98\101\114\113\81\99\114\77\116\119\71\0\6\115\116\114\105\110\103\4\99\104\97\114\81\95\74\88\83\118\120\90\0\6\115\116\114\105\110\103\3\115\117\98\75\84\98\87\116\101\119\86\0\6\115\116\114\105\110\103\4\98\121\116\101\105\104\97\69\109\80\110\83\0\5\116\97\98\108\101\6\99\111\110\99\97\116\122\112\110\74\80\84\86\68\0\5\116\97\98\108\101\6\105\110\115\101\114\116\84\104\72\81\89\112\77\89\5";end else e=(e+0x13b)%0xb831 n=n+1 local e=73154 if not d[e]then d[e]=0x1 end end end end end e=(e+668)%39140 end l(u);local e={};for n=0x0,0xff do local d=r.Q_JXSvxZ(n);e[n]=d;e[d]=n;end local function a(n)return e[n];end local f=(function(f,o)local u,d=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local l=f while true do n[0x03][r.KTbWtewV(o,e,(function()e=u+e return e-0x01 end)())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""d=0x000 break end end local t=#o while e<t+0x01 do n[0x02][d]=r.KTbWtewV(o,e,(function()e=u+e return e-0x01 end)())d=d+0x01 if d%0x02==0x00 then d=0x00 r.ThHQYpMY(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+l)%0x100)));l=f+l;end end return r.zpnJPTVD(n[0x01])end);l(f(19,"rehq*8NHd{i<pIDYYh"));l(f(35,"mD^{#+zYZBn)dbg>bbd%*ngZd{BYYB#>dB8z>#dBnBZYz){{P^>bb^ndz{v^gF^Z>Zb{))BZYn{z{nDnb>Bbn#Y>>^b{D)>ndg) B{z>^)^Zyzg#n+ZDYbg#dYDDg>dnBgZ.+zbDDzgYbYn{Z+zZ#BDzbZdz)+Y{zng^d{IBbndnB)D++B^g(d>dbDZ)Yd{n{>DdbZ){B#^nH>+{^^9gg#)Bn+z>+>^B;Yggd#ZzZ{zn#n-nb^)n)d^Z;Z{#^N>)gBdDnD{>z/*)gbd^dYn#zB+bb+)^W^dBngBzzn^>>b3zbb)nYY#bgBd+bnd>dzYnZ+zZD+>{b>zn#)B#zd#b^)Pzbn)dB^Yb{>DY5BdZd>BgzY>Vb^DggZdznbZ{1D#b^{ ^bkn>B#z*^B{zg^dYn#ndYn>^bDDb>{b^n(Y>z#^>8^>B)#Z>YBz{^^d^nqgZdYB)YbzC^)KBbznzYgZDz)^))+B#bgnbBDzY#^{,g)gZB+Z>ZY+^DB/nZDz^nZYBzB{n)#>^b+)+B^Y^^B^DOYb)n+Y>+9z^dn"));local e=(-6485+(function()local l,d=0,1;(function(d,n,e)n(n(e,d,n),n(d and n,e and d,d and e),e(e,n,e))end)(function(n,t,e)if l>272 then return n end l=l+1 d=(d+1017)%45514 if(d%1724)<862 then d=(d+261)%45107 return t else return n(e(n,t,n),e(n,t,e and n)and e(e,t and e,n),t(n,e,t)and t(e and e,t,t))end return e(n(n,e,n),t(t and n,e,e),e(e,n,e and n))end,function(n,t,e)if l>186 then return e end l=l+1 d=(d-981)%33170 if(d%854)<427 then return e(n(n,e,t),e(n,e,n),e(e,e,t))else return n end return e end,function(t,n,e)if l>218 then return e end l=l+1 d=(d+793)%6807 if(d%694)<347 then return e else return n(n(n,n,e),t(t,n,e),e(t,e,e and t))end return n(n(e,t,t),t(e,e,n),t(e,n,t)and n(t,t,n))end)return d;end)())local b=r.YOiGER_A or r.ZFvEMMxi;local ee=(getfenv)or(function()return _ENV end);local ne=1;local t=2;local u=4;local l=3;local function z(g,...)local a=f(e,"9gSYy_ut.ioQb1-dQSS-b__bdu.-SgQ.ydYy1-.ggxy_dut4Gti-.)Yg1bgoet.1YgQd_Y-1.%gut_8^1oudgY_bYd1iuSdbydYib8uudyiSS1_Yz-t-g_obityS1otQQdibYu1!uLQSoGSgboq-d_.-SSQ-yu1Q.YEQogdy-SuQU1i.-toQuydQig!1QuyQidub-#yt-YtSlioBioYob-ug#gi-SoQbdS.-g1QyyQS.-St-gKQgY11guti1Y.b._ddu1bigSybF_SoTudQg_Q1btY7odgoyY:1duSXuyQS_b__ddo.Ygiub_t-Stub..uSQQuYSi-yybiuDdt1_.oYjtYY_-uigbd.byb-uSQd_ibyS1Ou-liSd1b_odg..ubS_Qb_Sb-ttqbidSo-SttP_ogYg1yy6d..oSgQi_ibY.1SyQi-gtd*boYYoY11tu*doo{Y.b1_Qdt.tQo_g-_tbgYd.ouydtSg_i1YybQoYuiP&iYStQ.y1dt.YSzQuS11tto>iY-1uui,)itoSSubd_-.1ulQ.yd-u-_..gdQSybooYub1otS11oS.d.igYYQ-uS-uizS_o-_S1ot1gYQDY.1.t_buiSY_boSY1digSQQgYo-g.tg_QYy-of_QGSo.Yu1yudbgiuSgb/_bQyuQS:QYyd-gutotY11tud/SiiY#S-QduSdgSuQ-_g-.td.1l-o1ydt_uuoLYtb-b1tL&tioYyiSg-Q_.dg_bSgO-wtigQouyob-t.^1iuYobSu_dQi.Slbe_1o-tog1QSKQbJuQ-.ogSt1-_Xdti1SQbiuy-bi8-_tQy-1d.ogQQ.yi-guiZ.o.dQbgutdt_ySiQy_1d_t1Sgt__S11YogooQY_1i_12SidYtbd__dg.--o.SgS-t.tPoyY1du-f_ibtyYd1_uJ-YidS1Qi--.dgiQGytSS1-tdfuoiyYbby.8yoYS1bd_t.bS1Qty--_1Q._go.b_g1Y_-ddooguo1uo11Sob___-b.YuSS_QbydQ1tSg.Y-1Sui{+itYgbo_bdY.oigSoQ._ydggtQgyS1it,yoNooyYdb._-iyS-Qd_u-1b_.WS_Q1yg-YggoiYb1Yuoyoqui_Y__1dy.QSSQi..-tt-g_ob__1otgK.o?Yub1uy51iuSib&_tdt._gbQY_bd_t.fdou_S1yuQVSQdYbbt_-d_iSSYQQ_g-QtdgoQ.yy1QtSado<Y.b-u_guiYSobg_i-d.ug1bu_S-Stig QgY-1_ubg_QuYgbi_dFu.1SyQQtSd_.5g.o-yu1b.iWoQYy1bduid1ouSQbS_id+i^g-Quyb-utoggo.Yd11u1AyiQYSbiuSdt.-S1Qb_Y-o.Sg.Qgyud1toeQoYYi1EutTii_SbbY_odY..gdQu_S-yoQgyoiyS1ttol_QuYYdouod.igSuQ-_ydg.SyiQSyt-6t_StoYyS1gi.NuiuSdbyuddSoFS+-tuY-_t-gYQ1yg1budxuodYybbuSdQisS.Q-utdY.YgQQg__1dtuR1byyG1Suo/zi.S-1u_bdY.-SgQiyd-tt1g_oQuS-Qt!H.i-Y_bbu.doigyYQd_t-1._gQQyyi-u.87-ouYbd2uojSi.Sdbuugdd.QSSQiu1-ttdg_QPy-1otg7.b!Yub-uygQosSibg_t--._Y_QY_:(ut.gNou_-1yub2SioY#bQuid_.bSY1Q_g-itdgoQ.yy1QtSg-opY.b-._eoiYSQbg_.-d.Qg1QyuY-Stog/o.Y-1tubLioQYgbi_dgb.1S_QQ_Y-i.ySSo-y_1biiLooSY.1Ytgd1iySQdu_idg.tY-bYyb-ytoggo._.1uiY^tiQYYbiiydt.dS_bQ_Y--.bg.odyuggtynboSyQ1tutddi_yybY_odgioyuQuyd-yt1gSoiyJ1ttdP_i1YYbbugdi.dY.1g_y-b.SSYQzyt1-.tgioYYb1gt.ddiuS1-ytudS.QSTQiy-dQtbS_Q.yg1budgyi1YybQuS<bi,SiQ-_i-b.YgoQguY1dtt^1oyYQ1yuiJ=Q_S-bu_bdy.oSSQ._Ydtt1gyoQti1itg8tQPYbbbuydooiS.Qd_uddoQgQQyyi-tttX-o_Yb-uuofSi.Ygbu_-dy.QYbQi_3-ttdg_obyY");local n=0;r.qPwzbCmk(function()r.kSDpjjJC()n=n+1 end)local function e(d,e)if e then return n end;n=d+n;end local d,n,h=o(0,o,e,a,r.ihaEmPnS);local function f()local d,n=r.ihaEmPnS(a,e(1,3),e(5,6)+2);e(2);return(n*256)+d;end;local s=true;local s=0 local function k()local e=n();local n=n();local l=1;local t=(d(n,1,20)*(2^32))+e;local e=d(n,21,31);local n=((-1)^d(n,32));if(e==0)then if(t==s)then return n*0;else e=1;l=0;end;elseif(e==2047)then return(t==0)and(n*(1/0))or(n*(0/0));end;return r.MaBjjIGK(n,e-1023)*(l+(t/(2^52)));end;local y=n;local function _(n)local d;if(not n)then n=y();if(n==0)then return'';end;end;d=r.KTbWtewV(a,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+s),#d do e=e..r.KTbWtewV(d,n,n)end return e;end;local s=#r.uZUjLvhT(c('\49.\48'))~=1 local e=n;local function j(...)return{...},r.RrB_zhRf('#',...)end local function p()local o={};local e={};local c={};local b={c,o,nil,e};local e=n()local a={}for t=1,e do local d=h();local n;if(d==1)then n=(h()~=#{});elseif(d==2)then local e=k();if s and r.nrbGXjKe(r.uZUjLvhT(e),'.(\48+)$')then e=r.LgpgTQEz(e);end n=e;elseif(d==3)then n=_();end;a[t]=n;end;b[3]=h();for e=1,n()do o[e-(#{1})]=p();end;for b=1,n()do local e=h();if(d(e,1,1)==0)then local o=d(e,2,3);local r=d(e,4,6);local e={f(),f(),nil,nil};if(o==0)then e[l]=f();e[u]=f();elseif(o==#{1})then e[l]=n();elseif(o==g[2])then e[l]=n()-(2^16)elseif(o==g[3])then e[l]=n()-(2^16)e[u]=f();end;if(d(r,1,1)==1)then e[t]=a[e[t]]end if(d(r,2,2)==1)then e[l]=a[e[l]]end if(d(r,3,3)==1)then e[u]=a[e[u]]end c[b]=e;end end;return b;end;local function z(d,n,e)local t=n;local t=e;return c(r.nrbGXjKe(r.nrbGXjKe(({r.qPwzbCmk(d)})[2],n),e))end local function m(s,e,h)local function p(...)local f,p,g,z,c,n,a,k,_,y,m,d;local e=0;while-1<e do if e<=2 then if e>0 then if-3<e then repeat if e<2 then g=o(6,22,3,99,s);c=j z=0;break;end;n=-41;a=-1;until true;else g=o(6,22,3,99,s);c=j z=0;end else f=o(6,97,1,48,s);p=o(6,92,2,36,s);end else if 5>e then if 2~=e then repeat if e>3 then y=r.RrB_zhRf('#',...)-1;m={};break;end;k={};_={...};until true;else k={};_={...};end else if 1<e then for n=39,86 do if 5<e then e=-2;break;end;d=o(7);break;end;else e=-2;end end end e=e+1;end;for e=0,y do if(e>=g)then k[e-g]=_[e+1];else d[e]=_[e+1];end;end;local e=y-g+1 local e;local o;local function r(...)while true do end end while true do if n<-40 then n=n+42 end e=f[n];o=e[ne];if o>22 then if o<=34 then if 28>=o then if o<26 then if o<24 then if(d[e[t]]~=e[u])then n=n+1;else n=e[l];end;else if 24==o then local o;for u=0,1 do if-4<=u then for r=37,82 do if 0<u then if not d[e[t]]then n=n+1;else n=e[l];end;break;end;o=e[t]d[o]=d[o]()n=n+1;e=f[n];break;end;else o=e[t]d[o]=d[o]()n=n+1;e=f[n];end end else local e=e[t]d[e]=d[e](b(d,e+1,a))end end else if o>=27 then if 24~=o then repeat if 28~=o then h[e[l]]=d[e[t]];break;end;local o,s,_,y,r;for g=0,6 do if g>2 then if 5>g then if g~=0 then for u=32,86 do if g~=3 then o=e[t]d[o]=d[o](b(d,o+1,a))n=n+1;e=f[n];break;end;o=e[t]_,y=c(d[o](b(d,o+1,e[l])))a=y+o-1 r=0;for e=o,a do r=r+1;d[e]=_[r];end;n=n+1;e=f[n];break;end;else o=e[t]_,y=c(d[o](b(d,o+1,e[l])))a=y+o-1 r=0;for e=o,a do r=r+1;d[e]=_[r];end;n=n+1;e=f[n];end else if g==5 then o=e[t]d[o]=d[o]()n=n+1;e=f[n];else d[e[t]]=d[e[l]][e[u]];end end else if g<=0 then d[e[t]]=h[e[l]];n=n+1;e=f[n];else if g~=-1 then for r=24,90 do if 2>g then o=e[t];s=d[e[l]];d[o+1]=s;d[o]=s[e[u]];n=n+1;e=f[n];break;end;d(e[t],e[l]);n=n+1;e=f[n];break;end;else o=e[t];s=d[e[l]];d[o+1]=s;d[o]=s[e[u]];n=n+1;e=f[n];end end end end until true;else h[e[l]]=d[e[t]];end else do return end;end end else if 32<=o then if 32>=o then d[e[t]]=(e[l]~=0);else if 34~=o then if d[e[t]]then n=n+1;else n=e[l];end;else if(d[e[t]]==e[u])then n=n+1;else n=e[l];end;end end else if 29>=o then n=e[l];else if 31==o then if(d[e[t]]~=e[u])then n=n+1;else n=e[l];end;else for o=0,1 do if o~=-4 then repeat if o~=1 then d[e[t]]();n=n+1;e=f[n];break;end;n=e[l];until true;else n=e[l];end end end end end end else if o>=41 then if o>=44 then if 44>=o then d[e[t]]=h[e[l]];else if o>=43 then repeat if o>45 then if not d[e[t]]then n=n+1;else n=e[l];end;break;end;local e=e[t]d[e](d[e+1])until true;else if not d[e[t]]then n=n+1;else n=e[l];end;end end else if o>41 then if o~=41 then for n=21,76 do if o<43 then local n=e[t]local t,e=c(d[n](b(d,n+1,e[l])))a=e+n-1 local e=0;for n=n,a do e=e+1;d[n]=t[e];end;break;end;local t=e[t];local n=d[e[l]];d[t+1]=n;d[t]=n[e[u]];break;end;else local n=e[t];local t=d[e[l]];d[n+1]=t;d[n]=t[e[u]];end else d[e[t]][e[l]]=e[u];end end else if o>=38 then if o<39 then local n=e[t]local t,e=c(d[n](b(d,n+1,e[l])))a=e+n-1 local e=0;for n=n,a do e=e+1;d[n]=t[e];end;else if 37~=o then for u=25,54 do if 39~=o then d[e[t]]={};break;end;local o;for u=0,1 do if-4<=u then repeat if u>0 then o=e[t]d[o](d[o+1])break;end;d(e[t],e[l]);n=n+1;e=f[n];until true;else d(e[t],e[l]);n=n+1;e=f[n];end end break;end;else local o;for u=0,1 do if-4<=u then repeat if u>0 then o=e[t]d[o](d[o+1])break;end;d(e[t],e[l]);n=n+1;e=f[n];until true;else d(e[t],e[l]);n=n+1;e=f[n];end end end end else if 36<=o then if 32~=o then for f=34,86 do if 36<o then if not d[e[t]]then n=n+1;else n=e[l];end;break;end;local e=e[t]d[e]=d[e]()break;end;else local e=e[t]d[e]=d[e]()end else local e=e[t]d[e](d[e+1])end end end end else if 10>=o then if 5<=o then if 8<=o then if 9>o then local n=e[t];local t=d[e[l]];d[n+1]=t;d[n]=t[e[u]];else if o==10 then local e=e[t]d[e]=d[e](b(d,e+1,a))else local o,s,y,_,g;for r=0,6 do if 2>=r then if 1>r then d(e[t],e[l]);n=n+1;e=f[n];else if-2<=r then repeat if r~=1 then d[e[t]]=h[e[l]];n=n+1;e=f[n];break;end;o=e[t]d[o](d[o+1])n=n+1;e=f[n];until true;else o=e[t]d[o](d[o+1])n=n+1;e=f[n];end end else if r>=5 then if r~=2 then for u=22,93 do if r~=5 then o=e[t]y,_=c(d[o](b(d,o+1,e[l])))a=_+o-1 g=0;for e=o,a do g=g+1;d[e]=y[g];end;break;end;d(e[t],e[l]);n=n+1;e=f[n];break;end;else d(e[t],e[l]);n=n+1;e=f[n];end else if r>-1 then repeat if 3<r then o=e[t];s=d[e[l]];d[o+1]=s;d[o]=s[e[u]];n=n+1;e=f[n];break;end;d[e[t]]=h[e[l]];n=n+1;e=f[n];until true;else d[e[t]]=h[e[l]];n=n+1;e=f[n];end end end end end end else if 5<o then if 6<o then d[e[t]]=h[e[l]];else d(e[t],e[l]);end else local r;for o=0,4 do if 2<=o then if 3<=o then if 4~=o then r=e[t]d[r]=d[r]()n=n+1;e=f[n];else if d[e[t]]then n=n+1;else n=e[l];end;end else d[e[t]]=d[e[l]][e[u]];n=n+1;e=f[n];end else if 1==o then d[e[t]]();n=n+1;e=f[n];else d[e[t]]=d[e[l]][e[u]];n=n+1;e=f[n];end end end end end else if 2<=o then if o>2 then if o>0 then repeat if 3~=o then d[e[t]]();break;end;if(d[e[t]]==e[u])then n=n+1;else n=e[l];end;until true;else d[e[t]]();end else local r;for o=0,5 do if 3>o then if o>0 then if o>=-3 then for r=32,89 do if 2>o then d[e[t]][e[l]]=e[u];n=n+1;e=f[n];break;end;d[e[t]][e[l]]=e[u];n=n+1;e=f[n];break;end;else d[e[t]][e[l]]=e[u];n=n+1;e=f[n];end else d[e[t]][e[l]]=e[u];n=n+1;e=f[n];end else if o<4 then d[e[t]][e[l]]=e[u];n=n+1;e=f[n];else if 0~=o then repeat if o~=5 then d[e[t]][e[l]]=e[u];n=n+1;e=f[n];break;end;r=e[t]d[r](d[r+1])until true;else d[e[t]][e[l]]=e[u];n=n+1;e=f[n];end end end end end else if o~=-4 then repeat if 0~=o then d[e[t]]=d[e[l]][e[u]];break;end;d[e[t]]={};until true;else d[e[t]]={};end end end else if 16>=o then if o<=13 then if o<12 then n=e[l];else if o<13 then if d[e[t]]then n=n+1;else n=e[l];end;else d[e[t]]();end end else if 14>=o then d[e[t]]=d[e[l]][e[u]];else if o>14 then for n=34,95 do if 15<o then h[e[l]]=d[e[t]];break;end;local o,r,u,a,f;local n=0;while n>-1 do if n<3 then if 1>n then o=e;else if n==1 then r=t;else u=l;end end else if n<5 then if 4>n then a=o[u];else f=o[r];end else if 4<n then repeat if 5~=n then n=-2;break;end;d(f,a);until true;else n=-2;end end end n=n+1 end break;end;else local o,a,r,u,f;local n=0;while n>-1 do if n<3 then if 1>n then o=e;else if n==1 then a=t;else r=l;end end else if n<5 then if 4>n then u=o[r];else f=o[a];end else if 4<n then repeat if 5~=n then n=-2;break;end;d(f,u);until true;else n=-2;end end end n=n+1 end end end end else if o>=20 then if 21>o then local o,y,s,_,r;for g=0,5 do if g>=3 then if 3>=g then d(e[t],e[l]);n=n+1;e=f[n];else if 3~=g then for u=41,61 do if 4~=g then o=e[t]d[o]=d[o](b(d,o+1,a))break;end;o=e[t]s,_=c(d[o](b(d,o+1,e[l])))a=_+o-1 r=0;for e=o,a do r=r+1;d[e]=s[r];end;n=n+1;e=f[n];break;end;else o=e[t]s,_=c(d[o](b(d,o+1,e[l])))a=_+o-1 r=0;for e=o,a do r=r+1;d[e]=s[r];end;n=n+1;e=f[n];end end else if 1<=g then if 2~=g then d[e[t]]=h[e[l]];n=n+1;e=f[n];else o=e[t];y=d[e[l]];d[o+1]=y;d[o]=y[e[u]];n=n+1;e=f[n];end else d[e[t]]=h[e[l]];n=n+1;e=f[n];end end end else if o>=17 then for n=18,57 do if 22~=o then d[e[t]]=(e[l]~=0);break;end;d[e[t]][e[l]]=e[u];break;end;else d[e[t]][e[l]]=e[u];end end else if o<=17 then do return end;else if 19>o then for o=0,3 do if o>=2 then if o~=0 then for r=36,93 do if 3>o then d[e[t]]=h[e[l]];n=n+1;e=f[n];break;end;if(d[e[t]]~=e[u])then n=n+1;else n=e[l];end;break;end;else d[e[t]]=h[e[l]];n=n+1;e=f[n];end else if o==1 then h[e[l]]=d[e[t]];n=n+1;e=f[n];else d[e[t]]=(e[l]~=0);n=n+1;e=f[n];end end end else local e=e[t]d[e]=d[e]()end end end end end end n=1+n;end;end;return p end;local l=0xff;local a={};local f=(1);local t='';(function(n)local d=n local o=0x00 local e=0x00 d={(function(u)if o>0x28 then return u end o=o+1 e=(e+0x134d-u)%0x40 return(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xc3);a[f]=ee();f=f+l;end return true end)'GPjFE'and d[0x3](0x7d+u))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xe7);end return true end)'HikVB'and d[0x1](u+0x152))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x7c);t='\37';l={function()l()end};t=t..'\100\43';end return true end)'_YRno'and d[0x2](u+0x39c))or u end),(function(u)if o>0x1f then return u end o=o+1 e=(e+0x932-u)%0x48 return(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x26);t={t..'\58 a',t};a[f]=p();f=f+((not r.qxcUskhB)and 1 or 0);t[1]='\58'..t[1];l[2]=0xff;end return true end)'PDQwy'and d[0x2](0x19b+u))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xc9);end return true end)'XeDaT'and d[0x3](u+0x1d4))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xb7);l[2]=(l[2]*(z(function()a()end,b(t))-z(l[1],b(t))))+1;a[f]={};l=l[2];f=f+l;end return true end)'WXqeE'and d[0x1](u+0x324))or u end),(function(t)if o>0x26 then return t end o=o+1 e=(e+0xd74-t)%0x41 return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x76);end return true end)'yiWkT'and d[0x2](0x192+t))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x54);end return true end)'TaeAz'and d[0x3](t+0x2b5))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xd0);end return true end)'UOVZT'and d[0x1](t+0xfc))or t end)}d[0x1](0xf6a)end){};local e=m(b(a));return e(...);end return z((function()local n={}local e=0x01;local d;if r.qxcUskhB then d=r.qxcUskhB(z)else d=''end if r.nrbGXjKe(d,r.sRrstXWv)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,d,t,l,o)local o;if 4<=e then if 5>=e then if e>4 then local e=t;do return function()local n=n(d,e(e,e),e(e,e));e(1);return n;end;end;else local e=t;local l,t,o=l(2);do return function()local d,n,u,f=n(d,e(e,e),e(e,e)+3);e(4);return(f*l)+(u*t)+(n*o)+d;end;end;end else if 7>e then do return l[d]end;else if e~=4 then repeat if 8>e then 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 break;end;do return d(e,nil,d);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 end else if e>=2 then if 0<e then for o=15,96 do if 2<e then do return n(1),n(4,l,t,d,n),n(5,l,t,d)end;break;end;do return 16777216,65536,256 end;break;end;else do return 16777216,65536,256 end;end else if e>-4 then repeat if e~=0 then do return function(d,e,n)if n then local e=(d/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(d%(e+e)>=e)and 1 or 0;end;end;end;break;end;do return n(1),n(4,l,t,d,n),n(5,l,t,d)end;until true;else do return function(d,e,n)if n then local e=(d/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(d%(e+e)>=e)and 1 or 0;end;end;end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement