Advertisement
Aestal

one fruit auto train mk

Feb 19th, 2024
786
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 20.06 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _QYx_mIYHwYjp = a; end)); return(function(h,...)local a;local d;local o;local t;local u;local r;local e=24915;local n=0;local l={};while n<632 do n=n+1;while n<0x331 and e%0x49c4<0x24e2 do n=n+1 e=(e-42)%18449 local f=n+e if(e%0x4532)>=0x2299 then e=(e*0x77)%0x39db while n<0xcd and e%0x1248<0x924 do n=n+1 e=(e+314)%28026 local t=n+e if(e%0x29c4)<0x14e2 then e=(e*0x123)%0xfc0 local e=7797 if not l[e]then l[e]=0x1 u=tonumber;end elseif e%2~=0 then e=(e*0x37)%0x287e local e=4464 if not l[e]then l[e]=0x1 end else e=(e+0x318)%0xaa5d n=n+1 local e=88988 if not l[e]then l[e]=0x1 d=(not d)and _ENV or d;end end end elseif e%2~=0 then e=(e*0xcb)%0xbbcc while n<0x2c5 and e%0x33a4<0x19d2 do n=n+1 e=(e*237)%6456 local f=n+e if(e%0x3124)<0x1892 then e=(e*0xf7)%0x101d local e=65014 if not l[e]then l[e]=0x1 o="\4\8\116\111\110\117\109\98\101\114\79\108\89\117\100\66\119\106\0\6\115\116\114\105\110\103\4\99\104\97\114\114\106\73\102\66\85\121\115\0\6\115\116\114\105\110\103\3\115\117\98\119\70\101\69\79\81\90\71\0\6\115\116\114\105\110\103\4\98\121\116\101\121\99\67\115\107\86\77\111\0\5\116\97\98\108\101\6\99\111\110\99\97\116\67\118\77\87\110\102\121\115\0\5\116\97\98\108\101\6\105\110\115\101\114\116\106\117\115\76\68\109\71\81\5";end elseif e%2~=0 then e=(e*0x1be)%0x3091 local e=97681 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=r.OlYudBwj(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then d[e]=function(e,n)return h(8,nil,h,n,e)end elseif n=="\4"then e=d[e]elseif n=="\0"then e=d[e][l(a.byte(l(0x01)))];end local n=l(0x08)r[n]=e end end end else e=(e+0x10e)%0xeef n=n+1 local e=14345 if not l[e]then l[e]=0x1 end end end else e=(e+0xb0)%0x836 n=n+1 while n<0xed and e%0x3d62<0x1eb1 do n=n+1 e=(e*573)%29290 local t=n+e if(e%0x3d7e)>=0x1ebf then e=(e*0x2ae)%0x1e33 local e=39714 if not l[e]then l[e]=0x1 a=string;end elseif e%2~=0 then e=(e+0xac)%0x6199 local e=37983 if not l[e]then l[e]=0x1 d=getfenv and getfenv();end else e=(e*0x3d6)%0x5eca n=n+1 local e=5063 if not l[e]then l[e]=0x1 r={};end end end end end e=(e*488)%30743 end t(o);local n={};for e=0x0,0xff do local l=r.rjIfBUys(e);n[e]=l;n[l]=e;end local function f(e)return n[e];end local f=(function(o,t)local h,l=0x01,0x10 local n={{},{},{}}local d=-0x01 local e=0x01 local a=o while true do n[0x03][r.wFeEOQZG(t,e,(function()e=h+e return e-0x01 end)())]=(function()d=d+0x01 return d end)()if d==(0x0f)then d=""l=0x000 break end end local d=#t while e<d+0x01 do n[0x02][l]=r.wFeEOQZG(t,e,(function()e=h+e return e-0x01 end)())l=l+0x01 if l%0x02==0x00 then l=0x00 r.jusLDmGQ(n[0x01],(f((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+a)%0x100)));a=o+a;end end return r.CvMWnfys(n[0x01])end);t(f(171,"oe^jzVEX1#h_yINRVh"));t(f(74,"B1vl9X=IT;^-2*G#-=Iv;X92P5^*=T1I=^Tz9I#X^GXl11-#I;lIG2;^X#^TX#TJv;**;GX91T--IXlq*-;Tl=#I9#Q;v^GvT#9^F=^^9_C5*v;Xl*#^;v#T-9*ITG9vG#^^X;^*2-IXlGGl;GX*1=^TXT3-G2;29*;2X=IX1#GT;vGX:v-Y=Ilg*GI=v*GX;292v-*9=I*T;=-lX-vM2#I*9vGX^GX17T2TIIv^#9^V9vG-2l=-3XI2lXl^##-lI^v-G9X-llG_-vI^1>^*T912;v9TI1112#;81;*T;ml2#1-^X-11T9l;vI#-;2X;1;-G^2v-8IXT1vl9GX;#X=Z^-IIvv1GvTTv*G--^=*1#29vK*-f)^lX^1^2;v{9X#9^2Xls-2;I#v*2=;-99G#22X12TTf^XX932-l=-v;-X;Tv2_2-*XIxT*#vT*#y}-T=XvM*2==v;*l;^9T19^*X#*vT^^*XX1v21IXl2*#T^l*1921I;vTG^vGGTfI-1I^v9IITG9^Cl-;Iv#^*G=I9X.9TI9-!I=-"));local e=(-10163+(function()local t,l=0,1;(function(d,e,l,n)e(n(n,n,e,n),e(e,n,n,d),d(l,e,d,l)and n(n,e,e and l,e),n(e,d and e,l,n))end)(function(a,n,d,e)if t>366 then return n end t=t+1 l=(l+273)%35411 if(l%1192)>=596 then return e else return n(a(n,a,d,e and d),d(d,n and e,e,e),a(d and a,n,n,a),n(n,n,e,e))end return n(n(n,d,n,e),a(e and n,e,d,d)and n(e,e,d,e),d(e,n,n and e,d),a(n and d,e and d,e,d)and e(e,a,n,d))end,function(a,n,d,e)if t>137 then return e end t=t+1 l=(l*763)%29303 if(l%1430)<=715 then return d(a(n and n,a and d,e,n),e(d,d,d,a),e(d and e,e,a,a)and e(e,e,n,a),n(n,d,n,n))else return e end return n end,function(e,a,d,n)if t>415 then return d end t=t+1 l=(l+907)%40551 if(l%1872)<936 then l=(l+811)%4605 return n else return a(n(e,e,e,a)and n(n,d,e,e),e(n,n,e and e,e)and e(d,d and a,n,d and d),e(n,e and d,d,e),n(a,e,e,e))end return d(a(e and n,a,n and e,n),a(d and d,n,n,e),d(a,a,d,e and n)and n(a,a,e,d),a(d and d,e and d,n,e))end,function(n,a,e,d)if t>197 then return n end t=t+1 l=(l+351)%36323 if(l%1264)>=632 then l=(l*480)%46592 return e(d(n,a,n and d,d and d),a(a,d,e,n and e),d(e,n,e,n)and e(e,a,a,e),d(a and d,n,n,a))else return e end return n end)return l;end)())local s=r.AnLvqUPq or r.kcFeXMtC;local ne=(getfenv)or(function()return _ENV end);local t=3;local le=1;local d=2;local o=4;local function m(j,...)local c=f(e,"{JG=Ah1Zv}Ijs!aT! 1IJT!Av}AjT=Ivh!h1=:aT}Ahh)!jAAaGvahv!A!T=A=hhI!1GJZ=AThIIhjJ=vT=}aaa1vIhhsJIT11G1sT}J==TjIahhJZj!Za=Ga!}=hJBsZj1hG1!}hkG=asvZha(G!Z1ZGsTb}shvJJjZZ}asID}JA7 }jvZ=GG!vZa=jT}1IAaJGsi=jGa!Z}ahATIjsGaG}!GA!AjTIIG1Ak1s}vA=ITM}AAa4}v==}aZ!I}v=}v!1UTZIs1J1h=}ahhh=_JJs}ZG=G}=ZjA1TTjs1vJG!IvIAGIhZj1AJvsvGaJZaIvaAjnhAsJtj11jGlJ1TIIT1YJGsJZA=sa1IJhhaIjGZ=GYZ0G}!IvTAAZPVTssvss!}j=ZasIJI=ZIGTa=Z!AATZIvhJGZ!Iv1AKaaIT=}rTjTZAGIavZOhv-!skS=su1!GG!ZaTI!hTJqsav}==a==A=,}ah=CvGha1}jAs*AvLGI!T!ZZjA1jGI9hZJZs7vGGAas}TA1QvIa1TG=!avAAGT!1sh1JZsIAJJITh}TAs0zjaZTG}}a}Z=s:NIs1vGJ!hA1=}aG}Th}sTsAZvGA}}hj(aT}jIZGJj!jAI=!Tj}sT9jGhIeTsA!vZT=sJ&Is1TSXsh1}A!aAII1hIIhTJAs}Za==as}!hG8ZG=!G}=A0} 1sTIIT1A1!=1asIj8!?vs/ZvG1}1IGAJ v1I1TG1!v}G=vajjJhZQjZsvvGTaT}vrhaZjaZ=GZsJvv=jI!}vGIIs1}J1sjv9Z1hTJ=jsh!=Za=v!!!}1AZTsjJjAZs=!aI=IThIAh}8akA!!IOh1TvjvfJjI1jGR!h!=I!hIJvhaJ!svZ!=Gh=%jjG1IGaaA}ZA=T!IjT}jh1=Jvs!sIIj18JJ}!Zd=AZhA4!T}AA}AaJTs}}1=ZT}hshAJGsIv=GI!aAThvrJj=G=TTsG1j:hvsAZT1Ij1_hv=1aaIZAafGh=Ghj!ZGGZGZT1jTJjG1sIvs=vaIIGh=^ZvAG!Gh!v}IlJqGjI1JJ}vI}G=ZTjIZ1=Jsh!JhsZZs=J=AOgsZMvjI1TG}!}vaA=1vJTsjvhAPvJ=aajIbhhhbGvaG}GhJTjI!1JjG1jJs!Jv1IThJJvsh>T!1Z}Gaa=!TjGZ1!ZjZv1ATIjv11AJsZT1ZGsTi}shvJJhG=ajsZJG1!jI1AhTIIT1hJ}sav=AIT1IGhZtssZZ1GjaDIZhjTTjA1}GZ!=vv=!JvjThsJJs1vJ=ia1}Ihj3Aj!vZG=!vv!AvTZI!1JJIaAvu=haII1hA_IjaZ==T!!}GAZT!jJ11JjaGI!=IaTIA1I*as=Zv=TT1}ZA!8JsJ1jG,!hIIhhTAIIhaJAsvvT=GT}I=hJ;}jjZGGh!IvTAAd=Ia1AJv!MvG=ZasIJha)jsCZhGI!T}1A}TasA1vJ!!Gvv=sT=I1ZjJ!shZjGTaA}}1Au=jv1aGG!}vsAJT1j412AhaIZT=1a}IGh=JZj!IG=!!s}=A1(}j?1vJITT}1=}TWI=1vV!!!ZZhsaT}1A!cNj11IG}!Aj}AsT=IIh!JTsZv==Ja1IJhi(1jIZJGA!IvahhGFI!1=JZa1vJ=1ajsl1ABIs_ZAGI!a}vAvT!sJ1ZJ!!JvZ=jTJIhZIJasAZIGaa=}v11XGjZv1GJ!ZvjAJThIshTJI!!Za=Aavj!hG?vjsZGG1!TI}AhTIITvAJ}sTv=hvT1IGhv_ssJZ1=Tab}jZ1TTjh1}=A!=v}=!TGIZ1lGIs1Zj=9Tj}Ih-PA!}ZZG=!}v!AGTZsh1JJ1!}v6=1aII9hAyjjaZ}=j!!}=AZGJjJ1ZJj!Jvh=akvIAh}_aavZvGaaG}j1h%Jj11jh=!hvj=TJAjGhaJAsvZ!=GTj}sZZdajjZJGhm!vTAhT}sh1=Jsa1vG=Zas!Ah1HsskvZhG!T}hA}J1j=1vJ!aAIa=sT=I1Z*J7shZIGTaT}}ATV=jI1!G=!Z}a1IT1Is1UG1sIZT=ATjIah=KIj!Z!GZ!s}J11JZjC1ZJI!JvAAjaajh1hW!s1ZZ=AaJ}1AjH/jZ1IGJ!Av!=aT=Ivh!JhsZZ!=Ja1}jhG<hjI}IGA!IvaAATvIa1GJj!JvJ=1aj!1hh jjTv1hJ!a}AAvJhjG1ZJsa=I!=jTGIh1!yTsAZ}GaTa}vAaSGj}1sGG!1vjhZThIIhTJhs}Za==av}!hGHZ");local n=0;r.zgkpelT_(function()r.GPRHGZEE()n=n+1 end)local function e(l,e)if e then return n end;n=l+n;end local l,n,f=h(0,h,e,c,r.ycCskVMo);local function a()local l,n=r.ycCskVMo(c,e(1,3),e(5,6)+2);e(2);return(n*256)+l;end;local b=true;local b=0 local function k()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==b)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.RSUVPylI(e,n-1023)*(t+(d/(2^52)));end;local p=n;local function _(n)local l;if(not n)then n=p();if(n==0)then return'';end;end;l=r.wFeEOQZG(c,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+b),#l do e=e..r.wFeEOQZG(l,n,n)end return e;end;local b=#r.rbQYrokZ(u('\49.\48'))~=1 local e=n;local function z(...)return{...},r.aVStkmfr('#',...)end local function m()local s={};local e={};local c={};local u={c,s,nil,e};local e=n()local h={}for d=1,e do local l=f();local e;if(l==3)then e=(f()~=#{});elseif(l==2)then local n=k();if b and r.qtPJGrlg(r.rbQYrokZ(n),'.(\48+)$')then n=r.DrEmvCQW(n);end e=n;elseif(l==0)then e=_();end;h[d]=e;end;u[3]=f();for s=1,n()do local e=f();if(l(e,1,1)==0)then local r=l(e,2,3);local f=l(e,4,6);local e={a(),a(),nil,nil};if(r==0)then e[t]=a();e[o]=a();elseif(r==#{1})then e[t]=n();elseif(r==j[2])then e[t]=n()-(2^16)elseif(r==j[3])then e[t]=n()-(2^16)e[o]=a();end;if(l(f,1,1)==1)then e[d]=h[e[d]]end if(l(f,2,2)==1)then e[t]=h[e[t]]end if(l(f,3,3)==1)then e[o]=h[e[o]]end c[s]=e;end end;for e=1,n()do s[e-(#{1})]=m();end;return u;end;local function ee(l,e,n)local d=e;local d=n;return u(r.qtPJGrlg(r.qtPJGrlg(({r.zgkpelT_(l)})[2],e),n))end local function de(b,e,c)local function ee(...)local a,m,j,_,u,n,f,g,p,k,y,l;local e=0;while-1<e do if 3>e then if 1<=e then if e~=-2 then for l=37,94 do if e~=1 then n=-41;f=-1;break;end;j=h(6,65,3,9,b);u=z _=0;break;end;else j=h(6,65,3,9,b);u=z _=0;end else a=h(6,60,1,34,b);m=h(6,31,2,78,b);end else if e<=4 then if-1~=e then repeat if 4>e then g={};p={...};break;end;k=r.aVStkmfr('#',...)-1;y={};until true;else k=r.aVStkmfr('#',...)-1;y={};end else if e~=4 then for n=43,58 do if e~=5 then e=-2;break;end;l=h(7);break;end;else e=-2;end end end e=e+1;end;for e=0,k do if(e>=j)then g[e-j]=p[e+1];else l[e]=p[e+1];end;end;local e=k-j+1 local e;local h;local function r(...)while true do end end while true do if n<-40 then n=n+42 end e=a[n];h=e[le];if 21>=h then if h>=11 then if 15<h then if 19>h then if 17<=h then if 13<=h then repeat if h>17 then local e=e[d]l[e]=l[e](s(l,e+1,f))break;end;if not l[e[d]]then n=n+1;else n=e[t];end;until true;else local e=e[d]l[e]=l[e](s(l,e+1,f))end else c[e[t]]=l[e[d]];end else if h>19 then if h>=17 then repeat if h~=21 then local h,b,p,k,j;for r=0,6 do if r<=2 then if r>0 then if r>0 then for f=22,63 do if 2>r then h=e[d];b=l[e[t]];l[h+1]=b;l[h]=b[e[o]];n=n+1;e=a[n];break;end;l(e[d],e[t]);n=n+1;e=a[n];break;end;else l(e[d],e[t]);n=n+1;e=a[n];end else l[e[d]]=c[e[t]];n=n+1;e=a[n];end else if 5>r then if 3<r then h=e[d]l[h]=l[h](s(l,h+1,f))n=n+1;e=a[n];else h=e[d]p,k=u(l[h](s(l,h+1,e[t])))f=k+h-1 j=0;for e=h,f do j=j+1;l[e]=p[j];end;n=n+1;e=a[n];end else if 3<r then repeat if r~=6 then h=e[d]l[h]=l[h]()n=n+1;e=a[n];break;end;l[e[d]]=l[e[t]][e[o]];until true;else h=e[d]l[h]=l[h]()n=n+1;e=a[n];end end end end break;end;l[e[d]]=l[e[t]][e[o]];until true;else l[e[d]]=l[e[t]][e[o]];end else l[e[d]]=(e[t]~=0);end end else if h>=13 then if 13>=h then n=e[t];else if h~=11 then repeat if h>14 then local r;for h=0,4 do if h>1 then if 3>h then l[e[d]]=l[e[t]][e[o]];n=n+1;e=a[n];else if 4~=h then r=e[d]l[r]=l[r]()n=n+1;e=a[n];else if not l[e[d]]then n=n+1;else n=e[t];end;end end else if h~=1 then l[e[d]]=l[e[t]][e[o]];n=n+1;e=a[n];else l[e[d]]();n=n+1;e=a[n];end end end break;end;local h;for o=0,1 do if-3<=o then for r=16,93 do if 1~=o then h=e[d]l[h]=l[h]()n=n+1;e=a[n];break;end;if not l[e[d]]then n=n+1;else n=e[t];end;break;end;else h=e[d]l[h]=l[h]()n=n+1;e=a[n];end end until true;else local r;for h=0,4 do if h>1 then if 3>h then l[e[d]]=l[e[t]][e[o]];n=n+1;e=a[n];else if 4~=h then r=e[d]l[r]=l[r]()n=n+1;e=a[n];else if not l[e[d]]then n=n+1;else n=e[t];end;end end else if h~=1 then l[e[d]]=l[e[t]][e[o]];n=n+1;e=a[n];else l[e[d]]();n=n+1;e=a[n];end end end end end else if h>10 then repeat if 11<h then local a,f,r,h,o;local n=0;while n>-1 do if 3<=n then if 4<n then if 3<=n then repeat if 5<n then n=-2;break;end;l(o,h);until true;else l(o,h);end else if 2<n then repeat if 3<n then o=a[f];break;end;h=a[r];until true;else h=a[r];end end else if n<=0 then a=e;else if n==2 then r=t;else f=d;end end end n=n+1 end break;end;local n=e[d];local d=l[e[t]];l[n+1]=d;l[n]=d[e[o]];until true;else local d=e[d];local n=l[e[t]];l[d+1]=n;l[d]=n[e[o]];end end end else if h<5 then if h>1 then if 2>=h then if(l[e[d]]==e[o])then n=n+1;else n=e[t];end;else if h<4 then l[e[d]]();else if l[e[d]]then n=n+1;else n=e[t];end;end end else if h>=-3 then for n=12,66 do if h~=1 then local e=e[d]l[e](l[e+1])break;end;l[e[d]]={};break;end;else local e=e[d]l[e](l[e+1])end end else if 8<=h then if h<9 then if(l[e[d]]==e[o])then n=n+1;else n=e[t];end;else if h>=5 then for n=30,97 do if h~=9 then l(e[d],e[t]);break;end;l[e[d]]=l[e[t]][e[o]];break;end;else l[e[d]]=l[e[t]][e[o]];end end else if 6<=h then if 4<h then repeat if 6~=h then l[e[d]][e[t]]=e[o];break;end;l[e[d]]();until true;else l[e[d]]();end else local e=e[d]l[e]=l[e]()end end end end else if 33<=h then if 38<h then if 42<=h then if 43<=h then if h>=39 then repeat if 43<h then if l[e[d]]then n=n+1;else n=e[t];end;break;end;for h=0,1 do if h~=-4 then repeat if h>0 then n=e[t];break;end;l[e[d]]();n=n+1;e=a[n];until true;else l[e[d]]();n=n+1;e=a[n];end end until true;else if l[e[d]]then n=n+1;else n=e[t];end;end else l[e[d]]={};end else if h<=39 then local h;for o=0,1 do if-4<=o then for r=35,67 do if 1>o then l(e[d],e[t]);n=n+1;e=a[n];break;end;h=e[d]l[h](l[h+1])break;end;else l(e[d],e[t]);n=n+1;e=a[n];end end else if h>=38 then for r=16,62 do if h~=40 then local h,r,k,p,b;for j=0,5 do if j>2 then if 3<j then if j<5 then h=e[d]k,p=u(l[h](s(l,h+1,e[t])))f=p+h-1 b=0;for e=h,f do b=b+1;l[e]=k[b];end;n=n+1;e=a[n];else h=e[d]l[h]=l[h](s(l,h+1,f))end else l(e[d],e[t]);n=n+1;e=a[n];end else if 0>=j then l[e[d]]=c[e[t]];n=n+1;e=a[n];else if-3<j then for f=25,93 do if j>1 then h=e[d];r=l[e[t]];l[h+1]=r;l[h]=r[e[o]];n=n+1;e=a[n];break;end;l[e[d]]=c[e[t]];n=n+1;e=a[n];break;end;else h=e[d];r=l[e[t]];l[h+1]=r;l[h]=r[e[o]];n=n+1;e=a[n];end end end end break;end;l[e[d]]=c[e[t]];break;end;else local h,r,k,p,b;for j=0,5 do if j>2 then if 3<j then if j<5 then h=e[d]k,p=u(l[h](s(l,h+1,e[t])))f=p+h-1 b=0;for e=h,f do b=b+1;l[e]=k[b];end;n=n+1;e=a[n];else h=e[d]l[h]=l[h](s(l,h+1,f))end else l(e[d],e[t]);n=n+1;e=a[n];end else if 0>=j then l[e[d]]=c[e[t]];n=n+1;e=a[n];else if-3<j then for f=25,93 do if j>1 then h=e[d];r=l[e[t]];l[h+1]=r;l[h]=r[e[o]];n=n+1;e=a[n];break;end;l[e[d]]=c[e[t]];n=n+1;e=a[n];break;end;else h=e[d];r=l[e[t]];l[h+1]=r;l[h]=r[e[o]];n=n+1;e=a[n];end end end end end end end else if 35>=h then if 34>h then local n=e[d]local d,e=u(l[n](s(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=d[e];end;else if 31~=h then for n=48,54 do if h<35 then l[e[d]][e[t]]=e[o];break;end;l[e[d]]=(e[t]~=0);break;end;else l[e[d]]=(e[t]~=0);end end else if h<=36 then local e=e[d]l[e]=l[e]()else if h~=34 then repeat if h~=38 then local n=e[d]local d,e=u(l[n](s(l,n+1,e[t])))f=e+n-1 local e=0;for n=n,f do e=e+1;l[n]=d[e];end;break;end;l[e[d]]=c[e[t]];until true;else l[e[d]]=c[e[t]];end end end end else if h<=26 then if 24>h then if h>21 then repeat if h<23 then for h=0,3 do if 2<=h then if h~=-1 then repeat if 2~=h then if(l[e[d]]==e[o])then n=n+1;else n=e[t];end;break;end;l[e[d]]=c[e[t]];n=n+1;e=a[n];until true;else l[e[d]]=c[e[t]];n=n+1;e=a[n];end else if h>-1 then for o=12,59 do if h>0 then c[e[t]]=l[e[d]];n=n+1;e=a[n];break;end;l[e[d]]=(e[t]~=0);n=n+1;e=a[n];break;end;else l[e[d]]=(e[t]~=0);n=n+1;e=a[n];end end end break;end;do return end;until true;else do return end;end else if h>24 then if 22<=h then for r=24,65 do if 26~=h then n=e[t];break;end;local h,b,k,p,j;for r=0,6 do if r<=2 then if 1>r then l(e[d],e[t]);n=n+1;e=a[n];else if-3<=r then for o=31,65 do if 2~=r then h=e[d]l[h](l[h+1])n=n+1;e=a[n];break;end;l[e[d]]=c[e[t]];n=n+1;e=a[n];break;end;else h=e[d]l[h](l[h+1])n=n+1;e=a[n];end end else if r>4 then if 1~=r then repeat if r~=6 then l(e[d],e[t]);n=n+1;e=a[n];break;end;h=e[d]k,p=u(l[h](s(l,h+1,e[t])))f=p+h-1 j=0;for e=h,f do j=j+1;l[e]=k[j];end;until true;else h=e[d]k,p=u(l[h](s(l,h+1,e[t])))f=p+h-1 j=0;for e=h,f do j=j+1;l[e]=k[j];end;end else if r>=0 then repeat if 4>r then l[e[d]]=c[e[t]];n=n+1;e=a[n];break;end;h=e[d];b=l[e[t]];l[h+1]=b;l[h]=b[e[o]];n=n+1;e=a[n];until true;else h=e[d];b=l[e[t]];l[h+1]=b;l[h]=b[e[o]];n=n+1;e=a[n];end end end end break;end;else local h,b,p,k,j;for r=0,6 do if r<=2 then if 1>r then l(e[d],e[t]);n=n+1;e=a[n];else if-3<=r then for o=31,65 do if 2~=r then h=e[d]l[h](l[h+1])n=n+1;e=a[n];break;end;l[e[d]]=c[e[t]];n=n+1;e=a[n];break;end;else h=e[d]l[h](l[h+1])n=n+1;e=a[n];end end else if r>4 then if 1~=r then repeat if r~=6 then l(e[d],e[t]);n=n+1;e=a[n];break;end;h=e[d]p,k=u(l[h](s(l,h+1,e[t])))f=k+h-1 j=0;for e=h,f do j=j+1;l[e]=p[j];end;until true;else h=e[d]p,k=u(l[h](s(l,h+1,e[t])))f=k+h-1 j=0;for e=h,f do j=j+1;l[e]=p[j];end;end else if r>=0 then repeat if 4>r then l[e[d]]=c[e[t]];n=n+1;e=a[n];break;end;h=e[d];b=l[e[t]];l[h+1]=b;l[h]=b[e[o]];n=n+1;e=a[n];until true;else h=e[d];b=l[e[t]];l[h+1]=b;l[h]=b[e[o]];n=n+1;e=a[n];end end end end end else c[e[t]]=l[e[d]];end end else if h>=30 then if 31>h then if not l[e[d]]then n=n+1;else n=e[t];end;else if h>=28 then repeat if 31~=h then local h;l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];h=e[d]l[h](l[h+1])break;end;local e=e[d]l[e]=l[e](s(l,e+1,f))until true;else local h;l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];l[e[d]][e[t]]=e[o];n=n+1;e=a[n];h=e[d]l[h](l[h+1])end end else if 27<h then if h~=28 then do return end;else local e=e[d]l[e](l[e+1])end else local n=e[d];local d=l[e[t]];l[n+1]=d;l[n]=d[e[o]];end end end end end n=1+n;end;end;return ee end;local d=0xff;local f={};local a=(1);local t='';(function(n)local l=n local h=0x00 local e=0x00 l={(function(o)if h>0x2f then return o end h=h+1 e=(e+0xb8c-o)%0x4b return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x2d);end return true end)'V_rGr'and l[0x1](0x2fa+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xc2);d[2]=(d[2]*(ee(function()f()end,s(t))-ee(d[1],s(t))))+1;f[a]={};d=d[2];a=a+d;end return true end)'wSBpD'and l[0x2](o+0x7e))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x1);end return true end)'rByDT'and l[0x3](o+0xaa))or o end),(function(o)if h>0x24 then return o end h=h+1 e=(e+0xe69-o)%0x40 return(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x16);t={t..'\58 a',t};f[a]=m();a=a+((not r._g_ckjbq)and 1 or 0);t[1]='\58'..t[1];d[2]=0xff;end return true end)'dpbhw'and l[0x1](0x346+o))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x54);f[a]=ne();a=a+d;end return true end)'BagDk'and l[0x3](o+0x70))or(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x8b);t='\37';d={function()d()end};t=t..'\100\43';end return true end)'fJokM'and l[0x2](o+0x220))or o end),(function(d)if h>0x23 then return d end h=h+1 e=(e+0xca9-d)%0xc return(e%0x03==0x0 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x51);end return true end)'rQ_xG'and l[0x2](0x8d+d))or(e%0x03==0x2 and(function(l)if not n[l]then e=e+0x01 n[l]=(0xca);end return true end)'vQeMc'and l[0x3](d+0xe3))or(e%0x03==0x1 and(function(l)if not n[l]then e=e+0x01 n[l]=(0x11);end return true end)'nLbfi'and l[0x1](d+0x1d8))or d end)}l[0x2](0x1b7f)end){};local e=de(s(f));return e(...);end return m((function()local n={}local e=0x01;local l;if r._g_ckjbq then l=r._g_ckjbq(m)else l=''end if r.qtPJGrlg(l,r.bBLhugnP)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(l,e,n,t,d,a)local a;if l>3 then if 6>l then if l>=2 then repeat if 4~=l then local l=t;do return function()local e=e(n,l(l,l),l(l,l));l(1);return e;end;end;break;end;local l=t;local o,h,t=d(2);do return function()local d,n,e,a=e(n,l(l,l),l(l,l)+3);l(4);return(a*o)+(e*h)+(n*t)+d;end;end;until true;else local l=t;local d,t,o=d(2);do return function()local e,n,h,a=e(n,l(l,l),l(l,l)+3);l(4);return(a*d)+(h*t)+(n*o)+e;end;end;end else if l<=6 then do return d[n]end;else if 4<=l then for e=47,60 do if l~=7 then do return n(l,nil,n);end break;end;do return setmetatable({},{['__\99\97\108\108']=function(e,d,t,l,n)if n then return e[n]elseif l then return e else e[d]=t end end})end break;end;else do return n(l,nil,n);end end end end else if l<=1 then if-3<l then repeat if 1~=l then do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;break;end;do return function(l,e,n)if n then local e=(l/2^(e-1))%2^((n-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(l%(e+e)>=e)and 1 or 0;end;end;end;until true;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end else if l>-1 then for a=17,65 do if 2~=l then do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;break;end;do return 16777216,65536,256 end;break;end;else do return e(1),e(4,d,t,n,e),e(5,d,t,n)end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement