Advertisement
thesleepingpig

Untitled

Nov 24th, 2020
4,500
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.63 KB | None | 0 0
  1.  
  2. --[[
  3. AztupBrew(Fork of IronBrew2): obfuscation; Version 2.7.2
  4. ]]
  5. return(function(i,a,a)local k=string.char;local e=string.sub;local p=table.concat;local l=math.ldexp;local q=getfenv or function()return _ENV end;local m=select;local f=unpack or table.unpack;local j=tonumber;local function n(h)local b,c,f="","",{}local g=256;local d={}for a=0,g-1 do d[a]=k(a)end;local a=1;local function i()local b=j(e(h,a,a),36)a=a+1;local c=j(e(h,a,a+b-1),36)a=a+b;return c end;b=k(i())f[1]=b;while a<#h do local a=i()if d[a]then c=d[a]else c=b..e(b,1,1)end;d[g]=b..e(c,1,1)f[#f+1],b,g=c,c,g+1 end;return table.concat(f)end;local j=n('22V235275234238275235111G1O13122342392791M1G1S1K23423F27921I1K151Y1K13171O1I27M23C2792121U131Q1227B27Y23423B27921P1O27W1V1M23423E27P27R21E1P1O1T1L131K1V27G27921R27K27M22P27921L141S1G1V1U1O1L1Z1U1U151X1G131528927929C28Q1V29F23A29H1T1G1827U27F28I27521P1U1I1G1T1X29O29Q1323428027528L29D1G1I1527U23627927923L22623422O2791Z1K111T27X1G2AB1L1Y152831G1M27M28A2752AT181T1K27F2AZ23521M2AQ2931G27N279213141T1V27U1G1J2B32AD2AE2792BM2AE22D21D29G27521G1728R1527F29M2BU191K1I142AB2BC27521J27D1K27T27V27U2BN22527922R29T2352342CH2762352372792292CN2CL2AD22R2752AD27H2BN2CT2CO2352CR2CK2D42782D32CL2CL2B62D42CP2BN2AE2CP2CY2752202D422R2302352782CL27522922Y23528A27H2AZ27428A2C027527827827529M2392DG21Y2D422922Z23527O28029M22F2AD27O22Q2D423D2352E42792EH2CL2EL2752E62CL2E82EA23528028022929M27O27O29M2CV23528I2DC2D227528I28I2CU27523G2EU2BN28I2FD2CP2D32F92F42F72FL28I23H2FM2FK29M2AZ27O2322D428I2EP2352FV2EO2E52D423522B2FE2E72CL28I2EW23528Y2EU2FD28I2F32F52CQ2F82FL2FB2352FD23J2DD2FG2D12FJ2FL23I2FQ2FL28Y2GS28I2AJ2F32FP2F323522R2FD2FD2EH27522R22W2352GO2F62D32GO2GO2GL28Y2GO2BN2GO28Y2FI2752HG23522T2FM2HQ22S2FM2GU2GO2742792AJ27O2BN2CV2CJ2EM2352FP2BN2HS2FD2792GO2GU2HS2D922X2DM2352GU2CL2DF2DG2IK2DS2IH27527O2IL2EK2DG2IS2H92792DO235');local a=(bit or bit32);local d=a and a.bxor or function(a,b)local c,d,e=1,0,10 while a>0 and b>0 do local e,f=a%2,b%2 if e~=f then d=d+c end a,b,c=(a-e)/2,(b-f)/2,c*2 end if a<b then a=b end while a>0 do local b=a%2 if b>0 then d=d+c end a,c=(a-b)/2,c*2 end return d end local function c(b,a,c)if c then local a=(b/2^(a-1))%2^((c-1)-(a-1)+1);return a-a%1;else local a=2^(a-1);return(b%(a+a)>=a)and 1 or 0;end;end;local a=1;local function b()local e,f,c,b=i(j,a,a+3);e=d(e,113)f=d(f,113)c=d(c,113)b=d(b,113)a=a+4;return(b*16777216)+(c*65536)+(f*256)+e;end;local function h()local b=d(i(j,a,a),113);a=a+1;return b;end;local function g()local b,c=i(j,a,a+2);b=d(b,113)c=d(c,113)a=a+2;return(c*256)+b;end;local function o()local a=b();local b=b();local e=1;local d=(c(b,1,20)*(2^32))+a;local a=c(b,21,31);local b=((-1)^c(b,32));if(a==0)then if(d==0)then return b*0;else a=1;e=0;end;elseif(a==2047)then return(d==0)and(b*(1/0))or(b*(0/0));end;return l(b,a-1023)*(e+(d/(2^52)));end;local l=b;local function n(b)local c;if(not b)then b=l();if(b==0)then return'';end;end;c=e(j,a,a+b-1);a=a+b;local b={}for a=1,#c do b[a]=k(d(i(e(c,a,a)),113))end return p(b);end;local a=b;local function l(...)return{...},m('#',...)end local function j()local i={};local d={};local a={};local k={[#{"1 + 1 = 111";{969;285;412;61};}]=d,[#{"1 + 1 = 111";"1 + 1 = 111";{699;180;472;836};}]=nil,[#{"1 + 1 = 111";"1 + 1 = 111";{389;903;520;132};"1 + 1 = 111";}]=a,[#{"1 + 1 = 111";}]=i,};local a=b()local e={}for c=1,a do local b=h();local a;if(b==2)then a=(h()~=0);elseif(b==3)then a=o();elseif(b==1)then a=n();end;e[c]=a;end;k[3]=h();for a=1,b()do d[a-1]=j();end;for j=1,b()do local a=h();if(c(a,1,1)==0)then local d=c(a,2,3);local f=c(a,4,6);local a={g(),g(),nil,nil};if(d==0)then a[3]=g();a[4]=g();elseif(d==1)then a[3]=b();elseif(d==2)then a[3]=b()-(2^16)elseif(d==3)then a[3]=b()-(2^16)a[4]=g();end;if(c(f,1,1)==1)then a[2]=e[a[2]]end if(c(f,2,2)==1)then a[3]=e[a[3]]end if(c(f,3,3)==1)then a[4]=e[a[4]]end i[j]=a;end end;return k;end;local function n(a,b,i)a=(a==true and j())or a;return(function(...)local e=a[1];local d=a[3];local a=a[2];local l=l local c=1;local g=-1;local k={};local j={...};local h=m('#',...)-1;local a={};local b={};for a=0,h do if(a>=d)then k[a-d]=j[a+1];else b[a]=j[a+#{{175;658;733;404};}];end;end;local a=h-d+1 local a;local d;while true do a=e[c];d=a[1];if d<=17 then if d<=8 then if d<=3 then if d<=1 then if d==0 then b[a[2]]=b[a[3]];else local g;local d;b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]][a[3]]=b[a[4]];c=c+1;a=e[c];b[a[2]]=i[a[3]];c=c+1;a=e[c];d=a[2];g=b[a[3]];b[d+1]=g;b[d]=g[a[4]];c=c+1;a=e[c];b[a[2]]=a[3];c=c+1;a=e[c];d=a[2]b[d]=b[d](f(b,d+1,a[3]))c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]]=a[3];end;elseif d>2 then if(b[a[2]]~=a[4])then c=c+1;else c=a[3];end;else b[a[2]]={};end;elseif d<=5 then if d==4 then c=a[3];else local c=a[2]local e={b[c](f(b,c+1,g))};local d=0;for a=c,a[4]do d=d+1;b[a]=e[d];end end;elseif d<=6 then local c=a[2]b[c]=b[c](f(b,c+1,a[3]))elseif d==7 then local g;local d;b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]]=i[a[3]];c=c+1;a=e[c];d=a[2];g=b[a[3]];b[d+1]=g;b[d]=g[a[4]];c=c+1;a=e[c];b[a[2]]=a[3];c=c+1;a=e[c];d=a[2]b[d]=b[d](f(b,d+1,a[3]))c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];if(b[a[2]]==b[a[4]])then c=c+1;else c=a[3];end;else local d=a[2];local c=b[a[3]];b[d+1]=c;b[d]=c[a[4]];end;elseif d<=12 then if d<=10 then if d>9 then b[a[2]]=b[a[3]][a[4]];else if(b[a[2]]~=a[4])then c=c+1;else c=a[3];end;end;elseif d==11 then local d;local h;local k,m;local j;local d;b[a[2]]=i[a[3]];c=c+1;a=e[c];b[a[2]]=i[a[3]];c=c+1;a=e[c];d=a[2];j=b[a[3]];b[d+1]=j;b[d]=j[a[4]];c=c+1;a=e[c];b[a[2]]=a[3];c=c+1;a=e[c];d=a[2]b[d]=b[d](f(b,d+1,a[3]))c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];d=a[2];j=b[a[3]];b[d+1]=j;b[d]=j[a[4]];c=c+1;a=e[c];d=a[2]k,m=l(b[d](b[d+1]))g=m+d-1 h=0;for a=d,g do h=h+1;b[a]=k[h];end;c=c+1;a=e[c];d=a[2]k={b[d](f(b,d+1,g))};h=0;for a=d,a[4]do h=h+1;b[a]=k[h];end c=c+1;a=e[c];c=a[3];else c=a[3];end;elseif d<=14 then if d==13 then b[a[2]]=a[3];else local c=a[2]b[c](f(b,c+1,a[3]))end;elseif d<=15 then do return end;elseif d==16 then local d=a[2]local e={b[d](f(b,d+1,g))};local c=0;for a=d,a[4]do c=c+1;b[a]=e[c];end else local c=a[2]b[c]=b[c](f(b,c+1,a[3]))end;elseif d<=26 then if d<=21 then if d<=19 then if d==18 then do return end;else b[a[2]]=a[3];end;elseif d>20 then if(b[a[2]]==b[a[4]])then c=c+1;else c=a[3];end;else local a=a[2]local d,c=l(b[a](b[a+1]))g=c+a-1 local c=0;for a=a,g do c=c+1;b[a]=d[c];end;end;elseif d<=23 then if d>22 then b[a[2]][a[3]]=b[a[4]];else local a=a[2]local d,c=l(b[a](b[a+1]))g=c+a-1 local c=0;for a=a,g do c=c+1;b[a]=d[c];end;end;elseif d<=24 then local d=a[2];local f=a[4];local e=d+2 local d={b[d](b[d+1],b[e])};for a=1,f do b[e+a]=d[a];end;local d=d[1]if d then b[e]=d c=a[3];else c=c+1;end;elseif d>25 then b[a[2]]=b[a[3]][a[4]];else local g;local d;b[a[2]]=i[a[3]];c=c+1;a=e[c];d=a[2];g=b[a[3]];b[d+1]=g;b[d]=g[a[4]];c=c+1;a=e[c];b[a[2]]=a[3];c=c+1;a=e[c];d=a[2]b[d]=b[d](f(b,d+1,a[3]))c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];b[a[2]]=b[a[3]][a[4]];c=c+1;a=e[c];d=a[2];g=b[a[3]];b[d+1]=g;b[d]=g[a[4]];c=c+1;a=e[c];b[a[2]]=b[a[3]];c=c+1;a=e[c];b[a[2]]=b[a[3]];c=c+1;a=e[c];b[a[2]]=b[a[3]];end;elseif d<=30 then if d<=28 then if d>27 then b[a[2]]=i[a[3]];else local c=a[2];local d=b[a[3]];b[c+1]=d;b[c]=d[a[4]];end;elseif d>29 then if(b[a[2]]==b[a[4]])then c=c+1;else c=a[3];end;else b[a[2]]=i[a[3]];end;elseif d<=32 then if d==31 then b[a[2]]=b[a[3]];else local e=a[2];local f=a[4];local d=e+2 local e={b[e](b[e+1],b[d])};for a=1,f do b[d+a]=e[a];end;local e=e[1]if e then b[d]=e c=a[3];else c=c+1;end;end;elseif d<=33 then b[a[2]][a[3]]=b[a[4]];elseif d>34 then local c=a[2]b[c](f(b,c+1,a[3]))else b[a[2]]={};end;c=c+1;end;end);end;return n(true,{},q())();end)(string.byte,table.insert,setmetatable);
  6.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement