Shinobi Story | GodMode

--[[
	Made by Megumu#8008
	<3
]]

_G.Toggle = true --On/Off

local d=string.byte;local f=string.char;local c=string.sub;local u=table.concat;local J=math.ldexp;local B=getfenv or function()return _ENV end;local l=setmetatable;local s=select;local i=unpack;local r=tonumber;local function h(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=r(c(d,l,l),36)l=l+1;local o=r(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=h('25624S27526824K22K22B22Q24K27526924S23W24S23127524S26A21027522R27M21826B21827922Z21824S21826825027922Q25027D24K25824S23727C24S26823W27922P27G24S27E27024S22P27J26G24C28C24C27D25027G22P28228F24S26428I27J27E27V28J27D24S21O28X2921C29528U1S29826G25O27922O25O27526K25G27923325G27526L25022428I28T29O27528S27D23W28528D27526B27022B22B22P2A225V26928823428827J27524I27J24T24U27J26R26J24T24Q27J26W25F25N25N25C25L24T24O27J26325P25H2602AU27J25N25P25D2AT24M27J26J25L26027325L26626225H25R2AT24R27J27025C25P25X2BD26724T24N27J26825F25R25P25C2BL2BN2BD24T24L27J26N25G25P26625P25R2602C12AM27525R25F25D25Q25P2B02CD24S26126425K2CJ2B627J26I25H26625L2BC2BE2C12B727525M2BX25C2CP25D25P25N2AT2AV2752D626025G2B127525G2612D8');local n=bit and bit.bxor or function(l,e)local o,n=1,0 while l>0 and e>0 do local c,a=l%2,e%2 if c~=a then n=n+o end l,e,o=(l-c)/2,(e-a)/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 l(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 e=1;local function o()local o,l,c,a=d(a,e,e+3);o=n(o,172)l=n(l,172)c=n(c,172)a=n(a,172)e=e+4;return(a*16777216)+(c*65536)+(l*256)+o;end;local function t()local l=n(d(a,e,e),172);e=e+1;return l;end;local function r()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 J(l,e-1023)*(c+(o/(2^52)));end;local h=o;local function C(l)local o;if(not l)then l=h();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]=f(n(d(c(o,l,l)),172))end return u(e);end;local e=o;local function u(...)return{...},s('#',...)end local function J()local f={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};local d={};local e={};local a={f,nil,d,nil,e};for a=1,o()do local c=n(o(),77);local o=n(o(),205);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 d[l-1]=J();end;a[4]=t();local l=o()local o={0,0,0,0,0,0,0,0,0,0,0,0,0,0};for n=1,l do local e=t();local l;if(e==3)then l=(t()~=0);elseif(e==2)then l=r();elseif(e==1)then l=C();end;o[n]=l;end;a[2]=o return a;end;local function C(l,e,h)local e=l[1];local o=l[2];local n=l[3];local l=l[4];return function(...)local a=e;local c=o;local e=n;local n=l;local l=u local o=1;local t=-1;local r={};local d={...};local f=s('#',...)-1;local l={};local e={};for l=0,f do if(l>=n)then r[l-n]=d[l+1];else e[l]=d[l+1];end;end;local l=f-n+1 local l;local n;while true do l=a[o];n=l[1];if n<=11 then if n<=5 then if n<=2 then if n<=0 then e[l[2]]=e[l[3]][c[l[5]]];elseif n>1 then if e[l[2]]then o=o+1;else o=o+l[3];end;else e[l[2]]=c[l[3]];end;elseif n<=3 then e[l[2]]=h[c[l[3]]];elseif n>4 then local n=l[2];local a={};local o=0;local c=n+l[3]-1;for l=n+1,c do o=o+1;a[o]=e[l];end;local c={e[n](i(a,1,c-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;else e[l[2]]=-e[l[3]];end;elseif n<=8 then if n<=6 then e[l[2]]();t=A;elseif n==7 then if e[l[2]]then o=o+1;else o=o+l[3];end;else e[l[2]]();t=A;end;elseif n<=9 then local o=l[2];local c={};local n=0;local l=o+l[3]-1;for l=o+1,l do n=n+1;c[n]=e[l];end;e[o](i(c,1,l-o));t=o;elseif n==10 then o=o+l[3];else e[l[2]]=-e[l[3]];end;elseif n<=17 then if n<=14 then if n<=12 then e[l[2]]=e[l[3]][c[l[5]]];elseif n>13 then local r;local d;local f;local n;e[l[2]]=h[c[l[3]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=-e[l[3]];o=o+1;l=a[o];n=l[2];f={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;f[d]=e[l];end;e[n](i(f,1,r-n));t=n;o=o+1;l=a[o];o=o+l[3];else local o=l[2];local c={};local n=0;local l=o+l[3]-1;for l=o+1,l do n=n+1;c[n]=e[l];end;e[o](i(c,1,l-o));t=o;end;elseif n<=15 then local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[c[l[5]]];elseif n==16 then o=o+l[3];else do return end;end;elseif n<=20 then if n<=18 then local u;local r;local d;local s;local f;local n;e[l[2]]();t=n;o=o+1;l=a[o];e[l[2]]=h[c[l[3]]];o=o+1;l=a[o];n=l[2];f=e[l[3]];e[n+1]=f;e[n]=f[c[l[5]]];o=o+1;l=a[o];e[l[2]]=c[l[3]];o=o+1;l=a[o];n=l[2];s={};d=0;r=n+l[3]-1;for l=n+1,r do d=d+1;s[d]=e[l];end;u={e[n](i(s,1,r-n))};r=n+l[5]-2;d=0;for l=n,r do d=d+1;e[l]=u[d];end;t=r;o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=a[o];n=l[2];f=e[l[3]];e[n+1]=f;e[n]=f[c[l[5]]];elseif n>19 then e[l[2]]=h[c[l[3]]];else local n=l[2];local c={};local o=0;local a=n+l[3]-1;for l=n+1,a do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,a-n))};local l=n+l[5]-2;o=0;for l=n,l do o=o+1;e[l]=c[o];end;t=l;end;elseif n<=21 then e[l[2]]=c[l[3]];elseif n>22 then do return end;else local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[c[l[5]]];end;o=o+1;end;end;end;return C(J(),{},B())();