Bee s2

return(function(h,a,a)local k=string.char;local e=string.sub;local p=table.concat;local m=math.ldexp;local o=getfenv or function()return _ENV end;local l=select;local g=unpack or table.unpack;local i=tonumber;local function n(h)local b,c,g="","",{}local d=256;local f={}for a=0,d-1 do f[a]=k(a)end;local a=1;local function j()local b=i(e(h,a,a),36)a=a+1;local c=i(e(h,a,a+b-1),36)a=a+b;return c end;b=k(j())g[1]=b;while a<#h do local a=j()if f[a]then c=f[a]else c=b..e(b,1,1)end;f[d]=b..e(c,1,1)g[#g+1],b,d=c,c,d+1 end;return table.concat(g)end;local j=n('26425U27525U26027625A25924Z25224H24M24G25725825125U25Y27625124Z25B25325U25X27624A24M24M24I24525324M25U26R27626I22A22J22327226G23821T1Z24C24T22722921U24N21Q21123125Z26P22W26I22D25I23D21525S26Y2462171P24421227627625W27627E27G27I25U25T29424N24W27K27624X25624Z24G25S29129129J29121E25924229M2911Y26L25U26P27623M21221B21N23X25U22J23222B27126621N21G1W25Q2281B1E25424C21Z24821G24X22E23E23R25F27123G21625C1M23525029R27522A24329Q29K27524229K25027625C25O27625V2B72752BB29R26Q2BD25U2BB29925C27527L27L29K2932BO25U29M2932932BP25U2BV2912BU2BI25U2BL25U26225U25Z2BC25U2632BX27626Q2CA2CE27R2C226C2772CB2752BG2CJ2782C527626129K2C32662C92C82672CJ2752C32742CR2BM2752CU25M2C125U26825U25E2CY2752D925F25U26529129W2DB29J29M25L25U2CR2DH2DB25U2DN2CR2DB2DH25Y26Y25U2CU2BL2BB25C2B42CU2CU2CZ2B42CX2D227526A25U2742BY2E32DG2DO27625Y26O25U2CX23W2C126Q25R25U2DF2DB2CR26Q25P2ES2EY2CX2CM2DF2DF2EA2C22C42B225D2CG29K25I2CV29K25J2CK29125G2DA2B225H2FI2FA25U2FK2AX2FB2CR2FB2D825U2FE2CA27627125U2FH2E62912FK2DF29K2D62G42912FE2D62AX2FE2CR2FE2762FK2FS2912D62GE2BS2752FK2FK29K2GN2FJ2FN2C12EG25N2EI2E725U25K2FC2ED2F82CA2452C12FK25Y26J2762H42BB2642H225U2HA25U2D62H72H92EP2702DS2GS27426Q2HL25Q2HG2ED2BX2CX2DN26K2C12HR2HI2752HX2BB2I025U29U2BB2CJ2GZ2GZ2GV25U26S25U2ER2FK2DN2CM2ER2ER2742762B92D62HR2CM2B92B92HO2752GV2GV2IL2752D62B92GP2IE2EJ29126F2C125W2DB2FK2482C12HH2H82752JA2I32JD25U2492D72D92FK2D627526429J2CA24C2H527K2JH2JS2JG27623P2HK2HM2FK2742HC2CV23K2C12DN2I42K62I72782I925U2IB2ID2HR2IG25U26Q27S2HR2HR2HO2DF2IV2HT2FT2FK2HR2BM2JH2JJ2I72D92F82GZ2762D92FB2DN27626E2KR2EJ2JH23T2D726925U2F82CR2F825U2FB2C52BL2F82DX2EM2J22KY2982F62L229D2FW2752L72BR2KV27629C2I72J52BJ29126D29K29M26M2BA2D72C32D725U');local a=(bit or bit32);local d=a and a.bxor or function(a,c)local b,d,e=1,0,10 while a>0 and c>0 do local e,f=a%2,c%2 if e~=f then d=d+b end a,c,b=(a-e)/2,(c-f)/2,b*2 end if a<c then a=c end while a>0 do local c=a%2 if c>0 then d=d+b end a,b=(a-c)/2,b*2 end return d end local function c(c,a,b)if b then local a=(c/2^(a-1))%2^((b-1)-(a-1)+1);return a-a%1;else local a=2^(a-1);return(c%(a+a)>=a)and 1 or 0;end;end;local a=1;local function b()local e,f,b,c=h(j,a,a+3);e=d(e,210)f=d(f,210)b=d(b,210)c=d(c,210)a=a+4;return(c*16777216)+(b*65536)+(f*256)+e;end;local function i()local b=d(h(j,a,a),210);a=a+1;return b;end;local function f()local c,b=h(j,a,a+2);c=d(c,210)b=d(b,210)a=a+2;return(b*256)+c;end;local function q()local d=b();local a=b();local e=1;local d=(c(a,1,20)*(2^32))+d;local b=c(a,21,31);local a=((-1)^c(a,32));if(b==0)then if(d==0)then return a*0;else b=1;e=0;end;elseif(b==2047)then return(d==0)and(a*(1/0))or(a*(0/0));end;return m(a,b-1023)*(e+(d/(2^52)));end;local n=b;local function m(b)local c;if(not b)then b=n();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(h(e(c,a,a)),210))end return p(b);end;local a=b;local function n(...)return{...},l('#',...)end local function j()local h={};local d={};local a={};local k={[#{{9;501;883;83};{260;481;194;992};}]=d,[#{{119;693;545;223};"1 + 1 = 111";{402;820;70;937};}]=nil,[#{"1 + 1 = 111";{447;672;650;496};{946;122;491;179};{298;336;762;728};}]=a,[#{"1 + 1 = 111";}]=h,};local a=b()local e={}for c=1,a do local b=i();local a;if(b==1)then a=(i()~=0);elseif(b==2)then a=q();elseif(b==0)then a=m();end;e[c]=a;end;for a=1,b()do d[a-1]=j();end;k[3]=i();for j=1,b()do local a=i();if(c(a,1,1)==0)then local d=c(a,2,3);local g=c(a,4,6);local a={f(),f(),nil,nil};if(d==0)then a[3]=f();a[4]=f();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]=f();end;if(c(g,1,1)==1)then a[2]=e[a[2]]end if(c(g,2,2)==1)then a[3]=e[a[3]]end if(c(g,3,3)==1)then a[4]=e[a[4]]end h[j]=a;end end;return k;end;local function p(a,b,h)a=(a==true and j())or a;return(function(...)local e=a[1];local d=a[3];local a=a[2];local k=n local c=1;local f=-1;local m={};local j={...};local i=l('#',...)-1;local a={};local b={};for a=0,i do if(a>=d)then m[a-d]=j[a+1];else b[a]=j[a+#{"1 + 1 = 111";}];end;end;local a=i-d+1 local a;local d;while true do a=e[c];d=a[1];if d<=32 then if d<=15 then if d<=7 then if d<=3 then if d<=1 then if d==0 then b[a[2]]=b[a[3]]/a[4];c=c+1;a=e[c];b[a[2]]=b[a[3]]-b[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]]=b[a[3]];c=c+1;a=e[c];b[a[2]]=b[a[3]];c=c+1;a=e[c];c=a[3];else local d=a[2];local f=b[d+2];local e=b[d]+f;b[d]=e;if(f>0)then if(e<=b[d+1])then c=a[3];b[d+3]=e;end elseif(e>=b[d+1])then c=a[3];b[d+3]=e;end end;elseif d==2 then if(a[2]<b[a[4]])then c=a[3];else c=c+1;end;else b[a[2]][b[a[3]]]=b[a[4]];end;elseif d<=5 then if d>4 then local c=a[2]b[c]=b[c](g(b,c+1,a[3]))else b[a[2]]=b[a[3]][b[a[4]]];end;elseif d==6 then b[a[2]]=b[a[3]]+a[4];else b[a[2]]=b[a[3]]/a[4];end;elseif d<=11 then if d<=9 then if d==8 then b[a[2]]=#b[a[3]];else b[a[2]]=b[a[3]][a[4]];end;elseif d>10 then if(b[a[2]]<b[a[4]])then c=a[3];else c=c+1;end;else b[a[2]]=b[a[3]]+b[a[4]];end;elseif d<=13 then if d>12 then if(b[a[2]]==b[a[4]])then c=c+1;else c=a[3];end;else if(b[a[2]]==b[a[4]])then c=c+1;else c=a[3];end;end;elseif d==14 then local c=a[2]b[c]=b[c](g(b,c+1,a[3]))else b[a[2]]=b[a[3]]-a[4];end;elseif d<=23 then if d<=19 then if d<=17 then if d>16 then b[a[2]]=b[a[3]]*a[4];else if(b[a[2]]<b[a[4]])then c=a[3];else c=c+1;end;end;elseif d>18 then if(a[2]<b[a[4]])then c=c+1;else c=a[3];end;else do return end;end;elseif d<=21 then if d>20 then local a=a[2]b[a]=b[a](b[a+1])else local d=a[3];local c=b[d]for a=d+1,a[4]do c=c..b[a];end;b[a[2]]=c;end;elseif d==22 then local c=a[2];local d=b[a[3]];b[c+1]=d;b[c]=d[a[4]];else b[a[2]]=h[a[3]];end;elseif d<=27 then if d<=25 then if d>24 then b[a[2]]=h[a[3]];else b[a[2]]={};end;elseif d==26 then b[a[2]]=a[3];else b[a[2]][b[a[3]]]=b[a[4]];end;elseif d<=29 then if d>28 then b[a[2]]=b[a[3]]-a[4];else b[a[2]]=b[a[3]];end;elseif d<=30 then local f;local d;b[a[2]]=h[a[3]];c=c+1;a=e[c];b[a[2]]=h[a[3]];c=c+1;a=e[c];d=a[2];f=b[a[3]];b[d+1]=f;b[d]=f[a[4]];c=c+1;a=e[c];b[a[2]]=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]];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]]=a[3];c=c+1;a=e[c];b[a[2]]=h[a[3]];elseif d>31 then b[a[2]]();else local d;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]];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]];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];d=a[2]b[d]=b[d](g(b,d+1,a[3]))c=c+1;a=e[c];b[a[2]]=b[a[3]][b[a[4]]];end;elseif d<=49 then if d<=40 then if d<=36 then if d<=34 then if d==33 then b[a[2]]=b[a[3]]/a[4];else local d=a[2];local e=b[d]local f=b[d+2];if(f>0)then if(e>b[d+1])then c=a[3];else b[d+3]=e;end elseif(e<b[d+1])then c=a[3];else b[d+3]=e;end end;elseif d==35 then local a=a[2]b[a]=b[a](b[a+1])else local d=a[2];local c=b[a[3]];b[d+1]=c;b[d]=c[a[4]];end;elseif d<=38 then if d>37 then b[a[2]]=b[a[3]]-b[a[4]];else b[a[2]]=b[a[3]]+b[a[4]];end;elseif d>39 then local d=a[2];local f=b[d+2];local e=b[d]+f;b[d]=e;if(f>0)then if(e<=b[d+1])then c=a[3];b[d+3]=e;end elseif(e>=b[d+1])then c=a[3];b[d+3]=e;end else local a=a[2]b[a]=b[a](g(b,a+1,f))end;elseif d<=44 then if d<=42 then if d>41 then b[a[2]]=b[a[3]][a[4]];else b[a[2]]=b[a[3]]%a[4];end;elseif d>43 then if(a[2]<b[a[4]])then c=a[3];else c=c+1;end;else b[a[2]]=b[a[3]]*a[4];end;elseif d<=46 then if d==45 then b[a[2]]=b[a[3]]-b[a[4]];else b[a[2]]=b[a[3]]%a[4];end;elseif d<=47 then local d;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]];c=c+1;a=e[c];d=a[2]b[d]=b[d](g(b,d+1,a[3]))c=c+1;a=e[c];b[a[2]]=b[a[3]][b[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]];c=c+1;a=e[c];b[a[2]]=b[a[3]];c=c+1;a=e[c];b[a[2]]=b[a[3]];elseif d==48 then b[a[2]]=#b[a[3]];else local d=a[2];local e=b[d]local f=b[d+2];if(f>0)then if(e>b[d+1])then c=a[3];else b[d+3]=e;end elseif(e<b[d+1])then c=a[3];else b[d+3]=e;end end;elseif d<=57 then if d<=53 then if d<=51 then if d==50 then b[a[2]]=b[a[3]];else b[a[2]]=b[a[3]][b[a[4]]];end;elseif d==52 then f=a[2];else local c=a[2]local d,a=k(b[c](g(b,c+1,a[3])))f=a+c-1 local a=0;for c=c,f do a=a+1;b[c]=d[a];end;end;elseif d<=55 then if d==54 then local g;local f;local d;b[a[2]]=h[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]]={};c=c+1;a=e[c];b[a[2]]=a[3];c=c+1;a=e[c];b[a[2]]=a[3];c=c+1;a=e[c];b[a[2]]=a[3];c=c+1;a=e[c];d=a[2];f=b[d]g=b[d+2];if(g>0)then if(f>b[d+1])then c=a[3];else b[d+3]=f;end elseif(f<b[d+1])then c=a[3];else b[d+3]=f;end else local a=a[2]b[a]=b[a](g(b,a+1,f))end;elseif d==56 then b[a[2]]={};else c=a[3];end;elseif d<=61 then if d<=59 then if d==58 then c=a[3];else local c=a[2]local d,a=k(b[c](g(b,c+1,a[3])))f=a+c-1 local a=0;for c=c,f do a=a+1;b[c]=d[a];end;end;elseif d>60 then b[a[2]]=b[a[3]]+a[4];else b[a[2]]();end;elseif d<=63 then if d==62 then do return end;else local d=a[3];local c=b[d]for a=d+1,a[4]do c=c..b[a];end;b[a[2]]=c;end;elseif d<=64 then b[a[2]]=a[3];elseif d>65 then f=a[2];else if(a[2]<b[a[4]])then c=c+1;else c=a[3];end;end;c=c+1;end;end);end;return p(true,{},o())();end)(string.byte,table.insert,setmetatable);