SoulShatters Test Place | GodMode

--[[
	Made by Megumu
	<3
]]

local t=string.byte;local f=string.char;local c=string.sub;local s=table.concat;local u=math.ldexp;local H=getfenv or function()return _ENV end;local A=setmetatable;local B=select;local h=unpack;local i=tonumber;local function T(t)local e,o,n="","",{}local d=256;local a={}for l=0,d-1 do a[l]=f(l)end;local l=1;local function r()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=f(r())n[1]=e;while l<#t do local l=r()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 a=T('22P22T27522U2742751214181022U22Q27522T21H19141S101N1M22U23227G2151A16141927I27K27M22U22O27G1L27U191922T22S27G27F27623027G2121D141N14161H27Z27822T1X141H1422U23127G2131927T1E1C1B1228028D28W1B27D22X27G21H1A1C1M1A1B28O18141227D28A28N101M1H1N1A1S22U22R29828G101B1H27G27523B27G2812752642A222T23922T25R2A621X2A927G28822D2AD27522S2312112A928T2872392AC25R2A822T22W27H2AH2AT2392AL2AR27522W2AP2A92AS28C2AG2AA27523023H152A923H2B92392A82B022T28C21H2AW2BA2BC25R2BE2BJ2BG2B42AI22L27525R2BV2AT2BY2BX27522O2AN25R2AN2AN22T22P23124524A2C52C222T2AC25I2A62AG2CH27G21X2CB25R2AC22T22Z24D23E22T25F24D24A1Q2A322T25D2AE2BS25H2AS2C32752652AN');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(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 a,c,l,o=t(a,e,e+3);a=n(a,101)c=n(c,101)l=n(l,101)o=n(o,101)e=e+4;return(o*16777216)+(l*65536)+(c*256)+a;end;local function d()local l=n(t(a,e,e),101);e=e+1;return l;end;local function G()local e=o();local o=o();local c=1;local n=(l(o,1,20)*(2^32))+e;local e=l(o,21,31);local l=((-1)^l(o,32));if(e==0)then if(n==0)then return l*0;else e=1;c=0;end;elseif(e==2047)then return(n==0)and(l*(1/0))or(l*(0/0));end;return u(l,e-1023)*(c+(n/(2^52)));end;local r=o;local function i(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]=f(n(t(c(o,l,l)),101))end return s(e);end;local e=o;local function r(...)return{...},B('#',...)end local function T()local f={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};for o=1,e do local e=d();local l;if(e==2)then l=(d()~=0);elseif(e==0)then l=G();elseif(e==3)then l=i();end;c[o]=l;end;a[2]=c a[4]=d();for l=1,o()do t[l-1]=T();end;for a=1,o()do local c=n(o(),5);local o=n(o(),170);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;return a;end;local function s(l,u,t)local n=l[1];local e=l[2];local o=l[3];local l=l[4];return function(...)local a=n;local d=e;local T=o;local n=l;local l=r local o=1;local i=-1;local G={};local f={...};local r=B('#',...)-1;local c={};local e={};for l=0,r do if(l>=n)then G[l-n]=f[l+1];else e[l]=f[l+1];end;end;local l=r-n+1 local l;local n;while true do l=a[o];n=l[1];if n<=9 then if n<=4 then if n<=1 then if n>0 then e[l[2]][d[l[3]]]=e[l[5]];else e[l[2]]=t[d[l[3]]];end;elseif n<=2 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](h(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;i=l;elseif n>3 then local o=l[2];local n=e[l[3]];e[o+1]=n;e[o]=n[d[l[5]]];else e[l[2]]=u[l[3]];end;elseif n<=6 then if n==5 then e[l[2]]=u[l[3]];else e[l[2]][d[l[3]]]=e[l[5]];end;elseif n<=7 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](h(c,1,l-o));i=o;elseif n==8 then e[l[2]]=e[l[3]][d[l[5]]];else e[l[2]]=e[l[3]][d[l[5]]];end;elseif n<=14 then if n<=11 then if n>10 then do return end;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](h(c,1,l-o));i=o;end;elseif n<=12 then local r=T[l[3]];local f;local n={};f=A({},{__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 d=1,l[5]do o=o+1;local l=a[o];if l[1]==14 then n[d-1]={e,l[3]};else n[d-1]={u,l[3]};end;c[#c+1]=n;end;e[l[2]]=s(r,f,t);elseif n==13 then e[l[2]]=t[d[l[3]]];else e[l[2]]=e[l[3]];end;elseif n<=16 then if n>15 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](h(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;i=l;else local r=T[l[3]];local f;local n={};f=A({},{__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 d=1,l[5]do o=o+1;local l=a[o];if l[1]==14 then n[d-1]={e,l[3]};else n[d-1]={u,l[3]};end;c[#c+1]=n;end;e[l[2]]=s(r,f,t);end;elseif n<=17 then local o=l[2];local n=e[l[3]];e[o+1]=n;e[o]=n[d[l[5]]];elseif n==18 then do return end;else local A;local t;local c;local r;local f;local n;e[l[2]]=u[l[3]];o=o+1;l=a[o];e[l[2]]=e[l[3]][d[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][d[l[5]]];o=o+1;l=a[o];e[l[2]]=e[l[3]][d[l[5]]];o=o+1;l=a[o];n=l[2];f=e[l[3]];e[n+1]=f;e[n]=f[d[l[5]]];o=o+1;l=a[o];n=l[2];r={};c=0;t=n+l[3]-1;for l=n+1,t do c=c+1;r[c]=e[l];end;A={e[n](h(r,1,t-n))};t=n+l[5]-2;c=0;for l=n,t do c=c+1;e[l]=A[c];end;i=t;o=o+1;l=a[o];e[l[2]]=e[l[3]][d[l[5]]];o=o+1;l=a[o];n=l[2];f=e[l[3]];e[n+1]=f;e[n]=f[d[l[5]]];o=o+1;l=a[o];n=l[2];r={};c=0;t=n+l[3]-1;for l=n+1,t do c=c+1;r[c]=e[l];end;A={e[n](h(r,1,t-n))};t=n+l[5]-2;c=0;for l=n,t do c=c+1;e[l]=A[c];end;i=t;o=o+1;l=a[o];e[l[2]]=e[l[3]][d[l[5]]];o=o+1;l=a[o];n=l[2];f=e[l[3]];e[n+1]=f;e[n]=f[d[l[5]]];o=o+1;l=a[o];n=l[2];r={};c=0;t=n+l[3]-1;for l=n+1,t do c=c+1;r[c]=e[l];end;e[n](h(r,1,t-n));i=n;o=o+1;l=a[o];e[l[2]]=e[l[3]][d[l[5]]];o=o+1;l=a[o];n=l[2];f=e[l[3]];e[n+1]=f;e[n]=f[d[l[5]]];o=o+1;l=a[o];n=l[2];r={};c=0;t=n+l[3]-1;for l=n+1,t do c=c+1;r[c]=e[l];end;e[n](h(r,1,t-n));i=n;o=o+1;l=a[o];e[l[2]][d[l[3]]]=e[l[5]];o=o+1;l=a[o];e[l[2]][d[l[3]]]=e[l[5]];o=o+1;l=a[o];do return end;end;o=o+1;end;end;end;return s(T(),{},H())();