Critical Adventure | GodMode

return(function(f,I,e)local l=table.insert;local t=string.sub;local H=string.char;local A=table.concat;local d=unpack or table.unpack;local r=tonumber;local l=setmetatable;local h=string.byte;local N=getfenv or function()return _ENV end;local s=select;local i={}for l=0,255 do i[l]=H(l)end;local function J(a)local e,n,o=e,e,{}local c=256;local l=1;local function d()local e=r(t(a,l,l),36)l=l+1;local n=r(t(a,l,l+e-1),36)l=l+e;return n end;e=H(d())o[1]=e;while l<#a do local l=d()if i[l]then n=i[l]else n=e..t(e,1,1)end;i[c]=e..t(n,1,1)o[#o+1],e,c=n,n,c+1 end;return A(o)end;local H=J('1N1J1N1N1O2761N23423622R22T23A22O23E27C23A22R23A23923F23627427923423A27H1N1P27923E23A23G23622022O22T23I22R23627L27N1N1I27922V23823A23F23F1N1T27922022023D27S23628D28F1N1S27923D23622O23823823F23C22S22Q22T27O28I27628Z23A23722S27D23I23D2341N24T1M27621J29J21J28Z28P21J23C23F23721J21621J21L29V1T29K21J29322R29223D21J23522Q23D23822R23I23C23D21R22S23623F23521N29U29V21Q29X29Y29K29M28E29L2362A329T2AE27N2A821R21H21G21H2AI29V21L2AL2AN2AO23C29N22V23A23823G29S21J2302B322Y2AM2B62AP23F21J23A22T23422S2BE2302BI2B629J23523C22T21J23I21621221N27N2A323723C2BJ2BV29J2BO2BQ22423I2222BE2BA2BC2CE2222C929Y2AS2371T2CM2B729N27H22R23J23C29R29T27B22R28M27H28P23F2CU2CW23721R2B52BV23I23521J2D62CX29S29T21H22923I29321W23622T22P2DO21H2BN23D29R22R29029B29D2AD2AF23521Q2DH21J21H22B27S23A27B2DS23A2DU21J2DW29A2832DZ2CC22S2242122222E32162CZ28N21L21Z23F23A2322DO22S21L22J2B828E2ET2EV2DO21L22H28N2EE23J2AS2CR2B62A02A22FC21J2CO2FG2FE22T2A329P2D82AV2AH2AJ2B42C92FI1N29H2791L2762951N2972992DY29E27527627R27T1G27922N22R22R22V22827C1N21I27923J2GD22V22S21921K21K2BA29A23623929C21L23823C23E21K27E22O21K22P22L2341X21W23A21B22O2792761U27915151N2442232762FW1N2HI2HJ22329H2FY29I2762HK29H29H1K2HO2HV2232HZ2G62HD2HK2752HN2792HW27P2HD2HQ2HD2HT2I12HM2FV2I52HL2II276142HG2IG2IL2I02HQ2HS2IC2ID1N2FY2FY2HP2IA2HZ2IC2HK2IF2J22HR2IW2II2IZ2J62I41L28I2J32IU1Q2IS2J729H21J2I12HN28A2J92FY1H2IO2HQ2HZ2GA2762J92751V2IU2HK2HZ2IX2IJ2I72JZ2I22IB2IJ2IF2FY172IP28A2HT2JK2HK2IH276');local a=(bit or bit32)and(bit or bit32).bxor or function(l,e)local n,o=1,0 while l>0 and e>0 do local c,a=l%2,e%2 if c~=a then o=o+n end l,e,n=(l-c)/2,(e-a)/2,n*2 end if l<e then l=e end while l>0 do local e=l%2 if e>0 then o=o+n end l,n=(l-e)/2,n*2 end return o end local function o(n,l,e)if e then local l=(n/2^(l-1))%2^((e-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(n%(l+l)>=l)and 1 or 0;end;end;local l=1;local function n()local c,o,e,n=h(H,l,l+3);c=a(c,23)o=a(o,23)e=a(e,23)n=a(n,23)l=l+f;return(n*16777216)+(e*I)+(o*256)+c;end;local function c()local n,e=h(H,l,l+2);n=a(n,23)e=a(e,23)l=l+2;return(e*256)+n;end;local function r()local e=a(h(H,l,l),23);l=l+1;return e;end;local function C(...)return{...},s('#',...)end local function A()local e={};local s={};local u={};local J={[1]=nil,[3]=e,[f]=s,[6]=u,[7]=nil,};local e={}local d={}for f=1,r()==0 and c()*2 or n()do local e=r();while true do if(e==2)then local n,l=n(),n();local a,n,l,o=1,(o(l,1,20)*(2^32))+n,o(l,21,31),((-1)^o(l,32));if l==0 then if n==0 then e=o*0 break;else l=1;a=0;end;elseif(l==2047)then e=(o*((n==0 and 1 or 0)/0))break;end;e=(o*(2^(l-1023)))*(a+(n/(2^52)));break;end if(e==3)then e=(r()~=0);break;end if(e==0)then local n,c,o='',n();if(c==0)then e=n;break;end;o=t(H,l,l+c-1);l=l+c;for l=1,#o do n=n..i[a(h(t(o,l,l)),23)]end e=n break;end e=nil break;end d[f]=e;end;J[7]=r();for l=1,n()do u[l-1]=A();end;for h=1,n()do local l=r();if(o(l,1,1)==0)then local e=o(l,2,3);local t,i,r=c(),c(),c();local a=o(l,f,6);local l={}local l={[3]=nil,[5]=r,[1]=t,[2]=i,};if(e==2)then l[2]=n()-I end if(e==1)then l[2]=n()end if(e==0)then l[2],l[3]=c(),c()end if(e==3)then l[2],l[3]=n()-I,c()end if(o(a,3,3)==1)then l[3]=d[l[3]]end if(o(a,1,1)==1)then l[5]=d[l[5]]end if(o(a,2,2)==1)then l[2]=d[l[2]]end s[h]=l;end end;return J;end;local function h(l,e,t)local e=l[f];local n=l[1];local A=0;local i=l[6];local n={}local l=l[7];return function(...)local c=-1;local J={};local o=l;local H=s('#',...)-1;local a=e;local n=1;local l={};local r=i;local i=C local I={...};local e={};for l=0,H do if(l>=o)then J[l-o]=I[l+1];else e[l]=I[l+1];end;end;local l=H-o+1 local o;local l;while true do l=a[n];o=l[1];if A>0 then e[l[5]]=l[2];end if o<=15 then if o<=7 then if o<=3 then if o<=1 then if o>0 then e[l[5]]=(l[2]~=0);else local o;e[l[5]]=t[l[2]];n=n+1;l=a[n];e[l[5]]=t[l[2]];n=n+1;l=a[n];o=l[5]e[o]=e[o](e[o+1])n=n+1;l=a[n];e[l[5]]=t[l[2]];n=n+1;l=a[n];e[l[5]]=e[l[2]];n=n+1;l=a[n];o=l[5]e[o](e[o+1])n=n+1;l=a[n];e[l[5]]=t[l[2]];end;elseif o==2 then e[l[5]]=l[2];else e[l[5]]=e[l[2]];end;elseif o<=5 then if o>f then local l=l[5]e[l](e[l+1])else local n=l[5];local o=e[l[2]];e[n+1]=o;e[n]=o[l[3]];end;elseif o==6 then e[l[5]][l[2]]=e[l[3]];else local l=l[5]e[l]=e[l](e[l+1])end;elseif o<=11 then if o<=9 then if o==8 then local l=l[5]e[l]=e[l](d(e,l+1,c))else local l=l[5]e[l]=e[l](d(e,l+1,c))end;elseif o==10 then e[l[5]]=h(r[l[2]],nil,t);else e[l[5]]();end;elseif o<=13 then if o==12 then local l=l[5]e[l]=e[l](e[l+1])else local f;local r,h;local o;o=l[5]e[o](e[o+1])n=n+1;l=a[n];e[l[5]]=e[l[2]][l[3]];n=n+1;l=a[n];e[l[5]]=t[l[2]];n=n+1;l=a[n];e[l[5]]=t[l[2]];n=n+1;l=a[n];e[l[5]]=l[2];n=n+1;l=a[n];o=l[5]e[o]=e[o](e[o+1])n=n+1;l=a[n];e[l[5]]=e[l[2]];n=n+1;l=a[n];o=l[5]r,h=i(e[o](e[o+1]))c=h+o-1 f=0;for l=o,c do f=f+1;e[l]=r[f];end;n=n+1;l=a[n];o=l[5]e[o]=e[o](d(e,o+1,c))n=n+1;l=a[n];e[l[5]][l[2]]=e[l[3]];end;elseif o>14 then e[l[5]][l[2]]=e[l[3]];else e[l[5]]=e[l[2]];end;elseif o<=23 then if o<=19 then if o<=17 then if o>16 then e[l[5]]=e[l[2]][l[3]];else e[l[5]]=h(r[l[2]],nil,t);end;elseif o>18 then local l=l[5]local o,n=i(e[l](e[l+1]))c=n+l-1 local n=0;for l=l,c do n=n+1;e[l]=o[n];end;else local f;local h,H;local r;local o;e[l[5]]=t[l[2]];n=n+1;l=a[n];e[l[5]]=t[l[2]];n=n+1;l=a[n];o=l[5];r=e[l[2]];e[o+1]=r;e[o]=r[l[3]];n=n+1;l=a[n];e[l[5]]=l[2];n=n+1;l=a[n];e[l[5]]=(l[2]~=0);n=n+1;l=a[n];o=l[5]h,H=i(e[o](d(e,o+1,l[2])))c=H+o-1 f=0;for l=o,c do f=f+1;e[l]=h[f];end;n=n+1;l=a[n];o=l[5]e[o]=e[o](d(e,o+1,c))n=n+1;l=a[n];e[l[5]]();n=n+1;l=a[n];do return end;end;elseif o<=21 then if o>20 then local n=l[5]local o,l=i(e[n](d(e,n+1,l[2])))c=l+n-1 local l=0;for n=n,c do l=l+1;e[n]=o[l];end;else e[l[5]]=e[l[2]][l[3]];end;elseif o>22 then e[l[5]]=l[2];else e[l[5]]=t[l[2]];end;elseif o<=27 then if o<=25 then if o>24 then local l=l[5]local o,n=i(e[l](e[l+1]))c=n+l-1 local n=0;for l=l,c do n=n+1;e[l]=o[n];end;else local l=l[5]e[l](e[l+1])end;elseif o==26 then e[l[5]]();else local o=l[5];local n=e[l[2]];e[o+1]=n;e[o]=n[l[3]];end;elseif o<=29 then if o>28 then e[l[5]]=(l[2]~=0);else do return end;end;elseif o<=30 then local n=l[5]local o,l=i(e[n](d(e,n+1,l[2])))c=l+n-1 local l=0;for n=n,c do l=l+1;e[n]=o[l];end;elseif o>31 then do return end;else e[l[5]]=t[l[2]];end;n=n+1;end;end;end;return d({h(A(),{},N())()})or nil;end)(4,65536,"")