Advertisement
MegumuSenpai

not fake

Jul 17th, 2020
1,197
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.29 KB | None | 0 0
  1. --clvbrew:tm: obfuscation, fork of Ironbrew; Version v2.7.5c
  2.  
  3. return(function(e,l)local H=string.byte;local D=getfenv or function()return _ENV end;local n=table.getn or function(l)return#l end;local f=pairs;local c=unpack or table.unpack;local u=select;local h=string.char;local I=e;local e=setmetatable;local t=tonumber;local i=string.sub;local F=l;local s={}for l=0,255 do s[l]=h(l)end;local function r(c)local e,n,o="","",{}local a=256;local l=1;local function d()local e=t(i(c,l,l),36)l=l+1;local n=t(i(c,l,l+e-1),36)l=l+e;return n end;e=h(d())o[1]=e;while l<#c do local l=d()if s[l]then n=s[l]else n=e..i(e,1,1)end;s[a]=e..i(n,1,1)o[#o+1],e,a=n,n,a+1 end;return F(o)end;local r=r('23122Y23123023323127925824X23022X27923124T24U25025N23022Z27F25425224N25H25L26127D27F23P24J25425L23022V27F24N24T25025K25W25M25F26926L27123022427F24J25224H26425W23O24E24N26R26Z1U1G1Q1K1W21A23921D2222291O23G22O23321O24I24K24724P25126N24B26G23027527924824N25226025Q25T26723022S27F26P24K25526125W25Y25W26K25523022P27F23S24W24W25P25V26326E28A272121J23023C27F24U24L24Y23W25W26726526H26F2561T1M1G1I21O1Z21B21N22222A21W29Z27F23N28H26426826327R26O26B131727U27924S27X27Z23227F23T24T24T2BD23125B25724L25L23H23121H21H21D21H22P21G21D21G21L2C222R22R21G21K22P23027F23023I2CB27E2BE2BG28027F2482522502662A625F25R26U26R29D2CJ24N24H26N25K25O25W2302BT29F24N25725K26H25T25H26926D26R1E151B1V21221A23022W27F24F24R24H25C25E23022O2CJ2CL25E25F24E26A26W26A26L13111D2BN24F2832602CI27923R28425K25Q25S25Y24M28423022T27F2151O1V1C1P14121327F27F22525D2192BN25824J2582E82CF23124M24J24H25G27L27F25524J2D525K25V2EU27F24D22A2FH2792352EY29E23124B27I25X25E25O2DQ22U27F2EB25225P25N26M2AM26Y2731V2BN23K24R25225J23022727F24224T24G23V25T26324126I26E2731321W1T1N21321A21Q21I1522I22G23G1X23H22Z24A24124B24M24Y24W25A25O23W2EU2392EU23427925N23129O27923J2792302CA2CA2792252HO2HQ2312782HT2762HV2BI2HN2762BI2F42EU2F42BI22L2HO27E2DK27M2I927627E2752EK2IE23127E29O2812EU2CA27E2CA2I22HP2312FX2HM2HO2782A02HS2IX2HW2312DS2I22312BI22R27F2J527E22Q2FL2J22I52CB2JG2IS2HV2J02HZ2762312BT2HY2IT2CA23G2312JP2HV2HN2IS2BI2CD2FL2CA2BI2HR2FH2K323023F2I62HI2HK2J92HO2792DK2IW2JL2IZ2JT2HU2JM2FX2JX23127M2K02J62JD2EU2782KP2HX2KJ27929O2KM2EK27F2IV2K12J22252DS2772JM2752IS27E2IN2FH2782IQ2KI2762782CA2J42IA2IK2JD2KE2J22IE2DJ2J22CA2LQ2DK2J82BI2332362792KO2EU23727927827M2HR2D22KC27F');local t=(bit or bit32)and(bit or bit32).bxor or function(l,e)local n,o=1,0 while l>0 and e>0 do local c,a=l%2,e%2 if c~=a then o=o+n end l,e,n=(l-c)/2,(e-a)/2,n*2 end if l<e then l=e end while l>0 do local e=l%2 if e>0 then o=o+n end l,n=(l-e)/2,n*2 end return o end local function o(e,l,n)if n then local l=(e/2^(l-1))%2^((n-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(e%(l+l)>=l)and 1 or 0;end;end;local l=1;local F=0;local function n()local e,n,a,o=H(r,l,l+3);e=t(e,109)n=t(n,109)a=t(a,109)o=t(o,109)l=l+4;return(o*16777216)+(a*65536)+(n*256)+e;end;local function d()local e=t(H(r,l,l),109);l=l+1;return e;end;local function K(...)return{...},u('#',...)end local function a()local n,e=H(r,l,l+2);n=t(n,109)e=t(e,109)l=l+2;return(e*256)+n;end;local function A()local h={};local e={};local u={};local f={[1]=u,[9]={},[3]=e,[5]=nil,[8]=h,[6]=nil,};local e={}local c={}for f=1,d()==0 and a()*2 or n()do local e=d();while 2 do if(e==4)then e=(d()~=0);break;end if(e==3)then local n=n();e=i(r,l,l+n-1);l=l+n;break;end if(e==0)then local n,l=n(),n();local a,n,l,o=1,(o(l,1,20)*(2^32))+n,o(l,21,31),((-1)^o(l,32));if l==0 then if n==0 then e=o*0 break;else l=1;a=0;end;elseif(l==2047)then e=(o*((n==0 and 1 or 0)/0))break;end;e=(o*(2^(l-1023)))*(a+(n/(2^52)));break;end if(e==1)then local o,a,n='',n();if(a==0)then e=o;break;end;n=i(r,l,l+a-1);n={H(n,1,#n)}l=l+a;for l=1,#n do o=o..s[t(n[l],109)]end e=o break;end if(e==4)then e=(d()~=0);break;end e=nil break;end c[f]=e;end;if F<1 then F=1 local e=a()f[4]=i(r,l,l+e-1)l=l+e end for l=1,n()do u[l-1]=A();end;for s=1,n()do local l=d();if(o(l,1,1)==0)then local e=o(l,2,3);local t=o(l,4,6);local l,i,r,d=a(),d()==1,a(),{};local H={}local l={[2]=nil,[8]=r,[6]=l,[9]=i,};if(e==0)then l[9],l[2]=a(),a()end if(e==2)then l[9]=n()-65536 end if(e==3)then l[9],l[2]=n()-65536,a()end if(e==1)then l[9]=n()end if(o(t,1,1)==1)then d[8]=8 l[8]=c[l[8]]end if(o(t,3,3)==1)then d[2]=2 l[2]=c[l[2]]end if(o(t,2,2)==1)then d[9]=9 l[9]=c[l[9]]end if i then I(f[9],l)l[7]=d end h[s]=l;end end;f[5]=d();return f;end;local function E(l,e,i,e)local e=l[6];local I=l[9];local J=0;local r=l[5];local a=l[1];local e={}local l=l[8];return function(...)local o=l;local e=1;local s=u('#',...)-1;local n={};local F=K local H={};local B=a;local a={...};local d=-1;local l={};local r=r;for l=0,s do if(l>=r)then H[l-r]=a[l+1];else n[l]=a[l+1];end;end;local a;local l=s-r+1 local l;while true do l=o[e];a=l[6];if J>0 then n[l[8]]=l[9];end if a<=15 then if a<=7 then if a<=3 then if a<=1 then if a==0 then n[l[8]]=i[l[9]];else local e=l[8]n[e](c(n,e+1,l[9]))end;elseif a>2 then local e=l[8]n[e]=n[e](c(n,e+1,l[9]))else n[l[8]]=E(B[l[9]],nil,i);end;elseif a<=5 then if a>4 then n[l[8]]=l[9];else local H;local J,K;local r;local a;local E,u,s,b;for n,e in f(I)do for o,n in f(e[7])do E,u,s,b={e[n]:byte(1,#e[n])},'',l[8],l[9]for l=1,#E do u,s=u..h(t(E[l],s)),(s+b)%256 end e[n],e[7]=u,{};end end;e=e+1;l=o[e];n[l[8]]=i[l[9]];e=e+1;l=o[e];n[l[8]]=i[l[9]];e=e+1;l=o[e];a=l[8];r=n[l[9]];n[a+1]=r;n[a]=r[l[2]];e=e+1;l=o[e];n[l[8]]=l[9];e=e+1;l=o[e];a=l[8]J,K=F(n[a](c(n,a+1,l[9])))d=K+a-1 H=0;for l=a,d do H=H+1;n[l]=J[H];end;e=e+1;l=o[e];a=l[8]n[a]=n[a](c(n,a+1,d))e=e+1;l=o[e];a=l[8]n[a]=n[a]()e=e+1;l=o[e];a=l[8];r=n[l[9]];n[a+1]=r;n[a]=r[l[2]];e=e+1;l=o[e];n[l[8]]=l[9];end;elseif a==6 then n[l[8]]=n[l[9]][l[2]];else n[l[8]]={};end;elseif a<=11 then if a<=9 then if a>8 then local e=l[8];local o=n[l[9]];n[e+1]=o;n[e]=o[l[2]];else n[l[8]][l[9]]=l[2];end;elseif a>10 then local e=l[8]n[e]=n[e](c(n,e+1,l[9]))else for n,e in f(I)do for n,o in f(e[7])do local a,l,n,c={e[o]:byte(1,#e[o])},'',l[8],l[9]for o=1,#a do l,n=l..h(t(a[o],n)),(n+c)%256 end e[o],e[7]=l,{};end end;end;elseif a<=13 then if a==12 then n[l[8]]=n[l[9]][l[2]];else local d;local a;a=l[8];d=n[l[9]];n[a+1]=d;n[a]=d[l[2]];e=e+1;l=o[e];n[l[8]]=l[9];e=e+1;l=o[e];a=l[8]n[a](c(n,a+1,l[9]))e=e+1;l=o[e];a=l[8];d=n[l[9]];n[a+1]=d;n[a]=d[l[2]];e=e+1;l=o[e];n[l[8]]=l[9];e=e+1;l=o[e];n[l[8]]={};e=e+1;l=o[e];n[l[8]][l[9]]=l[2];e=e+1;l=o[e];n[l[8]][l[9]]=l[2];end;elseif a==14 then local l=l[8]n[l](c(n,l+1,d))else local e=l[8]local o,l=F(n[e](c(n,e+1,l[9])))d=l+e-1 local l=0;for e=e,d do l=l+1;n[e]=o[l];end;end;elseif a<=23 then if a<=19 then if a<=17 then if a==16 then do return end;else n[l[8]]={};end;elseif a==18 then local l=l[8]n[l]=n[l]()else local l=l[8]n[l]=n[l]()end;elseif a<=21 then if a==20 then local o=l[8];local e=n[l[9]];n[o+1]=e;n[o]=e[l[2]];else local l=l[8]n[l](c(n,l+1,d))end;elseif a>22 then local l=l[8]n[l]=n[l](c(n,l+1,d))else do return end;end;elseif a<=27 then if a<=25 then if a>24 then n[l[8]]=l[9];else n[l[8]][l[9]]=l[2];end;elseif a>26 then for n,e in f(I)do for n,o in f(e[7])do local a,n,l,c={e[o]:byte(1,#e[o])},'',l[8],l[9]for o=1,#a do n,l=n..h(t(a[o],l)),(l+c)%256 end e[o],e[7]=n,{};end end;else n[l[8]]=i[l[9]];end;elseif a<=29 then if a==28 then local e=l[8]local o,l=F(n[e](c(n,e+1,l[9])))d=l+e-1 local l=0;for e=e,d do l=l+1;n[e]=o[l];end;else local H;local J,K;local r;local a;local E,s,u,b;for n,e in f(I)do for o,n in f(e[7])do E,s,u,b={e[n]:byte(1,#e[n])},'',l[8],l[9]for l=1,#E do s,u=s..h(t(E[l],u)),(u+b)%256 end e[n],e[7]=s,{};end end;e=e+1;l=o[e];n[l[8]]=i[l[9]];e=e+1;l=o[e];n[l[8]]=n[l[9]][l[2]];e=e+1;l=o[e];a=l[8];r=n[l[9]];n[a+1]=r;n[a]=r[l[2]];e=e+1;l=o[e];n[l[8]]=l[9];e=e+1;l=o[e];n[l[8]]={};e=e+1;l=o[e];n[l[8]][l[9]]=l[2];e=e+1;l=o[e];n[l[8]][l[9]]=l[2];e=e+1;l=o[e];n[l[8]][l[9]]=l[2];e=e+1;l=o[e];a=l[8]n[a](c(n,a+1,l[9]))e=e+1;l=o[e];n[l[8]]=i[l[9]];e=e+1;l=o[e];n[l[8]]=i[l[9]];e=e+1;l=o[e];n[l[8]]=n[l[9]][l[2]];e=e+1;l=o[e];n[l[8]]=l[9];e=e+1;l=o[e];n[l[8]]=l[9];e=e+1;l=o[e];a=l[8]J,K=F(n[a](c(n,a+1,l[9])))d=K+a-1 H=0;for l=a,d do H=H+1;n[l]=J[H];end;e=e+1;l=o[e];a=l[8]n[a](c(n,a+1,d))e=e+1;l=o[e];n[l[8]]=i[l[9]];e=e+1;l=o[e];n[l[8]]=n[l[9]][l[2]];e=e+1;l=o[e];n[l[8]]=n[l[9]][l[2]];e=e+1;l=o[e];a=l[8];r=n[l[9]];n[a+1]=r;n[a]=r[l[2]];e=e+1;l=o[e];n[l[8]]=l[9];e=e+1;l=o[e];a=l[8]n[a](c(n,a+1,l[9]))e=e+1;l=o[e];do return end;end;elseif a<=30 then local e=l[8]n[e](c(n,e+1,l[9]))elseif a==31 then n[l[8]]=E(B[l[9]],nil,i);else local l=l[8]n[l]=n[l](c(n,l+1,d))end;e=e+1;end;end;end;return c({E(A(),{},D())()})or nil;end)(table.insert,table.concat)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement