Advertisement
MegumuSenpai

Shinobi Story | Simple Bypass

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