generated from Aleks/xxaazza2z
1 line
34 KiB
Plaintext
1 line
34 KiB
Plaintext
|
([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _ZJfDxaUERHEh = a; end)); return(function(f,...)local c;local t;local h;local d;local l;local _;local e=24915;local n=0;local r={};while n<553 do n=n+1;while n<0x68 and e%0x2d54<0x16aa do n=n+1 e=(e*38)%39577 local o=n+e if(e%0x44b0)<0x2258 then e=(e*0x22e)%0x8937 while n<0x2ae and e%0x2e38<0x171c do n=n+1 e=(e*917)%45116 local l=n+e if(e%0x287c)>0x143e then e=(e-0x17f)%0xaa7c local e=27898 if not r[e]then r[e]=0x1 h=getfenv and getfenv();end elseif e%2~=0 then e=(e*0x4e)%0xaa4e local e=91934 if not r[e]then r[e]=0x1 _={};end else e=(e-0x363)%0x8da9 n=n+1 local e=26521 if not r[e]then r[e]=0x1 t=string;end end end elseif e%2~=0 then e=(e*0x288)%0x469d while n<0x117 and e%0x3950<0x1ca8 do n=n+1 e=(e-232)%30307 local l=n+e if(e%0xe36)>0x71b then e=(e+0x7c)%0xa2df local e=31562 if not r[e]then r[e]=0x1 c=tonumber;end elseif e%2~=0 then e=(e-0x96)%0xa644 local e=57937 if not r[e]then r[e]=0x1 h=(not h)and _ENV or h;end else e=(e-0x1fc)%0xa210 n=n+1 local e=71207 if not r[e]then r[e]=0x1 d="\4\8\116\111\110\117\109\98\101\114\80\119\68\66\103\86\110\116\0\6\115\116\114\105\110\103\4\99\104\97\114\76\122\68\121\111\88\75\116\0\6\115\116\114\105\110\103\3\115\117\98\102\73\79\115\88\119\116\122\0\6\115\116\114\105\110\103\4\98\121\116\101\88\83\106\108\109\122\66\112\0\5\116\97\98\108\101\6\99\111\110\99\97\116\102\76\110\68\110\86\65\115\0\5\116\97\98\108\101\6\105\110\115\101\114\116\112\122\116\113\69\76\105\119\5";end end end else e=(e+0xf1)%0x7fd9 n=n+1 while n<0x17c and e%0x2fba<0x17dd do n=n+1 e=(e*671)%19216 local d=n+e if(e%0x4ace)>=0x2567 then e=(e+0x3fa)%0xb6a2 local e=9001 if not r[e]then r[e]=0x1 end elseif e%2~=0 then e=(e-0x13d)%0xb33b local e=23713 if not r[e]then r[e]=0x1 l=function(l)local e=0x01 local function r(n)e=e+n return l:sub(e-n,e-0x01)end while true do local n=r(0x01)if(n=="\5")then break end local e=t.byte(r(0x01))local e=r(e)if n=="\2"then e=_.PwDBgVnt(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then h[e]=function(e,n)return f(8,nil,f,n,e)end elseif n=="\4"then e=h[e]elseif n=="\0"then e=h[e][r(t.byte(r(0x01)))];end local n=r(0x08)_[n]=e end end end else e=(e*0x1cd)%0xa377 n=n+1 local e=30475 if not r[e]then r[e]=0x1 end end end end end e=(e+361)%10002 end l(d);local e={};for n=0x0,0xff do local r=_.LzDyoXKt(n);e[n]=r;e[r]=n;end local function o(n)return e[n];end local t=(function(d,l)local f,r=0x01,0x10 local n={{},{},{}}local h=-0x01 local e=0x01 local t=d while true do n[0x03][_.fIOsXwtz(l,e,(function()e=f+e return e-0x01 end)())]=(function()h=h+0x01 return h end)()if h==(0x0f)then h=""r=0x000 break end end local h=#l while e<h+0x01 do n[0x02][r]=_.fIOsXwtz(l,e,(function()e=f+e return e-0x01 end)())r=r+0x01 if r%0x02==0x00 then r=0x00 _.pztqELiw(n[0x01],(o((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=d+t;end end return _.fLnDnVAs(n[0x01])end);l(t(69,"eOI_w*yJ0Q(5v2Dmv{"));l(t(214,"U*Q.&H<6rlk3L-;WQkHkW**L&&<Hl&366;Nr&.<HlQ36-3*l&.<Hr&l--&k?L3<b6-kH-kc&..<&r3kk-;1**<.L*.&*-<,QQ.HQrQlQ-Z-lW3Q&6<l.k-rr3r&W6kkQL.WQ*H--<Wr-Lk;.*Q.k&llLll-Q*QQWH-Q&HQ;Ho.&tH;QH3<-r7.&D<Q<Wl.;H-3.L.W6*r;6ekQ..&Wrrk3L-t<*-Hk6*lL-IW.D*.&6.kHkk;. rQHfL.l3Q;3*.&;6.ksr3-Q*Q*r666k3-W*:l-<bZl-3*;.*r.;HL6&L.L6W<Q&.-Qm&lk3*H..&kHL3Q3--kDLWZ*;3&-l_6.QHk63kkL-W&*3H3<r6--<)<(L;XJWkr3W;k*;&*dLkHLrW&(W.3<-k&LK-r5*Q*&r6.lrr8kL&H<rl&kW-3i-.3&l6r36;&}<&gHHQJ&3;_VLQ-HLrLrr3&;.*.H-r;k*;*l<LQHl6Hk<LlW*QL.*Hjr.kL-;Wk&z6r.Q<,W.**&;<L..3;;;*3&H6QlHk-LHWW.3<H<33L6W"));local e=(-14007+(function()local h,n=0,1;(function(n,e)n(e(e,e),e(n,e))end)(function(e,r)if h>208 then return e end h=h+1 n=(n*902)%48984 if(n%268)<134 then return e(e(e,e)and e(e,r),e(e,e))else return e end return r end,function(r,e)if h>209 then return r end h=h+1 n=(n+668)%44599 if(n%1104)<552 then n=(n*862)%40364 return r else return e(r(r,r),e(e,e))end return e(e(e,e),r(r,e and e))end)return n;end)())local le=(getfenv)or(function()return _ENV end);local o=_.oSXmphxc or _.xjXWMJKF;local h=2;local l=3;local d=4;local p=1;local function ne(s,...)local a=t(e,"ZhQ^9<q8_
|