SHARE
TWEET

Untitled

a guest Oct 21st, 2019 74 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. local d=string.byte;local h=string.char;local c=string.sub;local K=table.concat;local A=math.ldexp;local H=getfenv or function()return _ENV end;local e=setmetatable;local r=select;local i=unpack;local s=tonumber;local function C(f)local l,n,a="","",{}local o=256;local t={}for e=0,o-1 do t[e]=h(e)end;local e=1;local function d()local l=s(c(f,e,e),36)e=e+1;local n=s(c(f,e,e+l-1),36)e=e+l;return n end;l=h(d())a[1]=l;while e<#f do local e=d()if t[e]then n=t[e]else n=l..c(l,1,1)end;t[o]=l..c(n,1,1)a[#a+1],l,o=n,n,o+1 end;return table.concat(a)end;local a=C('21K27427421H27521M21627521D1Y1823M24G23B1J24H25X1H22325R2701S24322G21N21521M21O27522N22H22D22L21M21R27523422422422023J22L22421M27521K21M21Q27522322422222922E22N21M21N28G22522I27U27522J22822H22221L28C28C28Y28C26022F23C29128C25K1721M21827522H22E23G26Q25V22521O23Y24Y23I21024O24023D25921N22C21W1H22O2962751C29528Z27423C22H27524021C25K25J23Q21C2742492AB21K2452AE2481W2A82451W2AC2AM2AF2AO2491W2142AP27423K1O2AK1O27423W1G2AK1G27423X1822G2AF1827423S2B225J2452B421K23T102202AF1027425127524N27524W23C2A824323C2742582342BU23427425422W2BU22W27424Z2AX25J23M2AZ25424H2BM21K2572CF24T2B82CG2CK24H2142AZ25B2AT21K25122G26G21K2522CK25122826W2CW2282C726O25J25J24T2D521Z24W22O2BU22O2BX2C425J2432C621K2552AO23L2AO24K2DG2DI27425B26025L2CA26021L25424T22824821K24E2D321K24T2202D12462BK2E62202E22452EB24P2BG2BF27425X2AZ2AF2EM25T2BA2B92742652AO2AL2742612E52452E525H2EY2E525T1O2AZ2452EO23C21421L2452BW21K2652EQ2572EQ2612C121K24G2FK25H2EB2EF27425D2FP2EB2652F52EN2ES23C1O2FB2FD25H24W2742452G421K25D24O2G52GA21K25G2482AK2E221K25H2GH2452GH2GJ2AT2GL27425O2DQ2DJ25K2BT2DH2FD25221S29523Y21S21K2542472202A824I2BK25425222822W21L23Y2D32H422G2H72B825426T2482CV2592GH26P2402HO24027426U21C24O21L23K2AB2H421K2H72C225L23K22G21L24D23K27427124825421L25A2GH27126G2CV24Y2CV21K26X2402HY2452HU2IO2682CV24526827425P23S2IW23S2FR2IY2AF2J525H2IN2452IN2H52D62EF25J21Z25I21C2HD24B2I12472I325J24I2C225H2IT2572IT2522342H02C12H42GV24I2BW2HL2HN21K2HP27425221C2IF23Y2JL2JN2JP2H32I62I82IA27426P2IE2IG2HQ26O2CV24A26O2IZ2J121K2442J32GI2KR2CG2KY2472482D624I2L221Z25X2IB2CG2L825T2D12CG2LC24T27524L27524725C21J21K24I25C2JF25X2BW21L24C2FD23L2H221L2502H221K25B21C25I2D72M221Z2EJ2CG2BG2412FG2EQ2412LG2LI2LK2LM2LO21Z2402142A824F2CR24121C2BA2472AE2492752572752412AS21K23X2EU2AE23U2AE');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 e(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 l=1;local function n()local e,c,n,a=d(a,l,l+3);e=o(e,56)c=o(c,56)n=o(n,56)a=o(a,56)l=l+4;return(a*16777216)+(n*65536)+(c*256)+e;end;local function t()local e=o(d(a,l,l),56);l=l+1;return e;end;local function u()local l=n();local o=n();local c=1;local n=(e(o,1,20)*(2^32))+l;local l=e(o,21,31);local e=((-1)^e(o,32));if(l==0)then if(n==0)then return e*0;else l=1;c=0;end;elseif(l==2047)then return(n==0)and(e*(1/0))or(e*(0/0));end;return A(e,l-1023)*(c+(n/(2^52)));end;local f=n;local function s(e)local n;if(not e)then e=f();if(e==0)then return'';end;end;n=c(a,l,l+e-1);l=l+e;local l={}for e=1,#n do l[e]=h(o(d(c(n,e,e)),56))end return K(l);end;local l=n;local function d(...)return{...},r('#',...)end local function C()local f={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};local l={};local c={};local a={f,nil,l,nil,c};for e=1,n()do l[e-1]=C();end;a[4]=t();local l=n()local c={0,0,0,0,0,0,0,0,0,0,0,0,0};for n=1,l do local l=t();local e;if(l==0)then e=(t()~=0);elseif(l==1)then e=u();elseif(l==2)then e=s();end;c[n]=e;end;a[2]=c for a=1,n()do local c=o(n(),173);local n=o(n(),173);local o=e(c,1,2);local l=e(n,1,11);local l={l,e(c,3,11),nil,nil,n};if(o==0)then l[3]=e(c,12,20);l[5]=e(c,21,29);elseif(o==1)then l[3]=e(n,12,33);elseif(o==2)then l[3]=e(n,12,32)-1048575;elseif(o==3)then l[3]=e(n,12,32)-1048575;l[5]=e(c,21,29);end;f[a]=l;end;return a;end;local function K(e,l,h)local o=e[1];local n=e[2];local l=e[3];local e=e[4];return function(...)local c=o;local a=n;local l=l;local o=e;local e=d local n=1;local t=-1;local s={};local d={...};local f=r('#',...)-1;local e={};local l={};for e=0,f do if(e>=o)then s[e-o]=d[e+1];else l[e]=d[e+1];end;end;local e=f-o+1 local e;local o;while true do e=c[n];o=e[1];if o<=28 then if o<=13 then if o<=6 then if o<=2 then if o<=0 then l[e[2]]=l[e[3]]+l[e[5]];elseif o==1 then l[e[2]]=l[e[3]]*a[e[5]];else local n=e[2];local o=l[e[3]];l[n+1]=o;l[n]=o[a[e[5]]];end;elseif o<=4 then if o==3 then local s;local d;local o;local h;local f;l[e[2]]=l[e[3]]%a[e[5]];n=n+1;e=c[n];l[e[2]]=l[e[3]]+a[e[5]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];f=e[2];h={};o=0;d=f+e[3]-1;for e=f+1,d do o=o+1;h[o]=l[e];end;s={l[f](i(h,1,d-f))};d=f+e[5]-2;o=0;for e=f,d do o=o+1;l[e]=s[o];end;t=d;n=n+1;e=c[n];l[e[2]]=l[e[3]][l[e[5]]];else local o=e[2];l[o]=l[o]-l[o+2];n=n+e[3];end;elseif o==5 then l[e[2]]=l[e[3]]+a[e[5]];else l[e[2]]=a[e[3]];end;elseif o<=9 then if o<=7 then if(l[e[2]]<l[e[5]])then n=n+1;else n=n+e[3];end;elseif o==8 then l[e[2]]=l[e[3]]+l[e[5]];else l[e[2]]=l[e[3]][l[e[5]]];end;elseif o<=11 then if o>10 then l[e[2]]=l[e[3]]-a[e[5]];else l[e[2]]=h[a[e[3]]];end;elseif o==12 then l[e[2]]=l[e[3]]*a[e[5]];else local o=e[3];local n=l[o]for e=o+1,e[5]do n=n..l[e];end;l[e[2]]=n;end;elseif o<=20 then if o<=16 then if o<=14 then if(l[e[2]]<l[e[5]])then n=n+1;else n=n+e[3];end;elseif o>15 then l[e[2]]=a[e[3]];else l[e[2]]=l[e[3]]/a[e[5]];end;elseif o<=18 then if o==17 then l[e[2]][l[e[3]]]=l[e[5]];else l[e[2]]=#l[e[3]];end;elseif o==19 then l[e[2]]=a[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=a[e[3]];n=n+1;e=c[n];l[e[2]]=h[a[e[3]]];n=n+1;e=c[n];l[e[2]]=l[e[3]][a[e[5]]];n=n+1;e=c[n];l[e[2]]=h[a[e[3]]];n=n+1;e=c[n];l[e[2]]=l[e[3]][a[e[5]]];else l[e[2]]=#l[e[3]];end;elseif o<=24 then if o<=22 then if o>21 then n=n+e[3];else if(l[e[2]]~=l[e[5]])then n=n+1;else n=n+e[3];end;end;elseif o>23 then local n=e[2];local c={};local o=0;local e=n+e[3]-1;for e=n+1,e do o=o+1;c[o]=l[e];end;l[n](i(c,1,e-n));t=n;else local o=e[2];l[o]=l[o]-l[o+2];n=n+e[3];end;elseif o<=26 then if o>25 then l[e[2]]=l[e[3]]+a[e[5]];else l[e[2]]=l[e[3]][a[e[5]]];end;elseif o>27 then l[e[2]]=l[e[3]][l[e[5]]];else if(a[e[2]]<l[e[5]])then n=n+1;else n=n+e[3];end;end;elseif o<=42 then if o<=35 then if o<=31 then if o<=29 then local n=e[2];local c={};local o=0;local e=n+e[3]-1;for e=n+1,e do o=o+1;c[o]=l[e];end;l[n](i(c,1,e-n));t=n;elseif o==30 then local o=e[2];local a={};local n=0;local c=o+e[3]-1;for e=o+1,c do n=n+1;a[n]=l[e];end;local c={l[o](i(a,1,c-o))};local e=o+e[5]-2;n=0;for e=o,e do n=n+1;l[e]=c[n];end;t=e;else do return end;end;elseif o<=33 then if o>32 then local o=e[3];local n=l[o]for e=o+1,e[5]do n=n..l[e];end;l[e[2]]=n;else local o=e[2];local a=l[o+2];local c=l[o]+a;l[o]=c;if a>0 then if c<=l[o+1]then n=n+e[3];l[o+3]=c;end;elseif c>=l[o+1]then n=n+e[3];l[o+3]=c;end;end;elseif o==34 then l[e[2]]=h[a[e[3]]];else l[e[2]][l[e[3]]]=l[e[5]];end;elseif o<=38 then if o<=36 then l[e[2]]={};elseif o==37 then do return end;else l[e[2]]=l[e[3]][a[e[5]]];end;elseif o<=40 then if o>39 then l[e[2]]=l[e[3]]%a[e[5]];else l[e[2]]=l[e[3]]/a[e[5]];n=n+1;e=c[n];l[e[2]]=l[e[3]]-l[e[5]];n=n+1;e=c[n];l[e[2]]=l[e[3]]/a[e[5]];n=n+1;e=c[n];l[e[2]]=l[e[3]]*a[e[5]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];n=n+e[3];end;elseif o==41 then l[e[2]]=l[e[3]]-l[e[5]];else local o=e[2];local c={};local n=0;local a=o+e[3]-1;for e=o+1,a do n=n+1;c[n]=l[e];end;local c={l[o](i(c,1,a-o))};local e=o+e[5]-2;n=0;for e=o,e do n=n+1;l[e]=c[n];end;t=e;end;elseif o<=49 then if o<=45 then if o<=43 then l[e[2]]=l[e[3]]-l[e[5]];elseif o>44 then l[e[2]]=l[e[3]]/a[e[5]];else l[e[2]]=l[e[3]];end;elseif o<=47 then if o>46 then l[e[2]]=l[e[3]]%a[e[5]];else l[e[2]]=l[e[3]];end;elseif o>48 then if(a[e[2]]<l[e[5]])then n=n+1;else n=n+e[3];end;else t=e[2];end;elseif o<=53 then if o<=51 then if o==50 then l[e[2]]={};else local o=e[2];local n=l[e[3]];l[o+1]=n;l[o]=n[a[e[5]]];end;elseif o==52 then if(l[e[2]]~=l[e[5]])then n=n+1;else n=n+e[3];end;else local h;local f;local o;local d;local a;l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];a=e[2];d={};o=0;f=a+e[3]-1;for e=a+1,f do o=o+1;d[o]=l[e];end;h={l[a](i(d,1,f-a))};f=a+e[5]-2;o=0;for e=a,f do o=o+1;l[e]=h[o];end;t=f;n=n+1;e=c[n];l[e[2]]=l[e[3]][l[e[5]]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];n=n+1;e=c[n];l[e[2]]=l[e[3]];end;elseif o<=55 then if o==54 then t=e[2];else n=n+e[3];end;elseif o==56 then local o=e[2];local a=l[o+2];local c=l[o]+a;l[o]=c;if a>0 then if c<=l[o+1]then n=n+e[3];l[o+3]=c;end;elseif c>=l[o+1]then n=n+e[3];l[o+3]=c;end;else l[e[2]]=l[e[3]]-a[e[5]];end;n=n+1;end;end;end;return K(C(),{},H())();
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top