Thunder_beast

Webhook mm2

Sep 22nd, 2024 (edited)
106
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 19.53 KB | Source Code | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _CLwjhwrmpEcL = a; end)); return(function(f,...)local c;local o;local a;local d;local r;local t;local e=24915;local n=0;local l={};while n<915 do n=n+1;while n<0x3b2 and e%0x4052<0x2029 do n=n+1 e=(e-47)%35284 local k=n+e if(e%0x3f2e)>0x1f97 then e=(e+0x379)%0x7ae2 while n<0x364 and e%0x288e<0x1447 do n=n+1 e=(e+608)%18599 local o=n+e if(e%0x26f4)>0x137a then e=(e-0x391)%0x2e22 local e=59208 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=c.byte(l(0x01))local e=l(e)if n=="\2"then e=r.PpHxAH_r(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then d[e]=function(e,n)return f(8,nil,f,n,e)end elseif n=="\4"then e=d[e]elseif n=="\0"then e=d[e][l(c.byte(l(0x01)))];end local n=l(0x08)r[n]=e end end end elseif e%2~=0 then e=(e-0x31d)%0x9841 local e=82965 if not l[e]then l[e]=0x1 end else e=(e-0x14a)%0x34dc n=n+1 local e=78624 if not l[e]then l[e]=0x1 end end end elseif e%2~=0 then e=(e*0x119)%0x3281 while n<0x2a1 and e%0x13bc<0x9de do n=n+1 e=(e+719)%36214 local t=n+e if(e%0x3984)<0x1cc2 then e=(e+0x305)%0x76ae local e=55351 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end elseif e%2~=0 then e=(e-0x78)%0x13af local e=88145 if not l[e]then l[e]=0x1 a=tonumber;end else e=(e*0x2ad)%0x41e0 n=n+1 local e=37132 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end end end else e=(e+0x2e5)%0x92e1 n=n+1 while n<0x364 and e%0x1194<0x8ca do n=n+1 e=(e+722)%10819 local d=n+e if(e%0x315a)>=0x18ad then e=(e-0x12)%0xa154 local e=56723 if not l[e]then l[e]=0x1 c=string;end elseif e%2~=0 then e=(e*0x314)%0x96e3 local e=28970 if not l[e]then l[e]=0x1 r={};end else e=(e*0xef)%0x8854 n=n+1 local e=57633 if not l[e]then l[e]=0x1 o="\4\8\116\111\110\117\109\98\101\114\80\112\72\120\65\72\95\114\0\6\115\116\114\105\110\103\4\99\104\97\114\88\116\103\65\105\67\73\108\0\6\115\116\114\105\110\103\3\115\117\98\108\122\79\86\85\83\122\95\0\6\115\116\114\105\110\103\4\98\121\116\101\73\72\75\77\69\70\89\65\0\5\116\97\98\108\101\6\99\111\110\99\97\116\101\90\76\119\85\69\73\68\0\5\116\97\98\108\101\6\105\110\115\101\114\116\65\110\85\97\76\69\71\79\5";end end end end end e=(e*849)%49452 end t(o);local e={};for n=0x0,0xff do local l=r.XtgAiCIl(n);e[n]=l;e[l]=n;end local function k(n)return e[n];end local l=(function(f,c)local o,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local t=f while true do n[0x03][r.lzOVUSz_(c,e,(function()e=o+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""l=0x000 break end end local d=#c while e<d+0x01 do n[0x02][l]=r.lzOVUSz_(c,e,(function()e=o+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 r.AnUaLEGO(n[0x01],(k((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+t)%0x100)));t=f+t;end end return r.eZLwUEID(n[0x01])end);t(l(31,"w9NKq+#nyuZ>MtrQr#"));t(l(229,"SYKl5r},A?!3G7qoY3lGG5q>o?W3K3loo,,K?q3YGoGYo?Y?lKlr5q}u,qr},KoA<}Yo5r}DAA,}3!GoGG7qYVl}qAw,A7!!3G7Go7q}YYllr3Ar!rAq33,G?7Kr5Yr!}GAG!_r?7Gq3Y?Kl5llq}K!5?l!r7rodKKGqq7,YAk!q37,ro,-!K}r5},rq?53G7!oloo(G5?qqYY?l!HG!7qoYY3KlrYr?,r?!!q7Gq3o5K3l3lG,5AA5#rqGAoK 3l,57}35,Aq!3G7qY7qKGKY}lQ3K}353?7GVKolK,l?lqAY?3?37YAl?7o1KG}Yr,?l!q!l7!78!qG7r5}!A?!r3q7woQ{5Y35?rrr7Ao?q!5GY? 3vl!5KrqAl?,rl77oYQqY!l,r!AK}7A73qq!2Yo,K3q}VlA7!Y3qG!q,(!oGYG}l,qA!!X?oG7?}3KlArr},A,!AG5q5G!M3YoKrl?}lK35A7e77ooYlKGrA}}A5?53?7}G3h7K57,o},!A?3,G},qo!Y3l?r5,K,o!}?K3K73oK1KY!oA"));local e=(-1979+(function()local l,n=0,1;(function(e)e(e(e)and e(e))end)(function(e)if l>391 then return e end l=l+1 n=(n+837)%6393 if(n%462)>=231 then return e else return e(e(e)and e(e))end return e(e(e))end)return n;end)())local k=r.BGssd_CV or r.xHMctpKd;local ce=(getfenv)or(function()return _ENV end);local t=3;local p=1;local o=4;local d=2;local function te(b,...)local s=l(e,"-c8}7(0{42kF?Kn^F?(kl{F70}c8FF04c(82Kg428n{48kK#{K8k8{^r28({^,kk(4277?n?2270(8n}22{cccF?{48q?4{4^k?((FFnn8c0?}{m4(}nnF2777F4(kL{n22F(8n^k4(4^{0n(gz2F78}D8Fn07K{??0{cc?7{48(?n4}n?2F72^?k4(cO!k^({62F}0RcxFK02c2FK{}c4?({E(cK^F(8(n(k40{^KKE7Fp}?0{4c0F40(882?2c}}n?(0}_^U0?cnF4kcNk?Jk488K04c(K1kk(((&J2G0c^S?8}(K{2/{ccO?^{2X8FK02}cFF2c8kF42}78K22c74^74K8{^40?n72K}?n22040(4^nF?(4G{?(0}cK2202c0?7{bFF4Kc}?t0K0n8^KK27nnnc2c7cn{7^(}nkk21})3k^(2fFk2(7c8F9(??(?20481?c80/Z?^{?84Fk{2874n{c^F{{8K?^{?8288^82}}n^04{(g^8F{(xEk7{^n2^7?^2gn?{{7cKF2{2c2K84}8NKF42?744c??2{0{v}^n?248kn227}KKnk?({^FkK(}6?4n(?C7Fc(^c(2({(88?K/k?{08b^F?F0{{}(KF48}nn{2i}8nc2u8Fnkk7((^(2?7F2(7FnK2k7{}?c(?80F^FFk{78(?(0?cF0(c{FK0kc{){nU4?}2KK44704c8^K240}}(}V0k4n22n7cnn2F4^(kc0k80ccF??0?c}?8#?Fn07ccFnKK{K}0n{47}^nK({K}4s8KKk2(}7nc4n}?n42(78mck272^0k}(2^Kkk({c0?((nYFF404c8F^0?}^KK{}8+?K4N8{K(4c}7KF4?}0n84^}?n^2077^_kc7F^{k7(cC(kF(23(F82Fy?F200c7?S0KckK22?8c?n{F82K(488^^?F8}0n}25}Knkk(77S}F(7F^kk((K^^k?(2a0FF0uvKFk02c7?}0n8K?n{(8}?^{K82K04}(pK^4k}4n728}n^224({^(2^7^^2k4(}.=kK(kT4F708pnFn04c{?84^}n?2{48}Kc{K}cK{20{7Kn4n}4n028}^n?F2(K^}k}7K^Kk{08Jc?L07=4Fk08c2F?02c0?}4jcK?K{{82Kc4H8Fnk2^}8n}4?}Kn02}7y^^F87{^2kc(0^Fk4((B4?k(?fnF0{?cQFn0kc{?7{(c^?F{48(nF{^8KK24k}7nl4K}ks(2778nnkK{O^(k{7^tFk2(0t}F02:CkF?078^Fn0?c4?0{88}?K{280K}2n8KKF4{70O24n76n4k878n^2?02c4k}((^Kk^({c}Fc07}8F40Fc8?c0?ck?0{08<?K2{8{K74c}}KF44}(n8k?}?n2207{^I2K7k^{?c(c^nkF(4C(F8(^c8nW00ck?e{wck?4{788?n{F7(K(488^K^42}0n}2007nk2^77^c2n7?^4k{(8^^?2(2z0F}0{EKFk0{c7Kn0ncF?4{F88?^{?82c04}}2KK28}{n72c}nxX247^^8kc7?^2k0(}3kkK0};{F00cj^FF448^?8{4c??F{084K;2K7}K{4K}cn{4F77n(2400n?k770^7k57n^kk2(7Uc?F(Fa4F(0k!^F?02c0nP{jcK?k{287Kc{n8F^84(}FK^2{}2n{2}7o^F2k7{^7k87n^Fk4(2H8k^(?8?F00}c6F^4Qc{?7{c74^(?42c}}^42c7Fk0{?7n^}k2(2Sck808.7F{0}??{2^nF{(0a}FOk^{2c2KY4o}04F04}{nc4(}(n(4FK(kk8KKk4{4^87^kk77FoV08({CcFF(F*<{40(cn?F{78724}kn{K?42}02k4F}(K(4?}?^8((}{^,2FPk^Kk47{yck^c4247{^E2K7k0F!KFn0}kK(F>(F8(^4c8FK8c(?20Kck?{k}2c7ynk4n}nnn27&(4F}Fn}26}K0g^4FW00 }7K^?k((8^^caFk{kc40877Fk0{c782n84^}4n4(?^nkFkY7K^k(n7^^222(Z/pF0c2^FF7(^?nF7(nt{F{{}c(?2{FncK({0}dK({{}=Kx4(}(k(4?}KKn2c}??}k0(c^Tkk8n^0{?nnkc70^}kfk80K%??00^i^?40KF{{k!^F?02}F8{2K788nk772}(K8(&,4F{20c2Fc02c4^{{kc8?k{2(4^F(uTak4((s88}?({K88?4c8FK0kc{?7{}8{?F{48(70n{kc70n4kc7c^0k0n2247cnn2F?c(kx}?c^nk?(09}FqK,0^ck00cKFn0Fc4i4n{2c}nKn277{ka{7}F^722n}27}Fn42(2{08+cFF}^z{(868kk({!7c7?K{{8{K{c7?40?c2?0n{42}kK^2k74n82F7F4k}Fn84^}?(817k^(2tFk^^2k2(c^nkF?({78oK}{7FF02c}?,0K}F^cn48c?n{F84((n^{F80?k}4n{2 }Knk^^F}00c57K^?k((8^^^kFk{}c408)^Fk0{c7}bnccK?n{(88?^n828}Fn^27(;4?}Kn72c}n(nL?F{(FmKF}^Fkk(}5JkK?4048c?0cU?c04c(?8K(4F}Fn}4777{^7kK{47}cg7x8kc72g0k{82?K{48}?0F((^c FF028824}?n{28}(88K444}wKc2co{n{28}44Z8nK44(}87}nKF8n{2778^H2k7{^7.nF{02n8((r8k^0ncnF007cAK40kc{?72c}c?F{28(K}{^}gK240}KnQ4n}kn4277}nnkK7n^(k77^c{k2(0V}KZ0K#kF207c}Fn{}c4K{4?c^?^{2}KK}4v8KKk28}7n(4n}?n42(78n^KK72^4k}(7^Kk?({,7?8(n&nF40(c8F^0?c2K{{}8}?K{F8{K04c8nK?44}2n82H}?n2207}Tc2K7^^{k7(ct}kF44ckF807D??(00c7?l2K8}?{{28cnc{F7+K(487(K?4^}0n02+}Knk2{70^ck(7F^4k(((^^K?2{e0Fk0+8FFk{cc7nc{kcFKU{(88?^2082n02+}<n74k}nn722}ncFk?7(^22^0c^2?4(}aU?((kG^F70cCnFn047(Kk0^87?2278}K8{K}?^847}kKn4n}4n(28(^/n22(6^}k%7Kh?k{00=Kkn00r4FF08W^F?02}}?}{2cKK}{{8^Kc4n}(K44K}8n04?78n0?}(knKk87{p2kc{q^Fk400s8F4(?M2F000cAnK{kc{?K{c}??F428(n8408?n840}kny2N}kc{F77c^{2F(K^(?77^^??n(0q2Fo00EkF4078c?00FcK?(4nc^K8{280n04l}}Kk4{}7n84n7K^72(72n^k(72^0k}{;3Fkk(^t7Fc(ncKF4{{82F^{(c2n0{}8_?K{k}0K7448nn844}nn82^}^n22?7}^(2K(c^{F7(k^nF6(4c}F80(l??F4nc}?00K}{?{{78cnn2284KF48}(K?k4}0^(2^}K^c2{7^^c2n7Fc4F0(8s{k?(Fw0?80_8KK}0{cK?c{qcFKn{(78Kk{?}}K04(}u^n4k({^K2c72nF2k7(pF2^0?^Kk0(^a!k^(k8kF74c}&FF{(c(?70^8??2{007K14}8kn747}}Kn2F7/n(2{}^=J227?^}kB{8^kkF(7,0kn(?R4F(225^?c02c{?}{<cKK?Fc87K{{n}4K44(}8K^k4}2nK2}77nK2k7{^7FF7nO<k4(?58Fy(?:2F^0}c6FK0Fc{?7{ccn?F{48(K}4c8?K240}(n74K}kn{QFk8({H^74^(k87^^?k2(0c{^Y07wkF{078}nk0Fc2?({}c^??{2}4K?4I8^Kk42}7nc4n}FJ72(7}n^2n72^{k}(Lc9kk(417Fc(nHFF40(8{F^0nc2?{{}8.?K{k8FK7488nKK44}0n84^7Fn2207}^c2K7k^{k7(c^nkF(2ccF8(^!?FF0Kc}?g0K{K}0n82(}}n22?K{4(8^K?424F((^?}^nn2{77^cnzFk(?cn(760k?(2*0^F?(0ncn??40}7{;8c?4{(88c?nc2K}n^827K^27}{n72c44}nn{2}}{;Kk^04/kF4t8Fc(k#{F7K40^8KK0c{?00^c??2?0{88}Kc8?n{47}cKnn?k4((^nk47^^kFk(?j^FF82cc?{{Sc?(K8?F(08M^g7FK0kc}2O0^8^n422}0^c2^^4nFk{7Kn^kK7^ 8knpKl4F004?ck^{cr2Fn0nciFn{(cF2cc8?20kc{?7F74K}2n?4k7u^}(28K^^k}7(4^7rn{277c(}&4kk(kC0?8c(k2(0H}FN27jkF207ccFn0Fc4?Fk(c^?n{28kK}4c8KKF4{}4n84n}Fn42278^h2?7K^{k}(j^KF^({T(Fc(n78F40{c8F^0?c2?0{}80?K{K8{K74c}8KF447nn82}}?nk207}^!kK0}^{k{(c= kF(?!(n8{0o?F?00c4?o{(ck?{{^8cK8{F84K(4}8^V?2c}0n{2*74nkkZ77.ck77F^Fk((0^^F9(2a0nk0/ccFk02c7?c0n}Fu({(80?^4i82K?4}},n44k}Kn72c}nnK24((^F2^(8^2k{(}M/kK0k;KF70{Jn?{04c0?80^cK?2{k8}K0{K8?K{27}2Kn4n}4n4287}n?22(c^}k87K^?k{((zcF8(?)4F(088{F?0kc0K(24cK??{{8FKc{n8FnkF^}8n84?7}n02}7*nKFn7{^0kc(m^Fk2((!8nF(?A2F007cTFK0kc{?7{ccn?K{F8(K8{^8nKK40}}nXKF2F(7^27}^}2F74^(c8F8(Kc(?8T(F?(KykF{F2{^82K24{}?n_}^c}Kk2}}44?8KKk4{70N24n}Fn42{78n^2?7^cKk}(c^Kkk({H(Fc(^CFF4{Kc8F^0?c2?0{}8t?K4k8{K74c}bKF42}(n4k0}?n2207?^A2n7k^{k7((^^kF(4;(FF(^qKF240}(?z0^ck?4{788?n{F(0K(478^Kn42}0n}27}nnk2{77^?2n7?^4F{4?^^kn(2s2F}0zHKFk2(c7?}0ncK?4{(88?^F482K04}}cKK4k}{n(2c}nnF2F7(^82^7nork0(}=d^K?004c{?0({c^0kc2?80^c?}ZK{2U}({^}4K{47}c8(^Sk?}( 7kn(Qgnk20{n2FF0Cc0(Frckn(F<4n208:^F?02c0?}{G}KK2{{87Kc{n8FKF4(77^k4?}Fn02(7 nK2k0{Jckc(N^Fkk((3}k^(?Q?F00}cIF^0kc{?7{c8??F{48(K8{^8?K240}^ni4K}kn4277cnn2F74^(k87^^?k2");local n=0;r.yLuoQH_j(function()r.JcZDlkPk()n=n+1 end)local function e(e,l)if l then return n end;n=e+n;end local l,n,h=f(0,f,e,s,r.IHKMEFYA);local function c()local l,n=r.IHKMEFYA(s,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local u=true;local u=0 local function g()local d=n();local e=n();local t=1;local d=(l(e,1,20)*(2^32))+d;local n=l(e,21,31);local e=((-1)^l(e,32));if(n==0)then if(d==u)then return e*0;else n=1;t=0;end;elseif(n==2047)then return(d==0)and(e*(1/0))or(e*(0/0));end;return r.LgtwufXz(e,n-1023)*(t+(d/(2^52)));end;local z=n;local function _(n)local l;if(not n)then n=z();if(n==0)then return'';end;end;l=r.lzOVUSz_(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+u),#l do e=e..r.lzOVUSz_(l,n,n)end return e;end;local z=#r.cvgTk_JL(a('\49.\48'))~=1 local e=n;local function de(...)return{...},r.gj_ikElh('#',...)end local function le()local u={};local s={};local e={};local a={s,u,nil,e};local e=n()local f={}for d=1,e do local l=h();local e;if(l==1)then e=(h()~=#{});elseif(l==0)then local n=g();if z and r.HQxLCXXo(r.cvgTk_JL(n),'.(\48+)$')then n=r.dpAFTPEB(n);end e=n;elseif(l==2)then e=_();end;f[d]=e;end;for a=1,n()do local e=h();if(l(e,1,1)==0)then local r=l(e,2,3);local k=l(e,4,6);local e={c(),c(),nil,nil};if(r==0)then e[t]=c();e[o]=c();elseif(r==#{1})then e[t]=n();elseif(r==b[2])then e[t]=n()-(2^16)elseif(r==b[3])then e[t]=n()-(2^16)e[o]=c();end;if(l(k,1,1)==1)then e[d]=f[e[d]]end if(l(k,2,2)==1)then e[t]=f[e[t]]end if(l(k,3,3)==1)then e[o]=f[e[o]]end s[a]=e;end end;for e=1,n()do u[e-(#{1})]=le();end;a[3]=h();return a;end;local function ne(l,n,e)local d=n;local d=e;return a(r.HQxLCXXo(r.HQxLCXXo(({r.yLuoQH_j(l)})[2],n),e))end local function _(g,a,h)local function le(...)local c,z,b,ee,ne,n,u,m,j,y,s,l;local e=0;while-1<e do if 2>=e then if 1>e then c=f(6,68,1,96,g);z=f(6,89,2,68,g);else if e~=-2 then repeat if 1~=e then n=-41;u=-1;break;end;b=f(6,81,3,95,g);ne=de ee=0;until true;else b=f(6,81,3,95,g);ne=de ee=0;end end else if e<5 then if 3~=e then y=r.gj_ikElh('#',...)-1;s={};else m={};j={...};end else if e>2 then repeat if 6~=e then l=f(7);break;end;e=-2;until true;else l=f(7);end end end e=e+1;end;for e=0,y do if(e>=b)then m[e-b]=j[e+1];else l[e]=j[e+1];end;end;local e=y-b+1 local e;local f;local function b(...)while true do end end while true do if n<-40 then n=n+42 end e=c[n];f=e[p];if f>=34 then if f<51 then if 42>f then if f>37 then if f<=39 then if f~=35 then repeat if f~=39 then local n=e[d];local d=l[n];for e=n+1,e[t]do r.AnUaLEGO(d,l[e])end;break;end;local u=z[e[t]];local k;local f={};k=r.xlZvkQng({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(l,e,n)local e=f[e]e[1][e[2]]=n;end;});for d=1,e[o]do n=n+1;local e=c[n];if e[p]==29 then f[d-1]={l,e[t]};else f[d-1]={a,e[t]};end;s[#s+1]=f;end;l[e[d]]=_(u,k,h);until true;else local n=e[d];local d=l[n];for e=n+1,e[t]do r.AnUaLEGO(d,l[e])end;end else if f>38 then repeat if 40<f then local r,a,s,u,p,_,b,f;for f=0,6 do if 3<=f then if 4>=f then if f~=3 then r=e[d];a=l[e[t]];l[r+1]=a;l[r]=a[e[o]];n=n+1;e=c[n];else l[e[d]]=h[e[t]];n=n+1;e=c[n];end else if f>=2 then repeat if 5~=f then r=e[d]l[r]=l[r](k(l,r+1,e[t]))break;end;l(e[d],e[t]);n=n+1;e=c[n];until true;else l(e[d],e[t]);n=n+1;e=c[n];end end else if 0<f then if f~=-2 then repeat if f~=2 then f=0;while f>-1 do if f>=3 then if 5>f then if-1<=f then for e=16,76 do if f~=4 then _=s[p];break;end;b=s[u];break;end;else b=s[u];end else if 1<=f then for e=21,67 do if f~=6 then l(b,_);break;end;f=-2;break;end;else f=-2;end end else if 1<=f then if f<2 then u=d;else p=t;end else s=e;end end f=f+1 end n=n+1;e=c[n];break;end;r=e[d]l[r]=l[r](k(l,r+1,e[t]))n=n+1;e=c[n];until true;else r=e[d]l[r]=l[r](k(l,r+1,e[t]))n=n+1;e=c[n];end else r=e[d];a=l[e[t]];l[r+1]=a;l[r]=a[e[o]];n=n+1;e=c[n];end end end break;end;l[e[d]]=h[e[t]];until true;else l[e[d]]=h[e[t]];end end else if 35>=f then if 35>f then l[e[d]]=l[e[t]][e[o]];else local n=e[d];do return l[n](k(l,n+1,e[t]))end;end else if f>=35 then for n=28,95 do if 36~=f then local n=e[d];local d=l[n];for e=n+1,e[t]do r.AnUaLEGO(d,l[e])end;break;end;local e=e[d]l[e](l[e+1])break;end;else local e=e[d]l[e](l[e+1])end end end else if f>45 then if f>=48 then if 49<=f then if f<50 then h[e[t]]=l[e[d]];else l[e[d]]=(e[t]~=0);end else l[e[d]]=h[e[t]];end else if 42<=f then repeat if f~=47 then do return l[e[d]]end break;end;n=e[t];until true;else n=e[t];end end else if 44>f then if 40<f then for n=36,76 do if f>42 then l[e[d]]={};break;end;local n=e[d];local d=l[e[t]];l[n+1]=d;l[n]=d[e[o]];break;end;else l[e[d]]={};end else if 42<=f then repeat if 44<f then local a,k,h,r,f,s,c;local n=0;while n>-1 do if n>=3 then if n<=4 then if n~=0 then for e=30,61 do if 3~=n then c=l[f];for e=1+f,r[h]do c=c..l[e];end;break;end;s=r[a];break;end;else c=l[f];for e=1+f,r[h]do c=c..l[e];end;end else if 5==n then l[s]=c;else n=-2;end end else if n>=1 then if n>=-2 then for l=35,85 do if n~=2 then r=e;break;end;f=r[k];break;end;else f=r[k];end else a=d;k=t;h=o;end end n=n+1 end break;end;local r,u,b,s,k,f,o;l[e[d]]=h[e[t]];n=n+1;e=c[n];f=0;while f>-1 do if f>=3 then if f<=4 then if f>=1 then repeat if 3~=f then k=r[u];break;end;s=r[b];until true;else k=r[u];end else if 4<=f then for e=26,60 do if 5<f then f=-2;break;end;l(k,s);break;end;else l(k,s);end end else if f>=1 then if 2==f then b=t;else u=d;end else r=e;end end f=f+1 end n=n+1;e=c[n];o=e[d]l[o](l[o+1])n=n+1;e=c[n];l[e[d]]=a[e[t]];n=n+1;e=c[n];l[e[d]]=a[e[t]];n=n+1;e=c[n];o=e[d]l[o](l[o+1])n=n+1;e=c[n];do return end;until true;else local a,h,k,r,f,s,c;local n=0;while n>-1 do if n>=3 then if n<=4 then if n~=0 then for e=30,61 do if 3~=n then c=l[f];for e=1+f,r[k]do c=c..l[e];end;break;end;s=r[a];break;end;else c=l[f];for e=1+f,r[k]do c=c..l[e];end;end else if 5==n then l[s]=c;else n=-2;end end else if n>=1 then if n>=-2 then for l=35,85 do if n~=2 then r=e;break;end;f=r[h];break;end;else f=r[h];end else a=d;h=t;k=o;end end n=n+1 end end end end end else if f<=59 then if f>=55 then if f<=56 then if 54~=f then for n=16,67 do if 56~=f then l[e[d]]=a[e[t]];break;end;local e=e[d];do return k(l,e,u)end;break;end;else local e=e[d];do return k(l,e,u)end;end else if 58>f then local n=e[d]l[n]=l[n](k(l,n+1,e[t]))else if 58<f then local n=e[d];local d=l[e[t]];l[n+1]=d;l[n]=d[e[o]];else l(e[d],e[t]);end end end else if 53<=f then if f>52 then repeat if 53<f then local u=z[e[t]];local k;local f={};k=r.xlZvkQng({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(l,e,n)local e=f[e]e[1][e[2]]=n;end;});for d=1,e[o]do n=n+1;local e=c[n];if e[p]==29 then f[d-1]={l,e[t]};else f[d-1]={a,e[t]};end;s[#s+1]=f;end;l[e[d]]=_(u,k,h);break;end;if not l[e[d]]then n=n+1;else n=e[t];end;until true;else local u=z[e[t]];local k;local f={};k=r.xlZvkQng({},{__index=function(n,e)local e=f[e];return e[1][e[2]];end,__newindex=function(l,e,n)local e=f[e]e[1][e[2]]=n;end;});for d=1,e[o]do n=n+1;local e=c[n];if e[p]==29 then f[d-1]={l,e[t]};else f[d-1]={a,e[t]};end;s[#s+1]=f;end;l[e[d]]=_(u,k,h);end else if f~=49 then repeat if 52>f then if not l[e[d]]then n=n+1;else n=e[t];end;break;end;local f,r;l[e[d]]=a[e[t]];n=n+1;e=c[n];f=e[d];r=l[e[t]];l[f+1]=r;l[f]=r[e[o]];n=n+1;e=c[n];l[e[d]]=h[e[t]];n=n+1;e=c[n];l[e[d]]=l[e[t]][e[o]];n=n+1;e=c[n];f=e[d];do return l[f](k(l,f+1,e[t]))end;n=n+1;e=c[n];f=e[d];do return k(l,f,u)end;n=n+1;e=c[n];do return end;until true;else if not l[e[d]]then n=n+1;else n=e[t];end;end end end else if f<=63 then if f<62 then if 61~=f then do return end;else local f,h;for r=0,6 do if r<3 then if r>0 then if r>0 then for f=48,85 do if r~=1 then l[e[d]][e[t]]=l[e[o]];n=n+1;e=c[n];break;end;l[e[d]]={};n=n+1;e=c[n];break;end;else l[e[d]][e[t]]=l[e[o]];n=n+1;e=c[n];end else f=e[d];h=l[e[t]];l[f+1]=h;l[f]=h[e[o]];n=n+1;e=c[n];end else if 4>=r then if r>3 then f=e[d]l[f]=l[f](k(l,f+1,e[t]))n=n+1;e=c[n];else l[e[d]][e[t]]=l[e[o]];n=n+1;e=c[n];end else if r<6 then l[e[d]][e[t]]=l[e[o]];n=n+1;e=c[n];else f=e[d]l[f](l[f+1])end end end end end else if f>58 then for r=17,77 do if 63>f then local r,a,k,h,s,f;for f=0,6 do if 2>=f then if f<1 then l[e[d]][e[t]]=e[o];n=n+1;e=c[n];else if 1~=f then l[e[d]][e[t]]=l[e[o]];n=n+1;e=c[n];else l[e[d]]=l[e[t]][e[o]];n=n+1;e=c[n];end end else if 5>f then if 0~=f then repeat if 3<f then l[e[d]]={};n=n+1;e=c[n];break;end;l[e[d]][e[t]]=e[o];n=n+1;e=c[n];until true;else l[e[d]]={};n=n+1;e=c[n];end else if f~=1 then repeat if f~=5 then f=0;while f>-1 do if 2<f then if 4>=f then if 3==f then h=r[k];else s=r[a];end else if 6==f then f=-2;else l(s,h);end end else if f>0 then if 0<f then for e=19,95 do if 2>f then a=d;break;end;k=t;break;end;else k=t;end else r=e;end end f=f+1 end break;end;l[e[d]][e[t]]=e[o];n=n+1;e=c[n];until true;else f=0;while f>-1 do if 2<f then if 4>=f then if 3==f then h=r[k];else s=r[a];end else if 6==f then f=-2;else l(s,h);end end else if f>0 then if 0<f then for e=19,95 do if 2>f then a=d;break;end;k=t;break;end;else k=t;end else r=e;end end f=f+1 end end end end end break;end;h[e[t]]=l[e[d]];break;end;else local k,h,r,s,a,f;for f=0,6 do if 2>=f then if f<1 then l[e[d]][e[t]]=e[o];n=n+1;e=c[n];else if 1~=f then l[e[d]][e[t]]=l[e[o]];n=n+1;e=c[n];else l[e[d]]=l[e[t]][e[o]];n=n+1;e=c[n];end end else if 5>f then if 0~=f then repeat if 3<f then l[e[d]]={};n=n+1;e=c[n];break;end;l[e[d]][e[t]]=e[o];n=n+1;e=c[n];until true;else l[e[d]]={};n=n+1;e=c[n];end else if f~=1 then repeat if f~=5 then f=0;while f>-1 do if 2<f then if 4>=f then if 3==f then s=k[r];else a=k[h];end else if 6==f then f=-2;else l(a,s);end end else if f>0 then if 0<f then for e=19,95 do if 2>f then h=d;break;end;r=t;break;end;else r=t;end else k=e;end end f=f+1 end break;end;l[e[d]][e[t]]=e[o];n=n+1;e=c[n];until true;else f=0;while f>-1 do if 2<f then if 4>=f then if 3==f then s=k[r];else a=k[h];end else if 6==f then f=-2;else l(a,s);end end else if f>0 then if 0<f then for e=19,95 do if 2>f then h=d;break;end;r=t;break;end;else r=t;end else k=e;end end f=f+1 end end end end end end end else if f>65 then if f>=67 then if 68==f then local c,r,f,o,k;local n=0;while n>-1 do if n<=2 then if 1<=n then if 2~=n then r=d;else f=t;end else c=e;end else if n<5 then if n>2 then repeat if n~=3 then k=c[r];break;end;o=c[f];until true;else o=c[f];end else if n==6 then n=-2;else l(k,o);end end end n=n+1 end else local r,s,u,p,a,b,_,f;for f=0,6 do if 2>=f then if 1>f then l[e[d]]=h[e[t]];n=n+1;e=c[n];else if f<2 then r=e[d];s=l[e[t]];l[r+1]=s;l[r]=s[e[o]];n=n+1;e=c[n];else f=0;while f>-1 do if f>2 then if 5>f then if 3==f then b=u[a];else _=u[p];end else if 6==f then f=-2;else l(_,b);end end else if 1>f then u=e;else if f>-3 then for e=23,52 do if 2~=f then p=d;break;end;a=t;break;end;else a=t;end end end f=f+1 end n=n+1;e=c[n];end end else if f>=5 then if 5=
Add Comment
Please, Sign In to add comment