dfedwd- for Sharing Code and Text.

LUA 91

dfedwd

Guest on 3rd February 2023 03:40:33 PM

([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _nmKRhmgQjKdR = a; end)); return(function(u,...)local c;local d;local o;local a;local _;local t;local e=24915;local n=0;local l={};while n<351 do n=n+1;while n<0x23b and e%0x824<0x412 do n=n+1 e=(e+833)%45724 local h=n+e if(e%0x25e4)>0x12f2 then e=(e*0x3d5)%0xca6 while n<0x6d and e%0x44ca<0x2265 do n=n+1 e=(e-175)%11584 local t=n+e if(e%0x3fdc)<0x1fee then e=(e+0x2a7)%0x4e53 local e=74815 if not l[e]then l[e]=0x1 o=getfenv and getfenv();end elseif e%2~=0 then e=(e+0x22d)%0x755b local e=65482 if not l[e]then l[e]=0x1 _=tonumber;end else e=(e-0x8e)%0x5c68 n=n+1 local e=10073 if not l[e]then l[e]=0x1 o=(not o)and _ENV or o;end end end elseif e%2~=0 then e=(e*0x1f)%0x5ba1 while n<0x398 and e%0x116c<0x8b6 do n=n+1 e=(e+781)%6193 local o=n+e if(e%0x29a4)>0x14d2 then e=(e-0x390)%0x418f local e=10049 if not l[e]then l[e]=0x1 a=string;end elseif e%2~=0 then e=(e-0x26)%0x8666 local e=55169 if not l[e]then l[e]=0x1 d={};end else e=(e-0x77)%0x96b0 n=n+1 local e=38165 if not l[e]then l[e]=0x1 end end end else e=(e-0x166)%0xc1ac n=n+1 while n<0x2b2 and e%0x1ffe<0xfff do n=n+1 e=(e-509)%48774 local h=n+e if(e%0x28e4)>=0x1472 then e=(e+0x351)%0x5c92 local e=89431 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x162)%0xb86c local e=52448 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\99\98\119\84\102\75\86\104\0\6\115\116\114\105\110\103\4\99\104\97\114\101\107\98\103\90\72\120\111\0\6\115\116\114\105\110\103\3\115\117\98\66\84\77\67\112\70\71\79\0\6\115\116\114\105\110\103\4\98\121\116\101\69\105\107\103\110\122\66\81\0\5\116\97\98\108\101\6\99\111\110\99\97\116\105\73\101\102\68\104\90\106\0\5\116\97\98\108\101\6\105\110\115\101\114\116\121\118\107\106\72\66\111\73\5";end else e=(e-0xe6)%0xa08a n=n+1 local e=40037 if not l[e]then l[e]=0x1 t=function(t)local e=0x01 local function l(n)e=e+n return t:sub(e-n,e-0x01)end while true do local n=l(0x01)if(n=="\5")then break end local e=a.byte(l(0x01))local e=l(e)if n=="\2"then e=d.cbwTfKVh(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then o[e]=function(n,e)return u(8,nil,u,e,n)end elseif n=="\4"then e=o[e]elseif n=="\0"then e=o[e][l(a.byte(l(0x01)))];end local n=l(0x08)d[n]=e end end end end end end end e=(e+978)%14236 end t(c);local n={};for e=0x0,0xff do local l=d.ekbgZHxo(e);n[e]=l;n[l]=e;end local function r(e)return n[e];end local a=(function(h,t)local c,l=0x01,0x10 local n={{},{},{}}local o=-0x01 local e=0x01 local a=h while true do n[0x03][d.BTMCpFGO(t,e,(function()e=c+e return e-0x01 end)())]=(function()o=o+0x01 return o end)()if o==(0x0f)then o=""l=0x000 break end end local o=#t while e<o+0x01 do n[0x02][l]=d.BTMCpFGO(t,e,(function()e=c+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 d.yvkjHBoI(n[0x01],(r((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+a)%0x100)));a=h+a;end end return d.iIefDhZj(n[0x01])end);t(a(164,"(_GRKJ.72W1Xdn)B._"));t(a(43,"Ih:4AKz_x=j.,63;6K.F;:,x=.z_Ahd;xh.z=,z=Ah j3h=,=_K4433x63K::xzx4*R434.xxAAj4,3_6Aj;z.4j,jj434.jxzzH4.366,._z,4.<,3,6jAAh;zh4_Rj6z.+_3;h:3;_6;j4_6AMD_346.j._,A,;3=:z.j=_:Kj:4=K6h=3_AK,:=3hj,xj_=Khhx6x.H4jh_K4hj;3,,==_64;:_3=.;=3z,A;:.,3.;=:A.:j;,xxz(xAzx4.:h;h,=K;zo:uh6;4,___K=hjj6x:,jx=zzAz;;3Ajz=6z3h,;.3}Kh:K4:h6h..3,h_Kz;4=G._jK4=AzA46h43z.:x,Kj4336,h=4xDK:?j3h_wAjx3KZ:z)K64A=x6K.4:;x,;j,x::;:;;=.6=B_=4x,:==66j.x:Axh;;,,xx:_3Kl:;;_6..hh:3x:x;;,.jKx2:3;6?:j.j.A6:x:hx6zAjzz6A=h_3j6u=_z;4Ak4;jjh_._x6=.:;w.=jhzj6,h:36,K=j_::6h4;zjz_xA::=hcx:"));local e=(-11769+(function()local l,n=0,1;(function(e,n)e(e(n,n),n(e,e))end)(function(o,e)if l>137 then return e end l=l+1 n=(n+721)%18598 if(n%1006)<503 then return e(e(e,o),e(e,e))else return e end return o end,function(e,o)if l>426 then return o end l=l+1 n=(n-943)%11486 if(n%1146)<573 then return e(o(e,e),o(e,e)and e(e,e))else return o end return o end)return n;end)())local ee=(getfenv)or(function()return _ENV end);local f=d.bGnkuhwx or d.lDodSQeO;local y=1;local o=3;local h=4;local t=2;local function z(s,...)local c=a(e,"J}PM%cIp0ogh_UaeMP%apco__IP}}}M0ceUg}cMUIa%PgeUo,MPMwc0Mo%_Ug}}0%}Ico}go_a=I}a%%PpgchaemqhagMa0pgaU%a }oMaPPpe0MopSiMaq_cooe_caUP}MpIo%p0%ghUPeoag}oMcc_0Maa%IcgI_gpUhUolp%}IP0%cg0hgc__eMpogeUcUgk0%cp}oPgMaMahPh%6}0hcIM0gh}%2pMoghUapUce}}0p%gFU}a0}h%cca%eghUa9Ma_%cphoh00ep6_M1cU0hhPUc{%ap}?MIIM00hNUcD}PP%hpco__PaI}#M}ch0cg0UIeMcg0goU_eeMaMPU%cpogaaPe}e0%yIM0cgeahPMPMcIcIocUcUa;}Popec_0IUpe_MWMa0IoPghe}}pnephoPhp_%a_eg%%phg%UIaaPP}g%coP_lg%akP_PgIoogU}h%P%}MpPo0%gpcoch_aMcPgc__aeaUMPI0}a%oIoo&hpMcIg0aohao}5MMePP-MUI%0h}a%0I}0h_}aouaP_c0p0MhIM0IgUU%IP0MhIUcog_Iacu_MMgee%>U%}%%pah}UrocUPa^ZpPagPah}PM0%%pUgP_calP0%UIhophpagaIPacbppoe_e_oPM%gIePp00pPoo_r%e0Pgo__eIa%QQPpo}gpa%_PPP%hpUo0__a4}gMec00_g%UpeUPg%PpPoe0<U_ZeM%}UcUoUUcaae0MoI_0hgWap_g}PM_I0II_haI}c%}PoIegUaI_%PocoI_MPIU0=gp_aecM}%MIgo}hoUeZIPUII0hgP_oeOP}MaIc0__caM*}P0%epooU_%ahM0%%I20pgaUhe_P%%gpPo0_Me0WUM%ch00goU}epPPcpI_oMhga030M>cIpUg%_heP}o%}Ip0ahcaajaPgc}p0g}_IaU}%%Upc0oh4Up:pPc%_pMg_Uca0-eMII}0%ghUP:hPI%pIaoc_PaM^gM}Ig0_gI_Ue%PP%PIoo+_oaaxcPUcM0Pg}_0aeMI%aI%0_hPUgR5P_%a0phP_MaU}}%Mce0IgUU%moPP%Up4o0haac*_MMch0}go_eeg}U%%IhoP_ca8mpPaccp_gc_ge}McMeII0UhcUhbMPocE0Ioa_ca_}%MgI}00geUIeUP%");local n=0;d.cTqG_eLF(function()d.XhUwsLVf()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,r=u(0,u,e,c,d.EikgnzBQ);local function a()local l,n=d.EikgnzBQ(c,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local g=true;local g=0 local function b()local e=n();local n=n();local t=1;local o=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local n=((-1)^l(n,32));if(e==0)then if(o==g)then return n*0;else e=1;t=0;end;elseif(e==2047)then return(o==0)and(n*(1/0))or(n*(0/0));end;return d.SIRloaLO(n,e-1023)*(t+(o/(2^52)));end;local p=n;local function j(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=d.BTMCpFGO(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+g),#l do e=e..d.BTMCpFGO(l,n,n)end return e;end;local g=#d.vPOLdaDF(_('\49.\48'))~=1 local e=n;local function z(...)return{...},d.fiYSuGLt('#',...)end local function k()local u={};local f={};local e={};local _={u,f,nil,e};local e=n()local c={}for o=1,e do local l=r();local n;if(l==1)then n=(r()~=#{});elseif(l==2)then local e=b();if g and d.VHOrmidA(d.vPOLdaDF(e),'.(\48+)$')then e=d.XiwRODVh(e);end n=e;elseif(l==3)then n=j();end;c[o]=n;end;_[3]=r();for f=1,n()do local e=r();if(l(e,1,1)==0)then local d=l(e,2,3);local r=l(e,4,6);local e={a(),a(),nil,nil};if(d==0)then e[o]=a();e[h]=a();elseif(d==#{1})then e[o]=n();elseif(d==s[2])then e[o]=n()-(2^16)elseif(d==s[3])then e[o]=n()-(2^16)e[h]=a();end;if(l(r,1,1)==1)then e[t]=c[e[t]]end if(l(r,2,2)==1)then e[o]=c[e[o]]end if(l(r,3,3)==1)then e[h]=c[e[h]]end u[f]=e;end end;for e=1,n()do f[e-(#{1})]=k();end;return _;end;local function m(l,n,e)local o=n;local o=e;return _(d.VHOrmidA(d.VHOrmidA(({d.cTqG_eLF(l)})[2],n),e))end local function ne(g,e,c)local function ee(...)local a,m,s,k,_,n,r,b,p,j,ee,l;local e=0;while-1<e do if 2>=e then if 0<e then if e>=-2 then repeat if 2~=e then s=u(6,54,3,56,g);_=z k=0;break;end;n=-41;r=-1;until true;else s=u(6,54,3,56,g);_=z k=0;end else a=u(6,67,1,52,g);m=u(6,56,2,52,g);end else if 5<=e then if e==6 then e=-2;else l=u(7);end else if e~=1 then for n=45,65 do if e~=3 then j=d.fiYSuGLt('#',...)-1;ee={};break;end;b={};p={...};break;end;else b={};p={...};end end end e=e+1;end;for e=0,j do if(e>=s)then b[e-s]=p[e+1];else l[e]=p[e+1];end;end;local e=j-s+1 local e;local d;local function u(...)while true do end end while true do if n<-40 then n=n+42 end e=a[n];d=e[y];if d>11 then if 17<d then if 21<=d then if 22>=d then if d>=18 then repeat if 21<d then local n=e[t];local o=l[e[o]];l[n+1]=o;l[n]=o[e[h]];break;end;for d=0,3 do if d>=2 then if-1~=d then repeat if d~=3 then l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;until true;else l[e[t]]=c[e[o]];n=n+1;e=a[n];end else if-1<d then repeat if d~=0 then c[e[o]]=l[e[t]];n=n+1;e=a[n];break;end;l[e[t]]=(e[o]~=0);n=n+1;e=a[n];until true;else c[e[o]]=l[e[t]];n=n+1;e=a[n];end end end until true;else for d=0,3 do if d>=2 then if-1~=d then repeat if d~=3 then l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;until true;else l[e[t]]=c[e[o]];n=n+1;e=a[n];end else if-1<d then repeat if d~=0 then c[e[o]]=l[e[t]];n=n+1;e=a[n];break;end;l[e[t]]=(e[o]~=0);n=n+1;e=a[n];until true;else c[e[o]]=l[e[t]];n=n+1;e=a[n];end end end end else if d>22 then repeat if d<24 then local n=e[t]local o,e=_(l[n](f(l,n+1,e[o])))r=e+n-1 local e=0;for n=n,r do e=e+1;l[n]=o[e];end;break;end;c[e[o]]=l[e[t]];until true;else c[e[o]]=l[e[t]];end end else if d>=19 then if 19==d then local r,f;for d=0,6 do if 3<=d then if 5>d then if 1<d then for h=32,70 do if 3<d then l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;else l[e[t]]=c[e[o]];n=n+1;e=a[n];end else if d>=2 then repeat if d>5 then l(e[t],e[o]);break;end;r=e[t];f=l[e[o]];l[r+1]=f;l[r]=f[e[h]];n=n+1;e=a[n];until true;else r=e[t];f=l[e[o]];l[r+1]=f;l[r]=f[e[h]];n=n+1;e=a[n];end end else if 1>d then c[e[o]]=l[e[t]];n=n+1;e=a[n];else if 1~=d then c[e[o]]=l[e[t]];n=n+1;e=a[n];else l(e[t],e[o]);n=n+1;e=a[n];end end end end else local n=e[t]local o,e=_(l[n](f(l,n+1,e[o])))r=e+n-1 local e=0;for n=n,r do e=e+1;l[n]=o[e];end;end else n=e[o];end end else if 15>d then if d<=12 then l[e[t]]=c[e[o]];else if d~=12 then repeat if 14>d then c[e[o]]=l[e[t]];break;end;l[e[t]]=(e[o]~=0);until true;else c[e[o]]=l[e[t]];end end else if d<=15 then if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;else if 14<d then repeat if d>16 then l[e[t]]();break;end;l[e[t]]=(e[o]~=0);until true;else l[e[t]]=(e[o]~=0);end end end end else if 6>d then if 3>d then if 1<=d then if d~=0 then repeat if 1~=d then do return end;break;end;local d,u,h,c;d=e[t]u,h=_(l[d](f(l,d+1,e[o])))r=h+d-1 c=0;for e=d,r do c=c+1;l[e]=u[c];end;n=n+1;e=a[n];d=e[t]l[d]=l[d](f(l,d+1,r))n=n+1;e=a[n];l[e[t]]();n=n+1;e=a[n];do return end;until true;else do return end;end else do return end;end else if 3>=d then local e=e[t]l[e]=l[e](f(l,e+1,r))else if 5>d then local t=e[t];local n=l[e[o]];l[t+1]=n;l[t]=n[e[h]];else n=e[o];end end end else if d<=8 then if d>6 then if 3<d then for n=11,64 do if d<8 then local e=e[t]l[e]=l[e](f(l,e+1,r))break;end;l[e[t]]=c[e[o]];break;end;else l[e[t]]=c[e[o]];end else l(e[t],e[o]);end else if d<=9 then if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;else if d==11 then l(e[t],e[o]);else l[e[t]]();end end end end end n=1+n;end;end;return ee end;local o=0xff;local r={};local a=(1);local t='';(function(n)local l=n local c=0x00 local e=0x00 l={(function(t)if c>0x31 then return t end c=c+1 e=(e+0x503-t)%0x23 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb6);r[a]=ee();a=a+o;end return true end)'lAYLV'and l[0x3](0x371+t))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x2c);end return true end)'wZTqu'and l[0x2](t+0x393))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf0);end return true end)'SZCxM'and l[0x1](t+0x2bf))or t end),(function(d)if c>0x2b then return d end c=c+1 e=(e+0x112e-d)%0xa return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb9);t='\37';o={function()o()end};t=t..'\100\43';end return true end)'jvtus'and l[0x3](0x18e+d))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x4e);end return true end)'dqoGL'and l[0x2](d+0x290))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe0);o[2]=(o[2]*(m(function()r()end,f(t))-m(o[1],f(t))))+1;r[a]={};o=o[2];a=a+o;end return true end)'jMQH_'and l[0x1](d+0x3d5))or d end),(function(h)if c>0x24 then return h end c=c+1 e=(e+0xc88-h)%0x12 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x60);t={t..'\58 a',t};r[a]=k();a=a+((not d.dfLrYoDe)and 1 or 0);t[1]='\58'..t[1];o[2]=0xff;end return true end)'FfsKt'and l[0x2](0xce+h))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x29);end return true end)'JtWMu'and l[0x3](h+0xf9))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xbe);end return true end)'mtSQk'and l[0x1](h+0x2f0))or h end)}l[0x2](0x1446)end){};local e=ne(f(r));return e(...);end return z((function()local n={}local e=0x01;local l;if d.dfLrYoDe then l=d.dfLrYoDe(z)else l=''end if d.VHOrmidA(l,d.QkqQKGRk)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,l,o,t,d)local d;if e<=3 then if e>1 then if-1~=e then for d=22,74 do if e<3 then do return 16777216,65536,256 end;break;end;do return n(1),n(4,t,o,l,n),n(5,t,o,l)end;break;end;else do return 16777216,65536,256 end;end else if e>0 then do return function(n,e,l)if l then local e=(n/2^(e-1))%2^((l-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;else do return n(1),n(4,t,o,l,n),n(5,t,o,l)end;end end else if 5>=e then if 5~=e then local e=o;local c,t,o=t(2);do return function()local n,l,a,d=n(l,e(e,e),e(e,e)+3);e(4);return(d*c)+(a*t)+(l*o)+n;end;end;else local e=o;do return function()local n=n(l,e(e,e),e(e,e));e(1);return n;end;end;end else if e<7 then do return t[l]end;else if 4~=e then repeat if e>7 then do return l(e,nil,l);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,o,l,t,n)if n then return e[n]elseif t then return e else e[o]=l end end})end until true;else do return setmetatable({},{['__\99\97\108\108']=function(e,o,l,t,n)if n then return e[n]elseif t then return e else e[o]=l end end})end end end end end end),...)

