Advertisement
MegumuSenpai

Shinobi Story | Exploit Bypass | Proto Compatible

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