Meliodas0_0

Strucid Gun Mod

Mar 3rd, 2020
175
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. local a=string.byte;local b=string.char;local c=string.sub;local d=table.concat;local e=math.ldexp;local f=getfenv or function()return _ENV end;local g=setmetatable;local h=select;local i=unpack;local j=tonumber;local function k(i)local l,m,n="","",{}local o=256;local p={}for g=0,o-1 do p[g]=b(g)end;local g=1;local function a()local l=j(c(i,g,g),36)g=g+1;local m=j(c(i,g,g+l-1),36)g=g+l;return m end;l=b(a())n[1]=l;while g<#i do local g=a()if p[g]then m=p[g]else m=l..c(l,1,1)end;p[o]=l..c(m,1,1)n[#n+1],l,o=m,m,o+1 end;return table.concat(n)end;local o=k('22422522427622627627622L27925Q21W25824Z1Y21W27625R22K23022421Q22K27J22K23G27N27P22425Z27I27N27X25R22C27M21Q22C27625O21W27P21Q27I25O25H22427F1P28525J27X21K27X25Q23027F21P27M22425M27E24Z1O27X25N28127N28422428W27S28327625V27X28927628W27629322425R27921Q27929D29A27928H29A27X22027922729N2762172191X215227223279111Z21421L1W21521R22721U2791A2111Y2142A921Q21R21K1F2102111W21429W29E21521P21L21121Q21522V27925I28S21227X25J22428227C22C27F29B25J28X2B62241C27N29J2241S2BC2762B02182BG22425J27L27T27625E2382B523827J22425O2BK27K27621027U25F2BA22421H27925H21G28E21G2BV26722S2642BE22S27626421W26K2241Z28A28C27628F2BV25H1K28E1K2BV2662CT24Z21P2CV2242632CG22421L2D42672BN27O27626721824C27N2BJ2242CX2B52D12D329A2D72D927U26721O2DE21Q21O2762DI24Z21Q2DK2D421Q2DN2822DP21G2DE2152CA2242C227M1Q2C621024Z24Z1P2EE21F25E28S21P2AZ25O27P21I2BW22425E2CY2DY27627D2B527Z2DO27625Y2B42DX28Z2802822F522K22K2252DA2E92F022425Q28D24Z2E82E926427M1M2CE2BL28I27X22M29O29Q22429S29U22721Y2791B21521K1V21521Q21M21121B29V27B2761U21521O1W2G821921K2152141V21K1Z21Q21921729V29X2761R21521921O1Z1Y2A52GT22429Z2A12A32A52212791F1W2GZ29V2H827621O2192AR2A521Z2G02G22AH2AJ2142AS1Y29P2791229T2GS2791S2G821321921G2HW29A2AO2AQ2AS22727X2241821521A1Z21L1Y2G92782792IJ2FY279151Y21921B21B21L2GP21B21H2272222792GD21B1Z2AJ2IW2HX2192HQ21K2272HK2761B2HB21A2191W2GM21L21621622721S2HL21K1R2G421K21K2AA21721R')local n=bit and bit.bxor or function(g,m)local l,n=1,0;while g>0 and m>0 do local o,c=g%2,m%2;if o~=c then n=n+l end;g,m,l=(g-o)/2,(m-c)/2,l*2 end;if g<m then g=m end;while g>0 do local m=g%2;if m>0 then n=n+l end;g,l=(g-m)/2,l*2 end;return n end;local function g(m,g,l)if l then local g=m/2^(g-1)%2^(l-1-(g-1)+1)return g-g%1 else local g=2^(g-1)return m%(g+g)>=g and 1 or 0 end end;local l=1;local function m()local o,c,m,g=a(o,l,l+3)o=n(o,76)c=n(c,76)m=n(m,76)g=n(g,76)l=l+4;return g*16777216+m*65536+c*256+o end;local function p()local g=n(a(o,l,l),76)l=l+1;return g end;local function k()local l=m()local n=m()local c=1;local m=g(n,1,20)*2^32+l;local l=g(n,21,31)local g=(-1)^g(n,32)if l==0 then if m==0 then return g*0 else l=1;c=0 end elseif l==2047 then return m==0 and g*1/0 or g*0/0 end;return e(g,l-1023)*(c+m/2^52)end;local e=m;local function j(g)local m;if not g then g=e()if g==0 then return''end end;m=c(o,l,l+g-1)l=l+g;local l={}for g=1,#m do l[g]=b(n(a(c(m,g,g)),76))end;return d(l)end;local l=m;local function b(...)return{...},h('#',...)end;local function q()local i={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={0}local c={}local o={i,nil,l,nil,c}o[4]=p()for g=1,m()do l[g-1]=q()end;for o=1,m()do local c=n(m(),139)local m=n(m(),114)local n=g(c,1,2)local l=g(m,1,11)local l={l,g(c,3,11),nil,nil,m}if n==0 then l[3]=g(c,12,20)l[5]=g(c,21,29)elseif n==1 then l[3]=g(m,12,33)elseif n==2 then l[3]=g(m,12,32)-1048575 elseif n==3 then l[3]=g(m,12,32)-1048575;l[5]=g(c,21,29)end;i[o]=l end;local g=m()local m={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}for n=1,g do local l=p()local g;if l==0 then g=p()~=0 elseif l==2 then g=k()elseif l==3 then g=j()end;m[n]=g end;o[2]=m;return o end;local function r(g,l,j)local l=g[1]local n=g[2]local m=g[3]local g=g[4]return function(...)local o=l;local n=n;local s=m;local c=g;local d=b;local m=1;local p=-1;local k={}local b={...}local a=h('#',...)-1;local g={}local l={}for g=0,a do if g>=c then k[g-c]=b[g+1]else l[g]=b[g+1]end end;local g=a-c+1;local g;local c;while true do g=o[m]c=g[1]if c<=19 then if c<=9 then if c<=4 then if c<=1 then if c>0 then local n=g[2]local c={}local m=0;local o=n+g[3]-1;for g=n+1,o do m=m+1;c[m]=l[g]end;local c={l[n](i(c,1,o-n))}local g=n+g[5]-2;m=0;for g=n,g do m=m+1;l[g]=c[m]end;p=g else l[g[2]][n[g[3]]]=n[g[5]]end elseif c<=2 then local n=g[2]local c={}local m=0;local g=n+g[3]-1;for g=n+1,g do m=m+1;c[m]=l[g]end;local c,g=d(l[n](i(c,1,g-n)))g=g+n-1;m=0;for g=n,g do m=m+1;l[g]=c[m]end;p=g elseif c==3 then l[g[2]]=j[n[g[3]]]else l[g[2]]=j[n[g[3]]]end elseif c<=6 then if c>5 then do return end else local n=g[2]local c=p;local m={}local g=0;for n=n,c do g=g+1;m[g]=l[n]end;do return i(m,1,g)end end elseif c<=7 then local k;local a;local c;local h;local b;l[g[2]]=l[g[3]]m=m+1;g=o[m]b=g[2]h={}c=0;a=b+g[3]-1;for g=b+1,a do c=c+1;h[c]=l[g]end;k={l[b](i(h,1,a-b))}a=b+g[5]-2;c=0;for g=b,a do c=c+1;l[g]=k[c]end;p=a;m=m+1;g=o[m]l[g[2]][n[g[3]]]=n[g[5]]m=m+1;g=o[m]l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]l[g[2]]=l[g[3]]m=m+1;g=o[m]b=g[2]h={}c=0;a=b+g[3]-1;for g=b+1,a do c=c+1;h[c]=l[g]end;k={l[b](i(h,1,a-b))}a=b+g[5]-2;c=0;for g=b,a do c=c+1;l[g]=k[c]end;p=a;m=m+1;g=o[m]l[g[2]][n[g[3]]]=n[g[5]]m=m+1;g=o[m]l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]l[g[2]]=l[g[3]]m=m+1;g=o[m]b=g[2]h={}c=0;a=b+g[3]-1;for g=b+1,a do c=c+1;h[c]=l[g]end;k={l[b](i(h,1,a-b))}a=b+g[5]-2;c=0;for g=b,a do c=c+1;l[g]=k[c]end;p=a elseif c==8 then local k;local a;local b;local h;local e;local c;l[g[2]][n[g[3]]]=l[g[5]]m=m+1;g=o[m]l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]c=g[2]e=l[g[3]]l[c+1]=e;l[c]=e[n[g[5]]]m=m+1;g=o[m]l[g[2]]=n[g[3]]m=m+1;g=o[m]c=g[2]h={}b=0;a=c+g[3]-1;for g=c+1,a do b=b+1;h[b]=l[g]end;k={l[c](i(h,1,a-c))}a=c+g[5]-2;b=0;for g=c,a do b=b+1;l[g]=k[b]end;p=a;m=m+1;g=o[m]l[g[2]]=l[g[3]][n[g[5]]]m=m+1;g=o[m]c=g[2]h={}b=0;a=c+g[3]-1;for g=c+1,a do b=b+1;h[b]=l[g]end;k={l[c](i(h,1,a-c))}a=c+g[5]-2;b=0;for g=c,a do b=b+1;l[g]=k[b]end;p=a else l[g[2]][n[g[3]]]=l[g[5]]end elseif c<=14 then if c<=11 then if c>10 then local n=g[2]local c={}local m=0;local o=p;for g=n+1,o do m=m+1;c[m]=l[g]end;local c={l[n](i(c,1,o-n))}local g=n+g[5]-2;m=0;for g=n,g do m=m+1;l[g]=c[m]end;p=g else l[g[2]]=r(s[g[3]],nil,j)end elseif c<=12 then l[g[2]]=n[g[3]]elseif c==13 then local g=g[2]local m={}local n=p;for g=g+1,n do m[#m+1]=l[g]end;do return l[g](i(m,1,n-g))end else local n=g[2]local c=g[5]local g=n+2;local o={l[n](l[n+1],l[g])}for m=1,c do l[g+m]=o[m]end;local n=l[n+3]if n then l[g]=n else m=m+1 end end elseif c<=16 then if c==15 then l[g[2]]=l[g[3]]else if l[g[2]]==n[g[5]]then m=m+1 else m=m+g[3]end end elseif c<=17 then l[g[2]]=n[g[3]]elseif c==18 then local g=g[2]local m={}local n=p;for g=g+1,n do m[#m+1]=l[g]end;do return l[g](i(m,1,n-g))end else l[g[2]]=l[g[3]]end elseif c<=29 then if c<=24 then if c<=21 then if c>20 then local n=g[2]local o={}local m=0;local c=n+g[3]-1;for g=n+1,c do m=m+1;o[m]=l[g]end;local c={l[n](i(o,1,c-n))}local g=n+g[5]-2;m=0;for g=n,g do m=m+1;l[g]=c[m]end;p=g else l[g[2]]=l[g[3]][n[g[5]]]end elseif c<=22 then l[g[2]]=r(s[g[3]],nil,j)elseif c==23 then l[g[2]][n[g[3]]]=n[g[5]]else local e;local a;local b;local k;local h;local c;l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]c=g[2]h=l[g[3]]l[c+1]=h;l[c]=h[n[g[5]]]m=m+1;g=o[m]l[g[2]]=n[g[3]]m=m+1;g=o[m]c=g[2]k={}b=0;a=c+g[3]-1;for g=c+1,a do b=b+1;k[b]=l[g]end;e={l[c](i(k,1,a-c))}a=c+g[5]-2;b=0;for g=c,a do b=b+1;l[g]=e[b]end;p=a;m=m+1;g=o[m]l[g[2]]=l[g[3]][n[g[5]]]m=m+1;g=o[m]l[g[2]]=l[g[3]][n[g[5]]]m=m+1;g=o[m]c=g[2]h=l[g[3]]l[c+1]=h;l[c]=h[n[g[5]]]m=m+1;g=o[m]c=g[2]k={}b=0;a=c+g[3]-1;for g=c+1,a do b=b+1;k[b]=l[g]end;e={l[c](i(k,1,a-c))}a=c+g[5]-2;b=0;for g=c,a do b=b+1;l[g]=e[b]end;p=a;m=m+1;g=o[m]l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]c=g[2]h=l[g[3]]l[c+1]=h;l[c]=h[n[g[5]]]end elseif c<=26 then if c==25 then local m=g[2]local c=l[g[3]]l[m+1]=c;l[m]=c[n[g[5]]]else local n=g[2]local c={}local m=0;local g=n+g[3]-1;for g=n+1,g do m=m+1;c[m]=l[g]end;local c,g=d(l[n](i(c,1,g-n)))g=g+n-1;m=0;for g=n,g do m=m+1;l[g]=c[m]end;p=g end elseif c<=27 then local c=g[2]local m=l[g[3]]l[c+1]=m;l[c]=m[n[g[5]]]elseif c>28 then if l[g[2]]==n[g[5]]then m=m+1 else m=m+g[3]end else local e;local a;local b;local h;local k;local c;l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]l[g[2]]=l[g[3]][n[g[5]]]m=m+1;g=o[m]c=g[2]k=l[g[3]]l[c+1]=k;l[c]=k[n[g[5]]]m=m+1;g=o[m]l[g[2]]=l[g[3]]m=m+1;g=o[m]c=g[2]h={}b=0;a=c+g[3]-1;for g=c+1,a do b=b+1;h[b]=l[g]end;e={l[c](i(h,1,a-c))}a=c+g[5]-2;b=0;for g=c,a do b=b+1;l[g]=e[b]end;p=a;m=m+1;g=o[m]if not l[g[2]]then m=m+1 else m=m+g[3]end end elseif c<=34 then if c<=31 then if c==30 then m=m+g[3]else local n=g[2]local o={}local m=0;local c=p;for g=n+1,c do m=m+1;o[m]=l[g]end;local c={l[n](i(o,1,c-n))}local g=n+g[5]-2;m=0;for g=n,g do m=m+1;l[g]=c[m]end;p=g end elseif c<=32 then if not l[g[2]]then m=m+1 else m=m+g[3]end elseif c==33 then do return end else l[g[2]]=l[g[3]][n[g[5]]]end elseif c<=37 then if c<=35 then local c=g[2]local n=p;local m={}local g=0;for n=c,n do g=g+1;m[g]=l[n]end;do return i(m,1,g)end elseif c==36 then local n=g[2]local o=g[5]local g=n+2;local c={l[n](l[n+1],l[g])}for m=1,o do l[g+m]=c[m]end;local n=l[n+3]if n then l[g]=n else m=m+1 end else if not l[g[2]]then m=m+1 else m=m+g[3]end end elseif c<=38 then local e;local r,c;local b;local a;local h;local k;local c;l[g[2]]=j[n[g[3]]]m=m+1;g=o[m]l[g[2]]=l[g[3]][n[g[5]]]m=m+1;g=o[m]c=g[2]k=l[g[3]]l[c+1]=k;l[c]=k[n[g[5]]]m=m+1;g=o[m]l[g[2]]=l[g[3]]m=m+1;g=o[m]c=g[2]h={}a=0;b=c+g[3]-1;for g=c+1,b do a=a+1;h[a]=l[g]end;r,b=d(l[c](i(h,1,b-c)))b=b+c-1;a=0;for g=c,b do a=a+1;l[g]=r[a]end;p=b;m=m+1;g=o[m]c=g[2]h={}b=p;for g=c+1,b do h[#h+1]=l[g]end;do return l[c](i(h,1,b-c))end;m=m+1;g=o[m]c=g[2]b=p;e={}a=0;for g=c,b do a=a+1;e[a]=l[g]end;do return i(e,1,a)end;m=m+1;g=o[m]do return end elseif c==39 then m=m+g[3]else l[g[2]][n[g[3]]]=l[g[5]]end;m=m+1 end end end;return r(q(),{},f())()
RAW Paste Data