Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local d=string.byte;local h=string.char;local c=string.sub;local X=table.concat;local e=table.insert;local r=math.ldexp;local H=getfenv or function()return _ENV end;local F=setmetatable;local s=select;local f=unpack or table.unpack;local i=tonumber;local function G(d)local l,n,o="","",{}local a=256;local t={}for e=0,a-1 do t[e]=h(e)end;local e=1;local function f()local l=i(c(d,e,e),36)e=e+1;local n=i(c(d,e,e+l-1),36)e=e+l;return n end;l=h(f())o[1]=l;while e<#d do local e=f()if t[e]then n=t[e]else n=l..c(l,1,1)end;t[a]=l..c(n,1,1)o[#o+1],l,a=n,n,a+1 end;return table.concat(o)end;local i=G('24L23X27523Y23T27523X26B26G26T26X23Y23S27926I26G26X26I26M27727926X26S27126G27F27O26K26N26927S23V27927326K26Y27I27E23L27H27J26N26A26H27Q26K27326X27227T27527126K26C27328G23P27926J26W26B26M26X26C26A26B23Y23Q27927126927325L26G29126A26S26G26H23Y28627528425Q26D28D26K28T26G27328H23X26H26G26N26W26I28Y28726X26W27126Z26K26926W26G28G23R27926C27229O29629829A27827526Y28K27E2AC23X26I26K26827S2A427525M27J26629K26Z26C26M27S23U27926526926K29828M23Y2AN23X2AP26X2AZ2B129K28G23O27926126G2AK25Q26A26926A29L28Z27525D26A26M29Z2B92B229T2AO27J29F26C26926H27326G28X23Y27925G27225O27N27526528D27E24F27925R26A26T25H26K26B26H27X25O26H2BL26B2AL26B27E2AX27529427226X27329723Y28O27525G26B2CZ2CL2AV23Y2C527527B26Y2CA23X26626C26V27S2BN23X25O2692AE26S27225E26B26126A27123W23W23Y2CW2DN2CQ27327B27Y2792BI2BK27325A2BV23X25K2662652AR26X28U26B26I28G27G2752E82BL29B2BE2812D728J2C228S26S2792EZ2762E12632A626C27W2E62CB28D2C327E27Z27525Z2D629O26T2F027523H24Y1R27924F24923X23W2FQ2FN27523Z23X2FV2F02C52FR2F02FV2FV2C52AH23X24S2FS24F24423X27Z2DC27524I23X2AX2EN2752462GB2FW2GM24R2582GL2G72FR27823T24M2792GR23X2G92GL2GI23X2GF2GH2FN24O23X28O2FC27524G2GL28O2FV23V24Q2GL24C2FS2GS2GV2752HI2HK2GW2G82GA27Z2E12H22GG23X2H125O2GL2FV28O2GU2792422HQ23X28Z2GD2HU2862B523X2GK28Z2G223X24R27428Z2GK2FR2I12HL2IC2FS2I22752I42FR2IH23X2BD2432FS27Z2IQ23X2IX2HO2IR2FS2HU2752B523V2FR27Z2482FS2FV2J02JC2JA2FR2FR27G2FR2JE2IN2JK2GB2562J52HJ2752H92EZ24F23M2FS2BD2JT2JQ2JI2JS2GL2FI24F2GX2IB2752K22752CF2GM2G02GY2762GM2FY2IP23X2G525H2I52AX2I82GF2H82EZ2GK2AX2IF2GO2HV2KM2IL2KK2IN2KY2GY2GA2AX2KE24F24H2H72I627924T27528O28O29C2752BD2JU2LD2GM2BD2G525N2I52862KP23X23K2LA2792GK2862KV27428624Y2KJ2J02M12J323X2LO2FR2GZ2862H12GF2LT2DM24F2H623N2LS2EZ2HB2862MH2HE24X23X2862M72792J02MR2HU2FR2DM2J92HV2502JD2L02792N02JH2GM24J2N12J02N72M82GA2FV2MH2FT2FV2JL2GB2MO2FV1O2JR2J02NL2NB2GM2E124F24N23X2C52JX2752LC2NU2NZ24D2KF2HW23X2HI2KI27G2FV2NY2C52C52KC2KG2G52FU2MS2KK2EZ1V2FS24T2HI2AX27Z24E2GY2512L92NW23X2NY2LE2O42OU2LK28O2FP2OV2L92OP2FC2AX2OJ2KZ2J02P72L32HV2JZ2GE2L92JU2KT2GM2MN2HV2PA2752P92KN23X2IB2IX2KR2F02KU2GM2KC28O2E12NY2BD2AX2JC2792BD2K82L92J72OH2791T2OK24W2MI28624B2GY2H62JX24A2MJ2MI2JX2HE2HG2LT2702JS2J02QQ2M52QA2NP2LT2PY2QC2MH2862Q22AX2MH2OT2NZ2LT2752JX2J026R2QB2KF2HI2QF2MF23X2FP2452QK2CF2FP2QN2KF26P2QR2IN2RP2M52RB2FR24T2QC2CF2HI2GA2O32CF2NG2GB2FR2LT26Z2N82IN2S72QW23X2472LB2BD2LT2LT2GK2KC2MH2RJ2F02JX2LG2792LT2QM2OY23X2R023X24123X2O12MI2SW2MH2592752LT2402J12SX2T323X2I42862SJ2G62LB2752MH2MH24V2SX2862LT2LC2T12572MI24U23X24P23X2592TO2LT2H62IX24D2TK2IG2MP2TT2TV23X2HG2742MY28O26E2S82792UA2N52FV2622UB2752UG2M525J2J52SY2JR2KH2F02DM2792KE2792GF2FX2KS2N12PJ2KZ2KE2J028O2G02T22KA2752542N12PM2IN2A42V42UO2V72V92752UN2KE2UT2KE2DG26M29G2732R52V32FI2OF2VS2NH2O82K92JS2FC2FR2862V12IN2W12EZ2UT2752T52UW2F02VV2SS2K22VK2UP2G52MH2VD2W623X2V82NH2792VI2US2EZ');local o=bit and bit.bxor or function(e,n)local l,o=1,0 while e>0 and n>0 do local c,a=e%2,n%2 if c~=a then o=o+l end e,n,l=(e-c)/2,(n-a)/2,l*2 end if e<n then e=n end while e>0 do local n=e%2 if n>0 then o=o+l end e,l=(e-n)/2,l*2 end return o end local function n(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 function l()local a,c,n,l=d(i,e,e+3);a=o(a,141)c=o(c,141)n=o(n,141)l=o(l,141)e=e+4;return(l*16777216)+(n*65536)+(c*256)+a;end;local function t()local l=o(d(i,e,e),141);e=e+1;return l;end;local function a()local n,l=d(i,e,e+2);n=o(n,141)l=o(l,141)e=e+2;return(l*256)+n;end;local function K()local o=l();local e=l();local c=1;local o=(n(e,1,20)*(2^32))+o;local l=n(e,21,31);local e=((-1)^n(e,32));if(l==0)then if(o==0)then return e*0;else l=1;c=0;end;elseif(l==2047)then return(o==0)and(e*(1/0))or(e*(0/0));end;return r(e,l-1023)*(c+(o/(2^52)));end;local r=l;local function G(l)local n;if(not l)then l=r();if(l==0)then return'';end;end;n=c(i,e,e+l-1);e=e+l;local l={}for e=1,#n do l[e]=h(o(d(c(n,e,e)),141))end return X(l);end;local e=l;local function r(...)return{...},s('#',...)end local function X()local f={};local d={};local e={};local i={f,d,nil,e};local e=l()local c={}for n=1,e do local l=t();local e;if(l==1)then e=(t()~=0);elseif(l==0)then e=K();elseif(l==3)then e=G();end;c[n]=e;end;for d=1,l()do local e=t();if(n(e,1,1)==0)then local o=n(e,2,3);local t=n(e,4,6);local e={a(),a(),nil,nil};if(o==0)then e[3]=a();e[4]=a();elseif(o==1)then e[3]=l();elseif(o==2)then e[3]=l()-(2^16)elseif(o==3)then e[3]=l()-(2^16)e[4]=a();end;if(n(t,1,1)==1)then e[2]=c[e[2]]end if(n(t,2,2)==1)then e[3]=c[e[3]]end if(n(t,3,3)==1)then e[4]=c[e[4]]end f[d]=e;end end;i[3]=t();for e=1,l()do d[e-1]=X();end;return i;end;local function G(e,h,a)local l=e[1];local n=e[2];local e=e[3];return function(...)local c=l;local X=n;local o=e;local r=r local l=1;local t=-1;local K={};local d={...};local i=s('#',...)-1;local s={};local n={};for e=0,i do if(e>=o)then K[e-o]=d[e+1];else n[e]=d[e+1];end;end;local e=i-o+1 local e;local o;while true do e=c[l];o=e[1];if o<=32 then if o<=15 then if o<=7 then if o<=3 then if o<=1 then if o>0 then local c=e[2];local a=e[4];local o=c+2 local c={n[c](n[c+1],n[o])};for e=1,a do n[o+e]=c[e];end;local c=c[1]if c then n[o]=c l=e[3];else l=l+1;end;else n[e[2]]=h[e[3]];end;elseif o>2 then local o=e[2]local c={n[o](f(n,o+1,t))};local l=0;for e=o,e[4]do l=l+1;n[e]=c[l];end else if(n[e[2]]~=n[e[4]])then l=l+1;else l=e[3];end;end;elseif o<=5 then if o>4 then local e=e[2]n[e](n[e+1])else n[e[2]]=n[e[3]][e[4]];end;elseif o==6 then n[e[2]]=n[e[3]];else local e=e[2]local o,l=r(n[e](n[e+1]))t=l+e-1 local l=0;for e=e,t do l=l+1;n[e]=o[l];end;end;elseif o<=11 then if o<=9 then if o>8 then local o;n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];n[e[2]]=e[3];l=l+1;e=c[l];n[e[2]]=n[e[3]];l=l+1;e=c[l];o=e[2]n[o]=n[o](f(n,o+1,e[3]))l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];n[e[2]][e[3]]=n[e[4]];l=l+1;e=c[l];n[e[2]][e[3]]=e[4];l=l+1;e=c[l];n[e[2]][e[3]]=n[e[4]];l=l+1;e=c[l];n[e[2]]=a[e[3]];l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];else local o;n[e[2]]=h[e[3]];l=l+1;e=c[l];n[e[2]]=n[e[3]];l=l+1;e=c[l];o=e[2]n[o]=n[o](n[o+1])l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];if n[e[2]]then l=l+1;else l=e[3];end;end;elseif o>10 then n[e[2]][e[3]]=n[e[4]];else do return end;end;elseif o<=13 then if o==12 then n[e[2]][e[3]]=n[e[4]];else local o=e[2]local c={n[o](f(n,o+1,t))};local l=0;for e=o,e[4]do l=l+1;n[e]=c[l];end end;elseif o>14 then a[e[3]]=n[e[2]];else local e=e[2]n[e]=n[e](n[e+1])end;elseif o<=23 then if o<=19 then if o<=17 then if o==16 then do return end;else n[e[2]]=n[e[3]][e[4]];end;elseif o>18 then local l=e[2]n[l]=n[l](f(n,l+1,e[3]))else local e=e[2]n[e]=n[e]()end;elseif o<=21 then if o==20 then local t;local d;local o;n[e[2]]=a[e[3]];l=l+1;e=c[l];n[e[2]]=a[e[3]];l=l+1;e=c[l];n[e[2]]=(e[3]~=0);l=l+1;e=c[l];o=e[2]d={n[o](n[o+1])};t=0;for e=o,e[4]do t=t+1;n[e]=d[t];end l=l+1;e=c[l];l=e[3];else n[e[2]][e[3]]=e[4];end;elseif o>22 then local o=e[2];local a=e[4];local c=o+2 local o={n[o](n[o+1],n[c])};for e=1,a do n[c+e]=o[e];end;local o=o[1]if o then n[c]=o l=e[3];else l=l+1;end;else do return n[e[2]]end end;elseif o<=27 then if o<=25 then if o>24 then n[e[2]]=a[e[3]];else n[e[2]]=h[e[3]];end;elseif o==26 then local o=e[2]local c={n[o](n[o+1])};local l=0;for e=o,e[4]do l=l+1;n[e]=c[l];end else local e=e[2]n[e]=n[e](n[e+1])end;elseif o<=29 then if o==28 then l=e[3];else local o;n[e[2]]=n[e[3]];l=l+1;e=c[l];o=e[2]n[o]=n[o](n[o+1])l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];do return n[e[2]]end l=l+1;e=c[l];l=e[3];end;elseif o<=30 then local o;local d;local i,s;local h;local o;n[e[2]]=n[e[3]];l=l+1;e=c[l];o=e[2]n[o]=n[o](n[o+1])l=l+1;e=c[l];n[e[2]]=a[e[3]];l=l+1;e=c[l];o=e[2];h=n[e[3]];n[o+1]=h;n[o]=h[e[4]];l=l+1;e=c[l];o=e[2]i,s=r(n[o](n[o+1]))t=s+o-1 d=0;for e=o,t do d=d+1;n[e]=i[d];end;l=l+1;e=c[l];o=e[2]i={n[o](f(n,o+1,t))};d=0;for e=o,e[4]do d=d+1;n[e]=i[d];end l=l+1;e=c[l];l=e[3];elseif o>31 then n[e[2]]=(e[3]~=0);else local o=e[2];local l=n[e[3]];n[o+1]=l;n[o]=l[e[4]];end;elseif o<=49 then if o<=40 then if o<=36 then if o<=34 then if o==33 then local o;local f;local d;local t;a[e[3]]=n[e[2]];l=l+1;e=c[l];for e=e[2],e[3]do n[e]=nil;end;l=l+1;e=c[l];n[e[2]]=a[e[3]];l=l+1;e=c[l];n[e[2]]=a[e[3]];l=l+1;e=c[l];t=e[2]d={n[t]()};f=e[4];o=0;for e=t,f do o=o+1;n[e]=d[o];end l=l+1;e=c[l];l=e[3];else n[e[2]]=a[e[3]];end;elseif o==35 then local d=X[e[3]];local t;local o={};t=F({},{__index=function(l,e)local e=o[e];return e[1][e[2]];end,__newindex=function(n,e,l)local e=o[e]e[1][e[2]]=l;end;});for a=1,e[4]do l=l+1;local e=c[l];if e[1]==6 then o[a-1]={n,e[3]};else o[a-1]={h,e[3]};end;s[#s+1]=o;end;n[e[2]]=G(d,t,a);else local e=e[2]local o,l=r(n[e](n[e+1]))t=l+e-1 local l=0;for e=e,t do l=l+1;n[e]=o[l];end;end;elseif o<=38 then if o>37 then n[e[2]]=e[3];else n[e[2]]=e[3];end;elseif o==39 then if not n[e[2]]then l=l+1;else l=e[3];end;else if(n[e[2]]~=e[4])then l=l+1;else l=e[3];end;end;elseif o<=44 then if o<=42 then if o>41 then local o;local d;local h,s;local i;local o;n[e[2]]=a[e[3]];l=l+1;e=c[l];o=e[2];i=n[e[3]];n[o+1]=i;n[o]=i[e[4]];l=l+1;e=c[l];n[e[2]]=e[3];l=l+1;e=c[l];o=e[2]n[o]=n[o](f(n,o+1,e[3]))l=l+1;e=c[l];o=e[2];i=n[e[3]];n[o+1]=i;n[o]=i[e[4]];l=l+1;e=c[l];o=e[2]h,s=r(n[o](n[o+1]))t=s+o-1 d=0;for e=o,t do d=d+1;n[e]=h[d];end;l=l+1;e=c[l];o=e[2]h={n[o](f(n,o+1,t))};d=0;for e=o,e[4]do d=d+1;n[e]=h[d];end l=l+1;e=c[l];l=e[3];else local l=e[2]local o={n[l]()};local c=e[4];local e=0;for l=l,c do e=e+1;n[l]=o[e];end end;elseif o==43 then l=e[3];else local o;local d;local t;n[e[2]]=a[e[3]];l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];n[e[2]]=n[e[3]];l=l+1;e=c[l];t=e[2]d={n[t](n[t+1])};o=0;for e=t,e[4]do o=o+1;n[e]=d[o];end l=l+1;e=c[l];l=e[3];end;elseif o<=46 then if o==45 then local l=e[2]n[l]=n[l](f(n,l+1,e[3]))else a[e[3]]=n[e[2]];end;elseif o<=47 then n[e[2]]=n[e[3]];elseif o==48 then n[e[2]]=(e[3]~=0);else if(n[e[2]]==e[4])then l=l+1;else l=e[3];end;end;elseif o<=57 then if o<=53 then if o<=51 then if o==50 then local l=e[2]local c={n[l]()};local o=e[4];local e=0;for l=l,o do e=e+1;n[l]=c[e];end else for e=e[2],e[3]do n[e]=nil;end;end;elseif o>52 then do return n[e[2]]end else if(n[e[2]]~=e[4])then l=l+1;else l=e[3];end;end;elseif o<=55 then if o>54 then local d=X[e[3]];local t;local o={};t=F({},{__index=function(l,e)local e=o[e];return e[1][e[2]];end,__newindex=function(n,e,l)local e=o[e]e[1][e[2]]=l;end;});for a=1,e[4]do l=l+1;local e=c[l];if e[1]==6 then o[a-1]={n,e[3]};else o[a-1]={h,e[3]};end;s[#s+1]=o;end;n[e[2]]=G(d,t,a);else n[e[2]][e[3]]=e[4];end;elseif o>56 then if(n[e[2]]==e[4])then l=l+1;else l=e[3];end;else n[e[2]]=a[e[3]];l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];n[e[2]]=n[e[3]][e[4]];l=l+1;e=c[l];if(n[e[2]]~=n[e[4]])then l=l+1;else l=e[3];end;end;elseif o<=61 then if o<=59 then if o>58 then local e=e[2]n[e]=n[e]()else if not n[e[2]]then l=l+1;else l=e[3];end;end;elseif o>60 then local l=e[2];local o=n[e[3]];n[l+1]=o;n[l]=o[e[4]];else if n[e[2]]then l=l+1;else l=e[3];end;end;elseif o<=63 then if o>62 then if n[e[2]]then l=l+1;else l=e[3];end;else local e=e[2]n[e](n[e+1])end;elseif o<=64 then for e=e[2],e[3]do n[e]=nil;end;elseif o==65 then local o=e[2]local c={n[o](n[o+1])};local l=0;for e=o,e[4]do l=l+1;n[e]=c[l];end else if(n[e[2]]~=n[e[4]])then l=l+1;else l=e[3];end;end;l=l+1;end;end;end;return G(X(),{},H())();
Add Comment
Please, Sign In to add comment