Advertisement
xvc200

Server Hop Script

Feb 13th, 2025
4,322
0
Never
2
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 24.10 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) __jPFeMDKsXUW = a; end)); return(function(o,...)local l;local t;local r;local f;local a;local u;local e=24915;local n=0;local d={};while n<849 do n=n+1;while n<0x384 and e%0x2f14<0x178a do n=n+1 e=(e*810)%40787 local h=n+e if(e%0x138a)>0x9c5 then e=(e-0x19e)%0x8d02 while n<0x32e and e%0x3fe8<0x1ff4 do n=n+1 e=(e-53)%47993 local f=n+e if(e%0x26be)<0x135f then e=(e-0x1f2)%0x6d00 local e=40680 if not d[e]then d[e]=0x1 a=(not a)and _ENV or a;end elseif e%2~=0 then e=(e-0x2df)%0x54ac local e=39052 if not d[e]then d[e]=0x1 a=getfenv and getfenv();end else e=(e-0x2c4)%0x8621 n=n+1 local e=13326 if not d[e]then d[e]=0x1 l=function(d)local e=0x01 local function n(n)e=e+n return d:sub(e-n,e-0x01)end while true do local d=n(0x01)if(d=="\5")then break end local e=t.byte(n(0x01))local e=n(e)if d=="\2"then e=r.Ad_gHnzk(e)elseif d=="\3"then e=e~="\0"elseif d=="\6"then a[e]=function(n,e)return o(8,nil,o,e,n)end elseif d=="\4"then e=a[e]elseif d=="\0"then e=a[e][n(t.byte(n(0x01)))];end local n=n(0x08)r[n]=e end end end end end elseif e%2~=0 then e=(e-0x4d)%0x1111 while n<0x332 and e%0x228e<0x1147 do n=n+1 e=(e-655)%47300 local a=n+e if(e%0x3422)<=0x1a11 then e=(e*0x302)%0x5c79 local e=65084 if not d[e]then d[e]=0x1 f="\4\8\116\111\110\117\109\98\101\114\65\100\95\103\72\110\122\107\0\6\115\116\114\105\110\103\4\99\104\97\114\74\84\97\108\69\88\68\74\0\6\115\116\114\105\110\103\3\115\117\98\107\70\103\66\120\111\118\116\0\6\115\116\114\105\110\103\4\98\121\116\101\116\77\72\112\67\99\118\72\0\5\116\97\98\108\101\6\99\111\110\99\97\116\83\73\98\122\97\115\71\98\0\5\116\97\98\108\101\6\105\110\115\101\114\116\111\77\86\87\84\67\119\106\5";end elseif e%2~=0 then e=(e-0x12b)%0xb4a2 local e=8828 if not d[e]then d[e]=0x1 end else e=(e-0x3d6)%0x3fe3 n=n+1 local e=77522 if not d[e]then d[e]=0x1 end end end else e=(e-0x249)%0x35cc n=n+1 while n<0x14c and e%0x2a8c<0x1546 do n=n+1 e=(e-872)%15887 local a=n+e if(e%0x2fcc)<=0x17e6 then e=(e*0x2f2)%0x7366 local e=40714 if not d[e]then d[e]=0x1 r={};end elseif e%2~=0 then e=(e*0x72)%0x6280 local e=44801 if not d[e]then d[e]=0x1 u=tonumber;end else e=(e-0x3df)%0x3fd n=n+1 local e=54057 if not d[e]then d[e]=0x1 t=string;end end end end end e=(e-1023)%21217 end l(f);local n={};for e=0x0,0xff do local d=r.JTalEXDJ(e);n[e]=d;n[d]=e;end local function h(e)return n[e];end local d=(function(f,l)local t,d=0x01,0x10 local n={{},{},{}}local a=-0x01 local e=0x01 local o=f while true do n[0x03][r.kFgBxovt(l,e,(function()e=t+e return e-0x01 end)())]=(function()a=a+0x01 return a end)()if a==(0x0f)then a=""d=0x000 break end end local a=#l while e<a+0x01 do n[0x02][d]=r.kFgBxovt(l,e,(function()e=t+e return e-0x01 end)())d=d+0x01 if d%0x02==0x00 then d=0x00 r.oMVWTCwj(n[0x01],(h((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+o)%0x100)));o=f+o;end end return r.SIbzasGb(n[0x01])end);l(d(201,"8mj}{xv^b)09BcUZ}B"));l(d(132,"1H,^G9C(3#/F.8_I(.I__(CG8_9H8,G(C;^..#^8F.,/F#,C/(M^/8HG/H/.,#Hc(II#3)I.((8/9H8/Cq.8CP8._8C89G8,G9.CG3//H3FG^G3I,G3.WO^0F,#FH3#,693CIFH9I#C#I3C^_GGHFCC,F8,FF393/S8393^8/8^./..9/3H.##,3#.H3(^IG#^8#C8=G(/3.H+I^CH_.CH89CL.#93.H^_.G^##(HHF8R33H,#3/s/^GF^(_t#3^HU3(nCG^IFG._IG(_#^/.^G#(w_.8FGH.9G.#I,,3IuFFHHC/CHZ^CFHC9IG33I/C._G9/I/CG3.i.IGCF_FC3_,998CGFFk^F##,8.(^(#^^_Gp.H/.H9#,H338//#9&/33I9(^I(C#8FCH8CGG88C>_C_.C/99./G3F9^^F(,(FG,#3^HF(_l#(H/.,#HJ3_EH3,SG9C8((^./GCF.GH8^IfC_9(.9G3F8^(.G}838H(#HI83/AG3R/.,.HH3HHJ3h##(CI3((I^(,88^/./^3F_C,8#G3CH"));local e=(-7991+(function()local d,n=0,1;(function(e)e(e(e))end)(function(e)if d>109 then return e end d=d+1 n=(n*312)%13681 if(n%978)<489 then return e(e(e)and e(e))else return e end return e end)return n;end)())local le=(getfenv)or(function()return _ENV end);local h=r._piGcJYE or r.aWaZLipz;local g=1;local l=3;local a=2;local f=4;local function ne(m,...)local s=d(e,"k,p-a?m94KZdJ3onU3o43J3yJ?J9ZJZuKaJno,oadmdKdZZaZ-K?mn9?9mmo?,?p3?ondJdDZaoJnaoKo944JpdKd!K3aJK99?9d,Jm.?ma9aRp?,9,J_,naZaon3?3adJm44KKnK-4m?nm??9f4-pD-J?JnZJZ{Ka3Jo,3JJKJ4dddpZ49J4dm 9i?Kana?,3-mpnpaj?Tmono?9?9n?J?0aa9dKdK?4QmJmZ,9?4n4-ppKppWJdJn,Zaod3,3pJZZ3Zo?,p?,J/JQ8na-Ja,a4-4dKdKZ^Ka443dJnJoZ4KpZ?4,mJm94-?Ja3a-o,o-J4dJdQn4n3n4o?oa39JoJaK9K3KoKm93mdm,n,nn34JJJ2pm Z,an,n9od3,3ad3ZJ9m?n?-anap-#pm,4,-E9n9oJ3o3?JZJ,Zo9,9a?4aJa;49434Z9a?pm9m;aK-Z-,,n,,,4+,ndoo9?9p?J?yaa4dK,Kp4Zm3mo,!pJa9-JJ,doZ4KJKi39oJJ33pJ4Z3Zo99KK4,U3t4nao43J,a-KpZV3,an3n9oZ9,4d?4aJaIm-Kd4,4p9Z?3?o?-S-,4-,,p,SP,ondno939JoJaK-ZZK54?4ma?-3m-a9no-4pKp,,,,zJ3d?Z4KJm,m3a4-J-<9,499dmoa9a3-npn,9pJ,o+K8ponond4J3dJdrZ?ZpmKK+4a9mnKn9ot3aJ4#apa,4F43no?om3oJ?d-ZK-Kaopx,a84mama?4a4-nnZo-39{-n,n,333n4oJmd9KoKJK-K&-Zm-m-??.damn?o9,-^,(,o3onKnm??JaJar-a9,9n9n9pnKn-oD3aJ4(J,JH?ndn,JK34mKm-?Yaa-49n4?44admdmpaK3K3*JHdaZ4E-n,n,33m3m??aa4-J4a434J94m?n9o43J3yJad4ZJda3a4K499&ma?4K4ZnK94K44m+96?Km?a?amJKJ-d&ZaK43JoJ3?o,J,Jpd9-K-mpH,a/4a-???4pd-,-ppZ,,nnn?4?94mJm(?oa4-J-fp?,oxJ//na?Z-3-op4p9,KZ,KK449J9XZoJ9Zo4KK4pK,o,<=an4??aa3?J3dJdrZah4ono,o63a?n?Eaa-4pJpR,an4-dn,oo34JJJ8p,)K,aoRnL3Ko?J?Jmdd-3-9pa,4TJ9_mcaK??-K-p,nZ3ZaKa449J3aJ?JJZ3a,-4p4,J,0md?K?Ka?3?JJdJd&Za;?o3na3JmK?J?Aaa-dpJpT,aEKv-n>oa34,a-ap4,4o-n?n49K9bm0?aa4Z-K,K,9383wZnao43J,Z,929nZoanKodod3aJK?4aJaH-ap4p?,fAan4oJnm3aJ4dJdUZaK44JZt93m4?J?<aa-4pnpypmidnJnpoa3ZJJJ+daJ4ZdKV4m94moms??a4-J-3pa,JWJU,nao43J3q3-d4ZoZzK4449J9vma?KaJab-ap4,J,jCan4,Ko<3aJ4dJdiZaK44JZ&9am4?J?,aa-4pJp1-Zz4nJn!nmnaJJJbdaZJKJKW4a9o43mf??a4-J-1p?,4Uorrnap93J3<Jad4ZJZbKa44dd9{ma?4a3a(-ap4,J,,lan4oJop3aJKdJdmo9K44J4.K9m4?3?vaa-4-O-,,aB4nJ,-oa3KJJJmJoZ4K3Kw4o94m3mg??a4aea,pa,4NJlZnaoK3J3a3?d4ZJZ;d944939z4aK?aJap-apK,J,42anoDmo03mJ4JZd&Z?K4434U949K?J?uaaampJp,,a=J+3ngoa34onJzd?Z4dJJ34a9ZmJm,?a?+-Japad,4(nG{noo43J3uoaJ4ZJZ-Ka4d9J9,mamZm-af-4p4p,,Pran4YJn43aJ3dJd,ZaZ84J4i4dm4m,?PaK-4pJpw,aEZnJn-oa33JJJpdaZ4Z,K}4m94mome?9a4?Jm3pa,dgJ7pnaon3JnL},d4dXZOKm444p9QmZ93aJa--aa-,J,,7anJoJoao?J4dJdhdnK4434T949K?J?Uaa?dpJp,,ap4-KnQo934JoJNd9Z4ZoZJ4a9JmJmK?aa4-J?+m,,4,LrGn4o43o3>JZooZJZ-KaZK9J9,ma?JaJaaa?p4,J,ip?n4o3oG343KdJd.Zadd4J4,9a44KK?&a9-4pop<,9;4nJ,ooa3dJJJpdaZ4KJKC4m94momH?ma4-J-%paam}J8pnaoZ3J3LJad4JJZYKa44939Ama?4aJ9,-ap4,J,{cZn4oJo>3?J4dJd%dmda4J4l9a9m?J?QaaaZpopN,ah4RpnUoa34np34daZ4KJKm4a9KmJmp?aaJa3-Cpa,4,p+)n?o43JnwJad4ZJZ,Ka449J4p4U?4aJa_a4p4,J,FpanJoJo63aJ4dJJKZaZZ4n4.9mm4m-?iaa-4pJ-,,au4nJnpoa3ZJJ3pJcZ4K3KyK494mJmO9a?9-J-,pa,KrJ,KnanZ3o3GJ9d4ddZhKa449J4ama?KaJa--apZ,Jppp8n4ooo!o4J4dJdPJaJJ4J4p9amZ?JmKaaaZamp ,4!4;9n*oa34JJJ3daZZKJKa4a9ZmJ9p?da4-n-I-4,4vJ)%,ana3J3-JaddZJdpKaKZKa9<m4?4?Jay-ap4,J,?jan3oJo-3aJ4dJJpo.K4Kp4e4,m4?J?Oaa?-pJpa,aeJnJnmoa3oo3JydKZ4KJKt4?94momP?a9p-J-6pa,K6Jz1nao4Fm3hJad4dEZFKa444o93ma?3aJa,-ap4,Jppr4n4n,oR3?J4dJdXZaZn4J4?9amK?J?paa-oaapN,Kw4panDo?34JJJLd4dKKJK#4aZUmJm,?am4?K->pZ,4%J.Vn9o43JowJaJ}ZJZ-Ka449J9(93?4??ae-Kp4,J,&,mn3oJoZ3a3JdJd:Zad4Zm4h9om4mm?u?J-4aJpp,a,pnJnZoaonJJJMdnZ4ZpKb4o94m3m:?4mQ-J-^paa42JB,nau4nK3:JZd4ZoZrZ9444o4nmam^aJaK-ap4,J,U,-n4n?o#3aJ4JidE3aKK4J4K9a93?J?Zaam4-Zpr,3h45,nBo434nJJ4dad,KJKJ4a4omJKR?3a4a?-l-?,4,a1inan33J3mJaJ,ZJZ,Ka44KJ9Ema?4a3al-ap4");local n=0;r.kRMZdUll(function()r.KRCCmVjX()n=n+1 end)local function e(d,e)if e then return n end;n=d+n;end local d,n,c=o(0,o,e,s,r.tMHpCcvH);local function t()local n,d=r.tMHpCcvH(s,e(1,3),e(5,6)+2);e(2);return(d*256)+n;end;local p=true;local p=0 local function b()local e=n();local n=n();local l=1;local a=(d(n,1,20)*(2^32))+e;local e=d(n,21,31);local n=((-1)^d(n,32));if(e==0)then if(a==p)then return n*0;else e=1;l=0;end;elseif(e==2047)then return(a==0)and(n*(1/0))or(n*(0/0));end;return r.pOTwAYtn(n,e-1023)*(l+(a/(2^52)));end;local k=n;local function _(n)local d;if(not n)then n=k();if(n==0)then return'';end;end;d=r.kFgBxovt(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+p),#d do e=e..r.kFgBxovt(d,n,n)end return e;end;local p=#r.P_AYwkKz(u('\49.\48'))~=1 local e=n;local function ae(...)return{...},r.AESQARPP('#',...)end local function ne()local e={};local o={};local s={};local u={s,o,nil,e};local e=n()local h={}for a=1,e do local d=c();local n;if(d==0)then n=(c()~=#{});elseif(d==3)then local e=b();if p and r.IBrQCTxD(r.P_AYwkKz(e),'.(\48+)$')then e=r.aBVHRzuh(e);end n=e;elseif(d==1)then n=_();end;h[a]=n;end;for e=1,n()do o[e-(#{1})]=ne();end;u[3]=c();for u=1,n()do local e=c();if(d(e,1,1)==0)then local o=d(e,2,3);local r=d(e,4,6);local e={t(),t(),nil,nil};if(o==0)then e[l]=t();e[f]=t();elseif(o==#{1})then e[l]=n();elseif(o==m[2])then e[l]=n()-(2^16)elseif(o==m[3])then e[l]=n()-(2^16)e[f]=t();end;if(d(r,1,1)==1)then e[a]=h[e[a]]end if(d(r,2,2)==1)then e[l]=h[e[l]]end if(d(r,3,3)==1)then e[f]=h[e[f]]end s[u]=e;end end;return u;end;local function de(d,e,n)local a=e;local a=n;return u(r.IBrQCTxD(r.IBrQCTxD(({r.kRMZdUll(d)})[2],e),n))end local function z(y,p,c)local function de(...)local t,_,m,ne,b,d,s,ee,j,k,u,n;local e=0;while-1<e do if 2>=e then if e>=1 then if 0~=e then for n=26,88 do if e>1 then d=-41;s=-1;break;end;m=o(6,69,3,24,y);b=ae ne=0;break;end;else m=o(6,69,3,24,y);b=ae ne=0;end else t=o(6,29,1,54,y);_=o(6,45,2,16,y);end else if e>=5 then if 3~=e then repeat if 5~=e then e=-2;break;end;n=o(7);until true;else n=o(7);end else if-1<e then repeat if 3~=e then k=r.AESQARPP('#',...)-1;u={};break;end;ee={};j={...};until true;else k=r.AESQARPP('#',...)-1;u={};end end end e=e+1;end;for e=0,k do if(e>=m)then ee[e-m]=j[e+1];else n[e]=j[e+1];end;end;local e=k-m+1 local e;local o;local function m(...)while true do end end while true do if d<-40 then d=d+42 end e=t[d];o=e[g];if 33<o then if o<51 then if o<42 then if 38>o then if o>=36 then if 32~=o then for t=12,84 do if o>36 then if(n[e[a]]<n[e[f]])then d=e[l];else d=d+1;end;break;end;if n[e[a]]then d=d+1;else d=e[l];end;break;end;else if(n[e[a]]<n[e[f]])then d=e[l];else d=d+1;end;end else if o==35 then n[e[a]]=p[e[l]];else local d=e[a]n[d](h(n,d+1,e[l]))end end else if 39>=o then if o>=34 then repeat if 39>o then n[e[a]]=(e[l]~=0);break;end;local r;for o=0,6 do if o>2 then if 5<=o then if o>=1 then for c=41,70 do if 6>o then r=e[a]n[r]=n[r](h(n,r+1,e[l]))d=d+1;e=t[d];break;end;n[e[a]]=n[e[l]][n[e[f]]];break;end;else r=e[a]n[r]=n[r](h(n,r+1,e[l]))d=d+1;e=t[d];end else if 1~=o then for r=14,90 do if 3<o then n[e[a]]=#n[e[l]];d=d+1;e=t[d];break;end;n[e[a]]=n[e[l]][e[f]];d=d+1;e=t[d];break;end;else n[e[a]]=#n[e[l]];d=d+1;e=t[d];end end else if 1<=o then if-3<o then repeat if 1~=o then n(e[a],e[l]);d=d+1;e=t[d];break;end;n[e[a]]=n[e[l]][e[f]];d=d+1;e=t[d];until true;else n[e[a]]=n[e[l]][e[f]];d=d+1;e=t[d];end else n[e[a]]=c[e[l]];d=d+1;e=t[d];end end end until true;else n[e[a]]=(e[l]~=0);end else if 41>o then n[e[a]][e[l]]=e[f];else n[e[a]]=n[e[l]][e[f]];end end end else if 46<=o then if o>=48 then if 48>=o then n[e[a]][e[l]]=e[f];else if 49==o then for e=e[a],e[l]do n[e]=nil;end;else n[e[a]]={};end end else if 44<=o then repeat if o<47 then do return n[e[a]]end break;end;local d=e[a]local l={n[d](n[d+1])};local a=0;for e=d,e[f]do a=a+1;n[e]=l[a];end until true;else local d=e[a]local l={n[d](n[d+1])};local a=0;for e=d,e[f]do a=a+1;n[e]=l[a];end end end else if o>43 then if 40<=o then for d=34,81 do if o~=45 then local l=e[l];local d=n[l]for e=l+1,e[f]do d=d..n[e];end;n[e[a]]=d;break;end;local e=e[a];do return h(n,e,s)end;break;end;else local e=e[a];do return h(n,e,s)end;end else if o>=41 then for d=10,66 do if o<43 then local o,r,f,t,h,c;local d=0;while d>-1 do if 4>d then if 2<=d then if 3~=d then f=l;else t=n;end else if d>-3 then repeat if 0~=d then r=a;break;end;o=e;until true;else r=a;end end else if 6>d then if d>=2 then for e=35,89 do if d~=5 then h=t[o[f]];break;end;c=o[r];break;end;else h=t[o[f]];end else if 3<=d then for e=30,74 do if 7~=d then n[c]=h;break;end;d=-2;break;end;else d=-2;end end end d=d+1 end break;end;local d=e[a]n[d](h(n,d+1,e[l]))break;end;else local o,t,r,f,h,c;local d=0;while d>-1 do if 4>d then if 2<=d then if 3~=d then r=l;else f=n;end else if d>-3 then repeat if 0~=d then t=a;break;end;o=e;until true;else t=a;end end else if 6>d then if d>=2 then for e=35,89 do if d~=5 then h=f[o[r]];break;end;c=o[t];break;end;else h=f[o[r]];end else if 3<=d then for e=30,74 do if 7~=d then n[c]=h;break;end;d=-2;break;end;else d=-2;end end end d=d+1 end end end end end else if o<=58 then if 54>=o then if o<53 then if 52>o then local o,r,f,t,h;local d=0;while d>-1 do if 3<=d then if 5<=d then if 1~=d then for e=45,92 do if d<6 then n(h,t);break;end;d=-2;break;end;else d=-2;end else if d>=-1 then for e=14,84 do if 3<d then h=o[r];break;end;t=o[f];break;end;else t=o[f];end end else if 0>=d then o=e;else if 0<=d then for e=40,54 do if d<2 then r=a;break;end;f=l;break;end;else r=a;end end end d=d+1 end else local r,s;for o=0,6 do if 3>o then if 1>o then r=e[a];s=n[e[l]];n[r+1]=s;n[r]=s[e[f]];d=d+1;e=t[d];else if-3~=o then for f=33,80 do if o>1 then r=e[a]n[r]=n[r](h(n,r+1,e[l]))d=d+1;e=t[d];break;end;n(e[a],e[l]);d=d+1;e=t[d];break;end;else n(e[a],e[l]);d=d+1;e=t[d];end end else if 4<o then if o>3 then repeat if 6>o then n(e[a],e[l]);d=d+1;e=t[d];break;end;n[e[a]]=n[e[l]];until true;else n[e[a]]=n[e[l]];end else if 4>o then n[e[a]]=c[e[l]];d=d+1;e=t[d];else n[e[a]]=n[e[l]][e[f]];d=d+1;e=t[d];end end end end end else if 52<=o then for t=10,66 do if o>53 then if(n[e[a]]==n[e[f]])then d=d+1;else d=e[l];end;break;end;local d=e[a]n[d]=n[d](h(n,d+1,e[l]))break;end;else local d=e[a]n[d]=n[d](h(n,d+1,e[l]))end end else if o<57 then if 52<o then for h=45,59 do if o~=55 then local s=_[e[l]];local h;local o={};h=r.GEuDAmRV({},{__index=function(n,e)local e=o[e];return e[1][e[2]];end,__newindex=function(d,e,n)local e=o[e]e[1][e[2]]=n;end;});for a=1,e[f]do d=d+1;local e=t[d];if e[g]==42 then o[a-1]={n,e[l]};else o[a-1]={p,e[l]};end;u[#u+1]=o;end;n[e[a]]=z(s,h,c);break;end;local a=e[a];local d=n[e[l]];n[a+1]=d;n[a]=d[e[f]];break;end;else local s=_[e[l]];local h;local o={};h=r.GEuDAmRV({},{__index=function(n,e)local e=o[e];return e[1][e[2]];end,__newindex=function(d,e,n)local e=o[e]e[1][e[2]]=n;end;});for a=1,e[f]do d=d+1;local e=t[d];if e[g]==42 then o[a-1]={n,e[l]};else o[a-1]={p,e[l]};end;u[#u+1]=o;end;n[e[a]]=z(s,h,c);end else if 53<o then for t=17,59 do if 58~=o then local e=e[a];do return n[e](h(n,e+1,s))end;break;end;d=e[l];break;end;else d=e[l];end end end else if 62<o then if 64>=o then if 64==o then if(n[e[a]]<n[e[f]])then d=e[l];else d=d+1;end;else n[e[a]]=p[e[l]];end else if o<=65 then c[e[l]]=n[e[a]];else if o~=64 then repeat if 66~=o then if n[e[a]]then d=d+1;else d=e[l];end;break;end;if(n[e[a]]==n[e[f]])then d=d+1;else d=e[l];end;until true;else if(n[e[a]]==n[e[f]])then d=d+1;else d=e[l];end;end end end else if o<=60 then if 57<=o then repeat if o>59 then n(e[a],e[l]);break;end;n[e[a]]=#n[e[l]];until true;else n[e[a]]=#n[e[l]];end else if o>59 then repeat if o~=61 then n[e[a]]=(e[l]~=0);break;end;n[e[a]]=n[e[l]][e[f]];until true;else n[e[a]]=n[e[l]][e[f]];end end end end end else if 16>=o then if 8>o then if 4<=o then if o<6 then if 5~=o then local o,r;for s=0,6 do if 2<s then if 5<=s then if 4<s then for f=16,66 do if s>5 then o=e[a]n[o]=n[o](h(n,o+1,e[l]))break;end;n(e[a],e[l]);d=d+1;e=t[d];break;end;else n(e[a],e[l]);d=d+1;e=t[d];end else if s~=-1 then repeat if s>3 then o=e[a];r=n[e[l]];n[o+1]=r;n[o]=r[e[f]];d=d+1;e=t[d];break;end;n[e[a]]=c[e[l]];d=d+1;e=t[d];until true;else o=e[a];r=n[e[l]];n[o+1]=r;n[o]=r[e[f]];d=d+1;e=t[d];end end else if s<1 then o=e[a];r=n[e[l]];n[o+1]=r;n[o]=r[e[f]];d=d+1;e=t[d];else if 1<s then o=e[a]n[o]=n[o](h(n,o+1,e[l]))d=d+1;e=t[d];else n(e[a],e[l]);d=d+1;e=t[d];end end end end else n[e[a]]=n[e[l]][n[e[f]]];end else if o>4 then repeat if o<7 then for o=0,3 do if 2>o then if o>-4 then for f=13,85 do if o>0 then c[e[l]]=n[e[a]];d=d+1;e=t[d];break;end;n[e[a]]=(e[l]~=0);d=d+1;e=t[d];break;end;else n[e[a]]=(e[l]~=0);d=d+1;e=t[d];end else if o>=-2 then repeat if o~=3 then n[e[a]]=c[e[l]];d=d+1;e=t[d];break;end;if(n[e[a]]~=e[f])then d=d+1;else d=e[l];end;until true;else if(n[e[a]]~=e[f])then d=d+1;else d=e[l];end;end end end break;end;local t,o,c,f,r,h;local d=0;while d>-1 do if d>3 then if d>5 then if 2<=d then for e=27,79 do if 6~=d then d=-2;break;end;n[h]=r;break;end;else d=-2;end else if 5==d then h=t[o];else r=f[t[c]];end end else if 2>d then if d>=-3 then repeat if d~=0 then o=a;break;end;t=e;until true;else o=a;end else if 2==d then c=l;else f=n;end end end d=d+1 end until true;else local o,t,c,h,r,f;local d=0;while d>-1 do if d>3 then if d>5 then if 2<=d then for e=27,79 do if 6~=d then d=-2;break;end;n[f]=r;break;end;else d=-2;end else if 5==d then f=o[t];else r=h[o[c]];end end else if 2>d then if d>=-3 then repeat if d~=0 then t=a;break;end;o=e;until true;else t=a;end else if 2==d then c=l;else h=n;end end end d=d+1 end end end else if 2>o then if-4<o then repeat if 1>o then local d=e[a]n[d]=n[d](h(n,d+1,e[l]))break;end;local a=e[a]local l={n[a](n[a+1])};local d=0;for e=a,e[f]do d=d+1;n[e]=l[d];end until true;else local d=e[a]n[d]=n[d](h(n,d+1,e[l]))end else if-1<o then repeat if 2<o then if not n[e[a]]then d=d+1;else d=e[l];end;break;end;for e=e[a],e[l]do n[e]=nil;end;until true;else if not n[e[a]]then d=d+1;else d=e[l];end;end end end else if o>11 then if o>13 then if 15<=o then if o<16 then local e=e[a]n[e]=n[e]()else local r;for o=0,6 do if o<3 then if 1>o then n[e[a]]=n[e[l]];d=d+1;e=t[d];else if-2~=o then for f=15,76 do if o~=2 then n[e[a]]=n[e[l]];d=d+1;e=t[d];break;end;n[e[a]]=c[e[l]];d=d+1;e=t[d];break;end;else n[e[a]]=n[e[l]];d=d+1;e=t[d];end end else if 4<o then if 1<=o then for f=41,93 do if 6~=o then r=e[a]n[r](h(n,r+1,e[l]))d=d+1;e=t[d];break;end;d=e[l];break;end;else r=e[a]n[r](h(n,r+1,e[l]))d=d+1;e=t[d];end else if-1<o then for r=49,59 do if o<4 then n[e[a]]=n[e[l]][e[f]];d=d+1;e=t[d];break;end;n[e[a]]=n[e[l]][e[f]];d=d+1;e=t[d];break;end;else n[e[a]]=n[e[l]][e[f]];d=d+1;e=t[d];end end end end end else local e=e[a];do return h(n,e,s)end;end else if 11<o then for f=18,93 do if o<13 then n[e[a]]=c[e[l]];break;end;local o;for f=0,3 do if f>=2 then if 2==f then o=e[a]n[o]=n[o]()d=d+1;e=t[d];else if n[e[a]]then d=d+1;else d=e[l];end;end else if f~=0 then n[e[a]]=c[e[l]];d=d+1;e=t[d];else c[e[l]]=n[e[a]];d=d+1;e=t[d];end end end break;end;else local o;for f=0,3 do if f>=2 then if 2==f then o=e[a]n[o]=n[o]()d=d+1;e=t[d];else if n[e[a]]then d=d+1;else d=e[l];end;end else if f~=0 then n[e[a]]=c[e[l]];d=d+1;e=t[d];else c[e[l]]=n[e[a]];d=d+1;e=t[d];end end end end end else if o>9 then if o~=11 then do return end;else do return n[e[a]]end end else if o>=4 then repeat if 8<o then n[e[a]]=#n[e[l]];break;end;local e=e[a]n[e]=n[e]()until true;else local e=e[a]n[e]=n[e]()end end end end else if 25<=o then if 29>o then if 26<o then if 23<=o then for d=14,68 do if o>27 then n[e[a]]=c[e[l]];break;end;local c,u,h,t,r,s,o;local d=0;while d>-1 do if 2<d then if d>4 then if d<6 then n[s]=o;else d=-2;end else if 2~=d then repeat if 3~=d then o=n[r];for e=1+r,t[h]do o=o..n[e];end;break;end;s=t[c];until true;else o=n[r];for e=1+r,t[h]do o=o..n[e];end;end end else if d<1 then c=a;u=l;h=f;else if-1<d then repeat if d~=1 then r=t[u];break;end;t=e;until true;else t=e;end end end d=d+1 end break;end;else local s,c,h,t,r,u,o;local d=0;while d>-1 do if 2<d then if d>4 then if d<6 then n[u]=o;else d=-2;end else if 2~=d then repeat if 3~=d then o=n[r];for e=1+r,t[h]do o=o..n[e];end;break;end;u=t[s];until true;else o=n[r];for e=1+r,t[h]do o=o..n[e];end;end end else if d<1 then s=a;c=l;h=f;else if-1<d then repeat if d~=1 then r=t[c];break;end;t=e;until true;else t=e;end end end d=d+1 end end else if o~=25 then if not n[e[a]]then d=d+1;else d=e[l];end;else n[e[a]]={};end end else if o<31 then if 28<=o then repeat if o>29 then local d=e[a]local a,e=b(n[d](h(n,d+1,e[l])))s=e+d-1 local e=0;for d=d,s do e=e+1;n[d]=a[e];end;break;end;local a=e[a];local d=n[e[l]];n[a+1]=d;n[a]=d[e[f]];until true;else local a=e[a];local d=n[e[l]];n[a+1]=d;n[a]=d[e[f]];end else if o>=32 then if 33==o then local s=_[e[l]];local h;local o={};h=r.GEuDAmRV({},{__index=function(n,e)local e=o[e];return e[1][e[2]];end,__newindex=function(d,e,n)local e=o[e]e[1][e[2]]=n;end;});for a=1,e[f]do d=d+1;local e=t[d];if e[g]==42 then o[a-1]={n,e[l]};else o[a-1]={p,e[l]};end;u[#u+1]=o;end;n[e[a]]=z(s,h,c);else do return end;end else local s,u,c,m,p,o,r;o=0;while o>-1 do if 2<o then if 4<o then if o>5 then o=-2;else n(p,m);end else if 3~=o then p=s[u];else m=s[c];end end else if 0<o then if o>-3 then for e=48,69 do if 2>o then u=a;break;end;c=l;break;end;else c=l;end else s=e;end end o=o+1 end d=d+1;e=t[d];n[e[a]]={};d=d+1;e=t[d];n[e[a]][e[l]]=e[f];d=d+1;e=t[d];n[e[a]][e[l]]=e[f];d=d+1;e=t[d];n[e[a]][e[l]]=e[f];d=d+1;e=t[d];n[e[a]][e[l]]=e[f];d=d+1;e=t[d];r=e[a]n[r](h(n,r+1,e[l]))end end end else if o>=21 then if o>22 then if o~=21 then for d=40,62 do if o>23 then local e=e[a];do return n[e](h(n,e+1,s))end;break;end;local d=e[a]local a,e=b(n[d](h(n,d+1,e[l])))s=e+d-1 local e=0;for d=d,s do e=e+1;n[d]=a[e];end;break;end;else local e=e[a];do return n[e](h(n,e+1,s))end;end else if 22==o then local o,r,m,k,u;n[e[a]]=p[e[l]];d=d+1;e=t[d];o=e[a];r=n[e[l]];n[o+1]=r;n[o]=r[e[f]];d=d+1;e=t[d];n[e[a]]=c[e[l]];d=d+1;e=t[d];o=e[a];r=n[e[l]];n[o+1]=r;n[o]=r[e[f]];d=d+1;e=t[d];n[e[a]]=p[e[l]];d=d+1;e=t[d];o=e[a]m,k=b(n[o](h(n,o+1,e[l])))s=k+o-1 u=0;for e=o,s do u=u+1;n[e]=m[u];end;d=d+1;e=t[d];o=e[a];do return n[o](h(n,o+1,s))end;else if(n[e[a]]~=e[f])then d=d+1;else d=e[l];end;end end else if 18<o then if o>16 then for d=39,75 do if 19~=o then n[e[a]]=n[e[l]][n[e[f]]];break;end;c[e[l]]=n[e[a]];break;end;else c[e[l]]=n[e[a]];end else if o==18 then if(n[e[a]]~=e[f])then d=d+1;else d=e[l];end;else d=e[l];end end end end end end d=1+d;end;end;return de end;local l=0xff;local c={};local o=(1);local a='';(function(n)local d=n local t=0x00 local e=0x00 d={(function(f)if t>0x2a then return f end t=t+1 e=(e+0xf51-f)%0x1e return(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x60);end return true end)'WvRpp'and d[0x1](0x125+f))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xc2);end return true end)'VqaiU'and d[0x2](f+0x22a))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x54);l[2]=(l[2]*(de(function()c()end,h(a))-de(l[1],h(a))))+1;c[o]={};l=l[2];o=o+l;end return true end)'bLnzq'and d[0x3](f+0x14b))or f end),(function(a)if t>0x28 then return a end t=t+1 e=(e+0x1179-a)%0x40 return(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0xcc);end return true end)'tonHb'and d[0x3](0x3ac+a))or(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x4);end return true end)'vhQny'and d[0x2](a+0x350))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x25);end return true end)'WFqwp'and d[0x1](a+0x2b2))or a end),(function(f)if t>0x31 then return f end t=t+1 e=(e+0xb66-f)%0x27 return(e%0x03==0x2 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x6b);a={a..'\58 a',a};c[o]=ne();o=o+((not r.bufkKydu)and 1 or 0);a[1]='\58'..a[1];l[2]=0xff;end return true end)'kmnYo'and d[0x1](0x2b1+f))or(e%0x03==0x1 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x10);a='\37';l={function()l()end};a=a..'\100\43';end return true end)'mECtD'and d[0x3](f+0x133))or(e%0x03==0x0 and(function(d)if not n[d]then e=e+0x01 n[d]=(0x50);c[o]=le();o=o+l;end return true end)'iiZpJ'and d[0x2](f+0x3b4))or f end)}d[0x3](0x1699)end){};local e=z(h(c));return e(...);end return ne((function()local n={}local e=0x01;local d;if r.bufkKydu then d=r.bufkKydu(ne)else d=''end if r.IBrQCTxD(d,r.ZLlpOhTL)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(d,e,n,a,l,o)local o;if d<4 then if d>=2 then if d<3 then do return 16777216,65536,256 end;else do return e(1),e(4,l,a,n,e),e(5,l,a,n)end;end else if-1<d then repeat if 1~=d then do return e(1),e(4,l,a,n,e),e(5,l,a,n)end;break;end;do return function(n,e,d)if d then local e=(n/2^(e-1))%2^((d-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;until true;else do return e(1),e(4,l,a,n,e),e(5,l,a,n)end;end end else if d>=6 then if d>6 then if 3~=d then repeat if d>7 then do return n(d,nil,n);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,d,l,a,n)if n then return e[n]elseif a then return e else e[d]=l end end})end until true;else do return setmetatable({},{['__\99\97\108\108']=function(e,l,a,d,n)if n then return e[n]elseif d then return e else e[l]=a end end})end end else do return l[n]end;end else if d>=0 then repeat if 4~=d then local d=a;do return function()local e=e(n,d(d,d),d(d,d));d(1);return e;end;end;break;end;local d=a;local t,l,o=l(2);do return function()local a,e,n,f=e(n,d(d,d),d(d,d)+3);d(4);return(f*t)+(n*l)+(e*o)+a;end;end;until true;else local d=a;local l,a,o=l(2);do return function()local n,e,t,f=e(n,d(d,d),d(d,d)+3);d(4);return(f*l)+(t*a)+(e*o)+n;end;end;end end end end),...)
Advertisement
Comments
Add Comment
Please, Sign In to add comment
Advertisement