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