Advertisement
MegumuSenpai

Project Hero | Max Level

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