In Plain Sight 2 | GodMode

--[[
	Made by Megumu/Mommy Mango
	<3
]]

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