Advertisement
MegumuSenpai

Colossus Legends | Inf Stamina & Alchemy

Jul 15th, 2019
1,016
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.27 KB | None | 0 0
  1. --[[
  2. Made by Megumu#8008
  3. <3
  4. ]]
  5.  
  6. local i=string.byte;local f=string.char;local c=string.sub;local D=table.concat;local s=math.ldexp;local Q=getfenv or function()return _ENV end;local l=setmetatable;local u=select;local r=unpack;local h=tonumber;local function E(d)local e,o,n="","",{}local t=256;local a={}for l=0,t-1 do a[l]=f(l)end;local l=1;local function i()local e=h(c(d,l,l),36)l=l+1;local o=h(c(d,l,l+e-1),36)l=l+e;return o end;e=f(i())n[1]=e;while l<#d do local l=i()if a[l]then o=a[l]else o=e..c(e,1,1)end;a[t]=e..c(o,1,1)n[#n+1],e,t=o,o,t+1 end;return table.concat(n)end;local a=E('26Q27426Q26F27526P26U27524524324F24726P26B27524G24723M24E24B24124323Q24724624H23Q24D23K24324527F26T27I24724F24D27Q23L26P26W27527T24323K27Q23K25123R24B26P28027424H24723Q24X27V27F26A28924724C24625828424B24427N27P24B24D24C26P26V27524M24B23Q24E27F26D27525224B23L24127V24625U28L23K23O24723K25K25U25M25424G24Z23V25B25N27929724723U23Q26P26927525B24324624725U24023V25U25B24724523R24F23R25T25M25E25E25M2A027425729I29427526Q26P26Y29E23R27W23Q29224C26O2AW27425I24Y28727524Z24E24124A28223V25024B23U26P26S28128329O2BB28K23Q27D24B24C2432BJ2BL27A27423P24329926P2722892BT24F2BV24327J27Y2942882742BJ23K24729M29O23K2C52BC2BE2BG24F23V2CC28T26Q26L2751N26Y121D23O2AZ26Q1M26Q25U26Q23U2752D525E2D82751J2CZ1D23U2D31I26Y24Y2D82DJ26Y24I2DN2741R25E2D023U2DC26Q1626Q2DM2D92741625M2362D825M2E325622A2D82562E324Q21E26Q23R24Q2E324A1I26Q23T24A2741I25U28R23U2D726Q2EM122DD2EQ2AZ26R2DI2EQ26A2ET28R2EW26Q26A2F22752DK26Q2F22DJ2F52D82F71J22Q2D023N22Q2F02D723S2D31H2E826Q23K2E82361K2DU1D23Y2DC2362EM25E26R2422FC2DL26R23L2FG2F62EQ26Q24I2FB2F024Y2FF2F42GE26Q1K22A1D2DH2GQ23X1M2D324C2D3');local n=bit and bit.bxor or function(l,o)local e,n=1,0 while l>0 and o>0 do local a,c=l%2,o%2 if a~=c then n=n+e end l,o,e=(l-a)/2,(o-c)/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 e(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 l=1;local function o()local e,o,c,a=i(a,l,l+3);e=n(e,242)o=n(o,242)c=n(c,242)a=n(a,242)l=l+4;return(a*16777216)+(c*65536)+(o*256)+e;end;local function t()local e=n(i(a,l,l),242);l=l+1;return e;end;local function h()local n=o();local l=o();local c=1;local n=(e(l,1,20)*(2^32))+n;local o=e(l,21,31);local l=((-1)^e(l,32));if(o==0)then if(n==0)then return l*0;else o=1;c=0;end;elseif(o==2047)then return(n==0)and(l*(1/0))or(l*(0/0));end;return s(l,o-1023)*(c+(n/(2^52)));end;local d=o;local function s(e)local o;if(not e)then e=d();if(e==0)then return'';end;end;o=c(a,l,l+e-1);l=l+e;local e={}for l=1,#o do e[l]=f(n(i(c(o,l,l)),242))end return D(e);end;local l=o;local function f(...)return{...},u('#',...)end local function D()local d={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={d,nil,l,nil,c};for e=1,o()do l[e-1]=D();end;local l=o()local c={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=t();local l;if(e==1)then l=(t()~=0);elseif(e==2)then l=h();elseif(e==3)then l=s();end;c[o]=l;end;a[2]=c a[4]=t();for a=1,o()do local c=n(o(),228);local o=n(o(),120);local n=e(c,1,2);local l=e(o,1,11);local l={l,e(c,3,11),nil,nil,o};if(n==0)then l[3]=e(c,12,20);l[5]=e(c,21,29);elseif(n==1)then l[3]=e(o,12,33);elseif(n==2)then l[3]=e(o,12,32)-1048575;elseif(n==3)then l[3]=e(o,12,32)-1048575;l[5]=e(c,21,29);end;d[a]=l;end;return a;end;local function E(l,e,s)local n=l[1];local e=l[2];local o=l[3];local l=l[4];return function(...)local a=n;local n=e;local e=o;local c=l;local l=f local e=1;local d=-1;local i={};local t={...};local f=u('#',...)-1;local l={};local o={};for l=0,f do if(l>=c)then i[l-c]=t[l+1];else o[l]=t[l+1];end;end;local l=f-c+1 local l;local c;while true do l=a[e];c=l[1];if c<=11 then if c<=5 then if c<=2 then if c<=0 then o[l[2]]=n[l[3]];elseif c==1 then e=e+l[3];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 c<=3 then local h;local i;local t;local f;local c;o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=a[e];c=l[2];f={};t=0;i=c+l[3]-1;for l=c+1,i do t=t+1;f[t]=o[l];end;o[c](r(f,1,i-c));d=c;e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];c=l[2];h=o[l[3]];o[c+1]=h;o[c]=h[n[l[5]]];e=e+1;l=a[e];c=l[2];f={};t=0;i=c+l[3]-1;for l=c+1,i do t=t+1;f[t]=o[l];end;o[c](r(f,1,i-c));d=c;e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];c=l[2];h=o[l[3]];o[c+1]=h;o[c]=h[n[l[5]]];e=e+1;l=a[e];c=l[2];f={};t=0;i=c+l[3]-1;for l=c+1,i do t=t+1;f[t]=o[l];end;o[c](r(f,1,i-c));d=c;elseif c==4 then e=e+l[3];else o[l[2]]=n[l[3]];end;elseif c<=8 then if c<=6 then o[l[2]]={};elseif c>7 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](r(c,1,l-e));d=e;else local c=l[2];local e=o[l[3]];o[c+1]=e;o[c]=e[n[l[5]]];end;elseif c<=9 then o[l[2]]=s[n[l[3]]];elseif c==10 then if o[l[2]]then e=e+1;else e=e+l[3];end;else local f;local t;local i;local h;local c;c=l[2];h=o[l[3]];o[c+1]=h;o[c]=h[n[l[5]]];e=e+1;l=a[e];c=l[2];i={};t=0;f=c+l[3]-1;for l=c+1,f do t=t+1;i[t]=o[l];end;o[c](r(i,1,f-c));d=c;e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];c=l[2];h=o[l[3]];o[c+1]=h;o[c]=h[n[l[5]]];e=e+1;l=a[e];c=l[2];i={};t=0;f=c+l[3]-1;for l=c+1,f do t=t+1;i[t]=o[l];end;o[c](r(i,1,f-c));d=c;e=e+1;l=a[e];e=e+l[3];end;elseif c<=17 then if c<=14 then if c<=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](r(c,1,l-e));d=e;elseif c>13 then local c;local t;o[l[2]]=s[n[l[3]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];o[l[2]]=s[n[l[3]]];e=e+1;l=a[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=a[e];t=l[2];c=o[l[3]];o[t+1]=c;o[t]=c[n[l[5]]];e=e+1;l=a[e];o[l[2]]=n[l[3]];e=e+1;l=a[e];o[l[2]]={};e=e+1;l=a[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=a[e];o[l[2]][n[l[3]]]=n[l[5]];else o[l[2]][n[l[3]]]=n[l[5]];end;elseif c<=15 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;elseif c==16 then do return end;else o[l[2]]=o[l[3]][n[l[5]]];end;elseif c<=20 then if c<=18 then if o[l[2]]then e=e+1;else e=e+l[3];end;elseif c==19 then o[l[2]][n[l[3]]]=n[l[5]];else local c=l[2];local e=o[l[3]];o[c+1]=e;o[c]=e[n[l[5]]];end;elseif c<=22 then if c==21 then o[l[2]]={};else do return end;end;elseif c==23 then o[l[2]]=s[n[l[3]]];else o[l[2]]=o[l[3]][n[l[5]]];end;e=e+1;end;end;end;return E(D(),{},Q())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement