API tools faq
paste
Advertisement
Pmn20002

Impossible

Pmn20002
Mar 28th, 2023
28
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 22.00 KB | None | 0 0
raw download clone embed print report
  1. ([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _PFvIIWLvJMcp = a; end)); return(function(o,...)local r;local c;local d;local h;local t;local f;local e=24915;local n=0;local l={};while n<504 do n=n+1;while n<0x2fb and e%0x10e4<0x872 do n=n+1 e=(e+940)%39978 local a=n+e if(e%0x1d72)>0xeb9 then e=(e+0x88)%0xae3a while n<0x2b0 and e%0x4028<0x2014 do n=n+1 e=(e*51)%29325 local d=n+e if(e%0x2638)>=0x131c then e=(e-0x39c)%0x48f7 local e=9983 if not l[e]then l[e]=0x1 t=(not t)and _ENV or t;end elseif e%2~=0 then e=(e*0x268)%0x7694 local e=2241 if not l[e]then l[e]=0x1 f=string;end else e=(e-0x24e)%0x4f7d n=n+1 local e=13615 if not l[e]then l[e]=0x1 h={};end end end elseif e%2~=0 then e=(e+0x44)%0x966b while n<0x191 and e%0x35fe<0x1aff do n=n+1 e=(e-892)%27708 local a=n+e if(e%0x205c)<=0x102e then e=(e-0xd7)%0x9fb8 local e=54708 if not l[e]then l[e]=0x1 r="\4\8\116\111\110\117\109\98\101\114\65\86\121\72\85\109\112\117\0\6\115\116\114\105\110\103\4\99\104\97\114\113\65\66\109\104\82\117\90\0\6\115\116\114\105\110\103\3\115\117\98\82\108\102\104\98\88\116\88\0\6\115\116\114\105\110\103\4\98\121\116\101\109\82\87\76\118\100\89\114\0\5\116\97\98\108\101\6\99\111\110\99\97\116\66\82\69\97\85\75\89\85\0\5\116\97\98\108\101\6\105\110\115\101\114\116\122\116\87\75\70\67\107\86\5";end elseif e%2~=0 then e=(e*0x1c0)%0xb11e local e=11362 if not l[e]then l[e]=0x1 c=tonumber;end else e=(e*0xaa)%0x5d8d n=n+1 local e=63655 if not l[e]then l[e]=0x1 d=function(l)local e=0x01 local function n(n)e=e+n return l:sub(e-n,e-0x01)end while true do local l=n(0x01)if(l=="\5")then break end local e=f.byte(n(0x01))local e=n(e)if l=="\2"then e=h.AVyHUmpu(e)elseif l=="\3"then e=e~="\0"elseif l=="\6"then t[e]=function(e,n)return o(8,nil,o,n,e)end elseif l=="\4"then e=t[e]elseif l=="\0"then e=t[e][n(f.byte(n(0x01)))];end local n=n(0x08)h[n]=e end end end end end else e=(e+0x1cd)%0xbc4c n=n+1 while n<0xaf and e%0x2e5e<0x172f do n=n+1 e=(e+213)%14728 local d=n+e if(e%0x4e0a)<=0x2705 then e=(e+0x2d1)%0x5d9a local e=87324 if not l[e]then l[e]=0x1 t=getfenv and getfenv();end elseif e%2~=0 then e=(e*0x210)%0x413b local e=32747 if not l[e]then l[e]=0x1 end else e=(e*0x381)%0x5ba8 n=n+1 local e=49992 if not l[e]then l[e]=0x1 end end end end end e=(e+482)%5456 end d(r);local n={};for e=0x0,0xff do local l=h.qABmhRuZ(e);n[e]=l;n[l]=e;end local function a(e)return n[e];end local b=(function(o,f)local r,l=0x01,0x10 local n={{},{},{}}local t=-0x01 local e=0x01 local d=o while true do n[0x03][h.RlfhbXtX(f,e,(function()e=r+e return e-0x01 end)())]=(function()t=t+0x01 return t end)()if t==(0x0f)then t=""l=0x000 break end end local t=#f while e<t+0x01 do n[0x02][l]=h.RlfhbXtX(f,e,(function()e=r+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 h.ztWKFCkV(n[0x01],(a((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=o+d;end end return h.BREaUKYU(n[0x01])end);d(b(95,"3B(/ZqP>AWsR)fwXsP"));d(b(85,"G=P!TL0%jK6H4b,{6HL4%TPC4K0H=HH{u%=P4,%=={HH%0l64,L%{TK,L4H00P%j=0H{%LPN40L!{46K%T=%4bLKHj0%%bP644%4Pb6,j=&xH%LT{,b!0PH40bjL!=b6%4P4bX=KP44HjKP!b!K+==HPL6<%,%%%!!0,=b!=bJj,Pb%Lj%P6b0KT!%HH0jPH4<0!!=,4KT4,j=K!!n,6j,!=,Hj!T=bKjL!6b,%4=T,{%P!b4=K0TTj+P{T0,4KHT%{CKPTP,0%0P={0%%T6bHKE!KjP!PT4,TK_TL,K!LT{{!6R!4,KK4T{,b%{TT{b%TP0,,!j,L{{6!Lr,4KKT4b0j6P%,Lj{LHb=6{,jKT66L%{K6KL6J!6ML={T6{!6{L60,bK6HPT{m=6LT,*6jbLblHKjT0,,6%!%KKTjL4{HHKLj6Y64LbWHH00T1LKT!H=LHPL0O%K^{6"));local e=(-10353+(function()local d,l=0,1;(function(e,t,l,n)n(e(t,n,t,n)and l(n and e,l,t,l),n(e,l,t,e),l(n,n,t,e),l(t and e,n and e,l,e))end)(function(n,e,t,f)if d>442 then return t end d=d+1 l=(l*1007)%48030 if(l%204)<=102 then l=(l*590)%40970 return e else return n(n(f and e,e,e,e and n),t(n,e,n,t),f(t,e,f,e),t(f,n and e,f and f,f and e))end return e(n(t,t,e and f,t)and f(e,t,n,e and n),t(f and n,e,e,f),n(e,t,n,t),n(n,n,n,n))end,function(e,n,t,f)if d>158 then return n end d=d+1 l=(l+519)%33529 if(l%664)>332 then return t(n(e and n,e,n and t,n and f),e(e and f,e and n,f and n,t),f(n,f and e,t,t),t(e,n,n and e,e))else return t end return e end,function(e,t,n,f)if d>400 then return f end d=d+1 l=(l-200)%38269 if(l%424)<212 then return n(t(e,n,f,f),n(t,e,n,e),e(n,t,e,t and e),e(f,n,t,t))else return f end return n end,function(n,e,f,t)if d>169 then return e end d=d+1 l=(l*998)%47596 if(l%634)>=317 then return n(n(f,t,n and e,n),e(f,n,e and n,t),n(e,e,e,f)and t(t and e,t,n,e),t(e,t,e,n))else return n end return e end)return l;end)())local a=h.JSEXWxCv or h.sfMguAHe;local le=(getfenv)or(function()return _ENV end);local te=1;local d=3;local r=4;local t=2;local function y(u,...)local k=b(e,"Q3vRb4Bi%W^kV+&1,+1v&k&b++&vV1V%V31+v433}B3v1V+v1&1B&1&R+kBBB&4%43b^Wi^3^3WRWi%1%k%Bvk4%BV3Bb4R3R3+^&kVVV4k&np3+3W33/&wi1B&%&k++W3k3V1k+V%V3Bi%v^kWk%1%k%vRiJ1OVt31^1RRRbBbkRV+0V&Vvkkkb1W34S31^9^%^%1iVi4B&^^+vk&kRk1^W%:^%Wb%V%^%&3R3W 41&1ibvb&bRR&RV&+3^vi3++3&133f-W4W3%i%/iW&r+0+k4+4+b1b%b3%v^i^.W4B4iV%bMW0V1k1b&+4vb&RWR4R+Riv&3&3Vu&^J+KWv%k%b+3+&+%+k%3V:kVk%^^4&^&W3WVbv%k%BiVi^Bb4kB4b1bi1VbVRiRkv%+W113^3RYk&W1b&k^3+u^B%VVi+iiiWB^&^B^,^B%&Wvbv43b^bRRV1V11&&&i&LviRibv3ivv3WvR333X9%WR^4%4i&iik++%+3VW^ikv^WW&%k^4WV%V%^iV%3b1BW4+4B4x4v3&b^bRR^Vbk^kR^V^4W&ii11VW%v%bibB+BB^+k+V%^3^V^^WWW+W&v=v13vUkdbb*B%4bbVb^b&1RveRb+&1Vv%3W33JbD%^++^&b+W+&%^BRB=44b&bi%+W^WkWWvbBi3By1u%BWB&Bi4V4%3%dB11RkvRRv&v3bn13R**wB&V1%&1+^&gV^V1ViVBk9kvk3BbWvWi%&bWi4i%ibB+4k4vb^b&bi5R1^v%v#3k3V+i3%>V)%kk&+&1&kW1+iV+k1VWi&k4^v^R^34kWV%iW3i3ikBB1kd3&+&B+1Riv33.RWC41&*41R3B&R+1&&1bi+iVB1B%B3W+Vvk%kbkCB^R)v+vv3k3bX&zB111%13&1&R+V+4R&RWvWvivB^V^bW+WB%1%V%3i^iRi&BV4&4%4Kb^bvRkRbv+4R313^33A^zR1V14&&Li&_+^+vV+Vbk&kB^1Vi^3W^WR%+%4i&iiibBWBv4k4b4ibBR1R%W+WW%b%t%%%viWBWBi4W&kL4+++BV1R;R4v&vR31+1V+VB;A&^14&1+WV1V1V+%BkbkWkFBk^i%1W&b1i^4BbnBWBRBe4^b&&3&3+RVVV4KBvkvb3W&W={r%%+%^i1i%i3+3VbVWk^b&bibNRWRvRRvb3+3Bv3R3w31^1R&+&4+&+i&v&bVvkVkbk3^BW1W%k3^a%Ri+i4B1BiBR4WBb44bbb<RBR3v%v33^3R3+}4111i1R&W&v+k+b&4VBk1k%k3^^^4WVW4W%%i%IiWiRBkB44+4BB&b%b3R^RbvVv43&3k3/uWGv1k34&+&B+1bOb4R&RRv1&1+++B3L1^A411&W+1+1++WBVbVWV ikkiW1^&41W^W%ibBkBvR14iR+13&&&R+V+4R4v%v+3&kvk4^bW+WB1k1i&v+&&B&Y+iViV4kibWbWRkRbv+B&WR%V%343B%i/14&&&i&,+W+^VkVbk+V%+%^%^3W^WB%V%4i&%W%4BWBR4k4Bb+bBR14%bVv^vb3V3BU&ZkJ,}k1%&k&i+++iV1V%V3k^kk^V^BW&W^Ww%W%vik%&B+BB414%43bVbRRVb1v&vivC3^3vFVfb1+34&1&%&3+k+RVVV4Vvkikq^W^v^4Wb%+%B&k&i+vV&+B+mVikik4^iRWRBvkvb3+i+ifi4BB1^1^&V&4+&31bbR+RvLv3Wv3^BVZW%W3%^&k1(&W+&+^W^%%%3kk^4ke^^Wb%^%^%%b3B1ibBkvBBvb^4W)^vNR1vV iCv1i1&&&WVW4%&%i%s%3ivBkBbB1i1b1b%b3RkRRvVv4REv%3Ct^Fv1+1b&+&B11&a+3VkVRk+k4k3^ikvkBWv%&%b%3iBB1B%B34k4Rb+b4b3RiRrvWvvv13bC+0B111%1R&^&R+++4V&ViV3kWkR^k^bkVWB%1%%%vi^iRBV%14&4i4zbW4vRkRbv+vi313%333V3&1V14&&1b&;+W+v+++Rk+kB^1kk^3W^WRkvWbi&iiiyB1Bv4V4b4%bBbRRWR3v^vRvv34_1YiC{3%1v&k&b+&+BV1V%+RV3kR^V^4^%WiWj%WWbW4ibB&BBBR4%43b^BR4bR4v1viv33W3k.k3B3i1B1v&%1R+^+RVVV4+3kik3^W^4WkWb%+%B%Vi%i3B^BR4V4ib&bi4gRWRvvkv43+3%H1v%Ti1^1b&V&4+&&B+?+k&ikkki^+^WW1W%W3%^WWiViBB&B^BA4k4vBk4VR+R%v1vWv3vB3R3&3R1&1k1!1^&v+k+bV+V1k1k^k3^&^RW&W4^&%k%8iVivB+Bb4&4BB3bWb3R1RRR3v43&3i3v3VUvX31b1<&B+1+%+3&4VRk1k4kb^i^3WWkv^%%b%MiBi3B%Bv4^B441b4bRRiRvvWvv3k3Bvn-Bd41%1R&^&R+V+4&WViVRkWk%^k^4W+kB^b%%%bi^i4BVBB4&BWBbbWbiRkRkv+vB313^vbY^9W1V1B&&&i&S+W&+VkVik+kV^1^W^3k^Wb%V%%i&iWi5B1BvB+4ib+bkR1b%R3v^vRv&v3:&n+xK:+1v&k&b1+&kV1V&V3V0kRkb^4kFWVW.We%v%WibB+BBi3Bi434vbRb^R4v&viRvvb3v3bpbIk1B&1&%&3&&+R+vV4Vikikv^W^b^&WbWb%Bi1i%i3B^BR%v4443bibiRWRRvkvbvW3B81;%#v1^1R&V");local n=0;h.gIGIialM(function()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,b=o(0,o,e,k,h.mRWLvdYr);local function f()local n,l=h.mRWLvdYr(k,e(1,3),e(5,6)+2);e(2);return(l*256)+n;end;local s=true;local s=0 local function p()local e=n();local n=n();local d=1;local t=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local n=((-1)^l(n,32));if(e==0)then if(t==s)then return n*0;else e=1;d=0;end;elseif(e==2047)then return(t==0)and(n*(1/0))or(n*(0/0));end;return h.IKcMEhxu(n,e-1023)*(d+(t/(2^52)));end;local j=n;local function z(n)local l;if(not n)then n=j();if(n==0)then return'';end;end;l=h.RlfhbXtX(k,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+s),#l do e=e..h.RlfhbXtX(l,n,n)end return e;end;local s=#h.LLvLtZdb(c('\49.\48'))~=1 local e=n;local function m(...)return{...},h.LqtVYVdI('#',...)end local function _()local o={};local k={};local e={};local c={k,o,nil,e};local e=n()local a={}for t=1,e do local l=b();local n;if(l==2)then n=(b()~=#{});elseif(l==3)then local e=p();if s and h.zPFCEz_p(h.LLvLtZdb(e),'.(\48+)$')then e=h.hLHwibhF(e);end n=e;elseif(l==0)then n=z();end;a[t]=n;end;c[3]=b();for e=1,n()do o[e-(#{1})]=_();end;for c=1,n()do local e=b();if(l(e,1,1)==0)then local o=l(e,2,3);local h=l(e,4,6);local e={f(),f(),nil,nil};if(o==0)then e[d]=f();e[r]=f();elseif(o==#{1})then e[d]=n();elseif(o==u[2])then e[d]=n()-(2^16)elseif(o==u[3])then e[d]=n()-(2^16)e[r]=f();end;if(l(h,1,1)==1)then e[t]=a[e[t]]end if(l(h,2,2)==1)then e[d]=a[e[d]]end if(l(h,3,3)==1)then e[r]=a[e[r]]end k[c]=e;end end;return c;end;local function ne(l,e,n)local t=e;local t=n;return c(h.zPFCEz_p(h.zPFCEz_p(({h.gIGIialM(l)})[2],e),n))end local function z(s,e,k)local function ne(...)local f,j,u,ee,c,n,b,_,g,p,y,l;local e=0;while-1<e do if e>2 then if 5>e then if e>=-1 then for n=10,81 do if 4~=e then _={};g={...};break;end;p=h.LqtVYVdI('#',...)-1;y={};break;end;else p=h.LqtVYVdI('#',...)-1;y={};end else if 6==e then e=-2;else l=o(7);end end else if 0<e then if 0<=e then repeat if e~=1 then n=-41;b=-1;break;end;u=o(6,37,3,8,s);c=m ee=0;until true;else u=o(6,37,3,8,s);c=m ee=0;end else f=o(6,57,1,55,s);j=o(6,7,2,50,s);end end e=e+1;end;for e=0,p do if(e>=u)then _[e-u]=g[e+1];else l[e]=g[e+1];end;end;local e=p-u+1 local e;local o;local function h(...)while true do end end while true do if n<-40 then n=n+42 end e=f[n];o=e[te];if 22>=o then if 11<=o then if o<=16 then if o<=13 then if o<12 then local n=e[t]l[n](a(l,n+1,e[d]))else if 12==o then local h;for o=0,5 do if 3<=o then if 3<o then if o<5 then l(e[t],e[d]);n=n+1;e=f[n];else h=e[t]l[h]=l[h](a(l,h+1,e[d]))end else l(e[t],e[d]);n=n+1;e=f[n];end else if o>0 then if 2~=o then l[e[t]]=l[e[d]][e[r]];n=n+1;e=f[n];else l(e[t],e[d]);n=n+1;e=f[n];end else l[e[t]]=k[e[d]];n=n+1;e=f[n];end end end else l(e[t],e[d]);end end else if 15<=o then if 14<o then repeat if o<16 then l[e[t]]=(e[d]~=0);break;end;for o=0,3 do if 1<o then if o>-2 then repeat if o<3 then l[e[t]]=k[e[d]];n=n+1;e=f[n];break;end;if(l[e[t]]~=e[r])then n=n+1;else n=e[d];end;until true;else if(l[e[t]]~=e[r])then n=n+1;else n=e[d];end;end else if-3~=o then repeat if o~=0 then k[e[d]]=l[e[t]];n=n+1;e=f[n];break;end;l[e[t]]=(e[d]~=0);n=n+1;e=f[n];until true;else k[e[d]]=l[e[t]];n=n+1;e=f[n];end end end until true;else for o=0,3 do if 1<o then if o>-2 then repeat if o<3 then l[e[t]]=k[e[d]];n=n+1;e=f[n];break;end;if(l[e[t]]~=e[r])then n=n+1;else n=e[d];end;until true;else if(l[e[t]]~=e[r])then n=n+1;else n=e[d];end;end else if-3~=o then repeat if o~=0 then k[e[d]]=l[e[t]];n=n+1;e=f[n];break;end;l[e[t]]=(e[d]~=0);n=n+1;e=f[n];until true;else k[e[d]]=l[e[t]];n=n+1;e=f[n];end end end end else local h,b;for o=0,6 do if 2>=o then if o<1 then h=e[t]l[h](a(l,h+1,e[d]))n=n+1;e=f[n];else if o~=1 then l(e[t],e[d]);n=n+1;e=f[n];else h=e[t];b=l[e[d]];l[h+1]=b;l[h]=b[e[r]];n=n+1;e=f[n];end end else if 5<=o then if o>3 then for r=45,60 do if 6~=o then l(e[t],e[d]);n=n+1;e=f[n];break;end;l(e[t],e[d]);break;end;else l(e[t],e[d]);n=n+1;e=f[n];end else if o~=3 then l[e[t]]=l[e[d]][e[r]];n=n+1;e=f[n];else l[e[t]]=k[e[d]];n=n+1;e=f[n];end end end end end end else if 19>=o then if 18<=o then if 17~=o then repeat if 18~=o then l[e[t]]=z(j[e[d]],nil,k);break;end;if(l[e[t]]~=e[r])then n=n+1;else n=e[d];end;until true;else if(l[e[t]]~=e[r])then n=n+1;else n=e[d];end;end else l[e[t]]=k[e[d]];end else if 20>=o then local n=e[t]local t,e=c(l[n](a(l,n+1,e[d])))b=e+n-1 local e=0;for n=n,b do e=e+1;l[n]=t[e];end;else if 20~=o then for h=49,86 do if 21<o then local o,h;for b=0,5 do if b>=3 then if 3<b then if b>=3 then repeat if 4~=b then l(e[t],e[d]);break;end;o=e[t];h=l[e[d]];l[o+1]=h;l[o]=h[e[r]];n=n+1;e=f[n];until true;else o=e[t];h=l[e[d]];l[o+1]=h;l[o]=h[e[r]];n=n+1;e=f[n];end else o=e[t]l[o]=l[o](a(l,o+1,e[d]))n=n+1;e=f[n];end else if b<1 then o=e[t]l[o]=l[o](a(l,o+1,e[d]))n=n+1;e=f[n];else if-3<=b then repeat if b~=2 then o=e[t];h=l[e[d]];l[o+1]=h;l[o]=h[e[r]];n=n+1;e=f[n];break;end;l(e[t],e[d]);n=n+1;e=f[n];until true;else o=e[t];h=l[e[d]];l[o+1]=h;l[o]=h[e[r]];n=n+1;e=f[n];end end end end break;end;l[e[t]]();break;end;else l[e[t]]();end end end end else if o>4 then if 8>o then if 5>=o then local e=e[t]l[e]=l[e](a(l,e+1,b))else if o~=4 then repeat if 6~=o then l[e[t]]=k[e[d]];break;end;n=e[d];until true;else n=e[d];end end else if o<=8 then l[e[t]]=l[e[d]][e[r]];else if 7<o then for h=19,71 do if o>9 then local n=e[t]local t,e=c(l[n](a(l,n+1,e[d])))b=e+n-1 local e=0;for n=n,b do e=e+1;l[n]=t[e];end;break;end;local o,h;for b=0,2 do if 0<b then if b>=-3 then for a=42,56 do if 2~=b then o=e[t];h=l[e[d]];l[o+1]=h;l[o]=h[e[r]];n=n+1;e=f[n];break;end;l(e[t],e[d]);break;end;else l(e[t],e[d]);end else o=e[t]l[o](a(l,o+1,e[d]))n=n+1;e=f[n];end end break;end;else local n=e[t]local t,e=c(l[n](a(l,n+1,e[d])))b=e+n-1 local e=0;for n=n,b do e=e+1;l[n]=t[e];end;end end end else if o>1 then if 3<=o then if 4~=o then if(l[e[t]]~=e[r])then n=n+1;else n=e[d];end;else local n=e[t];local t=l[e[d]];l[n+1]=t;l[n]=t[e[r]];end else local e=e[t]l[e]=l[e]()end else if o>=-1 then repeat if 1~=o then l[e[t]]=z(j[e[d]],nil,k);break;end;n=e[d];until true;else n=e[d];end end end end else if o>=35 then if o>40 then if 44>o then if 42<=o then if o==42 then do return end;else local o,s,j,p,u;for h=0,6 do if h>2 then if h>4 then if 5<h then l[e[t]]();else o=e[t]l[o]=l[o](a(l,o+1,b))n=n+1;e=f[n];end else if h>0 then repeat if h>3 then o=e[t]j,p=c(l[o](a(l,o+1,e[d])))b=p+o-1 u=0;for e=o,b do u=u+1;l[e]=j[u];end;n=n+1;e=f[n];break;end;l(e[t],e[d]);n=n+1;e=f[n];until true;else o=e[t]j,p=c(l[o](a(l,o+1,e[d])))b=p+o-1 u=0;for e=o,b do u=u+1;l[e]=j[u];end;n=n+1;e=f[n];end end else if 1<=h then if-2<=h then for a=12,96 do if h>1 then o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[r]];n=n+1;e=f[n];break;end;l[e[t]]=k[e[d]];n=n+1;e=f[n];break;end;else o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[r]];n=n+1;e=f[n];end else l[e[t]]=k[e[d]];n=n+1;e=f[n];end end end end else local o,s,j,p,u;for h=0,6 do if 3<=h then if 5<=h then if 6==h then l[e[t]]();else o=e[t]l[o]=l[o](a(l,o+1,b))n=n+1;e=f[n];end else if 0~=h then repeat if h~=3 then o=e[t]j,p=c(l[o](a(l,o+1,e[d])))b=p+o-1 u=0;for e=o,b do u=u+1;l[e]=j[u];end;n=n+1;e=f[n];break;end;l(e[t],e[d]);n=n+1;e=f[n];until true;else l(e[t],e[d]);n=n+1;e=f[n];end end else if 0>=h then l[e[t]]=k[e[d]];n=n+1;e=f[n];else if h>-3 then for a=29,62 do if h<2 then l[e[t]]=k[e[d]];n=n+1;e=f[n];break;end;o=e[t];s=l[e[d]];l[o+1]=s;l[o]=s[e[r]];n=n+1;e=f[n];break;end;else l[e[t]]=k[e[d]];n=n+1;e=f[n];end end end end end else if 44>=o then local o,j,s,p,h;for u=0,6 do if u<3 then if u<1 then l[e[t]]=k[e[d]];n=n+1;e=f[n];else if u~=-1 then repeat if u~=1 then o=e[t];j=l[e[d]];l[o+1]=j;l[o]=j[e[r]];n=n+1;e=f[n];break;end;l[e[t]]=k[e[d]];n=n+1;e=f[n];until true;else l[e[t]]=k[e[d]];n=n+1;e=f[n];end end else if 4<u then if 6>u then o=e[t]l[o]=l[o](a(l,o+1,b))n=n+1;e=f[n];else l[e[t]]();end else if u>1 then for r=44,77 do if 4>u then l(e[t],e[d]);n=n+1;e=f[n];break;end;o=e[t]s,p=c(l[o](a(l,o+1,e[d])))b=p+o-1 h=0;for e=o,b do h=h+1;l[e]=s[h];end;n=n+1;e=f[n];break;end;else o=e[t]s,p=c(l[o](a(l,o+1,e[d])))b=p+o-1 h=0;for e=o,b do h=h+1;l[e]=s[h];end;n=n+1;e=f[n];end end end end else if 41<o then repeat if o~=45 then local e=e[t]l[e]=l[e](a(l,e+1,b))break;end;local r,f,h,b,a,o;local n=0;while n>-1 do if n>3 then if n<6 then if 1~=n then repeat if 4~=n then o=r[f];break;end;a=b[r[h]];until true;else o=r[f];end else if 3<n then for e=25,74 do if n>6 then n=-2;break;end;l[o]=a;break;end;else l[o]=a;end end else if 2>n then if n>=-3 then for l=42,72 do if 0<n then f=t;break;end;r=e;break;end;else f=t;end else if 0~=n then for e=21,61 do if 3>n then h=d;break;end;b=l;break;end;else h=d;end end end n=n+1 end until true;else local e=e[t]l[e]=l[e](a(l,e+1,b))end end end else if 38>o then if o<=35 then l[e[t]]();else if 34<o then for n=42,56 do if o<37 then k[e[d]]=l[e[t]];break;end;local f,h,r,o,a;local n=0;while n>-1 do if 2<n then if 5>n then if n==4 then a=f[h];else o=f[r];end else if n~=4 then for e=23,61 do if n>5 then n=-2;break;end;l(a,o);break;end;else l(a,o);end end else if n>=1 then if-1<=n then repeat if 2~=n then h=t;break;end;r=d;until true;else r=d;end else f=e;end end n=n+1 end break;end;else k[e[d]]=l[e[t]];end end else if 39>o then local o;o=e[t]l[o](a(l,o+1,e[d]))n=n+1;e=f[n];do return end;else if o>=35 then repeat if o~=40 then local t=e[t];local n=l[e[d]];l[t+1]=n;l[t]=n[e[r]];break;end;local f,h,r,o,a,b;local n=0;while n>-1 do if n<=3 then if 2<=n then if 0<=n then repeat if n<3 then r=d;break;end;o=l;until true;else o=l;end else if n>-2 then repeat if n>0 then h=t;break;end;f=e;until true;else f=e;end end else if 6<=n then if 7>n then l[b]=a;else n=-2;end else if 1<=n then repeat if n<5 then a=o[f[r]];break;end;b=f[h];until true;else a=o[f[r]];end end end n=n+1 end until true;else local f,b,a,o,r,h;local n=0;while n>-1 do if n<=3 then if 2<=n then if 0<=n then repeat if n<3 then a=d;break;end;o=l;until true;else o=l;end else if n>-2 then repeat if n>0 then b=t;break;end;f=e;until true;else f=e;end end else if 6<=n then if 7>n then l[h]=r;else n=-2;end else if 1<=n then repeat if n<5 then r=o[f[a]];break;end;h=f[b];until true;else r=o[f[a]];end end end n=n+1 end end end end end else if o>28 then if o>31 then if o<=32 then local e=e[t]l[e](l[e+1])else if 29<=o then repeat if 34>o then l[e[t]]=(e[d]~=0);break;end;local n=e[t]l[n]=l[n](a(l,n+1,e[d]))until true;else l[e[t]]=(e[d]~=0);end end else if 29<o then if 28<=o then repeat if o>30 then do return end;break;end;local n=e[t]l[n]=l[n](a(l,n+1,e[d]))until true;else local n=e[t]l[n]=l[n](a(l,n+1,e[d]))end else local n=e[t]l[n](a(l,n+1,e[d]))end end else if o<=25 then if 23<o then if o==25 then k[e[d]]=l[e[t]];else local e=e[t]l[e]=l[e]()end else local e=e[t]l[e](l[e+1])end else if o<=26 then local o,h,s,p,u;l[e[t]]=k[e[d]];n=n+1;e=f[n];o=e[t];h=l[e[d]];l[o+1]=h;l[o]=h[e[r]];n=n+1;e=f[n];l(e[t],e[d]);n=n+1;e=f[n];o=e[t]s,p=c(l[o](a(l,o+1,e[d])))b=p+o-1 u=0;for e=o,b do u=u+1;l[e]=s[u];end;n=n+1;e=f[n];o=e[t]l[o]=l[o](a(l,o+1,b))n=n+1;e=f[n];o=e[t]l[o]=l[o]()n=n+1;e=f[n];o=e[t];h=l[e[d]];l[o+1]=h;l[o]=h[e[r]];else if o>23 then for h=39,53 do if o<28 then local h,b,k,c,s,p,u,o;for o=0,2 do if 1>o then h=e[t]l[h](a(l,h+1,e[d]))n=n+1;e=f[n];else if o>-1 then repeat if o>1 then o=0;while o>-1 do if o<=2 then if 0>=o then k=e;else if 1<o then s=d;else c=t;end end else if o>=5 then if 5~=o then o=-2;else l(u,p);end else if 1<=o then repeat if 4>o then p=k[s];break;end;u=k[c];until true;else u=k[c];end end end o=o+1 end break;end;h=e[t];b=l[e[d]];l[h+1]=b;l[h]=b[e[r]];n=n+1;e=f[n];until true;else h=e[t];b=l[e[d]];l[h+1]=b;l[h]=b[e[r]];n=n+1;e=f[n];end end end break;end;l[e[t]]=l[e[d]][e[r]];break;end;else local h,b,k,c,p,s,u,o;for o=0,2 do if 1>o then h=e[t]l[h](a(l,h+1,e[d]))n=n+1;e=f[n];else if o>-1 then repeat if o>1 then o=0;while o>-1 do if o<=2 then if 0>=o then k=e;else if 1<o then p=d;else c=t;end end else if o>=5 then if 5~=o then o=-2;else l(u,s);end else if 1<=o then repeat if 4>o then s=k[p];break;end;u=k[c];until true;else u=k[c];end end end o=o+1 end break;end;h=e[t];b=l[e[d]];l[h+1]=b;l[h]=b[e[r]];n=n+1;e=f[n];until true;else h=e[t];b=l[e[d]];l[h+1]=b;l[h]=b[e[r]];n=n+1;e=f[n];end end end end end end end end end n=1+n;end;end;return ne end;local d=0xff;local h={};local o=(1);local t='';(function(n)local l=n local f=0x00 local e=0x00 l={(function(t)if f>0x2a then return t end f=f+1 e=(e+0x80f-t)%0x2d return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x3e);end return true end)'daHpH'and l[0x2](0x37e+t))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x22);end return true end)'ksBoF'and l[0x3](t+0x20c))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x69);end return true end)'soBGE'and l[0x1](t+0x257))or t end),(function(r)if f>0x24 then return r end f=f+1 e=(e+0xa41-r)%0x39 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xbb);t={t..'\58 a',t};h[o]=_();o=o+(1);t[1]='\58'..t[1];d[2]=0xff;end return true end)'FhcGg'and l[0x2](0xb8+r))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x3e);d[2]=(d[2]*(ne(function()h()end,a(t))-ne(d[1],a(t))))+1;h[o]={};d=d[2];o=o+d;end return true end)'OyXbo'and l[0x3](r+0x216))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x51);end return true end)'diiSk'and l[0x1](r+0xa8))or r end),(function(r)if f>0x25 then return r end f=f+1 e=(e+0x6ee-r)%0x47 return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x78);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'TGgjn'and l[0x2](0x28e+r))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xa9);end return true end)'uawIB'and l[0x1](r+0x3d4))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x73);h[o]=le();o=o+d;end return true end)'mqgAL'and l[0x3](r+0x1e2))or r end)}l[0x3](0x81b)end){};local e=z(a(h));return e(...);end return y((function()local n={}local e=0x01;local l;if h.aqZsQCBU then l=h.aqZsQCBU(y)else l=''end if h.zPFCEz_p(l,h.JrFRDCmQ)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(n,e,l,t,d,f)local f;if n>=4 then if n>5 then if n>=7 then if 8==n then do return l(n,nil,l);end else do return setmetatable({},{['__\99\97\108\108']=function(e,d,l,t,n)if n then return e[n]elseif t then return e else e[d]=l end end})end end else do return d[l]end;end else if 3~=n then repeat if n~=4 then local n=t;do return function()local e=e(l,n(n,n),n(n,n));n(1);return e;end;end;break;end;local n=t;local t,d,r=d(2);do return function()local f,o,l,e=e(l,n(n,n),n(n,n)+3);n(4);return(e*t)+(l*d)+(o*r)+f;end;end;until true;else local n=t;local f,d,t=d(2);do return function()local e,l,r,o=e(l,n(n,n),n(n,n)+3);n(4);return(o*f)+(r*d)+(l*t)+e;end;end;end end else if 2>n then if n==0 then do return e(1),e(4,d,t,l,e),e(5,d,t,l)end;else do return function(n,e,l)if l then local e=(n/2^(e-1))%2^((l-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>1 then for f=16,80 do if 3~=n then do return 16777216,65536,256 end;break;end;do return e(1),e(4,d,t,l,e),e(5,d,t,l)end;break;end;else do return 16777216,65536,256 end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!