Raw Paste

([[This file was protected with MoonSec V3 by Federal#9999]]):gsub('.+', (function(a) _nmKRhmgQjKdR = a; end)); return(function(u,...)local c;local d;local o;local a;local _;local t;local e=24915;local n=0;local l={};while n<351 do n=n+1;while n<0x23b and e%0x824<0x412 do n=n+1 e=(e+833)%45724 local h=n+e if(e%0x25e4)>0x12f2 then e=(e*0x3d5)%0xca6 while n<0x6d and e%0x44ca<0x2265 do n=n+1 e=(e-175)%11584 local t=n+e if(e%0x3fdc)<0x1fee then e=(e+0x2a7)%0x4e53 local e=74815 if not l[e]then l[e]=0x1 o=getfenv and getfenv();end elseif e%2~=0 then e=(e+0x22d)%0x755b local e=65482 if not l[e]then l[e]=0x1 _=tonumber;end else e=(e-0x8e)%0x5c68 n=n+1 local e=10073 if not l[e]then l[e]=0x1 o=(not o)and _ENV or o;end end end elseif e%2~=0 then e=(e*0x1f)%0x5ba1 while n<0x398 and e%0x116c<0x8b6 do n=n+1 e=(e+781)%6193 local o=n+e if(e%0x29a4)>0x14d2 then e=(e-0x390)%0x418f local e=10049 if not l[e]then l[e]=0x1 a=string;end elseif e%2~=0 then e=(e-0x26)%0x8666 local e=55169 if not l[e]then l[e]=0x1 d={};end else e=(e-0x77)%0x96b0 n=n+1 local e=38165 if not l[e]then l[e]=0x1 end end end else e=(e-0x166)%0xc1ac n=n+1 while n<0x2b2 and e%0x1ffe<0xfff do n=n+1 e=(e-509)%48774 local h=n+e if(e%0x28e4)>=0x1472 then e=(e+0x351)%0x5c92 local e=89431 if not l[e]then l[e]=0x1 end elseif e%2~=0 then e=(e+0x162)%0xb86c local e=52448 if not l[e]then l[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\99\98\119\84\102\75\86\104\0\6\115\116\114\105\110\103\4\99\104\97\114\101\107\98\103\90\72\120\111\0\6\115\116\114\105\110\103\3\115\117\98\66\84\77\67\112\70\71\79\0\6\115\116\114\105\110\103\4\98\121\116\101\69\105\107\103\110\122\66\81\0\5\116\97\98\108\101\6\99\111\110\99\97\116\105\73\101\102\68\104\90\106\0\5\116\97\98\108\101\6\105\110\115\101\114\116\121\118\107\106\72\66\111\73\5";end else e=(e-0xe6)%0xa08a n=n+1 local e=40037 if not l[e]then l[e]=0x1 t=function(t)local e=0x01 local function l(n)e=e+n return t:sub(e-n,e-0x01)end while true do local n=l(0x01)if(n=="\5")then break end local e=a.byte(l(0x01))local e=l(e)if n=="\2"then e=d.cbwTfKVh(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then o[e]=function(n,e)return u(8,nil,u,e,n)end elseif n=="\4"then e=o[e]elseif n=="\0"then e=o[e][l(a.byte(l(0x01)))];end local n=l(0x08)d[n]=e end end end end end end end e=(e+978)%14236 end t(c);local n={};for e=0x0,0xff do local l=d.ekbgZHxo(e);n[e]=l;n[l]=e;end local function r(e)return n[e];end local a=(function(h,t)local c,l=0x01,0x10 local n={{},{},{}}local o=-0x01 local e=0x01 local a=h while true do n[0x03][d.BTMCpFGO(t,e,(function()e=c+e return e-0x01 end)())]=(function()o=o+0x01 return o end)()if o==(0x0f)then o=""l=0x000 break end end local o=#t while e<o+0x01 do n[0x02][l]=d.BTMCpFGO(t,e,(function()e=c+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 d.yvkjHBoI(n[0x01],(r((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+a)%0x100)));a=h+a;end end return d.iIefDhZj(n[0x01])end);t(a(164,"(_GRKJ.72W1Xdn)B._"));t(a(43,"Ih:4AKz_x=j.,63;6K.F;:,x=.z_Ahd;xh.z=,z=Ah j3h=,=_K4433x63K::xzx4*R434.xxAAj4,3_6Aj;z.4j,jj434.jxzzH4.366,._z,4.<,3,6jAAh;zh4_Rj6z.+_3;h:3;_6;j4_6AMD_346.j._,A,;3=:z.j=_:Kj:4=K6h=3_AK,:=3hj,xj_=Khhx6x.H4jh_K4hj;3,,==_64;:_3=.;=3z,A;:.,3.;=:A.:j;,xxz(xAzx4.:h;h,=K;zo:uh6;4,___K=hjj6x:,jx=zzAz;;3Ajz=6z3h,;.3}Kh:K4:h6h..3,h_Kz;4=G._jK4=AzA46h43z.:x,Kj4336,h=4xDK:?j3h_wAjx3KZ:z)K64A=x6K.4:;x,;j,x::;:;;=.6=B_=4x,:==66j.x:Axh;;,,xx:_3Kl:;;_6..hh:3x:x;;,.jKx2:3;6?:j.j.A6:x:hx6zAjzz6A=h_3j6u=_z;4Ak4;jjh_._x6=.:;w.=jhzj6,h:36,K=j_::6h4;zjz_xA::=hcx:"));local e=(-11769+(function()local l,n=0,1;(function(e,n)e(e(n,n),n(e,e))end)(function(o,e)if l>137 then return e end l=l+1 n=(n+721)%18598 if(n%1006)<503 then return e(e(e,o),e(e,e))else return e end return o end,function(e,o)if l>426 then return o end l=l+1 n=(n-943)%11486 if(n%1146)<573 then return e(o(e,e),o(e,e)and e(e,e))else return o end return o end)return n;end)())local ee=(getfenv)or(function()return _ENV end);local f=d.bGnkuhwx or d.lDodSQeO;local y=1;local o=3;local h=4;local t=2;local function z(s,...)local c=a(e,"J}PM%cIp0ogh_UaeMP%apco__IP}}}M0ceUg}cMUIa%PgeUo,MPMwc0Mo%_Ug}}0%}Ico}go_a=I}a%%PpgchaemqhagMa0pgaU%a }oMaPPpe0MopSiMaq_cooe_caUP}MpIo%p0%ghUPeoag}oMcc_0Maa%IcgI_gpUhUolp%}IP0%cg0hgc__eMpogeUcUgk0%cp}oPgMaMahPh%6}0hcIM0gh}%2pMoghUapUce}}0p%gFU}a0}h%cca%eghUa9Ma_%cphoh00ep6_M1cU0hhPUc{%ap}?MIIM00hNUcD}PP%hpco__PaI}#M}ch0cg0UIeMcg0goU_eeMaMPU%cpogaaPe}e0%yIM0cgeahPMPMcIcIocUcUa;}Popec_0IUpe_MWMa0IoPghe}}pnephoPhp_%a_eg%%phg%UIaaPP}g%coP_lg%akP_PgIoogU}h%P%}MpPo0%gpcoch_aMcPgc__aeaUMPI0}a%oIoo&hpMcIg0aohao}5MMePP-MUI%0h}a%0I}0h_}aouaP_c0p0MhIM0IgUU%IP0MhIUcog_Iacu_MMgee%>U%}%%pah}UrocUPa^ZpPagPah}PM0%%pUgP_calP0%UIhophpagaIPacbppoe_e_oPM%gIePp00pPoo_r%e0Pgo__eIa%QQPpo}gpa%_PPP%hpUo0__a4}gMec00_g%UpeUPg%PpPoe0<U_ZeM%}UcUoUUcaae0MoI_0hgWap_g}PM_I0II_haI}c%}PoIegUaI_%PocoI_MPIU0=gp_aecM}%MIgo}hoUeZIPUII0hgP_oeOP}MaIc0__caM*}P0%epooU_%ahM0%%I20pgaUhe_P%%gpPo0_Me0WUM%ch00goU}epPPcpI_oMhga030M>cIpUg%_heP}o%}Ip0ahcaajaPgc}p0g}_IaU}%%Upc0oh4Up:pPc%_pMg_Uca0-eMII}0%ghUP:hPI%pIaoc_PaM^gM}Ig0_gI_Ue%PP%PIoo+_oaaxcPUcM0Pg}_0aeMI%aI%0_hPUgR5P_%a0phP_MaU}}%Mce0IgUU%moPP%Up4o0haac*_MMch0}go_eeg}U%%IhoP_ca8mpPaccp_gc_ge}McMeII0UhcUhbMPocE0Ioa_ca_}%MgI}00geUIeUP%");local n=0;d.cTqG_eLF(function()d.XhUwsLVf()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,r=u(0,u,e,c,d.EikgnzBQ);local function a()local l,n=d.EikgnzBQ(c,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local g=true;local g=0 local function b()local e=n();local n=n();local t=1;local o=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local n=((-1)^l(n,32));if(e==0)then if(o==g)then return n*0;else e=1;t=0;end;elseif(e==2047)then return(o==0)and(n*(1/0))or(n*(0/0));end;return d.SIRloaLO(n,e-1023)*(t+(o/(2^52)));end;local p=n;local function j(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=d.BTMCpFGO(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+g),#l do e=e..d.BTMCpFGO(l,n,n)end return e;end;local g=#d.vPOLdaDF(_('\49.\48'))~=1 local e=n;local function z(...)return{...},d.fiYSuGLt('#',...)end local function k()local u={};local f={};local e={};local _={u,f,nil,e};local e=n()local c={}for o=1,e do local l=r();local n;if(l==1)then n=(r()~=#{});elseif(l==2)then local e=b();if g and d.VHOrmidA(d.vPOLdaDF(e),'.(\48+)$')then e=d.XiwRODVh(e);end n=e;elseif(l==3)then n=j();end;c[o]=n;end;_[3]=r();for f=1,n()do local e=r();if(l(e,1,1)==0)then local d=l(e,2,3);local r=l(e,4,6);local e={a(),a(),nil,nil};if(d==0)then e[o]=a();e[h]=a();elseif(d==#{1})then e[o]=n();elseif(d==s[2])then e[o]=n()-(2^16)elseif(d==s[3])then e[o]=n()-(2^16)e[h]=a();end;if(l(r,1,1)==1)then e[t]=c[e[t]]end if(l(r,2,2)==1)then e[o]=c[e[o]]end if(l(r,3,3)==1)then e[h]=c[e[h]]end u[f]=e;end end;for e=1,n()do f[e-(#{1})]=k();end;return _;end;local function m(l,n,e)local o=n;local o=e;return _(d.VHOrmidA(d.VHOrmidA(({d.cTqG_eLF(l)})[2],n),e))end local function ne(g,e,c)local function ee(...)local a,m,s,k,_,n,r,b,p,j,ee,l;local e=0;while-1<e do if 2>=e then if 0<e then if e>=-2 then repeat if 2~=e then s=u(6,54,3,56,g);_=z k=0;break;end;n=-41;r=-1;until true;else s=u(6,54,3,56,g);_=z k=0;end else a=u(6,67,1,52,g);m=u(6,56,2,52,g);end else if 5<=e then if e==6 then e=-2;else l=u(7);end else if e~=1 then for n=45,65 do if e~=3 then j=d.fiYSuGLt('#',...)-1;ee={};break;end;b={};p={...};break;end;else b={};p={...};end end end e=e+1;end;for e=0,j do if(e>=s)then b[e-s]=p[e+1];else l[e]=p[e+1];end;end;local e=j-s+1 local e;local d;local function u(...)while true do end end while true do if n<-40 then n=n+42 end e=a[n];d=e[y];if d>11 then if 17<d then if 21<=d then if 22>=d then if d>=18 then repeat if 21<d then local n=e[t];local o=l[e[o]];l[n+1]=o;l[n]=o[e[h]];break;end;for d=0,3 do if d>=2 then if-1~=d then repeat if d~=3 then l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;until true;else l[e[t]]=c[e[o]];n=n+1;e=a[n];end else if-1<d then repeat if d~=0 then c[e[o]]=l[e[t]];n=n+1;e=a[n];break;end;l[e[t]]=(e[o]~=0);n=n+1;e=a[n];until true;else c[e[o]]=l[e[t]];n=n+1;e=a[n];end end end until true;else for d=0,3 do if d>=2 then if-1~=d then repeat if d~=3 then l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;until true;else l[e[t]]=c[e[o]];n=n+1;e=a[n];end else if-1<d then repeat if d~=0 then c[e[o]]=l[e[t]];n=n+1;e=a[n];break;end;l[e[t]]=(e[o]~=0);n=n+1;e=a[n];until true;else c[e[o]]=l[e[t]];n=n+1;e=a[n];end end end end else if d>22 then repeat if d<24 then local n=e[t]local o,e=_(l[n](f(l,n+1,e[o])))r=e+n-1 local e=0;for n=n,r do e=e+1;l[n]=o[e];end;break;end;c[e[o]]=l[e[t]];until true;else c[e[o]]=l[e[t]];end end else if d>=19 then if 19==d then local r,f;for d=0,6 do if 3<=d then if 5>d then if 1<d then for h=32,70 do if 3<d then l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;l[e[t]]=c[e[o]];n=n+1;e=a[n];break;end;else l[e[t]]=c[e[o]];n=n+1;e=a[n];end else if d>=2 then repeat if d>5 then l(e[t],e[o]);break;end;r=e[t];f=l[e[o]];l[r+1]=f;l[r]=f[e[h]];n=n+1;e=a[n];until true;else r=e[t];f=l[e[o]];l[r+1]=f;l[r]=f[e[h]];n=n+1;e=a[n];end end else if 1>d then c[e[o]]=l[e[t]];n=n+1;e=a[n];else if 1~=d then c[e[o]]=l[e[t]];n=n+1;e=a[n];else l(e[t],e[o]);n=n+1;e=a[n];end end end end else local n=e[t]local o,e=_(l[n](f(l,n+1,e[o])))r=e+n-1 local e=0;for n=n,r do e=e+1;l[n]=o[e];end;end else n=e[o];end end else if 15>d then if d<=12 then l[e[t]]=c[e[o]];else if d~=12 then repeat if 14>d then c[e[o]]=l[e[t]];break;end;l[e[t]]=(e[o]~=0);until true;else c[e[o]]=l[e[t]];end end else if d<=15 then if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;else if 14<d then repeat if d>16 then l[e[t]]();break;end;l[e[t]]=(e[o]~=0);until true;else l[e[t]]=(e[o]~=0);end end end end else if 6>d then if 3>d then if 1<=d then if d~=0 then repeat if 1~=d then do return end;break;end;local d,u,h,c;d=e[t]u,h=_(l[d](f(l,d+1,e[o])))r=h+d-1 c=0;for e=d,r do c=c+1;l[e]=u[c];end;n=n+1;e=a[n];d=e[t]l[d]=l[d](f(l,d+1,r))n=n+1;e=a[n];l[e[t]]();n=n+1;e=a[n];do return end;until true;else do return end;end else do return end;end else if 3>=d then local e=e[t]l[e]=l[e](f(l,e+1,r))else if 5>d then local t=e[t];local n=l[e[o]];l[t+1]=n;l[t]=n[e[h]];else n=e[o];end end end else if d<=8 then if d>6 then if 3<d then for n=11,64 do if d<8 then local e=e[t]l[e]=l[e](f(l,e+1,r))break;end;l[e[t]]=c[e[o]];break;end;else l[e[t]]=c[e[o]];end else l(e[t],e[o]);end else if d<=9 then if(l[e[t]]==e[h])then n=n+1;else n=e[o];end;else if d==11 then l(e[t],e[o]);else l[e[t]]();end end end end end n=1+n;end;end;return ee end;local o=0xff;local r={};local a=(1);local t='';(function(n)local l=n local c=0x00 local e=0x00 l={(function(t)if c>0x31 then return t end c=c+1 e=(e+0x503-t)%0x23 return(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb6);r[a]=ee();a=a+o;end return true end)'lAYLV'and l[0x3](0x371+t))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x2c);end return true end)'wZTqu'and l[0x2](t+0x393))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xf0);end return true end)'SZCxM'and l[0x1](t+0x2bf))or t end),(function(d)if c>0x2b then return d end c=c+1 e=(e+0x112e-d)%0xa return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xb9);t='\37';o={function()o()end};t=t..'\100\43';end return true end)'jvtus'and l[0x3](0x18e+d))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x4e);end return true end)'dqoGL'and l[0x2](d+0x290))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xe0);o[2]=(o[2]*(m(function()r()end,f(t))-m(o[1],f(t))))+1;r[a]={};o=o[2];a=a+o;end return true end)'jMQH_'and l[0x1](d+0x3d5))or d end),(function(h)if c>0x24 then return h end c=c+1 e=(e+0xc88-h)%0x12 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x60);t={t..'\58 a',t};r[a]=k();a=a+((not d.dfLrYoDe)and 1 or 0);t[1]='\58'..t[1];o[2]=0xff;end return true end)'FfsKt'and l[0x2](0xce+h))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x29);end return true end)'JtWMu'and l[0x3](h+0xf9))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xbe);end return true end)'mtSQk'and l[0x1](h+0x2f0))or h end)}l[0x2](0x1446)end){};local e=ne(f(r));return e(...);end return z((function()local n={}local e=0x01;local l;if d.dfLrYoDe then l=d.dfLrYoDe(z)else l=''end if d.VHOrmidA(l,d.QkqQKGRk)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,l,o,t,d)local d;if e<=3 then if e>1 then if-1~=e then for d=22,74 do if e<3 then do return 16777216,65536,256 end;break;end;do return n(1),n(4,t,o,l,n),n(5,t,o,l)end;break;end;else do return 16777216,65536,256 end;end else if e>0 then do return function(n,e,l)if l then local e=(n/2^(e-1))%2^((l-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;else do return n(1),n(4,t,o,l,n),n(5,t,o,l)end;end end else if 5>=e then if 5~=e then local e=o;local c,t,o=t(2);do return function()local n,l,a,d=n(l,e(e,e),e(e,e)+3);e(4);return(d*c)+(a*t)+(l*o)+n;end;end;else local e=o;do return function()local n=n(l,e(e,e),e(e,e));e(1);return n;end;end;end else if e<7 then do return t[l]end;else if 4~=e then repeat if e>7 then do return l(e,nil,l);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,o,l,t,n)if n then return e[n]elseif t then return e else e[o]=l end end})end until true;else do return setmetatable({},{['__\99\97\108\108']=function(e,o,l,t,n)if n then return e[n]elseif t then return e else e[o]=l end end})end end end end end end),...)