portalfan_4324

fe neko [rig works in just a baseplate]

Oct 27th, 2024 (edited)
204
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 26.54 KB | None | 0 0
  1. -- it is safe to record a video with this script BUT MAKE SURE YOU CREDIT ME or else ur an asshole
  2. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _DS_hRJaXtMfR = a; end)); return(function(d,...)local r;local f;local o;local l;local s;local a;local e=24915;local n=0;local t={};while n<444 do n=n+1;while n<0x2a7 and e%0x2ebc<0x175e do n=n+1 e=(e+857)%40657 local h=n+e if(e%0x2046)>=0x1023 then e=(e*0x2bb)%0x8835 while n<0x349 and e%0x2302<0x1181 do n=n+1 e=(e+177)%44182 local f=n+e if(e%0x8d6)<=0x46b then e=(e+0x2ee)%0x6c85 local e=17034 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end elseif e%2~=0 then e=(e*0x179)%0x2d12 local e=75595 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end else e=(e-0x140)%0x9a14 n=n+1 local e=23864 if not t[e]then t[e]=0x1 r="\4\8\116\111\110\117\109\98\101\114\65\65\122\115\82\81\108\95\0\6\115\116\114\105\110\103\4\99\104\97\114\84\68\69\74\90\82\87\77\0\6\115\116\114\105\110\103\3\115\117\98\115\111\86\90\88\80\111\104\0\6\115\116\114\105\110\103\4\98\121\116\101\95\85\89\116\72\113\105\74\0\5\116\97\98\108\101\6\99\111\110\99\97\116\114\97\112\114\87\114\98\99\0\5\116\97\98\108\101\6\105\110\115\101\114\116\95\122\110\68\122\72\69\81\5";end end end elseif e%2~=0 then e=(e+0x314)%0x23d4 while n<0x1b7 and e%0x4584<0x22c2 do n=n+1 e=(e*494)%26138 local r=n+e if(e%0x390c)>0x1c86 then e=(e+0x2a4)%0x6cfc local e=28347 if not t[e]then t[e]=0x1 f=function(t)local e=0x01 local function n(n)e=e+n return t:sub(e-n,e-0x01)end while true do local t=n(0x01)if(t=="\5")then break end local e=o.byte(n(0x01))local e=n(e)if t=="\2"then e=a.AAzsRQl_(e)elseif t=="\3"then e=e~="\0"elseif t=="\6"then l[e]=function(n,e)return d(8,nil,d,e,n)end elseif t=="\4"then e=l[e]elseif t=="\0"then e=l[e][n(o.byte(n(0x01)))];end local n=n(0x08)a[n]=e end end end elseif e%2~=0 then e=(e+0x3ac)%0x796b local e=35511 if not t[e]then t[e]=0x1 end else e=(e*0x326)%0x48b7 n=n+1 local e=86885 if not t[e]then t[e]=0x1 s=tonumber;end end end else e=(e*0x350)%0xb16f n=n+1 while n<0x236 and e%0x3b90<0x1dc8 do n=n+1 e=(e-591)%45877 local l=n+e if(e%0xecc)<=0x766 then e=(e-0x82)%0x7909 local e=33469 if not t[e]then t[e]=0x1 a={};end elseif e%2~=0 then e=(e-0x39)%0x4271 local e=37621 if not t[e]then t[e]=0x1 o=string;end else e=(e-0x2ff)%0x9cb9 n=n+1 local e=40543 if not t[e]then t[e]=0x1 end end end end end e=(e*20)%11070 end f(r);local n={};for e=0x0,0xff do local t=a.TDEJZRWM(e);n[e]=t;n[t]=e;end local function h(e)return n[e];end local o=(function(r,f)local o,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local d=r while true do n[0x03][a.soVZXPoh(f,e,(function()e=o+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""t=0x000 break end end local l=#f while e<l+0x01 do n[0x02][t]=a.soVZXPoh(f,e,(function()e=o+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 a._znDzHEQ(n[0x01],(h((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+d)%0x100)));d=r+d;end end return a.raprWrbc(n[0x01])end);f(o(6,"zF?%B{aN^MITm&_555"));f(o(211,"(>ok:fTJAM?rU.1Bo.T7B?oAfkJJ?MUBMMoTT:AMrM.Y%M:TTrMoUrBUB?1o>/?AUABkorfAfBUj.BBTk.:TJLrUAork:rJ?M1._qk>o:kfr?Jro>foXkUo:fJB>>B:?T1?FUTM>oT:JAJ?k.f11jAk1Jkr1r11Uo?CokkUM1?o?:r>f?MU1BUkUT>AkA.rMW:>BTUM?U1A?rBfkJo?1.:BMkf:BAB?M.Jq1k::1J:??U1>M>BJ1A:TAMMkof?ArrM1:0Ak?TiJ)UU1M>1keAqAA.AA1UGfUJT?:.r=>UBTrM>UD.1C.:ofMAA?T.JoxoUfkrfJCMBkrT>M6?1..>o:oJo?0rk1?>Jf>f>:3T1QTkffMArr1r1>Mkf:?TB??U.>M1f>:?..flTk:fBAkrf.r1k>rk1JMr1Bfa_kzxBkr.kvooTfAAr?A1m<UkTf.M1M1U1rV.BJMMAUUBo>.frTkrT.?B.:okMA.reJU?.:kT:?:UfAB>.fHAd?....roTf?MMMr11>k::Ef"));ArLKIsfZzCbMrXs=function(e)e((-11253+(function()local t,n=0,1;(function(e)e(e(e)and e(e))end)(function(e)if t>239 then return e end t=t+1 n=(n*541)%38443 if(n%712)<=356 then n=(n+778)%32866 return e else return e(e(e and e))end return e(e(e)and e(e))end)return n;end)()))end;sXrMbCzZfsIKLrA={a.JyiqVyTw,a.GudLDRHg};local e=(-21470+(function()local l,n=0,1;(function(e,n)n(n(e,e and e),n(e,e and e))end)(function(t,e)if l>480 then return e end l=l+1 n=(n+212)%26130 if(n%1986)<993 then n=(n+984)%28324 return e else return t(e(e,e),e(e,e))end return e(e(t,e and e),t(t,e))end,function(t,e)if l>365 then return e end l=l+1 n=(n+219)%17187 if(n%480)<240 then n=(n-847)%21942 return e else return e(t(t and t,e),e(e,t and e)and e(e,e and t))end return e(t(t,t),e(e,t))end)return n;end)())local le=(getfenv)or(function()return _ENV end);local c=a.nqrXbboB or a.UWHLhGAv;local l=2;local f=3;local m=1;local r=4;local function te(u,...)local b=o(e,"a9}febR?t/!ZGpPYpZt!eY9ep!ZtRf}tPpZzY?pP!fR?99Pt!ZRG}bhZGPt!be9}Pf?pRf}fPt!P?G9egGp9/eZbt}fPDfGttZY/Z/t}etnZG?/9eY?ZR?MeG/tPb9/Y?tfPyp?Yt!b}9!ptbt?e}fY!RGt9etS!pet!ep}fp//p9Pf!Y9G9?!Y?P/pv/bb/ofp!/p9Y9!ZG9GPb!bR!}YRt9!Pv!YRpGP//b?9GP9{Gp!!}b!9ZP}!G#/GP/fbt9pP}!?RGf9Y?GZtCebX!Gpf!PeGfRffpPfpYtebb}?G}t/eYf!GP}qP/!/RPffYRb?9RP?!ep}/!bZ}_Pbvpp?/bRZZPtfetcpp}/?bG}9}R!G?YfbY!ZYGbZZb!9PP9pBtte9}RZe/tetf}ppZp9rpY//bP}fPReG9eGZ/fR?}pYJ!G?RfebY}eP/!P?fftYpZ}GReG99pR/ZRl}bG!9PZef!s9GftteptbeGYPR}}PPZZN?bft?!RZf3Y9tp?qeeRf?!PGZ9?Rf//ZRGf9Y}Z!eRy6GbGpt9bGptpR/pRp}RYt!!t}ebYGGPtebb9/Pe/!RtffZ}!G?pe^G?pq/9be99Pb/ZRPfePG?/bPfRGtGZteb99Z!9t?RPfgY!Z_?fe/YYGftf}1pY!eRGf}Y?ZZ?Pe}EYp9/ebP}fPR!RR??}fZYG9ZPf!eR/}Pbbf9Y9!?>tps/9bR9Zbe9Pp!/eYbZY?PefNtGZfbYGZtt}epRGfRYbZ!?YZ??peJYGGRtePfZbRGf9YRZ/9}ZG/;R9}YpP/Z??ff9eZ}/^e9tfeR1Zp)/Gb!9YPe!!?fffYtZpYR!tRPfpYZbG}9Pb!!RYf}Y/ZPtfetFpp}/?eGR#P?Z9?.fbY!f}YtZZ??e9YYbp}}P?!G?9fRYZf Gbe!FYpe//bP}fPt!pZ}ftYGG9tReZ99pb/!bY}eP/!P?fftYpG}t?eP9?pR/ZR;}bvt!Y?Rf/YPGfttep9}pt/GRe}RPGZ<?bf!YYp}t/b}9fp//pR}}?PGZ??RfP:%G?t!b99ep/ZyRf}!PpZ}??fY49GRtYb&9bp!!3Re}/PPZe!pfp;}G?tG?P9RpG!>Rb}!PYZe?//exfG!tpb}9?pG!9RRf}YHZR?!e9 eGZtP?/}Rpp!fR?f}Y9Z??Ze9LbGPp}be9/pP!/Rt}PY}ZZZYe9XRGZ/pbb9ZpY!e/R}PYeZt?Pe}6?GG/9!G9ZP}!bR!}YYeZ/tet!5tpw/}b?9GP}!RRpf*YbYi?Yee_/GP/fbt9pP}ZPRGf9YRZpt=eb1!GYZbb/9YPf!ZRpffY?G_GeeRvZp,Gtb!}qPe!//ZffY/Zpt}e?+Gp9/RZ9}CP?!!RYfeY/ZPtfeYQppf/?bP}9Pt!Z/RefY!G%tebG4Ppe/tR9}}PZPY?9fRYZpftbeZHYptpGbP}fPtPi?}ftYGG9!MeZ99pb/!bY}eP/ZGZ/ft=rG}/PeG9}pR/GRK}/}p!Y?ef/9bGft/ep9R9!/GR9}R9PZK?Rf!YYY9t/eY9fpZ/pR}}?PGP,?RfpV*Gbt!eY9ePZ!fRf}ZPpZb??fGz9pt!fb(9/p!!}Re}/PPZf/9fpifG?/Qb99tpZGR?9}!Y+Ze!GfPOeGttYb}9Z9Y!9RR}Z}fZb?ZfY9R9RtPbe9tPe!}R?}GrfIf?Ze})bp&tYbe9/pPZpRtf8Y}Z??Ge9vRppppbb9PpY!?R/}PYfZGt9e}k/GGGfbR9GPH!bG#}YY!Z/?YefqtGp/}b/9GPt!RRYfvYbZ!?YbGl/pR/fbG9pP}!?RGePYRGet.et1!GY/eb/}bPfZ}Rpf}Y?ZGt9eR9tpn!Hb!}ePe!/RPffYZZptPe?99p9/RbZ}wP/!!?tfegbZPtbet0ppZ/?Re}9PP!Z?/fbY!Ytteb}&Ppt/tbp}}P?Zb?9fPYZGttbbf)YYe!tbP}ZPtZb?}fGYGG9/ZeZ9?pb!9bY}GP/!PttftYPG}tpeG9tpR/Y!G}bPG!Y/?f/YYGfttt=9}pt/GRf}RPZZ<?bRpYYGet/bJ9fpt/pR}R?PGZ9?RfGA<Gbt!eY9ep//PRf}tPpZ}?tfPK9GRtZb*f!p!/YRe}/PPZf?tfpe}G?tGb99?pZ!URb}!feZe?/fP9bPetpb}9?P?!9RR}ZYRG}?!fYleGptPbe9tpP!}RZRYY9ZR?ZeeXbGZtYbtbGpP!fRtbpY}Zt?Ge99!GZ/,bb9!pY!eR/}Pe9Zt?Pe}i?GG/9bR9ZY9!bR!}YYeZ/?Yef}tpY/}b?9GP9!R?tfAF?rG?YebS/pe/fbt9pYeZRRGffYRGRt;eb.!pbpZb/}9Pf!/RpffY?Zpt9eRe9py/bb!},Pe!/RPffY/Zptee?wPp9/?bZf}<}!!?9fe2GZPtfet9YPf/?bY}9YZ!Z?wfb9!G9teeGgPpR/tRG}}Y/G}?9f!YZGetbe!0YYe!tbP}?PtZ9?}fGYGpf/XeZ9bpb!YbY}eP/GPtbftU}G}tGeG9!pR!p/Y}bY&!Yt/f/YPGf!tbY9}pp/GR?}RYpZX?bepYYGZt/eP9fpt/p?e}GPGZ/?Re9>QGbt!R9}ep/!?RffRPpZ}??eP:!GR/bbN}}p!/YRe}pxZZftHfp}fG?tpb99Rf9!j?9}!YeZe?/fPwf9ttpbY9?P?!9RR}ZYiZG?!eZ-eGZtPbb9tpp!YR?ffY9G9?ZeGvbG!!9be}5pP!YRtftY}ZZGte9VPGZ!Zbb9ZpY!e?9}PYZZttbe}I?GG/?/p9ZPt!bR!}YYbZ/teefQt2f/}b?9GPf!RRZfdYbYE?Yeeo/p}/fbt9pP}ppRGf9YRGft,ebr!GYG!b/9PPf!ZRpf}Y?ZGZ?eRxZp=/Gb!9YPe!/!effYtZptfe?=Gp9/RRV}#PP!!??feY/ZPtfb/#ppG/?bG}9PR!Z?neGY!GtteeZsPpb/tbp}RP?!G?9fYYZG>tbe!}Gpe//bP}bPt!p?}f?YYG9tReZ9#pb/!bY}tn}!P?ffte9G}tteG}fY9/ZRM}bY9!Y?ef/9PpDttep9}p?/GRP}RYpZG?bf!YYGRt/eP9fP!ZRR}}?PGZt?RfZ_KPb/?eY9ep//PRff}PpGe?GfGk9GR/Yb.9bp!/YRp}/PPZf?/fpl}G?/PbG9RpZ!SRR}!PYZetZb/zfGttpRt9?pG!9tGbYY_Zb?!?Z^eG!tPbR9tP9PbR?}GY9Y}?Ze9zbGPp}be9/pPPHRt}PY}Z?ZGe94RGZ/9bb9!pYZRte}PYfZtt/e}j?GG!fRb9ZP9!b?}}YYeZ//PebKtGP/}bt9GY9!R?pf9YbZp?Ybb^/GP/fbt}ZP}!tRGfeYRZZtjeb9pGY/eb/9PPf!!Rpf}9MZGt9eRuGpj/Rb!9Y}e!/RPffY/Zpt}e?");local n=0;a.FzlVpLIh(function()n=n+1 end)local function e(e,t)if t then return n end;n=e+n;end local t,n,h=d(0,d,e,b,a._UYtHqiJ);local function o()local n,t=a._UYtHqiJ(b,e(1,3),e(5,6)+2);e(2);return(t*256)+n;end;local p=true;local p=0 local function z()local l=n();local e=n();local f=1;local l=(t(e,1,20)*(2^32))+l;local n=t(e,21,31);local e=((-1)^t(e,32));if(n==0)then if(l==p)then return e*0;else n=1;f=0;end;elseif(n==2047)then return(l==0)and(e*(1/0))or(e*(0/0));end;return a.eBA_Mmnu(e,n-1023)*(f+(l/(2^52)));end;local _=n;local function k(n)local t;if(not n)then n=_();if(n==0)then return'';end;end;t=a.soVZXPoh(b,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+p),#t do e=e..a.soVZXPoh(t,n,n)end return e;end;local p=#a.JyiqVyTw(s('\49.\48'))~=1 local e=n;local function fe(...)return{...},a.OulbzDka('#',...)end local function ne()local e={};local d={};local c={};local s={c,d,nil,e};local e=n()local b={}for l=1,e do local t=h();local e;if(t==2)then e=(h()~=#{});elseif(t==0)then local n=z();if p and a.TAJRpCDU(a.JyiqVyTw(n),'.(\48+)$')then n=a.CahzOumq(n);end e=n;elseif(t==1)then e=k();end;b[l]=e;end;for e=1,n()do d[e-(#{1})]=ne();end;s[3]=h();for s=1,n()do local e=h();if(t(e,1,1)==0)then local d=t(e,2,3);local a=t(e,4,6);local e={o(),o(),nil,nil};if(d==0)then e[f]=o();e[r]=o();elseif(d==#{1})then e[f]=n();elseif(d==u[2])then e[f]=n()-(2^16)elseif(d==u[3])then e[f]=n()-(2^16)e[r]=o();end;if(t(a,1,1)==1)then e[l]=b[e[l]]end if(t(a,2,2)==1)then e[f]=b[e[f]]end if(t(a,3,3)==1)then e[r]=b[e[r]]end c[s]=e;end end;return s;end;local function te(t,n,e)local l=n;local l=e;return s(a.TAJRpCDU(a.TAJRpCDU(({a.FzlVpLIh(t)})[2],n),e))end local function k(ee,p,h)local function ne(...)local o,_,z,ne,g,t,b,u,j,y,s,n;local e=0;while-1<e do if 3>e then if e>=1 then if 2~=e then z=d(6,63,3,84,ee);g=fe ne=0;else t=-41;b=-1;end else o=d(6,1,1,77,ee);_=d(6,97,2,35,ee);end else if 4<e then if 1<=e then repeat if e~=6 then n=d(7);break;end;e=-2;until true;else e=-2;end else if e>2 then repeat if e<4 then u={};j={...};break;end;y=a.OulbzDka('#',...)-1;s={};until true;else y=a.OulbzDka('#',...)-1;s={};end end end e=e+1;end;for e=0,y do if(e>=z)then u[e-z]=j[e+1];else n[e]=j[e+1];end;end;local z=y-z+1 local e;local d;local function y(...)while true do end end while true do if t<-40 then t=t+42 end e=o[t];d=e[m];if 42>=d then if d<=20 then if 9>=d then if d<5 then if 1<d then if d<=2 then local r;for d=0,6 do if d>=3 then if 4<d then if 4~=d then for a=11,68 do if 5~=d then r=e[l]n[r]=n[r](c(n,r+1,e[f]))break;end;n[e[l]]=n[e[f]];t=t+1;e=o[t];break;end;else n[e[l]]=n[e[f]];t=t+1;e=o[t];end else if d~=3 then n[e[l]]=n[e[f]];t=t+1;e=o[t];else n[e[l]]=n[e[f]];t=t+1;e=o[t];end end else if d<=0 then n[e[l]]=p[e[f]];t=t+1;e=o[t];else if 1<d then n[e[l]]=p[e[f]];t=t+1;e=o[t];else n[e[l]]=p[e[f]];t=t+1;e=o[t];end end end end else if-1<d then for o=28,97 do if 4>d then if(e[l]<n[e[r]])then t=e[f];else t=t+1;end;break;end;local l=e[l];local d=n[l]local o=n[l+2];if(o>0)then if(d>n[l+1])then t=e[f];else n[l+3]=d;end elseif(d<n[l+1])then t=e[f];else n[l+3]=d;end break;end;else if(e[l]<n[e[r]])then t=e[f];else t=t+1;end;end end else if d~=-2 then for a=30,87 do if d>0 then local a;for d=0,6 do if 2>=d then if d<=0 then a=e[l]n[a](n[a+1])t=t+1;e=o[t];else if d>0 then repeat if d>1 then n[e[l]]=h[e[f]];t=t+1;e=o[t];break;end;n[e[l]]=h[e[f]];t=t+1;e=o[t];until true;else n[e[l]]=h[e[f]];t=t+1;e=o[t];end end else if 5<=d then if 2~=d then repeat if 6>d then n[e[l]]=n[e[f]][e[r]];t=t+1;e=o[t];break;end;n[e[l]]=h[e[f]];until true;else n[e[l]]=h[e[f]];end else if 3<d then n[e[l]]=h[e[f]];t=t+1;e=o[t];else n[e[l]]=n[e[f]][e[r]];t=t+1;e=o[t];end end end end break;end;n[e[l]][n[e[f]]]=n[e[r]];break;end;else n[e[l]][n[e[f]]]=n[e[r]];end end else if d>=7 then if d>=8 then if 6~=d then for t=37,52 do if d<9 then for e=e[l],e[f]do n[e]=nil;end;break;end;n[e[l]]=n[e[f]][n[e[r]]];break;end;else for e=e[l],e[f]do n[e]=nil;end;end else local e=e[l]n[e]=n[e](n[e+1])end else if d~=1 then repeat if 5<d then h[e[f]]=n[e[l]];break;end;local a,p,k,g,_,c,d,r,u,z,h,y,b;d=0;while d>-1 do if d<4 then if d<2 then if d==1 then p=l;else a=e;end else if d~=0 then repeat if d~=3 then k=f;break;end;g=n;until true;else k=f;end end else if 5>=d then if d>1 then for e=45,69 do if d~=5 then _=g[a[k]];break;end;c=a[p];break;end;else c=a[p];end else if d~=4 then repeat if 7~=d then n[c]=_;break;end;d=-2;until true;else n[c]=_;end end end d=d+1 end t=t+1;e=o[t];n[e[l]]=n[e[f]];t=t+1;e=o[t];r=e[l]n[r]=n[r](n[r+1])t=t+1;e=o[t];n[e[l]]=n[e[f]];t=t+1;e=o[t];do return n[e[l]]end t=t+1;e=o[t];r=e[l];u={};for e=1,#s do z=s[e];for e=0,#z do h=z[e];y=h[1];b=h[2];if y==n and b>=r then u[b]=y[b];h[1]=u;end;end;end;t=t+1;e=o[t];t=e[f];until true;else local b,y,z,g,_,c,d,r,p,u,h,k,a;d=0;while d>-1 do if d<4 then if d<2 then if d==1 then y=l;else b=e;end else if d~=0 then repeat if d~=3 then z=f;break;end;g=n;until true;else z=f;end end else if 5>=d then if d>1 then for e=45,69 do if d~=5 then _=g[b[z]];break;end;c=b[y];break;end;else c=b[y];end else if d~=4 then repeat if 7~=d then n[c]=_;break;end;d=-2;until true;else n[c]=_;end end end d=d+1 end t=t+1;e=o[t];n[e[l]]=n[e[f]];t=t+1;e=o[t];r=e[l]n[r]=n[r](n[r+1])t=t+1;e=o[t];n[e[l]]=n[e[f]];t=t+1;e=o[t];do return n[e[l]]end t=t+1;e=o[t];r=e[l];p={};for e=1,#s do u=s[e];for e=0,#u do h=u[e];k=h[1];a=h[2];if k==n and a>=r then p[a]=k[a];h[1]=p;end;end;end;t=t+1;e=o[t];t=e[f];end end end else if d<15 then if 11<d then if d<=12 then n[e[l]]=n[e[f]]%e[r];else if 9<=d then repeat if d~=13 then if(n[e[l]]~=e[r])then t=t+1;else t=e[f];end;break;end;for d=0,6 do if 2<d then if 5>d then if 1<=d then repeat if 3<d then h[e[f]]=n[e[l]];t=t+1;e=o[t];break;end;n[e[l]]=n[e[f]][e[r]];t=t+1;e=o[t];until true;else n[e[l]]=n[e[f]][e[r]];t=t+1;e=o[t];end else if 6>d then n[e[l]]=(e[f]~=0);t=t+1;e=o[t];else h[e[f]]=n[e[l]];end end else if 1<=d then if d~=1 then n[e[l]]=h[e[f]];t=t+1;e=o[t];else h[e[f]]=n[e[l]];t=t+1;e=o[t];end else n[e[l]]=n[e[f]][e[r]];t=t+1;e=o[t];end end end until true;else if(n[e[l]]~=e[r])then t=t+1;else t=e[f];end;end end else if 6<d then repeat if d~=10 then do return end;break;end;t=e[f];until true;else t=e[f];end end else if d<18 then if 16<=d then if d>14 then repeat if d~=16 then p[e[f]]=n[e[l]];break;end;if not n[e[l]]then t=t+1;else t=e[f];end;until true;else p[e[f]]=n[e[l]];end else local d,p,k,u,s;for a=0,5 do if a>2 then if a>3 then if a>=2 then for f=41,85 do if 4~=a then n[e[l]]();break;end;d=e[l]n[d]=n[d](c(n,d+1,b))t=t+1;e=o[t];break;end;else d=e[l]n[d]=n[d](c(n,d+1,b))t=t+1;e=o[t];end else d=e[l]k,u=g(n[d](c(n,d+1,e[f])))b=u+d-1 s=0;for e=d,b do s=s+1;n[e]=k[s];end;t=t+1;e=o[t];end else if 1>a then n[e[l]]=h[e[f]];t=t+1;e=o[t];else if a<2 then d=e[l];p=n[e[f]];n[d+1]=p;n[d]=p[e[r]];t=t+1;e=o[t];else n(e[l],e[f]);t=t+1;e=o[t];end end end end end else if d<19 then n[e[l]]=n[e[f]][e[r]];else if d~=18 then repeat if 20~=d then local e=e[l]n[e](n[e+1])break;end;n[e[l]]={};until true;else n[e[l]]={};end end end end end else if 32<=d then if d<37 then if 34<=d then if d>34 then if d>34 then repeat if d>35 then n[e[l]]=n[e[f]]%e[r];break;end;local t=e[l]local l,e=g(n[t](c(n,t+1,e[f])))b=e+t-1 local e=0;for t=t,b do e=e+1;n[t]=l[e];end;until true;else n[e[l]]=n[e[f]]%e[r];end else if(n[e[l]]~=e[r])then t=t+1;else t=e[f];end;end else if d>28 then repeat if 32<d then local t=e[l]n[t](c(n,t+1,e[f]))break;end;n[e[l]][n[e[f]]]=n[e[r]];until true;else local t=e[l]n[t](c(n,t+1,e[f]))end end else if 40>d then if d>37 then if 34<=d then repeat if d>38 then n[e[l]]();break;end;local c=_[e[f]];local b;local d={};b=a.RKTKiBtM({},{__index=function(n,e)local e=d[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=d[e]e[1][e[2]]=n;end;});for l=1,e[r]do t=t+1;local e=o[t];if e[m]==54 then d[l-1]={n,e[f]};else d[l-1]={p,e[f]};end;s[#s+1]=d;end;n[e[l]]=k(c,b,h);until true;else local c=_[e[f]];local b;local d={};b=a.RKTKiBtM({},{__index=function(n,e)local e=d[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=d[e]e[1][e[2]]=n;end;});for l=1,e[r]do t=t+1;local e=o[t];if e[m]==54 then d[l-1]={n,e[f]};else d[l-1]={p,e[f]};end;s[#s+1]=d;end;n[e[l]]=k(c,b,h);end else p[e[f]]=n[e[l]];end else if d>40 then if 42==d then for e=e[l],e[f]do n[e]=nil;end;else local e=e[l];b=e+z-1;for t=e,b do local e=u[t-e];n[t]=e;end;end else local t=e[l]n[t](c(n,t+1,e[f]))end end end else if 26<=d then if d<=28 then if 26<d then if d~=28 then n[e[l]]=h[e[f]];else for d=0,1 do if-2<=d then repeat if d~=1 then n[e[l]]=h[e[f]];t=t+1;e=o[t];break;end;if not n[e[l]]then t=t+1;else t=e[f];end;until true;else n[e[l]]=h[e[f]];t=t+1;e=o[t];end end end else n[e[l]]=#n[e[f]];end else if 29>=d then local t=e[l]n[t]=n[t](c(n,t+1,e[f]))else if 31~=d then local d;n[e[l]]=p[e[f]];t=t+1;e=o[t];n[e[l]]=p[e[f]];t=t+1;e=o[t];n[e[l]]=n[e[f]];t=t+1;e=o[t];d=e[l]n[d]=n[d](n[d+1])t=t+1;e=o[t];n[e[l]][n[e[f]]]=n[e[r]];t=t+1;e=o[t];do return end;else do return n[e[l]]end end end end else if 22<d then if 23<d then if d>=20 then for o=22,84 do if d<25 then local e=e[l];b=e+z-1;for t=e,b do local e=u[t-e];n[t]=e;end;break;end;if(n[e[l]]==e[r])then t=t+1;else t=e[f];end;break;end;else local e=e[l];b=e+z-1;for t=e,b do local e=u[t-e];n[t]=e;end;end else n[e[l]]=p[e[f]];end else if 22~=d then local e=e[l];local t=n[e];for e=e+1,b do a._znDzHEQ(t,n[e])end;else n[e[l]]={};end end end end end else if 64<d then if d>75 then if d>=81 then if 83>=d then if d<82 then local t=e[l]n[t]=n[t](c(n,t+1,e[f]))else if d~=79 then for a=27,85 do if 83~=d then for d=0,1 do if 0==d then n(e[l],e[f]);t=t+1;e=o[t];else n[e[l]]=h[e[f]];end end break;end;n[e[l]]=n[e[f]][n[e[r]]];break;end;else for d=0,1 do if 0==d then n(e[l],e[f]);t=t+1;e=o[t];else n[e[l]]=h[e[f]];end end end end else if d<85 then local d,h,r,o,a;local t=0;while t>-1 do if 3>t then if 0<t then if 1==t then h=l;else r=f;end else d=e;end else if t<5 then if t>=2 then for e=13,68 do if t~=3 then a=d[h];break;end;o=d[r];break;end;else o=d[r];end else if 1~=t then for e=30,69 do if 5<t then t=-2;break;end;n(a,o);break;end;else t=-2;end end end t=t+1 end else if 81<=d then for t=36,65 do if 85<d then n[e[l]]=n[e[f]];break;end;n[e[l]]=#n[e[f]];break;end;else n[e[l]]=#n[e[f]];end end end else if d<78 then if 72~=d then repeat if d>76 then local d,h,r,o,a;local t=0;while t>-1 do if t<=2 then if t<1 then d=e;else if 2~=t then h=l;else r=f;end end else if 4>=t then if t>0 then repeat if 3<t then a=d[h];break;end;o=d[r];until true;else o=d[r];end else if 6>t then n(a,o);else t=-2;end end end t=t+1 end break;end;local l=e[l];local o=n[l+2];local d=n[l]+o;n[l]=d;if(o>0)then if(d<=n[l+1])then t=e[f];n[l+3]=d;end elseif(d>=n[l+1])then t=e[f];n[l+3]=d;end until true;else local l=e[l];local o=n[l+2];local d=n[l]+o;n[l]=d;if(o>0)then if(d<=n[l+1])then t=e[f];n[l+3]=d;end elseif(d>=n[l+1])then t=e[f];n[l+3]=d;end end else if d<=78 then local f,r,d;for h=0,1 do if-3<h then repeat if 1>h then f=e[l];b=f+z-1;for e=f,b do r=u[e-f];n[e]=r;end;t=t+1;e=o[t];break;end;f=e[l];d=n[f];for e=f+1,b do a._znDzHEQ(d,n[e])end;until true;else f=e[l];d=n[f];for e=f+1,b do a._znDzHEQ(d,n[e])end;end end else if d==79 then local e=e[l]n[e](n[e+1])else local d;for a=0,3 do if a>=2 then if 2~=a then n[e[l]][n[e[f]]]=n[e[r]];else n[e[l]][n[e[f]]]=n[e[r]];t=t+1;e=o[t];end else if 0<a then d=e[l]n[d]=n[d](n[d+1])t=t+1;e=o[t];else n[e[l]]=n[e[f]];t=t+1;e=o[t];end end end end end end end else if d>=70 then if 73<=d then if d<74 then local e=e[l]n[e]=n[e](c(n,e+1,b))else if d~=72 then repeat if 75>d then n[e[l]]=(e[f]~=0);break;end;local t=e[l];local l=n[e[f]];n[t+1]=l;n[t]=l[e[r]];until true;else n[e[l]]=(e[f]~=0);end end else if 71<=d then if 67<=d then for b=37,82 do if d~=72 then local c=_[e[f]];local b;local d={};b=a.RKTKiBtM({},{__index=function(n,e)local e=d[e];return e[1][e[2]];end,__newindex=function(t,e,n)local e=d[e]e[1][e[2]]=n;end;});for l=1,e[r]do t=t+1;local e=o[t];if e[m]==54 then d[l-1]={n,e[f]};else d[l-1]={p,e[f]};end;s[#s+1]=d;end;n[e[l]]=k(c,b,h);break;end;n[e[l]]=(e[f]~=0);break;end;else n[e[l]]=(e[f]~=0);end else if(e[l]<n[e[r]])then t=e[f];else t=t+1;end;end end else if 67>d then if d>61 then repeat if d>65 then if not n[e[l]]then t=t+1;else t=e[f];end;break;end;local d=e[l];local l={};for e=1,#s do local e=s[e];for t=0,#e do local e=e[t];local f=e[1];local t=e[2];if f==n and t>=d then l[t]=f[t];e[1]=l;end;end;end;until true;else if not n[e[l]]then t=t+1;else t=e[f];end;end else if 67>=d then t=e[f];else if 69~=d then local f=e[f];local t=n[f]for e=f+1,e[r]do t=t..n[e];end;n[e[l]]=t;else local e=e[l]n[e]=n[e](c(n,e+1,b))end end end end end else if 53>=d then if 47<d then if 50>=d then if 49>d then local e=e[l];local t=n[e];for e=e+1,b do a._znDzHEQ(t,n[e])end;else if d>=47 then repeat if 50>d then local l=e[l];local t=n[e[f]];n[l+1]=t;n[l]=t[e[r]];break;end;local h,s,c,d,b,a,o;local t=0;while t>-1 do if 2>=t then if 0>=t then h=l;s=f;c=r;else if 1==t then d=e;else b=d[s];end end else if t<5 then if-1<t then repeat if t<4 then a=d[h];break;end;o=n[b];for e=1+b,d[c]do o=o..n[e];end;until true;else a=d[h];end else if t>2 then repeat if t>5 then t=-2;break;end;n[a]=o;until true;else n[a]=o;end end end t=t+1 end until true;else local h,c,s,o,b,a,d;local t=0;while t>-1 do if 2>=t then if 0>=t then h=l;c=f;s=r;else if 1==t then o=e;else b=o[c];end end else if t<5 then if-1<t then repeat if t<4 then a=o[h];break;end;d=n[b];for e=1+b,o[s]do d=d..n[e];end;until true;else a=o[h];end else if t>2 then repeat if t>5 then t=-2;break;end;n[a]=d;until true;else n[a]=d;end end end t=t+1 end end end else if d<52 then do return n[e[l]]end else if 48~=d then repeat if 52~=d then local e=e[l]n[e]=n[e](n[e+1])break;end;if(n[e[l]]==e[r])then t=t+1;else t=e[f];end;until true;else if(n[e[l]]==e[r])then t=t+1;else t=e[f];end;end end end else if 45<=d then if 46<=d then if 47==d then local d;for a=0,4 do if 1>=a then if 1>a then n[e[l]]=n[e[f]];t=t+1;e=o[t];else n(e[l],e[f]);t=t+1;e=o[t];end else if a<=2 then n(e[l],e[f]);t=t+1;e=o[t];else if 3==a then d=e[l]n[d]=n[d](c(n,d+1,e[f]))t=t+1;e=o[t];else if(n[e[l]]==e[r])then t=t+1;else t=e[f];end;end end end end else local d=e[l];local l={};for e=1,#s do local e=s[e];for t=0,#e do local t=e[t];local f=t[1];local e=t[2];if f==n and e>=d then l[e]=f[e];t[1]=l;end;end;end;end else n[e[l]]=p[e[f]];end else if 44~=d then h[e[f]]=n[e[l]];else n[e[l]]=h[e[f]];end end end else if 59>d then if 56>d then if d>=50 then repeat if 54<d then n[e[l]]=n[e[f]][e[r]];break;end;n[e[l]]=n[e[f]];until true;else n[e[l]]=n[e[f]][e[r]];end else if 57>d then local l=e[l];local d=n[l]local o=n[l+2];if(o>0)then if(d>n[l+1])then t=e[f];else n[l+3]=d;end elseif(d<n[l+1])then t=e[f];else n[l+3]=d;end else if d==58 then n[e[l]]();else local h,d;for a=0,4 do if a<=1 then if a>0 then n[e[l]]=n[e[f]]+n[e[r]];t=t+1;e=o[t];else n[e[l]]=p[e[f]];t=t+1;e=o[t];end else if a<=2 then n[e[l]]=n[e[f]]%e[r];t=t+1;e=o[t];else if 4==a then h=e[f];d=n[h]for e=h+1,e[r]do d=d..n[e];end;n[e[l]]=d;else n[e[l]]=n[e[f]][n[e[r]]];t=t+1;e=o[t];end end end end end end end else if 61<d then if d>62 then if 60<=d then repeat if d>63 then do return end;break;end;local d,a,b;n[e[l]]=h[e[f]];t=t+1;e=o[t];n[e[l]]=n[e[f]][e[r]];t=t+1;e=o[t];n[e[l]]={};t=t+1;e=o[t];n(e[l],e[f]);t=t+1;e=o[t];n(e[l],e[f]);t=t+1;e=o[t];n(e[l],e[f]);t=t+1;e=o[t];d=e[l];a=n[d]b=n[d+2];if(b>0)then if(a>n[d+1])then t=e[f];else n[d+3]=a;end elseif(a<n[d+1])then t=e[f];else n[d+3]=a;end until true;else local d,a,b;n[e[l]]=h[e[f]];t=t+1;e=o[t];n[e[l]]=n[e[f]][e[r]];t=t+1;e=o[t];n[e[l]]={};t=t+1;e=o[t];n(e[l],e[f]);t=t+1;e=o[t];n(e[l],e[f]);t=t+1;e=o[t];n(e[l],e[f]);t=t+1;e=o[t];d=e[l];a=n[d]b=n[d+2];if(b>0)then if(a>n[d+1])then t=e[f];else n[d+3]=a;end elseif(a<n[d+1])then t=e[f];else n[d+3]=a;end end else local t=e[l]local l,e=g(n[t](c(n,t+1,e[f])))b=e+t-1 local e=0;for t=t,b do e=e+1;n[t]=l[e];end;end else if 59>=d then n[e[l]]=n[e[f]]+n[e[r]];else if 56<d then for o=42,97 do if 61~=d then n[e[l]]=n[e[f]]+n[e[r]];break;end;local l=e[l];local o=n[l+2];local d=n[l]+o;n[l]=d;if(o>0)then if(d<=n[l+1])then t=e[f];n[l+3]=d;end elseif(d>=n[l+1])then t=e[f];n[l+3]=d;end break;end;else n[e[l]]=n[e[f]]+n[e[r]];end end end end end end end t=1+t;end;end;return ne end;local l=0xff;local r={};local d=(1);local f='';(function(n)local t=n local o=0x00 local e=0x00 t={(function(a)if o>0x2f then return a end o=o+1 e=(e+0xa0c-a)%0x1f return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x82);end return true end)'SmqXc'and t[0x3](0x1a0+a))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x9f);f={f..'\58 a',f};r[d]=ne();d=d+(1);f[1]='\58'..f[1];l[2]=0xff;end return true end)'QsAll'and t[0x2](a+0x37b))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xf7);end return true end)'SXEEM'and t[0x1](a+0x2f8))or a end),(function(a)if o>0x2f then return a end o=o+1 e=(e+0x1314-a)%0x47 return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xbe);end return true end)'XtvfD'and t[0x2](0x142+a))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xca);l[2]=(l[2]*(te(function()r()end,c(f))-te(l[1],c(f))))+1;r[d]={};l=l[2];d=d+l;end return true end)'RrnMM'and t[0x3](a+0x3a9))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x24);end return true end)'IDIxe'and t[0x1](a+0x141))or a end),(function(a)if o>0x21 then return a end o=o+1 e=(e+0xb10-a)%0x30 return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x37);end return true end)'ReEth'and t[0x3](0x2a3+a))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x3c);f='\37';l={function()l()end};f=f..'\100\43';end return true end)'gBgAT'and t[0x1](a+0x193))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xb8);r[d]=le();d=d+l;end return true end)'V_jwb'and t[0x2](a+0xd4))or a end)}t[0x3](0x257f)end){};local e=k(c(r));r[2]={};r[1]=e(r[1])ArLKIsfZzCbMrXs=nil;e=k(c(r))return e(...);end return te((function()local n={}local e=0x01;local t;if a.ZfvnhtxI then t=a.ZfvnhtxI(te)else t=''end if a.TAJRpCDU(t,a.VZEdBxVE)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(n,e,t,l,f,d)local d;if n>=4 then if 5<n then if 7>n then do return f[t]end;else if n~=4 then for e=23,96 do if n<8 then do return setmetatable({},{['__\99\97\108\108']=function(e,f,l,t,n)if n then return e[n]elseif t then return e else e[f]=l end end})end break;end;do return t(n,nil,t);end break;end;else do return setmetatable({},{['__\99\97\108\108']=function(e,l,f,t,n)if n then return e[n]elseif t then return e else e[l]=f end end})end end end else if 1<n then repeat if n<5 then local n=l;local f,d,l=f(2);do return function()local e,t,o,r=e(t,n(n,n),n(n,n)+3);n(4);return(r*f)+(o*d)+(t*l)+e;end;end;break;end;local n=l;do return function()local e=e(t,n(n,n),n(n,n));n(1);return e;end;end;until true;else local n=l;do return function()local e=e(t,n(n,n),n(n,n));n(1);return e;end;end;end end else if n>=2 then if n~=2 then do return e(1),e(4,f,l,t,e),e(5,f,l,t)end;else do return 16777216,65536,256 end;end else if 0~=n then do return function(t,e,n)if n then local e=(t/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(t%(e+e)>=e)and 1 or 0;end;end;end;else do return e(1),e(4,f,l,t,e),e(5,f,l,t)end;end end end end),...)
Add Comment
Please, Sign In to add comment