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