execute the script and press Z to toggle it on and off
--clvbrew:tm: obfuscation, fork of Ironbrew; Version v2.7.5c return(function(l,e,f,n,K)local u=select;local a=string.sub;local i=pairs;local C=getfenv or function()return _ENV end;local D=string.byte;local d=unpack or table.unpack;local n=setmetatable;local r=tonumber;local h=l;local s=string.char;local B=e;local J=table.getn or function(e)return#e end;local A={}for e=0,255 do A[e]=s(e)end;local function E(t)local l,n,o="","",{}local c=f;local e=1;local function d()local l=r(a(t,e,e),36)e=e+1;local n=r(a(t,e,e+l-1),36)e=e+l;return n end;l=s(d())o[1]=l;while e0 and l>0 do local t,a=e%2,l%2 if t~=a then o=o+n end e,l,n=(e-t)/2,(l-a)/2,n*2 end if e0 do local l=e%2 if l>0 then o=o+n end e,n=(e-l)/2,n*2 end return o end local function o(l,e,n)if n then local e=(l/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(l%(e+e)>=e)and 1 or 0;end;end;local e=1;local E=0;local function n()local l,n,o,a=D(h,e,e+3);l=c(l,72)n=c(n,72)o=c(o,72)a=c(a,72)e=e+4;return(a*K)+(o*65536)+(n*f)+l;end;local function L(...)return{...},u('#',...)end local function t()local l,n=D(h,e,e+2);l=c(l,72)n=c(n,72)e=e+2;return(n*f)+l;end;local function r()local l=c(D(h,e,e),72);e=e+1;return l;end;local function K()local s={};local f={};local l={};local i={[8]={},[3]=l,[9]=s,[5]=nil,[7]=nil,[2]=f,};local l={}local d={}local l={}for i=1,r()==0 and t()*2 or n()do local l=r();while i do if(l==4)then local o,t,n='',n();if(t==0)then l=o;break;end;n=a(h,e,e+t-1);n={D(n,1,#n)}e=e+t;for e=1,J(n)do o=o..A[c(n[e],72)]end l=o break;end if(l==1)then local n=n();l=a(h,e,e+n-1);e=e+n;break;end if(l==2)then local n,e=n(),n();local a,o,e,n=1,(o(e,1,20)*(2^32))+n,o(e,21,31),((-1)^o(e,32));if e==0 then if o==0 then l=n*0 break;else e=1;a=0;end;elseif(e==2047)then l=(n*((o==0 and 1 or 0)/0))break;end;l=(n*(2^(e-1023)))*(a+(o/(2^52)));break;end if(l==3)then l=(r()~=0);break;end if(l==3)then l=(r()~=0);break;end l=nil break;end d[i]=l;end;if E=o)then u[e-o]=h[e+1];else n[e]=h[e+1];end;end;local e=A-o+1 local o;local e;while true do e=a[l];o=e[4];if K>0 then n[e[7]]=e[8];end if o<=18 then if o<=8 then if o<=3 then if o0 then n[e[7]][e[8]]=e[1];else local l=e[7];local o=n[e[8]];n[l+1]=o;n[l]=o[e[1]];end;elseif o>2 then local l=e[7]n[l](d(n,l+1,e[8]))else local e=e[7]n[e]=n[e]()end;elseif o4 then l=n[e[7]]and l+1 or e[8];else t[e[8]]=n[e[7]];end;elseif o<=6 then n[e[7]]=D(E[e[8]],nil,t);elseif o==7 then n[e[7]]=n[e[8]][e[1]];else local e=e[7]n[e]=n[e]()end;elseif o<=13 then if o9 then n[e[7]]=t[e[8]];else n[e[7]]();end;elseif o12 then l=n[e[7]]==n[e[1]]and e[8]or l+1;else n[e[7]]();end;elseif o<=15 then if o==14 then n[e[7]]=D(E[e[8]],nil,t);else local A;local h,d,o,D;for n,l in i(r)do for a,n in i(l[6])do h,d,o,D={l[n]:byte(1,#l[n])},'',e[7],e[8]for e=1,#h do d,o=d..s(c(h[e],o)),(o+D)%f end l[n],l[6]=d,{};end end;l=l+1;e=a[l];n[e[7]]=t[e[8]];l=l+1;e=a[l];n[e[7]]();l=l+1;e=a[l];n[e[7]]=t[e[8]];l=l+1;e=a[l];A=e[7]n[A]=n[A]()l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];l=n[e[7]]and l+1 or e[8];end;elseif o<=16 then local o=e[7];local l=n[e[8]];n[o+1]=l;n[o]=l[e[1]];elseif o==17 then n[e[7]]=(e[8]~=0);else local c;local o;t[e[8]]=n[e[7]];l=l+1;e=a[l];n[e[7]]=t[e[8]];l=l+1;e=a[l];o=e[7];c=n[e[8]];n[o+1]=c;n[o]=c[e[1]];l=l+1;e=a[l];n[e[7]]=e[8];l=l+1;e=a[l];o=e[7]n[o]=n[o](d(n,o+1,e[8]))l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];o=e[7];c=n[e[8]];n[o+1]=c;n[o]=c[e[1]];end;elseif o<=28 then if o<=23 then if o<=20 then if o==19 then l=e[8];else local l=e[7]n[l]=n[l](d(n,l+1,e[8]))end;elseif o<=21 then n[e[7]]=e[8];elseif o==22 then l=n[e[7]]and l+1 or e[8];else n[e[7]]=n[e[8]][e[1]];end;elseif o<=25 then if o==24 then local t;local o;o=e[7];t=n[e[8]];n[o+1]=t;n[o]=t[e[1]];l=l+1;e=a[l];n[e[7]]=e[8];l=l+1;e=a[l];o=e[7]n[o]=n[o](d(n,o+1,e[8]))l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];o=e[7];t=n[e[8]];n[o+1]=t;n[o]=t[e[1]];l=l+1;e=a[l];n[e[7]]=e[8];l=l+1;e=a[l];n[e[7]]=e[8];l=l+1;e=a[l];n[e[7]]=e[8];l=l+1;e=a[l];o=e[7]n[o](d(n,o+1,e[8]))else local l=e[7]n[l](d(n,l+1,e[8]))end;elseif o<=26 then l=e[8];elseif o==27 then do return end;else n[e[7]][e[8]]=e[1];end;elseif o<=33 then if o<=30 then if o==29 then local l=e[7]n[l]=n[l](d(n,l+1,e[8]))else local h,o,d,A;for n,l in i(r)do for a,n in i(l[6])do h,o,d,A={l[n]:byte(1,#l[n])},'',e[7],e[8]for e=1,#h do o,d=o..s(c(h[e],d)),(d+A)%f end l[n],l[6]=o,{};end end;l=l+1;e=a[l];n[e[7]]=t[e[8]];l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];l=n[e[7]]==n[e[1]]and e[8]or l+1;end;elseif o32 then do return end;else for n,l in i(r)do for o,n in i(l[6])do local a,e,o,t={l[n]:byte(1,#l[n])},'',e[7],e[8]for n=1,#a do e,o=e..s(c(a[n],o)),(o+t)%f end l[n],l[6]=e,{};end end;end;elseif o34 then t[e[8]]=n[e[7]];else for n,l in i(r)do for n,o in i(l[6])do local a,n,e,t={l[o]:byte(1,#l[o])},'',e[7],e[8]for o=1,#a do n,e=n..s(c(a[o],e)),(e+t)%f end l[o],l[6]=n,{};end end;end;elseif o<=36 then n[e[7]]=(e[8]~=0);elseif o==37 then n[e[7]]=t[e[8]];else local c;local o;o=e[7]n[o](d(n,o+1,e[8]))l=l+1;e=a[l];n[e[7]]=t[e[8]];l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];o=e[7];c=n[e[8]];n[o+1]=c;n[o]=c[e[1]];l=l+1;e=a[l];n[e[7]]=e[8];l=l+1;e=a[l];n[e[7]]=t[e[8]];l=l+1;e=a[l];n[e[7]]=(e[8]~=0);l=l+1;e=a[l];n[e[7]]=t[e[8]];l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];l=l+1;e=a[l];n[e[7]]=n[e[8]][e[1]];end;l=l+1;end;end;end;return d({D(K(),{},C())()})or nil;end)(table.concat,table.insert,256,({1})[1],16777216)