Ro-Piece | Collect Treasure

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

local t=string.byte;local f=string.char;local c=string.sub;local C=table.concat;local E=math.ldexp;local u=getfenv or function()return _ENV end;local l=setmetatable;local h=select;local i=unpack;local r=tonumber;local function s(t)local e,o,a="","",{}local d=256;local n={}for l=0,d-1 do n[l]=f(l)end;local l=1;local function i()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=f(i())a[1]=e;while l<#t do local l=i()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=s('1G1P2751P1S27623E23923423E23627727622X23C23422Z22Y1P27427523223A22Z23622Y27H23E23G1P1H27623122Z23G23C22Y2302811P1I27622M23G23122I23523423923H28123B1P1N27622N23423B23H28N27K28C28E28G1P1K27622I27B27D22L28B23G23E23127Q1P1J28Y28U23H22G23H23H23G23H1P1U28Y23A23B23B2942311P1R2762992761827623J27J29429023629F23129O29728L27527A27C23621Y2A22A422Z1O27627626H2121P1T27623I23C23827W29J27522123923C22O23G27K28727622D23A23E23C2392AT2AV2AX2AK27622A2A91P1927622221Z21T21L21R21L22122Z23A29621L22E22F22D21S2B927O27I2312AF2AG1P25L2122BZ275132762171H26H26E22D27Y1P21521L27521Z2CG249218112CA22C111P2492C82CA2CC2752AJ27521T276216192BE21Y2BE1P2182412CN2412CQ217192CT2D421521D2CH2DG2CK21L2CN2CJ2DB2DD2CV2762CY2751Z2CM26E2232CP1P216112D22DX2182292CN2292DA2DK2CB2CG2DY1H2211P2202CD2161H23D1P21Z2EG1H22X2EK2CD1Z22H2CA21Z22H2752DZ2BE21Z2DX2172E426E21Z2E61P2132212ET2ED2DY2D12EK2D42182CA26E22C2CA22U21A2CD22G2CD2AL2762FP1P2322BX28K28M28O28Q27J22Y28T28F29H28X27528Z2A92922A32952972782A72A02C41P1L2C72C92CB2EM2BE22M2EG1P2CG21Z2762DT2ET2DX2DZ2GQ2DX21525T1M2EK25T26E22U21826126E2FH2H722U2172E822D2EA2AJ2151P2EV2EW2FC2D32752FL2752FN2HN2FM2CD2C627521B1P2CA22A27621B2GJ22T2CD21B2DC2F32D42172DU2EZ2EW1H2EV2EL2IC2ED2IF2FB2CH2D421A2HI2EK2762181X2ET1X2CQ21M21L2EJ2272EA21F2IR2DV2IT1P21M112CG22N2DX21L2DX2IB2CK2I622C2BE24921N2GJ2CU1P21I21L2EO22H2EA21M2HL2IL2GP1P21W2IP24X2H822C2JY22U21B2DU22D2DX2IM2EV2HJ1P2IM2492IN2HN1P23T1P2272762132GJ22A2CD21A2E01P21Y2K62HS275');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 e(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 l=1;local function o()local a,e,o,c=t(a,l,l+3);a=n(a,25)e=n(e,25)o=n(o,25)c=n(c,25)l=l+4;return(c*16777216)+(o*65536)+(e*256)+a;end;local function d()local e=n(t(a,l,l),25);l=l+1;return e;end;local function P()local l=o();local n=o();local c=1;local o=(e(n,1,20)*(2^32))+l;local l=e(n,21,31);local e=((-1)^e(n,32));if(l==0)then if(o==0)then return e*0;else l=1;c=0;end;elseif(l==2047)then return(o==0)and(e*(1/0))or(e*(0/0));end;return E(e,l-1023)*(c+(o/(2^52)));end;local r=o;local function s(e)local o;if(not e)then e=r();if(e==0)then return'';end;end;o=c(a,l,l+e-1);l=l+e;local e={}for l=1,#o do e[l]=f(n(t(c(o,l,l)),25))end return C(e);end;local l=o;local function C(...)return{...},h('#',...)end local function D()local t={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 c={0,0};local l={};local a={t,nil,c,nil,l};local l=o()local f={0,0,0,0,0,0,0,0,0,0};for o=1,l do local e=d();local l;if(e==3)then l=(d()~=0);elseif(e==1)then l=P();elseif(e==0)then l=s();end;f[o]=l;end;a[2]=f a[4]=d();for l=1,o()do c[l-1]=D();end;for a=1,o()do local c=n(o(),55);local o=n(o(),94);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;t[a]=l;end;return a;end;local function s(l,e,r)local e=l[1];local n=l[2];local o=l[3];local l=l[4];return function(...)local d=e;local c=n;local D=o;local n=l;local E=C local o=1;local a=-1;local C={};local f={...};local t=h('#',...)-1;local l={};local e={};for l=0,t do if(l>=n)then C[l-n]=f[l+1];else e[l]=f[l+1];end;end;local l=t-n+1 local l;local n;while true do l=d[o];n=l[1];if n<=16 then if n<=7 then if n<=3 then if n<=1 then if n==0 then if e[l[2]]then o=o+1;else o=o+l[3];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](i(c,1,l-o));a=o;end;elseif n==2 then if e[l[2]]then o=o+1;else o=o+l[3];end;else local n=l[2];local c=l[5];local l=n+2;local a={e[n](e[n+1],e[l])};for o=1,c do e[l+o]=a[o];end;local n=e[n+3];if n then e[l]=n else o=o+1;end;end;elseif n<=5 then if n>4 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](i(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 o=o+l[3];end;elseif n==6 then e[l[2]]=e[l[3]];else local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=E(e[n](i(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;a=l;end;elseif n<=11 then if n<=9 then if n==8 then local n=l[2];local o=e[l[3]];e[n+1]=o;e[n]=o[c[l[5]]];else e[l[2]]=r[c[l[3]]];end;elseif n==10 then local n=l[2];local c={};local o=0;local d=a;for l=n+1,d do o=o+1;c[o]=e[l];end;local c={e[n](i(c,1,d-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;elseif n<=13 then if n==12 then e[l[2]]=c[l[3]];else local o=l[2];local n=e[l[3]];e[o+1]=n;e[o]=n[c[l[5]]];end;elseif n<=14 then e[l[2]]();a=A;elseif n>15 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));a=o;else local f;local t;local h;local C;local n;e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=d[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=d[o];n=l[2];C=e[l[3]];e[n+1]=C;e[n]=C[c[l[5]]];o=o+1;l=d[o];e[l[2]]=c[l[3]];o=o+1;l=d[o];n=l[2];h={};t=0;f=n+l[3]-1;for l=n+1,f do t=t+1;h[t]=e[l];end;e[n](i(h,1,f-n));a=n;o=o+1;l=d[o];e[l[2]]=r[c[l[3]]];o=o+1;l=d[o];e[l[2]]=c[l[3]];o=o+1;l=d[o];n=l[2];h={};t=0;f=n+l[3]-1;for l=n+1,f do t=t+1;h[t]=e[l];end;e[n](i(h,1,f-n));a=n;end;elseif n<=25 then if n<=20 then if n<=18 then if n==17 then r[c[l[3]]]=e[l[2]];else e[l[2]]=r[c[l[3]]];end;elseif n>19 then e[l[2]]();a=A;else o=o+l[3];end;elseif n<=22 then if n==21 then e[l[2]]=s(D[l[3]],nil,r);else do return end;end;elseif n<=23 then local n=l[2];local c=l[5];local l=n+2;local a={e[n](e[n+1],e[l])};for o=1,c do e[l+o]=a[o];end;local n=e[n+3];if n then e[l]=n else o=o+1;end;elseif n>24 then local C;local f;local t;local r;local h;local n;e[l[2]]();a=n;o=o+1;l=d[o];n=l[2];h=e[l[3]];e[n+1]=h;e[n]=h[c[l[5]]];o=o+1;l=d[o];e[l[2]]=c[l[3]];o=o+1;l=d[o];n=l[2];r={};t=0;f=n+l[3]-1;for l=n+1,f do t=t+1;r[t]=e[l];end;C={e[n](i(r,1,f-n))};f=n+l[5]-2;t=0;for l=n,f do t=t+1;e[l]=C[t];end;a=f;o=o+1;l=d[o];if e[l[2]]then o=o+1;else o=o+l[3];end;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](i(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 n<=29 then if n<=27 then if n==26 then local n=l[2];local c={};local o=0;local l=n+l[3]-1;for l=n+1,l do o=o+1;c[o]=e[l];end;local c,l=E(e[n](i(c,1,l-n)));l=l+n-1;o=0;for l=n,l do o=o+1;e[l]=c[o];end;a=l;else e[l[2]]=s(D[l[3]],nil,r);end;elseif n==28 then r[c[l[3]]]=e[l[2]];else e[l[2]]=e[l[3]][c[l[5]]];end;elseif n<=31 then if n==30 then e[l[2]]=e[l[3]][c[l[5]]];else do return end;end;elseif n<=32 then e[l[2]]=e[l[3]];elseif n>33 then local n;local C,n;local f;local n;local h;local s;local t;r[c[l[3]]]=e[l[2]];o=o+1;l=d[o];e[l[2]]=r[c[l[3]]];o=o+1;l=d[o];e[l[2]]=r[c[l[3]]];o=o+1;l=d[o];e[l[2]]=e[l[3]][c[l[5]]];o=o+1;l=d[o];t=l[2];s=e[l[3]];e[t+1]=s;e[t]=s[c[l[5]]];o=o+1;l=d[o];t=l[2];h={};n=0;f=t+l[3]-1;for l=t+1,f do n=n+1;h[n]=e[l];end;C,f=E(e[t](i(h,1,f-t)));f=f+t-1;n=0;for l=t,f do n=n+1;e[l]=C[n];end;a=f;o=o+1;l=d[o];t=l[2];h={};n=0;f=a;for l=t+1,f do n=n+1;h[n]=e[l];end;C={e[t](i(h,1,f-t))};f=t+l[5]-2;n=0;for l=t,f do n=n+1;e[l]=C[n];end;a=f;o=o+1;l=d[o];o=o+l[3];else local n=l[2];local d={};local o=0;local c=a;for l=n+1,c do o=o+1;d[o]=e[l];end;local c={e[n](i(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;o=o+1;end;end;end;return s(D(),{},u())();